/*
    * È­¸é   : SMPAI00100_ÀÔ¿ø Åð¿ø¼ö³³.xrw
    * ¼³¸í   : ÀÔ¿ø¼ö³³
    * ÀÛ¼ºÀÚ : 
    * ÀÛ¼ºÀÏ : 2010/12/22 
*/

function fReady() {
		btn_clamrcpt.selected= true;
		model.setValue("/root/main/admi_info/rcptmthd/allotmm" 		, "00");
		model.setValue("/root/main/admi_info/rcptmthd/rcptmthd" 	, "3"); 	//1-Ä«µå, 2-Çö±Ý¿µ¼öÁõ, 3-Çö±Ý
		model.setValue("/root/main/admi_info/rcptmthd/cashmthd" 	, "00"); 	//00-¼Òµæ°øÁ¦, 01-ÁöÃâÁõºù, 02-¹Ì½ÂÀÎ

		// 20091216 JHP ¼ö°¡Àç°è»ê±¸ºÐ(IPHS.calcscorrecalflag)  °øÅëÄÚµå(P0027) Ãß°¡
		zbcfGetCodeList(new Array("P0363","P0160","P0006","P0008","P0010","P0025","P0026","P0032", "P0312", "P0311", "P0104", "P0019", "P0001", "P0076","P0027", "P0327"),
						new Array("/root/init/P0363list","/root/init/P0160list","/root/init/P0006list","/root/init/P0008list","/root/init/P0010list","/root/init/P0025list"
					   			 ,"/root/init/P0026list","/root/init/P0032list","/root/init/P0312list","/root/init/P0311list","/root/init/P0104list","/root/init/P0019list"
					   			 ,"/root/init/P0001list","/root/init/P0076list","/root/init/P0027list","/root/init/P0327list"));

		//2009.08.28 - ¿ø¹«°øÅëÄÚµå
		//2009.10.28 - ÀÚµ¿¹Ì¼öÄÚµå Ãß°¡ - P0081
		pamfGetCodeList(new Array("P0022", "P0041", "P0063", "P0071", "P0081", "PK018", "PK020", "PK059", "PK062", "PK084", "P6571", "P0032"),
						new Array("/root/init/PAM/P0022list", "/root/init/PAM/P0041list", "/root/init/PAM/P0063list", "/root/init/PAM/P0071list", "/root/init/PAM/P0081list", "/root/init/PAM/PK018list", "/root/init/PAM/PK020list", "/root/init/PAM/PK059list", "/root/init/PAM/PK062list", "/root/init/PAM/PK084list", "/root/init/PAM/P6571list", "/root/init/PAM/P0032list"));

		//Çö±Ý¿µ¼öÁõ ÀÚµ¿½ÂÀÎ ¿©ºÎ
		if( model.getValue("/root/init/PAM/P0022list/P0022[cdid = '160' ]/cdnm") == 'Y'){
			model.setValue("/root/init/option/autocashyn", model.getvalue("/root/init/PAM/P0022list/P0022[cdid = '160' ]/cdnm"));
		}
		model.setValue("/root/init/option/inhospyn", "N");
		
		// Áø·áºñ ¼¼ºÎ³»¿ª¼­ ÀÚµ¿Ãâ·Â üũ ÇØÁ¦ by Á¶Áß·¡ 20150528
		model.setValue("/root/init/option/specbillyn",  "");
		model.setValue("/root/init/option/specbillcnt", "1");
		
		// °³ÀÎÁ¤º¸À̿뵿ÀǼ­ Ãâ·ÂÀ» À§ÇÑ ¼­½ÄÄÚµå Ãëµæ
		reqHardCodeInfo("/root/send/reqdata", "/root/init/prncd", "5604");
		
		// °¡Åð¿ø Á¤»êSMS ¹ß¼Û¿ë ¸Þ¼¼Áö Æ÷¸Ë Ãëµæ ¹× Àü¼Û¿©ºÎ ÃʱâÈ­
		submit("TRPAI00137");
		checkbox4.hint = model.getValue("/root/init/receiptsms/smsmsg/orgmsgfrmtcnts");
		checkbox5.hint = model.getValue("/root/init/receiptsms/ezpasssmsmsg/orgmsgfrmtcnts");
		chk_chemosms.hint = model.getValue("/root/init/receiptsms/chemosms/orgmsgfrmtcnts");
		model.setValue("/root/init/option/receiptsms", "Y");
		model.setValue("/root/init/option/ezpasssms",  "");
		model.setValue("/root/init/option/chemosms",  "");
		
		if (getUserInfo("dutplceinstcd") == "032") {
			chk_chemosms.visible = true;	
		}
		
		//±Ý¾×Ç¥½Ã±â ÃʱâÈ­
		fInit_Display();
		//±Ý¾×Ç¥½Ã±â Æ÷Æ®¿­±â
		fOpenCom();
		//¼¼¼ÇÁ¤º¸ ÃßÃâÇϱâ
		fGetUserInfosSampling();
		model.setValue("/root/send/sess_posinstcd", model.getValue("/root/hidden/session/posinstcd"));
		model.setValue("/root/send/ioflag", "I");
		submit("TRPAI00120");
		model.setFocus("ipt_pid");

		 // ÀÀ±Þ½ÇÀç½ÇȯÀÚÁ¶È¸ È­¸é¿¡¼­ ³Ñ±â´Â ȯÀÚ¹øÈ£ ÆĶó¹ÌÅÍ Ã³¸®
		 // Top Viewer
		 var topViewer = getViewer("patientInfo");
		if (topViewer != null) {
			var sParamPid = topViewer.window.javascript.getParameter("SMPAI00100_Param1");
			if (!isNull(sParamPid)) {
				topViewer.window.javascript.clearParameter("SMPAI00100_Param1");

				model.setValue("/root/main/inpt_info/inptpatinfo/inpt_pid", sParamPid);
				fInPatInfoRef("1");
			}
		}
		
		// °³ÀÎ/°è¾àó ¹Ì¼öÀԱݰü¸®È­¸é¿¡¼­ È£ÃâµÇ´Â °æ¿ì ÆĶó¹ÌÅÍ Ã³¸®
		if (checkOpener()){
			var sParamPid = opener.window.javascript.getParameter("ipt_pid");
			if (!isNull(sParamPid)) {
    			model.setValue("/root/main/inpt_info/inptpatinfo/inpt_pid", sParamPid);
    			fInPatInfoRef("1");
			}
		}

        // ½Ç»ç °ü·Ã by Á¶Áß·¡ 20171211
        if (model.getValue("/root/hidden/session/userid") != "SIMSA1"
                && model.getValue("/root/hidden/session/userid") != "SIMSA2"
                && model.getValue("/root/hidden/session/userid") != "SIMSA3"
                && model.getValue("/root/hidden/session/userid") != "SIMSA4"
                && model.getValue("/root/hidden/session/userid") != "SIMSA5"
                && model.getValue("/root/hidden/session/userid") != "SIMSA6") {
            button16.visible = true;
            button19.visible = true;
        }
}

//ȯÀÚ¹øÈ£ÈÄ ¿£ÅÍ À̺¥Æ®
function fInPatInfoRef(sflag) {
		fCloseAmt();
		
		model.resetInstanceNode("/root/main/emr_prcpspec/grdnexecspec");		//¹Ì½ÃÇàó¹æ
		model.resetInstanceNode("/root/main/admi_info/rcptmthd");  				//¼ö³³¹æ¹ý, ¼ÒµæÁöÃâÁõºù, Ä«µå¹øÈ£, À¯È¿±â°£, ÇÒºÎ
		model.setValue("/root/main/admi_info/rcptmthd/rcptmthd" 	, "3"); 	////1-Ä«µå, 2-Çö±Ý¿µ¼öÁõ, 3-Çö±Ý
		model.setValue("/root/main/admi_info/rcptmthd/cashmthd" 	, "00"); 	//00-¼Òµæ°øÁ¦, 01-ÁöÃâÁõºù, 02-¹Ì½ÂÀÎ
		model.setValue("/root/init/option/pregdmndamtchk" 			, "");
		model.setValue("/root/init/option/iphs_div" 				, "false"); // °­Á¦ºÐ¸® ÃʱâÈ­
		
		if (sflag =="1") {
			var spid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid");
			if (spid == "" || spid == null) {
				messageBox("ȯÀÚµî·Ï¹øÈ£°¡", "I004");
				fInitialize("all");
				return false;
			}
			model.setValue("/root/send/pid", spid);
		}
		else if (sflag =="2") {
			var shngnm = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm");
			if (shngnm == "" || shngnm == null) {
				messageBox("¼º¸íÀÌ","I004");
				return false;
			}
			model.setValue("/root/send/hngnm", shngnm);
		}
		else if (sflag =="3") {
			var srrgstno1 = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno1");
			var srrgstno2 = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno2");
			if (srrgstno1 == "" || srrgstno1 == null) {
				messageBox("ÁֹιøÈ£°¡", "I004");
				return false;
			}
			model.setValue("/root/send/rrgstno1", srrgstno1);
			model.setValue("/root/send/rrgstno1", srrgstno2);
		}

		model.setValue("/root/send/refflag", sflag); //Á¶È¸Á¶°Ç(ȯÀÚ¹øÈ£, ¼º¸í, ÁֹιøÈ£)
		submit("TRPAI00101");
		if (model.getValue("/root/hidden/inpt_info/inptpatinfo/inpt_indd") == "" || model.getValue("/root/hidden/inpt_info/inptpatinfo/inpt_indd") == null) {
			messageBox("ÇØ´ç ȯÀÚ´Â ÀÔ¿ø³»¿ªÀÌ", "I004");
			fInitialize("all");
			return false;
		}
		
		//µ¿ÀǼ­ Ãâ·Â¿©ºÎ
		var scanyn = model.getValue("/root/hidden/inpt_info/inptpatinfo/inpt_scanyn");
		cpt_scanyn.text = '[µ¿:' + scanyn + ']';
		
		//¼±ÅÃÁø·á ½ºÄµ¿©ºÎ 2011/10/01 °í½Ã
        var spifScanYn = model.getValue("/root/hidden/inpt_info/inptpatinfo/inpt_spifscanyn");
        
        // °Ý¸®´ë»óÁ¤º¸ Ç¥½Ã
        fSetIsolInfo(model.getValue("/root/hidden/inpt_info/inptpatinfo/inpt_isolinfo"));
        
        // ¸Þ¸£½º ´ë»óÀÚ Á¶È¸
        fMersPatChk("PAM", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
        
        //½ºÄµµÇÁö ¾ÊÀº °æ¿ì, ¼±ÅÃÁø·áÁ¶È¸È­¸é ¿¬µ¿
        if (spifScanYn != 'Y') {
            if (messageBox("¼±ÅÃÁø·á½Åû¼­ Áß ½ºÄµµÇÁö ¾ÊÀº °ÇÀÌ Á¸ÀçÇÕ´Ï´Ù."
                    + "\r\n¼±ÅÃÁø·á½Åû¼­¸¦ Á¶È¸", "S001") == "6") {
                setParameter("SMPMC06503_PARM_PID", model.getValue("/root/hidden/inpt_info/inptpatinfo/inpt_pid"));
                modal("SMPMC06503");
            }
        }
		
		model.setValue("/root/send/indd", model.getValue("/root/hidden/inpt_info/inptpatinfo/inpt_indd"));
		model.setValue("/root/send/ordtype", model.getValue("/root/hidden/inpt_info/inptpatinfo/inpt_ordtype"));

		fInPatInfo();	//ÀÔ¿ø combo seting ȯÀÚÀÇ ÀÔ¿øÀÏÀÚ
		fAgeCalc();		//³ªÀÌ°è»ê
		fInDayNo();		//ÀÔ¿øÀϼö °è»ê

		//2009.06.12 - ER/DSC ÀÚµ¿ ¹èÄ¡
		fSetAutoErDscCalc();

		//°¨¸éÁ¤º¸Ã¼Å©
		fGetDcucInfo(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));

		fIPatInfoChk();	//ȯÀÚÁ¤º¸Á¶È¸(»óº´, ¼ö¼ú, ¹Ì¼ö, ÈÄ¿ø±Ý, OPD/¼ö³³ µî)
		
		model.setValue("/root/main/admi_info/rcptmthd/allotmm", "00");
		
		//ȯÀÚÁ¶È¸½Ã ÀÚ°Ýüũ
		//20110409 ¼ö³³½ÃÁ¡¿¡ ÀÚ°Ýüũ·Î º¯°æ
		//fCheckInsuRgst();
		
		var vpid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid");
		
		//¹ÌÁø·á ¿¹¾à±Ý ȯºÒ Æ˾÷
		//fCheckRefund(vpid);
		
		//»ç¸ÁÇÑ È¯ÀÚ ¹Ì½ÃÇà ó¹æ Á¸Àç¿©ºÎ üũ - 20130905
		var dethdt = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dethdt");
		if(dethdt != '-' && dethdt.length > 0){
			fGetDethOtptInfo(vpid);
		}
		
		// ÈÞÁøÀÏÁ¤ °ËÁõ·ÎÁ÷ Ãß°¡ by Á¶Áß·¡ 20131106
		// ½É»çÆÀ ¿äû ÀÖÀ»¶§±îÁö ¹«±âÇÑ Àû¿ë ¿¬±â
		//fGetDrHoliInfo();
		
		model.setFocus("ipt_rcptcd");
		model.refresh();
	}
	
	//ÀÚ°ÝÁ¶È¸ È­¸é ÃʱâÈ­
	function fInitInsuInfo(){
		var ivrObjt = document.all("ivr_insupopup");
		if( ivrObjt == null ){
			body.createChild("xforms:iviewer", "id:ivr_insupopup; src:../../../pam/pamcomnweb/xrw/SPPMC03900_ÀÇ·á±Þ¿©ÀÚ°ÝÁ¶È¸½ÂÀÎ.xrw");
			ivrObjt = document.all("ivr_insupopup");	
			//°øÅëÄÚµå ÃʱâÈ­
			ivrObjt.window.javascript.fGetInitCode();
		}
	}
			
	//ȯÀÚÁ¶È¸½Ã ÀÚ°Ýüũ
	function fCheckInsuRgst(){
		
		//ȯÀÚÁ¶È¸ ¿Ï·á½Ã ÀÚ°Ýüũ
		clearParameter("SPPMC03900_RTN");
		clearParameter("SPPMC03900_insukind");
		clearParameter("SPPMC03900_suppkind");
		clearParameter("SPPMC03900_insucd");
		clearParameter("SPPMC03900_insuno");
		clearParameter("SPPMC03900_insdnm");
		clearParameter("SPPMC03900_insufromdd");
		clearParameter("SPPMC03900_ownbflag");
		clearParameter("SPPMC03900_ETCORD");
		clearParameter("SPPMC03900_handcapfundyn");
		
        //if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid") == "") {
        //return true;
        //}

		var srow = grd_inpatinfo.row;
		if (srow <= 0) {
			srow = 1;
		}
		
		if( model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") != '11'
			&& model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") != '21'
			&& model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") != '22' ){
					
				//º¸Çè, ±Þ¿©ÀÏ ¶§¸¸ üũ
				return;
		}
		
		//±âÁØÀÏÀÚ¸¦ À¯Çü ½ÃÀÛÀÏ¿¡¼­ Á¾·áÀÏÀÚ·Î º¯°æ(±è¹«Á¶ ¼±»ý´Ô ¿äû 2012-09-13)
		var iphs_todd = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd");
		//Á¾·áÀÏÀÌ 99991231 ÀÌ¸é ¿À´ÃÀÏÀÚ·Î º¯°æÇؼ­ üũÇÑ´Ù.
		if( iphs_todd = "99991231" ) iphs_todd = getCurrentDate();
		
		var parm = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno1") 						+
								model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno2") 							+ "¢Ë" + //ÁֹιøÈ£
										model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm") 					+ "¢Ë" + //À̸§
										//model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd") 						+ "¢Ë" + //Áø·áÀÏÀÚ
										//model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd")	    + "¢Ë" + //Áø·áÀÏÀÚ
										iphs_todd 																		+ "¢Ë" + //±âÁØÀÏÀÚ¸¦ À¯Çü ½ÃÀÛÀÏ¿¡¼­ Á¾·áÀÏÀÚ·Î º¯°æ(±è¹«Á¶ ¼±»ý´Ô ¿äû 2012-09-13)
										model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno") 					+ "¢Ë" + //Áø·á»ý¼º¹øÈ£(´çÀÏ ¿Ü·¡¿äÀ²¸¸ Àû¿ëÇÏ´Ï iphs°ÍÀ» »ç¿ëÇÏÁö ¾ÊÀ½)
										model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype")					+ "¢Ë" +//ordtype
										""																											+ "¢Ë"+ //Åð¿øÀÏÀÚ
										""																				+ "¢Ë"+//º»ÀÎÀϺκδã±Ý
										""																				+ "¢Ë"+//±â°üºÎ´ã±Ý
										model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")							+ "¢Ë"+  //µî·Ï¹øÈ£
										model.getValue("/root/main/inpt_info/inptpatinfo/inpt_orddeptcd")				+ "¢Ë" +  //Áø·á°ú
										//model.getValue("/root/hidden/init/orddeptcd[ cd = '" + model.getValue("/root/main/inpt_info/inptpatinfo/inpt_orddeptcd") + "']/reqdeptno") 	+ "¢Ë" + //Áø·á°ú
										""									 											+ "¢Ë" + //º»Àκδ㱸ºÐ
										""																				+ "¢Ë" +		//ºñ±Þ¿©Ãѱݾ×
										""																	 			+ "¢Ë" + 	//»êÀüÁø·áºñ
										model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind")		+ "¢Ë"; 	//º¸Á¶À¯Çü
		
		setParameter("SPPMC03900_PARM",parm);
			
		//½ÅÁ¾Ç÷çÁø·á 
		setParameter("SPPMC03900_ETCORD", '-');
		
		setParameter("SPPMC03900_MSGYN", "N");
		
		if( fApproveHeallifeAmt2() == false ){
				
			var retVal = messageBox("ȯÀÚÀÇ º¸ÇèÁ¤º¸°¡ ÀÏÄ¡ÇÏÁö ¾Ê½À´Ï´Ù.[ÀÚ°ÝÁ¶È¸½ÇÆÐ]\nÀÚ°ÝÁ¶È¸¿¡¼­ È®ÀÎÇϽðڽÀ´Ï±î?", "Q999", "");
			if( retVal == '6' ){
				//button48.dispatch("DOMActivate");
				return false;
			}

		}else{
			
			if (getParameter("SPPMC03900_RTN") == "N" || getParameter("SPPMC03900_RTN") == ""){	
				
				var retVal = messageBox("ȯÀÚÀÇ º¸ÇèÁ¤º¸°¡ ÀÏÄ¡ÇÏÁö ¾Ê½À´Ï´Ù.[ÀڰݾøÀ½]\nÀÚ°ÝÁ¶È¸¿¡¼­ È®ÀÎÇϽðڽÀ´Ï±î?", "Q999", "");
				if( retVal == '6' ){
					//button48.dispatch("DOMActivate");
					return false;
				}
				
			}else if (getParameter("SPPMC03900_RTN") == "Y") { 
				
				var insukind = getParameter("SPPMC03900_insukind");
				var suppkind = getParameter("SPPMC03900_suppkind");
				
				if( insukind != model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") ){
					
					var retVal = messageBox("ȯÀÚÀÇ º¸ÇèÁ¤º¸°¡ ÀÏÄ¡ÇÏÁö ¾Ê½À´Ï´Ù.[ÀڰݺÒÀÏÄ¡]\nÀÚ°ÝÁ¶È¸¿¡¼­ È®ÀÎÇϽðڽÀ´Ï±î?", "Q999", "");
					if( retVal == '6' ){
						//button48.dispatch("DOMActivate");
						return false;
					}
				
				}else{
					if( getParameter("SPPMC03900_handcapfundyn") == "Y" ){			//Àå¾Ö´ëºÒ °¡´É ¿©ºÎ üũ
						//Àå¾Ö´ëºÒ Àû¿ë ¿©ºÎ üũ
						if( model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_handicaprbookpossnyn") != 'Y' ){
							var retVal = messageBox("Àå¾ÖÀδëºÒ °¡´ÉÇÑ È¯ÀÚÀÔ´Ï´Ù. \nÈ®ÀÎ ÈÄ Àå¾ÖÀ趽ºÅÍ µî·Ï ¹× Àå¾ÖÀδëºÒ Àû¿ëÇØÁÖ¼¼¿ä!" 
															+ "\nÈ®ÀÎ ÈÄ ¼ö³³À» ÁøÇàÇϽðڽÀ´Ï±î?[No : ¼ö³³ÁøÇà]", "Q999", "");
							if( retVal == '6' ){
								//button48.dispatch("DOMActivate");
								return true;
							}
						}
					}
				}
												
			}else{
				
				var retVal = messageBox("ȯÀÚÀÇ º¸ÇèÁ¤º¸°¡ ÀÏÄ¡ÇÏÁö ¾Ê½À´Ï´Ù.[ÀÚ°ÝÈ®ÀÎÇÊ¿ä]\nÀÚ°ÝÁ¶È¸¿¡¼­ È®ÀÎÇϽðڽÀ´Ï±î?", "Q999", "");
				if( retVal == '6' ){
					//button48.dispatch("DOMActivate");
					return false;
				}
			}
			
			//Àå¾Ö´ëºÒ ´ë»óÀÌ ¾Æ´Ñ°æ¿ì üũ
			if( getParameter("SPPMC03900_handcapfundyn") != "Y" ){			//Àå¾Ö´ëºÒ °¡´É ¿©ºÎ üũ
				//Àå¾Ö´ëºÒ Àû¿ë ¿©ºÎ üũ
				if( model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_handicaprbookpossnyn") == 'Y' ){
					var retVal = messageBox("Àå¾ÖÀδëºÒ Àû¿ë ºÒ°¡´ÉÇÑ È¯ÀÚÀÔ´Ï´Ù. \nÀå¾ÖÀÎÁ¤º¸¸¦ È®ÀÎ ÇϽŠÈÄ Àå¾Ö´ëºÒ Àû¿ë Ãë¼ÒÇØÁÖ¼¼¿ä!"
													+ "\nÈ®ÀÎ ÈÄ ¼ö³³À» ÁøÇàÇϽðڽÀ´Ï±î?[No : ¼ö³³ÁøÇà]", "Q999", "");
					if( retVal == '6' ){
						//button48.dispatch("DOMActivate");
						return true;
					}
				}
			}
		}
		
		return;
						//}
	}
	//ȯÀÚÁ¤º¸Á¶È¸

	function fIPatInfoChk() {


		model.resetInstanceNode("/root/send/data1");
		model.makeValue("/root/send/data1/pid"        , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
		model.makeValue("/root/send/data1/cretno"     , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno"));
		model.makeValue("/root/send/data1/indd"       , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
		model.makeValue("/root/send/data1/orddeptcd"  , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_orddeptcd"));
		model.makeValue("/root/send/data1/dschdclrtyn", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdclrtyn"));
		model.makeValue("/root/send/data1/dschdclrdt" , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdclrdt").substr(0, 8));
		model.makeValue("/root/send/data1/dschnotiyn" , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotiyn"));
		model.makeValue("/root/send/data1/dschnotidt" , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt").substr(0, 8));
		model.makeValue("/root/send/data1/dschdd"     , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdd"));

		// ƯÀÌȯÀÚÁ¶È¸ (½Ç»ç¿ë)
//		model.makeValue("/root/hidden/rcv/patinfo/checkyn", "");
//        if (submit("TRPMC06515")) {
//            
//            // ƯÀÌȯÀÚ¿©ºÎ (Y:ƯÀÌȯÀÚ)
//            if (model.getValue("/root/hidden/rcv/patinfo/checkyn") == "Y") {
//                
//                messageBox("\r\n¾÷¹«Ã³¸®½Ã ¿À·ù°¡ ¹ß»ýÇÏ¿´½À´Ï´Ù!!!\r\n\r\nÇØ´ç ³»¿ëÀÇ Ã³¸®´Â ¿ø¹«ÆÀ(6178)À¸·Î ¹®ÀÇ ¹× ¾È³»ÇϽñ⠹ٶø´Ï´Ù.", "C000");
//                fInitialize("all");
//                return false;
//            }
//        }

///////////////////////////////////////////////////////////////////////////////////////////////////////////
//¼Ò½º Æ©´× ½ÃÀÛ

		//model.removeNodeset("/root/send/pidinfo");
        model.setValue("/root/send/pidinfo/pid"         , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
        model.setValue("/root/send/pidinfo/indd"        , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
        model.setValue("/root/send/pidinfo/intm"        , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_intm")); // µ¿ÀÏÀÏÀÚ Àç³»¿ø ±¸ºÐ¿ë
        model.setValue("/root/send/pidinfo/cretno"      , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno"));
        model.setValue("/root/send/pidinfo/orddeptcd"   , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_orddeptcd"));
        model.setValue("/root/send/pidinfo/dschdclrdt"  , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdclrdt"));
        model.setValue("/root/send/pidinfo/dschdclrtyn" , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdclrtyn"));
        model.setValue("/root/send/pidinfo/emplnm"      , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm"));
        model.setValue("/root/send/pidinfo/rrgstno1"    , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno1"));
        model.setValue("/root/send/pidinfo/rrgstno2"    , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno2"));
		model.setValue("/root/send/pidinfo/dschnotiyn"  , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotiyn"));
		model.setValue("/root/send/pidinfo/dschnotidt"  , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt").substr(0, 8));
		model.setValue("/root/send/pidinfo/dschdd"      , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdd"));
		model.setValue("/root/send/pidinfo/ordtype"     , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype"));
		model.setValue("/root/send/pidinfo/mskind"      , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_mskind"));
	  //model.setValue("/root/send/pidinfo/iphs_div"    , bl_iphs_div.value);

        submit("TRPAI00135");
        //model.removeNodeset("/root/send/pidinfo");
        
		/* ¼Óµµ Æ©´×À» À§ÇÑ ¼­ºê¹Ô ÅëÇÕ
		TRPAI00102
		TRPAI00107
		TRPAI00108
		TRPAI00121
		TRPAI00124
		TRPAI00125
		TRPAI00132
		TRPAI05008
		TRPAI05009
		TRPAI05010

		TRPAI00125´Â ´Ù¸¥°÷¿¡¼­µµ È£Ãâ ³ª¸ÓÁö´Â »èÁ¦Çصµ µË´Ï´Ù.
		*/
		model.copyNode("/root/main/iphs_info/h_grdipatinfo"  , "/root/hidden2/all_info/pidinfo/h_grdipatinfo");
		model.copyNode("/root/main/iphs_info/h_opspec"       , "/root/hidden2/all_info/pidinfo/h_opspec");
		model.copyNode("/root/main/iphs_info/h_iphscnt"      , "/root/hidden2/all_info/pidinfo/h_iphscnt");

        model.copynode("/root/main/ermngtamtmsg/ermsg"          , "/root/hidden2/all_info/pidinfo/h_ermsg/ermsg");
        model.copynode("/root/main/ermngtamtmsg/ermsg1"         , "/root/hidden2/all_info/pidinfo/h_ermsg1/ermsg1");
        //model.copynode("/root/main/emr_ast_info/grdbabyhsct"    , "/root/hidden2/all_info/pidinfo/h_grdbabyhsct/grdbabyhsct"); // ´ÜÀÏ ³ëµå º¹»ç ¼öÁ¤ by Á¶Áß·¡ 20141217
        copyNodesetType("/root/main/emr_ast_info/grdbabyhsct"   , "/root/hidden2/all_info/pidinfo/h_grdbabyhsct/grdbabyhsct","replace");
        model.copynode("/root/main/prcpcodechk"                 , "/root/hidden2/all_info/pidinfo/h_prcpchk");
        model.copynode("/root/temp6/deathinfo"                  , "/root/hidden2/all_info/pidinfo/h_deathlist");
        model.copynode("/root/temp7/testrsrvinfo"               , "/root/hidden2/all_info/pidinfo/h_testrsrvlist");
        model.copynode("/root/temp8/profcertinfo"               , "/root/hidden2/all_info/pidinfo/h_profcertlist");
        model.copynode("/root/main/ipsc_info"                   , "/root/hidden2/all_info/pidinfo/h_retcspec");

        model.makeNode("/root/temp/result/h_famylist");
        model.copynode("/root/temp/result/h_famylist"           , "/root/hidden2/all_info/pidinfo/h_famylist");

        model.makeNode("/root/send/charity/rcv");
        model.copynode("/root/send/charity/rcv"                 , "/root/hidden2/all_info/pidinfo/h_charity");

        model.makeNode("/root/send/suppmanage/rcv");
        model.copynode("/root/send/suppmanage/rcv"              , "/root/hidden2/all_info/pidinfo/h_supp");

        model.makeNode("/root/temp/h_patprivacy");
        model.copynode("/root/temp/h_patprivacy"                , "/root/hidden2/all_info/pidinfo/h_patprivacy");

        model.copyNode("/root/main/pat_info/h_emr_snw"          , "/root/hidden2/all_info/pidinfo/h_emr_snw");
        model.copyNode("/root/main/pat_info/h_otpt_rsrv"        , "/root/hidden2/all_info/pidinfo/h_otpt_rsrv");
        model.copyNode("/root/main/pat_info/h_unco_uncoamt"     , "/root/hidden2/all_info/pidinfo/h_unco_uncoamt");
        model.copyNode("/root/main/pat_info/h_ptsp_specpat"     , "/root/hidden2/all_info/pidinfo/h_ptsp_specpat");
        
        model.copyNode("/root/main/pat_info/h_capm"     				, "/root/hidden2/all_info/pidinfo/h_capm");
        
        model.copyNode("/root/main/pat_info/h_cshb_cashrcptnum" , "/root/hidden2/all_info/pidinfo/h_cshb_cashrcptnum");
        model.copyNode("/root/main/pat_info/h_dump_brgstcnt"    , "/root/hidden2/all_info/pidinfo/h_dump_brgstcnt");
        model.copyNode("/root/main/pat_info/h_bldccnt"          , "/root/hidden2/all_info/pidinfo/h_bldccnt");
        model.copyNode("/root/main/pat_info/h_cert"             , "/root/hidden2/all_info/pidinfo/h_cert");
        model.copyNode("/root/main/pat_info/h_dump"             , "/root/hidden2/all_info/pidinfo/h_dump");
        
		grd_inpatinfo.rebuild();
		
		fIphs_Info();
		
		var srow = grd_inpatinfo.row
		//Àç¿øÁ¤º¸ grid ¼±ÅÃÀÌ ¾øÀ»½Ã 1¹ø°¸¦ ¼±ÅÃÇϵµ·Ï ÇÑ´Ù
		if (srow <= 0 ) {
			srow = 1;
		}

        //¹öÆ° »óÅ× ¼ÂÆÃ
        fBtn_State();

        //Çö±Ý¿µ¼öÁõ Àǹ«È­
        fCashQualCnfmno();

        //ÀÀ±Þ½Ç ȯÀÚ ÀÀ±ÞÀÇ·á°ü¸®·á Á¤º¸ Ç¥½Ã //ÀÀ±ÞÀü¿ø¼Ò°ß¼­ Á¶È¸
        fER_mngt_msg(srow);  //TRPAI00125 ok

        //»ê¸ð, ½Å»ý¾Æ, ¼öÇýÀÚ, °ø¿©ÀÚ Á¤º¸ Á¶È¸
        fBabyHsct();    //TRPAI00107 ok

        //¼öÀͱ¸ºÐ
        fCalcInfo("2");  //TRPAI00103    <- ¿©·¯°÷¿¡¼­ È£Ãâ

        //BÇü°£¿° ¼öÁ÷°¨¿° Á¢Á¾, ¼ºÆø·Âkit, À½ÁÖäÇ÷ üũ
        //submit("TRPAI00124"); ok

        //Áø·áºñ³»¿ª
        //fOrdAmtInfo();    //TRPAI00104  , TRPAI00131  <- ¿©·¯°÷¿¡¼­ È£Ãâ

        //û±¸¼ö³³ ³»¿ª
        //fRcptInfo("1");   //TRPAI00105  ,  TRPAI00106
		
		//Áø·áºñ³»¿ª,û±¸¼ö³³ ³»¿ª
		fRcpt_AllInfo("Y","Y","1");

        //ÀÀ±Þ½Ç Åð¿ø½É»ç - ¹öÆ° visility ¿©ºÎ ÆÇ´Ü -¼øõÇâ¹öÀü °æºÏ´ë »ç¿ë¾ÈÇÔ
        //fBtn_judg();

        //»ç¸ÁȯÀÚÀÏ °æ¿ì ¿Ü·¡Á¢¼ö³»¿ªÁ¶È¸ -¼øõÇâ¹öÀü °æºÏ´ë »ç¿ë¾ÈÇÔ
        //fDethordlist();  //TRPAI05008 ok  test pid: 1172353

        //°Ë»ç¿¹¾à³»¿ª -¼øõÇâ¹öÀü °æºÏ´ë »ç¿ë¾ÈÇÔ
        //fTestRsrv();     //TRPAI05009 ok  test pid: 9876543

        //ÀÀ±Þ 6½Ã°£ ¹Ì¸¸ ¿Ü·¡ ºÎ´ãÀ² Á¤º¸ ¸Þ¼¼Áö
        fBrateflagMsg();

        //Àç¿ø»óÅ º¸Á¶À¯Çü º¯°æ üũ
        fInsukindChk();
        
        // Åð¿øÀÌÈÄ¿¡´Â ¼Ò±Þ³»¿ªÀ» Á¶È¸ÇÏÁö ¾Êµµ·Ï ¼öÁ¤ by Á¶Áß·¡ 20130814
        if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indschacptstat") != "D") {
            //¼Ò±Þ³»¿ª Á¶È¸
            fRetcSpec();        //TRPAI00108 ok  ,  TXPAI01801
        }

		//////////////////////////////////////////////ȯÀÚ ½Å±ÔÁ¶È¸½Ã Á¦°øÇÏ´Â Á¤º¸µé///////////////////////////////////////////////////////
		//Á¦Áõ¸í³»¿ª -¼øõÇâ¹öÀü °æºÏ´ë »ç¿ë¾ÈÇÔ
		//fProfCert();     //TRPAI05010

		//°¨¸éȯÀÚ Á¶È¸ //TRPMC03802 ok   test pid: 3006639
		//fGetPsnWorkInfo_i(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno1") + model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno2"),
		//				  model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm"),"Y");
		fGetPsnWorkInfo_pid_i(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")	,"Y");
		//¹Ì¼ö±Ý³»¿ª ¿©ºÎ È®ÀÎ
		fUncoAmtChk();

		//º¸°ü±Ý³»¿ª ¿©ºÎ È®ÀÎ
		fKeepAmtChk();

		//ÀÚ¼±È¯ÀÚ popup    //TRPMO00121 ok   test pid: 3006639
		fCheckCharityYN_i(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"), "Y");

		//ÈÄ¿ø±Ý ȯÀÚ popup  //TRPAI00132 ok
		fSuppManageYN_i(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"), "Y");

		// »ç»ýÈ°º¸È£ ¿äû üũ  //TRPMC06904 ok  test pid: 1172353
		fGetPatPrivacyInfo_i(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid") , "Y");
		
		// °Ý¸®º´½Ç ½Åû¿©ºÎ üũ
		fGetPatIsolateInfo(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_isolateinfo"));
		//////////////////////////////////////////////ȯÀÚ ½Å±ÔÁ¶È¸½Ã Á¦°øÇÏ´Â Á¤º¸µé ³¡///////////////////////////////////////////////////////

//¼Ò½º Æ©´× ¸¶°¨
///////////////////////////////////////////////////////////////////////////////////////////////////////////


		//dump ÇåÇ÷Áõ ³»¿ª üũ
		if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indschacptstat") == "A") {
			//ÀÇ±Þ 1Á¾, Â÷»óÀ§ 1Á¾, Èñ±Í H ȯÀÚ´Â ¸Þ¼¼Áö ¾È »Ñ¸².
			//if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") != "21" &&
			//	model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind") != "32" &&
			//	model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_rareobstflag") != "H") {
			
                var ibrgstcnt = 0;
                var strbrgstmsg="";

                for(var idx=1; idx<=getNodesetCount("/root/main/pat_info/h_dump_brgstcnt/dump_brgstcnt"); idx++) {
                    //if (model.getValue("/root/main/pat_info/h_dump_brgstcnt/dump_brgstcnt[" + idx + "]/oicv_brgstinrcptyn") == "N") {
                    if (parseInt(model.getValue("/root/main/pat_info/h_dump_brgstcnt/dump_brgstcnt[" + idx + "]/oicv_brgstcnt")) > 0) {
                        ibrgstcnt = ibrgstcnt + parseInt(model.getValue("/root/main/pat_info/h_dump_brgstcnt/dump_brgstcnt[" + idx + "]/oicv_brgstcnt"));
                        //alert(model.getValue("/root/main/pat_info/h_dump_brgstcnt/dump_brgstcnt[" + idx + "]/oicv_orddd"));
                        strbrgstmsg=strbrgstmsg+" "+ model.getValue("/root/main/pat_info/h_dump_brgstcnt/dump_brgstcnt[" + idx + "]/oicv_orddd")+":"+parseInt(model.getValue("/root/main/pat_info/h_dump_brgstcnt/dump_brgstcnt[" + idx + "]/oicv_brgstcnt"))+"°Ç";
                    }
                    //}
                }
                var icnt = model.getValue("/root/main/pat_info/h_bldccnt/bldccnt/iscl_bldccnt");
                

                if (icnt>0 || ibrgstcnt>0){
                    messageBox("¼öÇ÷ó¹æÀÌ ["+ icnt +  " ¸Å], ¿Ü·¡ DumpµÈ ¼öÇ÷ó¹æÀÌ ÃÑ:"+ibrgstcnt+"°Ç, ["+ strbrgstmsg +"] ÀÌ ÀÖ½À´Ï´Ù. È®ÀÎÈÄ ÇåÇ÷Áõ¼­ Á¦Ãâ½Ã ¼ö³³Çϼ¼¿ä. ", "I999");
                }

		}

		if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") == "E" && model.getValue("/root/main/ermngtamtmsg/ermsg1/formrecseq") != "" ) {
			messageBox("ÀÀ±ÞÀü¿ø¼Ò°ß¼­°¡ ÀÛ¼ºµÈ ȯÀÚ ÀÔ´Ï´Ù. ÀÀ±ÞÀü¿ø¼Ò°ß¼­¸¦ ¹ßÇàÇϽʽÿÀ.", "I999");
		}



		//±Ý¾×Ç¥½Ã±â(ÀÀ±Þ, DSC, CHEMO)
		//ÇÊ¿ä½Ã ÁÖ¼® Ç®¾î¼­ »ç¿ë
//				if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") != "I" ) {
//					var shngnm = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm");
//					var ircptamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt"));
//					if (ircptamt != 0) {
//						fDisplayAmt(shngnm, ircptamt);
//					}
//				}
		//alert(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));

		if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_onlnno") != "-" && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_onlnno") != "") {
			ipt_onlnno.visible = true;
		} else {
			ipt_onlnno.visible = false;
		}

		var cert_pid = model.getValue("/root/main/pat_info/h_cert/cert/pid");

		if (cert_pid != "") {
			messageBox("´çÀÏ ¼ö³³ÇÒ Á¦Áõ¸í ³»¿ªÀÌ ÀÖ½À´Ï´Ù.", "I999");
		}
		
		var dumpexistyn = model.getValue("/root/hidden2/all_info/pidinfo/h_dump/dump/dumpexistyn");
		
		if (dumpexistyn == "Y") {
            messageBox("¿Ü·¡Ã³¹æ ´ýÇÁ´ë»óÀÌ Á¸ÀçÇÕ´Ï´Ù. È®ÀÎÇϽʽÿÀ.", "I999");
        }

		//var otpt_pid = getNodesetCount("/root/main/pat_info/otpt/pid")
		//if(otpt_pid > 0) {
			//messageBox("ÀÔ¿ø´çÀÏ ¿Ü·¡°ÇÀÌ " + otpt_pid + "°Ç ÀÖ½À´Ï´Ù.", "I999");
		//}

		model.setFocus("ipt_rcptcd");
	}



	//20100401 Çö±Ý¿µ¼öÁõ Àǹ«È­
	function fCashQualCnfmno() {
		if (getNodesetCount("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno") > 0) {
			if (model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno") != "" &&
				model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno") != null &&
				model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno") != "-" &&
				model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno") != " ") {
				ipt_cardcashno.attribute("background-color") = "#ffff66";
				ipt_cardcashno.hint = "No : " + model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno") + " ";
			} else {
				ipt_cardcashno.attribute("background-color") = "#ffffff";
				ipt_cardcashno.hint = "";
			}
		} else {
			ipt_cardcashno.attribute("background-color") = "#ffffff";
			ipt_cardcashno.hint = "";
		}
		ipt_cardcashno.refresh();	
	}



	// ¼öÀͱ¸ºÐ
	function fCalcInfo(flag) {
		var srow = grd_inpatinfo.row
		//Àç¿øÁ¤º¸ grid ¼±ÅÃÀÌ ¾øÀ»½Ã 1¹ø°¸¦ ¼±ÅÃÇϵµ·Ï ÇÑ´Ù
		if (srow <= 0 ) {
			srow = 1;
		}

		//û±¸¼ö³³tabÀ¸·Î º¯°æ
		if (flag == "2") {
			btn_clamrcpt.selected= true;
			btn_clamrcpt.dispatch("xforms-activate");
		}
		model.resetInstanceNode("/root/send/data1");

		model.makeValue("/root/send/data1/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
		model.makeValue("/root/send/data1/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
		model.makeValue("/root/send/data1/dschdd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdd"));
		model.makeValue("/root/send/data1/disccd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_disccd"));
		model.makeValue("/root/send/data1/mskind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind"));
		model.makeValue("/root/send/data1/fromdd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd"));
		model.makeValue("/root/send/data1/todd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd"));
		model.makeValue("/root/send/data1/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno"));

		if (flag == "1") {
			submit("TRPAI00103");
			//¼öÀͱ¸ºÐ¿¡¼­ »ç¿ëÇÒ Á¤º¸
			model.resetInstanceNode("/root/hidden/earnflag");
			model.copyNode("/root/hidden/earnflag", "/root/send/data1");
		}

	}

	// ¼±ÅÃÁø·á »çÀο©ºÎ üũ
	function fCheckSpecOrdApp(){



			model.makeValue("/root/send/data1/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));  //ȯÀÚ¹øÈ£
			model.makeValue("/root/send/data1/instcd", model.getValue("/root/hidden/session/posinstcd")); //±â°üÄÚµå
			model.makeValue("/root/send/data1/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); //ÀÔ¿øÀÏÀÚ
			model.makeValue("/root/send/data1/orddeptcd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_orddeptcd")); //Áø·á°ú
			model.makeValue("/root/send/data1/medispclid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_medispclid")); //Áø·áÀÇ
			model.makeValue("/root/send/data1/ordtype", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype")); //Áø·áÇüÅÂ
			model.makeValue("/root/send/data1/cretno", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno")); //»ý¼º¹øÈ£
			
			submit("TRPAI00138");
			
			var signFlag = true;
			for(var idx =1; idx<=getNodesetCount("/root/hidden/spiflist/spiflist"); idx++) {
			    if (model.getValue("/root/hidden/spiflist/spiflist[" + idx + "]/spifyn") == "N") {
			        signFlag = false;
			    }
			}
			
			if (signFlag == false) {
			    messageBox("¼±ÅÃÁø·á½Åû¼­ ¹ÌÀÛ¼º³»¿ªÀÌ Á¸ÀçÇÕ´Ï´Ù.", "E000");
			    modal("SPPAI00103", "1", "100", "100" ,"SPPAI00103", "/root/hidden/spiflist", "/root/main/spiflist");
			}

			/* ¼±ÅÃÁø·á½Åû¼­ ÀÛ¼º¿©ºÎ üũ·ÎÁ÷ ¼öÁ¤ - icdr ±âÁØÀ¸·Î üũ by Á¶Áß·¡ 20130228
			submit("TRPAI00133");
			
			// 20091125 ¼öÁ¤ JHP /root/main/admicheck/rgst º¯°æ ->  /root/main/admicheck1/rgst  /root/main/admicheck/admichecklistÇÏ°í ÀνºÅϽºÁߺ¹³²
			if (model.getValue("/root/main/admicheck1/rgst/rgstyn") == "N") {
				var sOrddeptcd = instance1.selectSingleNode("/root/hidden/init/orddeptcd[cd='" + model.getValue("/root/main/inpt_info/inptpatinfo/inpt_orddeptcd") + "']");
				if (sOrddeptcd == null) {
					var sOrddeptcdMsg = "";
				} else {
				var sOrddeptcdMsg = "[" + sOrddeptcd.nm.nodeValue + "]";
				}
				var sOrddrid = instance1.selectSingleNode("/root/hidden/init/orddrid[cd='" + model.getValue("/root/main/inpt_info/inptpatinfo/inpt_medispclid") + "']");
				if (sOrddrid == null) {
					var ssOrddridMsg = "";
				} else {
					var sOrddridMsg = " [" + sOrddrid.nm.nodeValue + "]";
				}

				sMsg = sOrddeptcdMsg + sOrddridMsg
				
				var sMsgFooter;
				var msgResult;
				
				var specamt1 = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_specinsubamt"));
				var specamt2 = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_specownbamt"));
				
				if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") != "E"){
				    
				    sMsgFooter = " ¼±ÅÃÁø·á µî·ÏÀÌ µÇ¾î ÀÖÁö ¾Ê½À´Ï´Ù. µî·ÏÇϽðڽÀ´Ï±î?";
				    msgResult = messageBox(sMsg + sMsgFooter, "Q999", ""); // yes = 6, no = 7, cancel = 2
				    
				} else if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") == "E"
                        && (specamt1 + specamt2) > 0) {
                    
                    sMsgFooter = " ¼±ÅÃÁø·áºñ°¡ ¹ß»ýÇÏ¿´À¸³ª ¼±ÅÃÁø·á µî·ÏÀÌ µÇ¾îÀÖÁö ¾Ê½À´Ï´Ù!!!\r\n"
                        + " ¼±ÅÃÁø·á½Åû¼­¸¦ ¹Þ¾ÆÁֽʽÿä.";
                    messageBox(sMsg + sMsgFooter, "E000"); // ok = 2
                    msgResult = 6
                }
				
				if( msgResult == 6){

					var s_pid       = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid");
					var s_ordtype   = "I";
					var s_orddd     = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd");
					var s_orddeptcd = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_orddeptcd");
					var s_orddrid   = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_medispclid");
					var s_fromdd    = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd");
					var s_hngnm     = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm");
					var s_rrgstno1  = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno1");
					var s_rrgstno2  = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno2");

					fCallSpecPopUp(s_pid,s_ordtype,s_orddd,s_orddeptcd,s_orddrid,s_fromdd,s_hngnm,s_rrgstno1,s_rrgstno2);

					return true;
				}
			}
			*/
		}



	function trim(str){
		str = str.replace(/(^\s*)|(\s*$)/g,"");
		return str;
	}



	//¿Ü·¡Àüȯ ³»¿ª Á¶È¸
	function fDumpInfo() {
		var srow = grd_inpatinfo.row
		//Àç¿øÁ¤º¸ grid ¼±ÅÃÀÌ ¾øÀ»½Ã 1¹ø°¸¦ ¼±ÅÃÇϵµ·Ï ÇÑ´Ù
		if (srow <= 0 ) {
			srow = 1;
		}
		model.resetInstanceNode("/root/send/data1");
		model.makeValue("/root/send/data1/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
		model.makeValue("/root/send/data1/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
		model.makeValue("/root/send/data1/dschdd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdd"));
		model.makeValue("/root/send/data1/mskind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind"));
		model.makeValue("/root/send/data1/fromdd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd"));
		model.makeValue("/root/send/data1/todd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd"));
		model.makeValue("/root/send/data1/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno"));
		model.makeValue("/root/send/data1/insukind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind"));
		model.makeValue("/root/send/data1/suppkind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind"));
		model.makeValue("/root/send/data1/rcptkind", model.getValue("/root/hidden/rcptkind"));
		model.resetInstanceNode("/root/hidden/admi_info/dumplist");
		model.resetInstanceNode("root/main/admi_info/dumplist");

		submit("TRPAI00110","true");
		copyNodeType("/root/main/admi_info/dumplist","/root/hidden/admi_info/dumplist","replace");
		model.refresh();
		//setTree(grddumplist, 0, 0, true,2);

		//var scnt = getNodesetCount("/root/main/admi_info/dumplist");
		//if (scnt>1)
		//{
		//	setTree(grddumplist, 0, 0,true,2);
		//	model.refresh();
		//}

	}


	//»ý³â¿ùÀÏ·Î ³ªÀÌ°è»êÀ» ÇÑ´Ù.
	function fAgeCalc() {
		if (isValidDateTime(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brthdd"), "YYYYMMDD")==true) {
			var sage=getFullAge(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brthdd"));
			model.setValue("/root/main/inpt_info/inptpatinfo/inpt_age", sage);
		}
	}
	// ÀÔ¿øÀϼö°è»ê Åð¿øÀüÀÏ °æ¿ì ÇöÀçÀÏÀÚ·Î ÀÔ¿øÀϼö¸¦ °è»êÇÑ´Ù.
	function fInDayNo() {
		if ((isValidDateTime(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"), "YYYYMMDD")==true) && (isValidDateTime(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdd"), "YYYYMMDD")==true)) {
			if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdd") == "99991231") {
				//Åð¿øÅ뺸°¡ ÀÖÀ» °æ¿ì Åð¿øÅ뺸 ÀÏ·Î °è»ê
				if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt") == "" || model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt") == "-") {
					var sdschdd = getCurrentDate();
				} else {
					var sdschdd = (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt").substr(0, 8));
				}
			} else {

				var sdschdd = (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdd"));
			}
			var sdayno=getDateInterval(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"), sdschdd);
			sdayno++;
			model.setValue("/root/main/inpt_info/inptpatinfo/inpt_dayno", sdayno);
		}

		model.setValue("/root/hidden/etc2", cmb_orddeptcd.label);
		model.setValue("/root/hidden/etc3", cmb_medispclid.label);
		model.setValue("/root/hidden/etc4", cmb_roomgrdecd.label);
		model.setValue("/root/hidden/etc5", cmb_insukind.label);
		model.setValue("/root/hidden/etc6", cmb_disccd.label);

	}

	function fInPatInfo() {

		var snode = instance1.selectSingleNode("/root/hidden/inpt_info").cloneNode(true);
		model.copyNode("/root/main/inpt_info", snode);
		model.setValue("/root/main/inpt_info/inptpatinfo/inpt_dschdclrdt", "");
		model.setValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt", "");
		model.setValue("/root/main/inpt_info/inptpatinfo/inpt_dethdt", "");
		model.refresh();
		copyNodesetType("/root/main/inpt_info","/root/hidden/inpt_info","replace");

		var scount = getNodesetCount("/root/main/inpt_info/inptpatinfo");
		model.removenode("/root/hidden/item01");
		model.makeNode("/root/hidden/item01");
		for (var i = 1; i <= scount; i++) { //ÀÔ¿øÀÏÀÌ 2°³ ÀÌ»óÀÏ °æ¿ì ÀÔ¿øÀÏÀ» º°µµ·Î ÀúÀåÇÏ¿© combo ÀÔ·ÂÇÑ´Ù.
			var sindd = model.getValue("/root/main/inpt_info/inptpatinfo["+ i +"]/inpt_indd");
			var sOrdType = model.getValue("/root/main/inpt_info/inptpatinfo["+ i +"]/inpt_ordtype");
			if (sOrdType == "I") {
				if (model.getValue("/root/main/inpt_info/inptpatinfo["+ i +"]/inpt_brateflag") == "I") {
					sOrdType = "IN";
				} else {
					sOrdType = "IN/O";
				}
			} else if (sOrdType == "E") {
				if (model.getValue("/root/main/inpt_info/inptpatinfo["+ i +"]/inpt_brateflag") == "I") {
					sOrdType = "ER";
				} else {
					sOrdType = "ER/O";
				}
			} else {
				if (model.getValue("/root/main/inpt_info/inptpatinfo["+ i +"]/inpt_brateflag") == "I") {
					sOrdType = "D/C"
					if (model.getValue("/root/main/inpt_info/inptpatinfo["+ i +"]/inpt_roomcd") == "DSC") {
						sOrdType = "DSC"
					} else if (model.getValue("/root/main/inpt_info/inptpatinfo["+ i +"]/inpt_roomcd") == "CHEMO") {
						sOrdType = "CHEMO"
					}
				} else {
					sOrdType = "D/C/O"
					if (model.getValue("/root/main/inpt_info/inptpatinfo["+ i +"]/inpt_roomcd") == "DSC") {
						sOrdType = "DSC/O"
					} else if (model.getValue("/root/main/inpt_info/inptpatinfo["+ i +"]/inpt_roomcd") == "CHEMO") {
						sOrdType = "CHEMO/O"
					}
				}
			}

			model.makeValue("/root/hidden/item01/indd["+ i +"]/indd1", sindd.substr(0, 4) + "-" + sindd.substr(4,2) + "-" + sindd.substr(6,2) + " " + sOrdType);

			model.makeValue("/root/hidden/item01/indd["+ i +"]/indd2", sindd);

		}
		// 20091215 JHP ¼öÁ¤Ãß°¡ ÁßÁõ¿¡ Èñ±Í Á¸ÀçÇҽÿ¡ ÄÞº¸¹Ú½º·Î º¸¿©ÁÖ±â
		fItemRareMsg();
		 
		model.setValue("/root/hidden/etc7", model.getValue("/root/hidden/item01/indd/indd1"));
		model.refresh();
	}

	//¼ö³³¹æ¹ý ¼±Åýà card, cash¿¡ ³³ºÎÇÒ ±Ý¾×À» setting
	function fRcptMthd(sflag) {
	    
		//½Å¿ëÄ«µå
		if(sflag == "1"){
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_cardamt" 	,  model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt") -model.getValue("/root/main/admi_info/ordamt/admispec/admi_onlineamt"));
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_cashamt" 	, "0");
			model.setValue("/root/main/admi_info/rcptmthd/cardcashno" 			, "");
			model.setValue("/root/main/admi_info/rcptmthd/cashmthd" 			, "00"); 	//00-¼Òµæ°øÁ¦, 01-ÁöÃâÁõºù, 02-¹Ì½ÂÀÎ
			model.setValue("/root/main/admi_info/rcptmthd/validterm" 			, "");
			model.setValue("/root/main/admi_info/rcptmthd/allotmm" 				, "00");
			model.setFocus("ipt_cardcashno");
		
		//Çö±Ý¿µ¼öÁõ
		}else if (sflag == "2"){
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_cashamt" 	, model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt") - model.getValue("/root/main/admi_info/ordamt/admispec/admi_onlineamt"));
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_cardamt"	, "0");
			
			//Çö±Ý¿µ¼öÁõ½ÂÀιøÈ£°¡ ÀúÀåµÇ¾î ÀÖÀ» °æ¿ì ÀúÀåµÈ ³»¿ªÀ¸·Î È­¸é¿¡ Ç¥½Ã
			//20100401 Çö±Ý¿µ¼öÁõ Àǹ«È­
			// 02-¹Ì½ÂÀÎ
			if (model.getValue("/root/main/admi_info/rcptmthd/cashmthd") == "02"){
				model.setValue("/root/main/admi_info/rcptmthd/cashmthd" 		, "02"); 	//00-¼Òµæ°øÁ¦, 01-ÁöÃâÁõºù, 02-¹Ì½ÂÀÎ
				model.setValue("/root/main/admi_info/rcptmthd/cardcashno" 		, model.getValue("/root/init/PAM/P0022list/P0022[cdid = '163' ]/cdnm"));
				model.setValue("/root/main/admi_info/rcptmthd/qualcnfmflag" 	, "2");
			
			// 01-¼Òµæ°øÁ¦, 02-ÁöÃâÁõºù
			} else {
			    
			    // »çÀü µî·ÏµÈ ½ÅºÐÈ®ÀιøÈ£°¡ ¾ø´Â °æ¿ì ÁֹιøÈ£·Î ¼³Á¤
				if (model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno") == "" || model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno") == null) {
					model.setValue("/root/main/admi_info/rcptmthd/cardcashno" 	, model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno"));
					model.setValue("/root/main/admi_info/rcptmthd/qualcnfmflag" , "1");
				
				// »çÀü µî·ÏµÈ ½ÅºÐÈ®ÀιøÈ£°¡ ÀÖ´Â °æ¿ì ÇØ´ç ¹øÈ£·Î ¼³Á¤
				} else {
				    
				    // ICPosÀÇ °æ¿ì ÀúÀåµÈ Çö±Ý¿µ¼öÁõ Ä«µå¹øÈ£ »ç¿ëºÒ°¡Ã³¸®  by Á¶Áß·¡ 20160429
				    if (model.getValue("/root/init/PAM/P0032list/P0032[cdid = '200']/cdnm") == "KOCES_IC" 
				            && model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmflag") == "3") {
				        messageBox("ÇöÀç ½ÅºÐÈ®ÀιøÈ£°¡ Ä«µå¹øÈ£·Î ÀúÀåµÇ¾îÀÖ½À´Ï´Ù. \r\nIC´Ü¸»±âÀÇ °æ¿ì ÀúÀåµÈ Ä«µå¹øÈ£´Â »ç¿ëºÒ°¡ÀÔ´Ï´Ù.\r\nIC´Ü¸»±â¿¡¼­ Ä«µå¸®µù/¹øÈ£ÀÔ·ÂÇϼ¼¿ä!!", "E000");
				        model.setValue("/root/main/admi_info/rcptmthd/cardcashno"   , "");
				    } else {
				        model.setValue("/root/main/admi_info/rcptmthd/cardcashno" 	, model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno"));
				    }
				    
					
					// »ç¾÷ÀÚ¹øÈ£
					if (model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmflag") == "4") {
						model.setValue("/root/main/admi_info/rcptmthd/cashmthd" , "01"); 	//00-¼Òµæ°øÁ¦, 01-ÁöÃâÁõºù, 02-¹Ì½ÂÀÎ
					} else {
						model.setValue("/root/main/admi_info/rcptmthd/cashmthd" , "00"); 	//00-¼Òµæ°øÁ¦, 01-ÁöÃâÁõºù, 02-¹Ì½ÂÀÎ
					}
				}
			}
			model.setValue("/root/main/admi_info/rcptmthd/validterm" 			, "");
			model.setValue("/root/main/admi_info/rcptmthd/allotmm" 				, "");
			model.setFocus("ipt_cardcashno");

		// Çö±Ý
		} else if (sflag == "3") {
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_cashamt" 	, model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt") - model.getValue("/root/main/admi_info/ordamt/admispec/admi_onlineamt"));
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_cardamt" 	, "0");
			model.setValue("/root/main/admi_info/rcptmthd/cardcashno" 			, "");
			model.setValue("/root/main/admi_info/rcptmthd/cashmthd" 			, "00"); 	//00-¼Òµæ°øÁ¦, 01-ÁöÃâÁõºù, 02-¹Ì½ÂÀÎ
			model.setValue("/root/main/admi_info/rcptmthd/validterm" 			, "");
			model.setValue("/root/main/admi_info/rcptmthd/allotmm" 				, "00");
		}
		model.refresh();
	}

	//¼ö³³Ã³¸®
	function fRcptProcess() {
	    
        // ¼ö³³ÀÚ ¸¶°¨¿©ºÎ üũÇÏ¿© ó¸®
        if (isMagmAprv()) {
            return false; // ¸¶°¨°áÁ¦ ¿Ï·áµÇ¾îÀÖÀ¸¹Ç·Î ´õÀÌ»ó ÁøÇàÇÏÁö ¾ÊÀ½
        }
        
        // ȯÀÚ¹øÈ£ üũ (20140927 ÀÌÁ¤ÅÃ)
        var ipt_pid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid");
        var iphs_pid = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[1]/iphs_pid");
        
        var rtn = "6";
        if(ipt_pid!=iphs_pid){
        	rtn=messageBox("¼ö³³ÇϽǷÁ´Â ȯÀÚ¹øÈ£["+iphs_pid+"]¿Í ÀÔ·ÂµÈ È¯ÀÚ¹øÈ£["+ipt_pid+"]°¡\nµ¿ÀÏÇÏÁö ¾Ê½À´Ï´Ù. °è¼Ó ÁøÇà", "S001", "");
        	if(rtn=="7"){
        		return false;
        	}else if(rtn=="2"){
        		return false;
        	}
        }
        // ȯÀÚ¹øÈ£ üũ (20140927 ÀÌÁ¤ÅÃ)
	    
		//¸®¼ÂÀνºÅϽº
		model.removeNodeset("/root/send/rcptinfo/inpt_info/inptpatinfo");
		model.removeNodeset("/root/send/rcptinfo/iphs_info/grdipatinfo");		
		model.makeNode("/root/send/rcptinfo/inpt_info/inptpatinfo");
		model.makeNode("/root/send/rcptinfo/iphs_info/grdipatinfo");
		
		//Çö±Ý¼ö³³½Ã ÀÚµ¿ Çö±Ý¿µ¼öÁõ ó¸® 
		if (model.getValue("/root/init/option/autocashyn") == "Y") {
			if (model.getValue("/root/main/admi_info/rcptmthd/rcptmthd") == "3") {
				var vRcptamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cashamt"));
				//20100401 Çö±Ý¿µ¼öÁõ Àǹ«È­
				if (model.getValue("/root/init/PAM/P0022list/P0022[cdid = '161' ]/cdnm") != "" && model.getValue("/root/init/PAM/P0022list/P0022[cdid = '161' ]/cdnm") != null) {
					if (vRcptamt >= parseInt(model.getValue("/root/init/PAM/P0022list/P0022[cdid = '161' ]/cdnm"))) {
						model.setValue("/root/main/admi_info/rcptmthd/rcptmthd" 	,"2");		//¼ö³³¹æ¹ý-Çö±Ý
						//model.setvalue("/root/main/admi_info/rcptmthd/cashmthd" 	,"00"); 	//¼Òµæ°øÁ¦
						var sflag = rdo_rcptmthd.value;
						fRcptMthd(sflag);
						fCardCashNo();  //Ä«µå Çö±Ý¿µ¼öÁõ ½ÂÀÎ ³»¿ª setting
					}
				} else {
					messageBox("Çö±Ý¿µ¼öÁõ Ãּұݾ×ÀÌ µî·ÏµÇ¾î ÀÖÁö ¾Ê½À´Ï´Ù. È®ÀÎÇÏ¿© ÁֽʽÿÀ.[P0022/161]","I999","");
				}
					
			}
		}
			
		var srow = grd_inpatinfo.row
		//Àç¿øÁ¤º¸ grid ¼±ÅÃÀÌ ¾øÀ»½Ã 1¹ø°¸¦ ¼±ÅÃÇϵµ·Ï ÇÑ´Ù
		if (srow <= 0 ) {
			srow = 1;
		}
		if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd") == "" || model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd") == null) {
			messageBox("¼ö³³ ÇÒ ÀÔ¿ø³»¿ªÀÌ","I004","");
			return;
		}

		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd") == "" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd") == null) {
			messageBox("¼ö³³ ÇÒ Àç¿øÁ¤º¸°¡","I004","");
			return;
		}
		
		// ÀÓ»óȯÀÚ µî·Ï¿©ºÎ °ËÁõÀº ÁÖÀ¯ÇüÀ϶§¸¸ Çϵµ·Ï ¼öÁ¤ by Á¶Áß·¡ 20140114
		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "71"
		      && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind") == "M"
		      && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_clincyn") == "N" ) {
			messageBox("ÀÓ»óȯÀÚ µî·ÏÀÌ µÇÁö ¾Ê¾Ò½À´Ï´Ù. È®ÀÎÇϽʽÿÀ.", "E999");
			return;
		}

		var srcptflag = model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptflag");
		
		// drg Àû¿ë¿©ºÎ¸¦ °¡Á®¿Â´Ù ("Y"ÀÏ °æ¿ì¸¸ DRG ¿µ¼öÁõ Àû¿ë)
		var drgflag = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_drgyn");
		
		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mig") == "Y") {
			if (srcptflag != "C01") {
				messageBox("¸¶À̱׷¹ÀÌ¼Ç µ¥ÀÌÅÍ´Â ¼ö³³Ã³¸® ÇÒ ¼ö ¾ø½À´Ï´Ù.","I999","");
				return;
			}
		}
		
		// drgÀÇ °æ¿ì ¹Ýµå½Ã ÀÔ¿ø¿äÀ²ÀÌ Àû¿ëµÇ¾î¾ß ÇÔ by Á¶Áß·¡ 20130627
		if (drgflag == "Y" && srcptflag == "B31" && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == "O") {
			
			messageBox("DRGȯÀÚÀÇ °æ¿ì ¿Ü·¡¿äÀ²·Î Åð¿ø¼ö³³(B31)ÇÒ ¼ö ¾ø½À´Ï´Ù.", "C000");
			return;
			
		// drgȯÀÚÀÓ¿¡µµ ºÒ±¸ÇÏ°í paihiscl¿¡ DRGAMT / DRGCMT°¡ Á¸ÀçÇÏÁö ¾Ê´Â °æ¿ì(ÇàÀ§º° °è»ê󸮵Ê)
		} else if (drgflag == "Y" 
		              && parseInt(model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_drgamtcnt")) < 1) {
		    
		    messageBox("DRGȯÀÚ¿¡ ´ëÇØ DRG°è»ê³»¿ªÀÌ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù. \r\n½É»ç°ú¿¡ DRG°è»ê ¿äûÇϽʽÿÀ.", "C000");
            return;
		// admiÀÇ drgno ¼³Á¤¿ë
		} else if (drgflag == "Y" && (srcptflag == "B21" || srcptflag == "B31")) {
			
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_drgno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_drgno"));
		} else {
			
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_drgno", "");
		}
		
        // 2013³â 10¿ù 1ÀÏ ÀÌÈÄ ÀÇ·á±Þ¿©È¯ÀÚ ¿Ü·¡¿äÀ²Åð¿ø ½Ã °¨¸éÄÚµå(F002) ¼³Á¤Çϵµ·Ï Á¦¾î - 20131004 Á¶Áß·¡
        if (srcptflag == "B21" || srcptflag == "B31") {
        
            // ÀÇ·á±Þ¿© ¼±ÅÃÁø·áºñ 100% °¨¸éÀû¿ë(2015/09/10)
            if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd") >= "20150910"
                    && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insukind") == "21"
                            || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insukind") == "22")
                    && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_disccd") == "-") {
                
                alert("ÀÇ·á±Þ¿©1/2Á¾ ȯÀÚÀÇ °æ¿ì 2015³â 9¿ù 10ÀÏ ÀÌÈÄ Åð¿ø ½Ã  \r\n¼±ÅÃÁø·áºñ 100% °¨¸éÄڵ带 ¹Ýµå½Ã ¼³Á¤ÇؾßÇÕ´Ï´Ù.");
                return;
                    
            // ÀÇ·á±Þ¿© ¼±ÅÃÁø·áºñ 50% °¨¸éÀû¿ë(2013/10/01)
            } else if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd") >= "20131001"
                    && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == "O"
                    && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insukind") == "21"
                            || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insukind") == "22")
                    && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_disccd") == "-") {
                
                alert("ÀÇ·á±Þ¿©1/2Á¾ ȯÀÚÀÇ °æ¿ì 2013³â 10¿ù 1ÀÏ ÀÌÈÄ ¿Ü·¡¿äÀ² Åð¿ø ½Ã  \r\n¼±ÅÃÁø·áºñ 50% °¨¸éÄڵ带 ¹Ýµå½Ã ¼³Á¤ÇؾßÇÕ´Ï´Ù.");
                return;
                    
            // ÀÇ·á±Þ¿©1/2Á¾ÀÌ ¾Æ´Ï°Å³ª ÀÇ·á±Þ¿©1/2Á¾ ÀÔ¿ø¿äÀ²ÀÇ °æ¿ì´Â F002ÄÚµå Àû¿ëºÒ°¡
            } else if (((model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insukind") != "21" 
                                    && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insukind") != "22")
//                            || ((model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insukind") == "21"
//                                    || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insukind") == "22")
//                                   && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == "I")
                                   )
                            && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_disccd") == "F002") {
                
//                alert("¼±ÅÃÁø·áºñ 50% °¨¸éÄÚµå´Â ÀÇ·á±Þ¿©1/2Á¾ ¿Ü·¡¿äÀ² Åð¿ø½Ã¿¡¸¸ Àû¿ë°¡´ÉÇÕ´Ï´Ù. \r\n°¨¸éÄڵ带 Àç¼³Á¤ÇϽʽÿä. ");
                alert("¼±ÅÃÁø·áºñ °¨¸éÄÚµå´Â ÀÇ·á±Þ¿©1/2Á¾¸¸ Àû¿ë°¡´ÉÇÕ´Ï´Ù. \r\n°¨¸éÄڵ带 Àç¼³Á¤ÇϽʽÿä. ");
                return;
            }
            
            var disccd = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_disccd");
                    
            // ¹Ì¿ë¸ñÀû¼ºÇüÀÇ °æ¿ì °¨¸éÁ¤º¸ Àû¿ë¿©ºÎ Á¡°Ë by Á¶Áß·¡ 20140217
            if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insukind") == "51" && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_suppkind") == "85")  {
                
                // ¸ð¹ßÀ̽ļ¾ÅÍÀÌ¿ÜÀÇ °æ¿ì ºí·¯Å·
                if (disccd != '-' && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_orddeptcd") != "2450000000") {
                    alert("¹Ì¿ë¸ñÀû¼ºÇüÀÇ °æ¿ì, °¨¸éÀû¿ëÀÌ ºÒ°¡´ÉÇÕ´Ï´Ù.");
                    return false;
                } 
                
                // ¸ð¹ßÀ̽ļ¾ÅÍÀÇ °æ¿ì¶óµµ ¸ð¹ß°ü·Ã(PK059) Äڵ尡 ¾Æ´Ï¸é ºí·¯Å·
                if (disccd != '-' && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_orddeptcd") == "2450000000" && model.getValue("/root/init/PAM/PK059list/PK059[cdid='" + disccd + "']/cdnm") != "Y") {
                    alert("¸ð¹ßÀ̽ļ¾ÅÍÀÇ °æ¿ì ¸ð¹ßÀ̽İü·Ã °¨¸éÄڵ常 Àû¿ë°¡´ÉÇÕ´Ï´Ù.\r\n(¿ø¹«°øÅëÄÚµå - PK059)");
                    return false;
                }
            }
            
            // »õ¸¶À»±Ý°í °¨¸éÄÚµå ¼ö³³ ºÒ°¡ ó¸®
            if (disccd == "E140" || disccd == "E150" || disccd == "E155" || disccd == "E156") {
				messageBox("»õ¸¶À»±Ý°í °¨¸éÄÚµå´Â ¼ö³³ ÇÏ½Ç ¼ö ¾ø½À´Ï´Ù.", "E999", "");
				return false;
			}
        }
		
		// ÀÚº¸È¯ÀÚ »ç°íÁ¢¼ö¹øÈ£ È®Àοë Á¦¾î Ãß°¡ by Á¶Áß·¡ 20130706
		if (srcptflag == "B31"
		     && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insukind") == "31"
		     && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_suppkind") != "01") {
			
            // ÀÚº¸ + Àü¾×º»Àκδã ÀÌ¿ÜÀÇ °æ¿ì »ç°íÁ¢¼ö¹øÈ£´Â Çʼö
            if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insucd") == ""
                    || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insucd") == "-") {
        
                 messageBox("ÀÚº¸ Àü¾×º»Àκδã ÀÌ¿ÜÀÇ °æ¿ì Åð¿ø¼ö³³(B31) ½Ã ¹Ýµå½Ã º¸Çè»çÄڵ尡 ÀÖ¾î¾ßÇÕ´Ï´Ù.\r\nÀÚº¸µî·ÏÁ¤º¸¸¦ È®ÀÎ ÇϽŠÈÄ Àç¿øº¯°æ¿¡¼­ ¼öÁ¤ÇϽʽÿÀ.", "C000");
                 return false;
            }
            
            // ÀÚº¸ + Àü¾×º»Àκδã ÀÌ¿ÜÀÇ °æ¿ì ÁöºÒº¸Áõ¹øÈ£´Â Çʼö
            if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_paygrntnoyn") != "Y") {
        
                 messageBox("ÀÚº¸ Àü¾×º»Àκδã ÀÌ¿ÜÀÇ °æ¿ì Åð¿ø¼ö³³(B31) ½Ã ¹Ýµå½Ã ÁöºÒº¸Áõ¹øÈ£°¡ ÀÖ¾î¾ßÇÕ´Ï´Ù.\r\nÀÚº¸µî·ÏÁ¤º¸¸¦ È®ÀÎ ÇϽŠÈÄ Àç¿øº¯°æ¿¡¼­ ¼öÁ¤ÇϽʽÿÀ.", "C000");
                 return false;
            }
		}
		
		// º¸Çè»ç ÄÚµå´Â Åð¿ø¼ö³³ÀÏ °æ¿ì¿¡¸¸ ¼³Á¤
		if (srcptflag == "B31" && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insukind") == "31") {
			// ÀÚº¸ º¸Çè»çÄÚµå ¼³Á¤
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_insucd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_insucd"));
		}
		
		if (srcptflag == "B31" || srcptflag == "B41") {
			if (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt")) < 0) {
				var iRcpt = getNodesetCount("/root/main/admi_info/admi/grdclamrcpt");

				for(var a=1; a<=iRcpt; a++) {
					if (model.getValue("/root/main/admi_info/admi/grdclamrcpt["+ a +"]/rcptstat") == "Y") {
						if (model.getValue("/root/main/admi_info/admi/grdclamrcpt["+ a +"]/rcptflag") == "B01"
							|| model.getValue("/root/main/admi_info/admi/grdclamrcpt["+ a +"]/rcptflag") == "B21") {
							if (parseInt(model.getValue("/root/main/admi_info/admi/grdclamrcpt["+ a +"]/cashamt")) > 0) {
								messageBox("Çö±Ý¿µ¼öÁõ³»¿ªÀ» È®ÀÎ ÇϽʽÿÀ.","I999","");
								break;
							}
						}
					}
				}
			}
		}
		
		// Àç¿øÀ¯Çü±â°£ Áß ÁÖÄ¡ÀÇ ÈÞÁøµî·Ï µÇ¾îÀÖ´Â °æ¿ì Åð¿ø¼ö³³(B31) ºí·¯Å· ó¸®
		// ½É»çÆÀ ¿äû ÀÖÀ»¶§±îÁö ¹«±âÇÑ Àû¿ë ¿¬±â
        //if (srcptflag == "B31" && fGetDrHoliInfo("Y") != true) {
        //    return false;
        //}

		/*
		*	ºÒÇÊ¿ä ÆÇ´Ü ÁÖ¼®Ã³¸® - 20130418 ¼­¿ø½Ä
		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "21" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "22") {
		    //»êÀüÁö¿ø±Ý »óÇÑüũ
		    //2011-04-01½ÃÁ¡À¸·Î 4¸¸¿ø -> 6¸¸¿øÀ¸·Î »óÇÑÁ¶Á¤µÊ by Á¶Áß·¡
			var tempIndd = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd");
		    if(tempIndd < "20130422"){
				if (tempIndd >= "20110401") {				
					if (model.getValue("/root/init/option/pregdmndamtchk") == "Y" && parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_pregdmndamt")) > 60000) {
						messageBox("»êÀüÁø·áºñ ¼ö³³±Ý¾×Àº 1ÀÏ 60,000¿øÀ» ÃÊ°ú ÇÒ ¼ö ¾ø½À´Ï´Ù.", "I999");
						return;
					}
				} else {				
					if (model.getValue("/root/init/option/pregdmndamtchk") == "Y" && parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_pregdmndamt")) > 40000) {
						messageBox("»êÀüÁø·áºñ ¼ö³³±Ý¾×Àº 1ÀÏ 40,000¿øÀ» ÃÊ°ú ÇÒ ¼ö ¾ø½À´Ï´Ù.", "I999");
						return;
					}
				}
			}
		}
		*/
	
		if (model.getValue("/root/init/option/pregdmndamtchk") == "Y" && model.getValue("/root/main/admi_info/ordamt/admispec/admi_pregdmndamt") == "0") {
			messageBox("»êÀüÁø·áºñ ¼ö³³À» üũ Çϼ̽À´Ï´Ù. »êÀüÁø·áºñ¸¦ ÀÔ·ÂÇϽʽÿÀ.", "I999");
			return;
		}

		//¼ö³³Àü º¸Çè, º¸Á¶À¯Çü Àç¼¼ÆÃ
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_insukind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind"));
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_suppkind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind"));
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_orddeptcd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_orddeptcd"));
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_medispclid", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_medispclid"));

		//³³ºÎÇÒ ±Ý¾×°ú ½Ç¼ö³³±Ý¾× ºñ±³
		if (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt")) !=
			(parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cardamt"))
			 + parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cashamt"))
			 + parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_onlineamt"))
			)) {

			if (messageBox("³³ºÎÇұݾװú ½Ç¼ö³³ÇÒ ±Ý¾×¿¡ Â÷ÀÌ°¡ ÀÖ½À´Ï´Ù. ¼ö³³À» ÁøÇàÇϽðڽÀ´Ï±î?", "Q999","") == 7) {
				return;
			}
		}

		if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == "O" && model.getvalue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind") == "08") {
			messageBox("6¼¼ ¹Ì¸¸ ¿Ü·¡¿äÀ² ȯÀÚÀÔ´Ï´Ù. º¸Á¶À¯ÇüÀ» º¯°æÇϽʽÿÀ.","E999","");
			return;
		}
		
		//20091111-¿Ü·¡¿äÀ² ½Å»ý¾ÆÀÎ °æ¿ì ¼ö³³Ã³¸®½Ã º¸Á¶À¯ÇüÀ» º¯°æó¸® ¸Þ½ÃÁö
		if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == "O" && model.getvalue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind") == "31") {
			messageBox("½Å»ý¾Æ ¿Ü·¡¿äÀ² ȯÀÚÀÔ´Ï´Ù. º¸Á¶À¯ÇüÀ» º¯°æÇϽʽÿÀ.","E999","");
			return;
		}

		if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == "I" && model.getvalue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind") == "07") {
			messageBox("¿Ü·¡¿äÀ² ȯÀÚÀÔ´Ï´Ù. »êÁ¤Æ¯·Ê¸¦ Àû¿ëÇÒ ¼ö ¾ø½À´Ï´Ù. º¸Á¶À¯ÇüÀ» º¯°æÇϽʽÿÀ.","E999","");
			return;
		}
		
		// ÀÔ¿ø¿äÀ²°ú °è»ê¿äÀ²ÀÌ ´Ù¸¦ °æ¿ì ¼ö³³ºÒ°¡
		if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") != model.getValue("/root/main/admi_info/ordamt/admispec/admi_brateflag")
			&& (srcptflag == "B31" || srcptflag == "B21")) {
		    
		    messageBox("½ÇÁ¦ ÀÔ¿ø¿äÀ²°ú °è»ê¿äÀ²ÀÌ »óÀÌÇÕ´Ï´Ù. Àç°è»ê ÈÄ ¼ö³³Ã³¸®ÇϽʽÿÀ.","E999","");
            return;
		}
		
		//var slastmdlclamdd = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_lastmdlclamdd");
		var slastmdlclamdd = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_lastmdlclamdd");

		var sordtype     = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype");
		var sbrateflag   = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag");
		var sjudgrcsstat = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_dschjudgprcsstat");
		var dschrcptflag = "";
		var dschnotidt   = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt");

		if ((srcptflag == "") || (srcptflag == null)) {
			messageBox("¼ö³³°èÁ¤ÀÌ ¾ø½À´Ï´Ù. ¼ö³³°èÁ¤À»","C001","");
			model.setFocus("ipt_rcptcd");
			return;
		}

		if ((model.getValue("/root/main/inpt_info/inptpatinfo/inpt_insukind") == "21" ||
			model.getValue("/root/main/inpt_info/inptpatinfo/inpt_insukind") == "22") &&
			model.getValue("/root/main/admi_info/ordamt/admispec/admi_heallifeamtclamamt") != "0" &&
			srcptflag != "B31" && sbrateflag =='O') {

			messageBox("°Ç°­»ýÈ°À¯Áöºñ´Â Åð¿ø¼ö³³(B31)ÀÏ °æ¿ì¸¸ ¼ö³³Ã³¸® °¡´ÉÇÕ´Ï´Ù. ÇØ´ç °èÁ¤À¸·Î ¼ö³³Ã³¸® ÇÒ ¼ö", "I004");
			return;
		}
		if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_heallifeamtclamamt") != "0" && sbrateflag == 'I') {
			messageBox("ÀÔ¿øȯÀÚ´Â °Ç°­»ýÈ°À¯Áöºñ¸¦ ¹ß»ýÇÒ ¼ö ¾ø½À´Ï´Ù. È®ÀÎÇØ ÁֽʽÿÀ.", "I999");
			return;
		}

		if (srcptflag == "B01" || srcptflag == "B51" ) {
			if (model.getValue("/root/main/admi_info/admi/grdclamrcpt/rcptflag") != "") {
				var iRcptRow1 = getNodesetCount("/root/main/admi_info/admi/grdclamrcpt");
				for(var iRcptRow=1; iRcptRow<=iRcptRow1; iRcptRow++) {
					if (model.getValue("/root/main/admi_info/admi/grdclamrcpt["+ iRcptRow +"]/rcptstat") == "Y") {
						if (model.getValue("/root/main/admi_info/admi/grdclamrcpt["+ iRcptRow +"]/rcptflag") == "E70") {
							messageBox("Åð¿øû±¸(E70)°èÁ¤ÀÌ »ý¼ºµÇ¾î ÀÖ½À´Ï´Ù. ÇØ´ç °èÁ¤À¸·Î ¼ö³³Ã³¸®(Ãë¼Ò) ÇÒ ¼ö", "I004");
							fInitialize("inpatinfo");
							fDschamtVisible(false);
							fCalcInfo("2");
							//fOrdAmtInfo();	//Áø·áºñ³»¿ª
							//fRcptInfo("1");
							//Áø·áºñ³»¿ª,û±¸¼ö³³ ³»¿ª
							fRcpt_AllInfo("Y","Y","1");
							return;
						}
					}
				}
			}
		}
		
        // Åð¿ø¼ö³³ ½Ã º¹¼ö¿¬µµ¿¡ ´ëÇؼ­ º»Àκδã»óÇѱݾ×ÀÌ Á¸ÀçÇÏ´Â °æ¿ì, °­Á¦ºÐ¸®ÇÏ¿© ¼ö³³Çϵµ·Ï À¯µµ by Á¶Áß·¡ 20140331
        if (srcptflag == "B31"
                && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == '11'
                && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") != '01') {
            
            var fromdd = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd").substr(0, 4);
            var todd   = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd").substr(0, 4);
            
            // Á¦ÀÏ ¸¶Áö¸· ÅëÀÇ °æ¿ì Á¾·áÀÏÀÚ°¡ 9999/12/31 À̹ǷΠÅð¿øÅ뺸ÀÏ·Î º¸Á¤Ã³¸®
            if (todd == '9999') {
                todd = dschnotidt.substr(0, 4);
            }
            
            // º»Àκδã»óÇѱÝÀÌ Á¸ÀçÇÏ°í, ½ÃÀÛ/Á¾·á¿¬µµ°¡ ´Ù¸¥ °æ¿ì NG
            if (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_payownblimamt")) > 0 
                    && fromdd != todd) {
                
                alert("º¹¼ö¿¬µµ¿¡ º»Àκδã»óÇѱݾ×ÀÌ Á¸ÀçÇÏ´Â °æ¿ì ¹Ýµå½Ã À¯ÇüÀ» ºÐ¸®ÇϽʽÿÀ.");
                    
                return false;
            }
        }
        
        // Åð¿ø¼ö³³ ½Ã, À¯Çü°­Á¦ºÐ¸®¸¦ ÇÑ °æ¿ì ¹Ýµå½Ã ¹Ì¼ö»ý¼º by Á¶Áß·¡ 20150327
        if (srcptflag == "B31"
                && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_forcesepcd") != null
                        && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_forcesepcd") != "")
                && (model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt") == null
                        || model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt") == 0)) {
            
            messageBox("À¯ÇüºÐ¸®»çÀ¯°¡ ÀÔ·ÂµÈ °æ¿ì, ¹Ì¼ö±Ý¾×À» ¹Ýµå½Ã ÀÔ·ÂÇÏ¼Å¾ß ÇÕ´Ï´Ù.", "I999","");
            return;
        }

		/*
		JHP, 20090204 ¿Ü·¡¿äÀ²¿¡ ÀÔ¿ø·á°¡ À־ ±×³É ÁøÇàÇÏ¸é ¼ö³³ÇÒ¼ö°¡ ÀÖ´Â ÇüÅ¿©¼­ ¼öÁ¤ÇϱâÀ§ÇØ ÁÖ¼®Ã³¸®ÇÔ
		if (sbrateflag == "O" && (srcptflag == "B31" || srcptflag == "B21")) {		//¼öÀͱ¸ºÐÀ» ¼±Åýà °¡Á®¿Àµµ·Ï º¯°æÇÏ¿© Àû¿ëµÇÁö ¾ÊÀ½.(Â÷ÈÄ submitÀ¸·Î üũ)
			var iInAmtChk = parseInt(model.getValue("/root/main/iscl_info/grdearnflag1[2]/payamt1")) +
						parseInt(model.getValue("/root/main/iscl_info/grdearnflag1[2]/nopyamt1")) +
						parseInt(model.getValue("/root/main/iscl_info/grdearnflag1[2]/specamt1"));
			if (iInAmtChk > 0) {
				//blocking ÇÏÁö ¾ÊÀ½. ¸Þ¼¼Áö ó¸®13401
				if (messageBox("¿Ü·¡¿äÀ²È¯ÀÚ¿¡°Ô ÀÔ¿ø·á°¡ Á¸ÀçÇÕ´Ï´Ù. ¹Ýµå½Ã È®ÀÎ ÇϽʽÿÀ. ¼ö³³À»", "Q003") == 7) {
					return;
				}
			}
		}
		*/

//################# Åð¿øÈ®Á¤ÀÏÀÚ ÀÌÈÄ¿¡ ¾×ÆÃµÈ Ã³¹æÀÎ ÀÖ´Â °æ¿ì ¸Þ½ÃÁö ó¸® ½ÃÀÛ#######################################
		var strexecddnotiyn=model.getValue("/root/main/admicheck/admichecklist/execddnotiyn");
		if( (srcptflag == "B31") && (strexecddnotiyn=="Y")){
			messageBox("Åð¿øÈ®Á¤ ÀÌÈÄ¿¡ ¾×Æà µÈ ó¹æÀÌ ÀÖ½À´Ï´Ù. º¸Çè½É»çÆÀ ¶Ç´Â Áø·á¿¡ ","I007");
			return;
		}
//################# Åð¿øÈ®Á¤ÀÏÀÚ ÀÌÈÄ¿¡ ¾×ÆÃµÈ Ã³¹æÀÎ ÀÖ´Â °æ¿ì ¸Þ½ÃÁö 󸮳¡ #######################################

//################# ½ÃÀÛ :  JHP, 20090204 ¿Ü·¡¿äÀ²¿¡ ÀÔ¿ø·á°¡ À־ ±×³É ÁøÇàÇÏ¸é ¼ö³³ÇÒ¼ö°¡ ÀÖ´Â ÇüÅ¿©¼­ ¼öÁ¤ÇϱâÀ§ÇØ ±âÁ¸·ÎÁ÷ ÁÖ¼®Ã³¸®ÇÏ°í ÀÌ ·ÎÁ÷ Ãß°¡ÇÔ. #########################
		var smskind = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind");
		if(smskind == "M"){
			submit("TRPAI00130");
			if (sbrateflag == "O" && (srcptflag == "B31" || srcptflag == "B21")) {		//¼öÀͱ¸ºÐÀ» ¼±Åýà °¡Á®¿Àµµ·Ï º¯°æÇÏ¿© Àû¿ëµÇÁö ¾ÊÀ½.(Â÷ÈÄ submitÀ¸·Î üũ)
				var iInAmtChk = model.getValue("/root/temp4/brateflagchk/chk/yn");

				if (iInAmtChk == "Y") {
					//blocking ÇÏÁö ¾ÊÀ½. ¸Þ¼¼Áö ó¸®13401
					messageBox("¿Ü·¡¿äÀ²È¯ÀÚ¿¡°Ô ÀÔ¿ø·á°¡ Á¸ÀçÇÕ´Ï´Ù. ¼ö°¡°è»êÀ» ´Ù½Ã ÇϽʽÿä. ¼ö³³½ÂÀÎÀ» ", "E001");
					return;
				}
			}else if (sbrateflag == "I" && (srcptflag == "B31" || srcptflag == "B21")) {		//¼öÀͱ¸ºÐÀ» ¼±Åýà °¡Á®¿Àµµ·Ï º¯°æÇÏ¿© Àû¿ëµÇÁö ¾ÊÀ½.(Â÷ÈÄ submitÀ¸·Î üũ)
				var iInAmtChk = model.getValue("/root/temp4/brateflagchk/chk/yn");
                var dschNotidd = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt").substr(0, 8);
                var dschNotitm = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt").substr(8, 4);
                
                // Åð¿ø´çÀϸ¸ À¯ÇüÀÌ ºÐ¸®µÈ °æ¿ì´Â Á¦¿Ü(´Ü, 1800 ÀÌÈÄ Åð¿ø½Ã´Â Æ÷ÇÔ)
				if (iInAmtChk == "N"
				        && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd") != dschNotidd
				                || (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd") == dschNotidd  
				                        && dschNotitm >= 1800))) {
					//blocking ÇÏÁö ¾ÊÀ½. ¸Þ¼¼Áö ó¸®13401
					if (messageBox("ÀÔ¿ø¿äÀ²È¯ÀÚ¿¡°Ô ÀÔ¿ø·á°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù. ¹Ýµå½Ã È®ÀÎ ÇϽʽÿÀ. ¼ö³³À»", "Q003") == 7) {
						return;
					}
				}
			}
		}
//################# ³¡ : JHP, 20090204 ¿Ü·¡¿äÀ²¿¡ ÀÔ¿ø·á°¡ À־ ±×³É ÁøÇàÇÏ¸é ¼ö³³ÇÒ¼ö°¡ ÀÖ´Â ÇüÅ¿©¼­ ¼öÁ¤ÇϱâÀ§ÇØ ±âÁ¸·ÎÁ÷ ÁÖ¼®Ã³¸®ÇÏ°í ÀÌ ·ÎÁ÷ Ãß°¡ÇÔ. #########################

        // ÀÇ·á±Þ¿© + Á¤½Å°ú + ¿Ü·¡¿äÀ² + ¿ø¿ÜÅð¿ø¾à Á¸ÀçÇÏ´Â °æ¿ì Åð¿ø¼ö³³ Á¦¾î by Á¶Áß·¡ 20150206
        // ÇØ´ç Á¶°ÇÀº sql¿¡ Àû¿ëµÇ¾îÀÖÀ¸¹Ç·Î Ä«¿îÅ͸¸À¸·Î üũ ½Ç½Ã
        if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdrugcnt") > 0 && (srcptflag == "B21" || srcptflag == "B31")) {
            messageBox("ÀÇ·á±Þ¿© Á¤½Å°ú ¿Ü·¡¿äÀ² Åð¿øȯÀÚ¿¡°Ô ¿ø¿Ü¾àÀÌ Á¸ÀçÇÕ´Ï´Ù. \r\nÅð¿ø¾àÀ» È®ÀÎÇϽñ⠹ٶø´Ï´Ù. ", "E999");
            return;
        }

		if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indschacptstat") == "T" && srcptflag == "B31") {
		
		} else {
			if (srcptflag == "C01" || srcptflag == "B41") {
			
			} else {
				if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_rcptyn") == "Y") {
					messageBox("¼±ÅÃÇÑ Àç¿øÁ¤º¸´Â À̹̼ö³³Ã³¸® µÇ¾ú½À´Ï´Ù.\n¼öÁ¤ÇϽ÷Á¸é ¼ö³³Ãë¼Ò ÈÄ Ã³¸®ÇϽʽÿÀ.","E999","");
					return;
				}
			}
		}

		//ÁÖ/ºÎ·Î ÀÔ¿ø µÇ¾î ÀÖ´Â °æ¿ì üũ ÇØ¾ß ÇÔ.
		if ((srcptflag == "B31" || srcptflag == "B21") && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd")
			== model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdd"))) {
			sdschrcptflag = "D";
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_dschrcptflag", "D");
		} else if ((srcptflag == "B31" || srcptflag == "B21") && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd") != "99991231")) {
			sdschrcptflag = "R";
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_dschrcptflag", "R");
		} else {
			sdschrcptflag = "-";
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_dschrcptflag", "-");
		}

		//ºÎÀ¯Çü(ÀÓ»óµî) Ãë¼Ò½Ã iphs¿¡ rcptynÀÌ Y·Î ³²¾ÆÀÖ´Â ÄÉÀ̽º ¹®Á¦·Î ¾Æ·¡ IF¹® Ãß°¡ 20110401 cys
		//¿ø·¡´Â À§¿¡ if¹®¸¸ ÀÖ¾î¾ß ÇÕ´Ï´Ù.
		//¼ö³³ÇÒ¶§ admi_dschrcptflag -> D  ,  iphs_rcptyn -> Y  ·Î µË´Ï´Ù. ¸¸¾à B31Àε¥ admi_dschrcptflag°ªÀÌ -·Î µé¾î°¡¸é Ãë¼Ò½Ã rcptynÀÌ NÀ¸·Î ¸øµ¹¾Æ°¡´Â ¹®Á¦°¡ »ý±é´Ï´Ù.
		//±×·¡¼­ ¾Æ·¡ if¹® Ãß°¡ÇÕ´Ï´Ù. º»ÀÎ »ý°¢À¸·Ð ¾Æ·¡ ifÇÊ¿ä¾ø°í À§¿¡¼­ B31À϶§ ¹«Á¶°Ç admi_dschrcptflag -> D ÇÏ¸é µÉ°Í°°Àºµ¥(°æºÏ´ë´Â Áß°£Ã»±¸°¡ ¾ø½À´Ï´Ù)
		//»óȲÀÌ ¿©ÀÇÄ¡ ¾Ê¾Æ ¾Æ·¡if¹®À» Ãß°¡Çؼ­ ºÎÀ¯ÇüÀ϶§¸¸ ¿¹¿Ü󸮸¦ Çѹø ´õ ÇØÁÝ´Ï´Ù.
		if ((srcptflag == "B31" || srcptflag == "B21") && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind")== "S")
		      // 2013-07-17 Á¶°ÇÀý Ãß°¡ - À§ Á¶°ÇÀ¸·Ð À¯ÇüÀÌ ºÐ¸®µÈ ºÎÀ¯Çü ¾Õ ±â°£ÀÌ À¯ÇüÀ» ¼ö³³ÇÒ ¶§µµ ¹«Á¶°Ç Åð¿ø󸮵Ê.
		      // ¸¶Áö¸· À¯ÇüÀ» ¼ö³³ÇÒ¶§¸¸ Åð¿øµÇµµ·Ï Á¶°Ç Ãß°¡ by Á¶Áß·¡ 
		      && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd") == "99991231")) {
			
			sdschrcptflag = "D";
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_dschrcptflag", "D");		
		}

		//Áß°£Ã»±¸°¡ µÇÁö ¾ÊÀ¸¸é À¯Çü¿¡ ´ëÇÏ¿© ¼ö³³Ã³¸®¸¦ ÇÒ ¼ö ¾øµµ·Ï blocking
		//Àç¿ø½É»ç¿©ºÎ·Î üũ ÇØ¾ß ÇÒÁö.?
		//Àç¿ø½É»ç¿©ºÎ·Î üũÇϵµ·Ï ¼öÁ¤(KTAS4/5µî±Þ ´çÀÏÅð¿ø ÇÏÁö¾Ê´Â °æ¿ì ó¸® °ü·Ã) by 20160725
//		if ((sjudgrcsstat == "A" && sdschrcptflag == "R" && srcptflag == "B31") &&  (slastmdlclamdd == "" || slastmdlclamdd == "-" || slastmdlclamdd == "00000000")) {
//			messageBox("º¸Çè Áß°£Ã»±¸°¡ µÇ¾î ÀÖÁö ¾Ê¾Æ ¼ö³³Ã³¸®¸¦", "E001", "");
//			return;
//		}
//		
//		if ((sjudgrcsstat == "A" && sdschrcptflag == "R" && srcptflag == "B31") && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd") > slastmdlclamdd)) {
//			messageBox("º¸Çè Áß°£Ã»±¸°¡ µÇ¾î ÀÖÁö ¾Ê¾Æ ¼ö³³Ã³¸®¸¦", "E001", "");
//			return;
//		}

		//dschrcptflag : R --> °¡Åð¿ø ¼ö³³ÇÒ ¼ö ¾øµµ·Ï üũ, ÀÌÀü ¼ö³³ÇÏÁö ¾Ê¾ÒÀ¸¸é ¼ö³³ ÇÒ ¼ö ¾øµµ·Ï üũ
		//B31 üũ½Ã È®ÀÎ
		//B21 ¼ö³³½Ã ÀÌÀü ¼ö³³³»¿ª üũ ÇÏ ¾ÊÀ½. Åð¿ø ¼ö³³½Ã¸¸ üũ ¿äû
		//B31,21  µÑ´Ù üũ °æºÏ´ë´Â °°Àºº¸ÇèÀ¯Çü 2ÁÙº¸ÀϼöÀÖÀ¸¹Ç·Î. 20110213 cys
		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind") != "S") {
			/*
			if ((srcptflag == "B31" || srcptflag == "B21") && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ (srow + 1) +"]/iphs_rcptyn") == "N")) {
			if (srcptflag == "B31" && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ (srow + 1) +"]/iphs_rcptyn") == "N") {
				messageBox("ÀÌÀü Àç¿ø À¯ÇüÀÌ ¼ö³³µÇ¾î ÀÖÁö ¾Ê½À´Ï´Ù. ÇöÀç À¯ÇüÀ» ¼ö³³Ã³¸®¸¦", "E001", "");
				return;
			}
			*/

			var iphs_todd  = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd");

			if (srcptflag == "B31" || srcptflag == "B21") {
				if(getNodesetCount("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[iphs_todd < '" + iphs_todd + "' and iphs_rcptyn = 'N']/iphs_todd") > 0) {
					messageBox("ÀÌÀü Àç¿ø À¯ÇüÀÌ ¼ö³³µÇ¾î ÀÖÁö ¾Ê½À´Ï´Ù. ÇöÀç À¯ÇüÀ» ¼ö³³Ã³¸®¸¦", "E001", "");
					return;
				}
			}

			if (srcptflag == "B31") {
				if(getNodesetCount("/root/main/admi_info/admi/grdclamrcpt[todd = '" + iphs_todd + "' and rcptstat = 'Y' and rcptflag = 'B31']/rcptflag") > 0) {
					messageBox("B31°èÁ¤À¸·Î ÀÌ¹Ì ¼ö³³ÇÑ °ÇÀÔ´Ï´Ù.", "E999", "");
					return;
				}
			}

			if (srcptflag == "B21") {
				if(getNodesetCount("/root/main/admi_info/admi/grdclamrcpt[todd = '" + iphs_todd + "' and rcptstat = 'Y' and rcptflag = 'B21']/rcptflag") > 0) {
					messageBox("B21°èÁ¤À¸·Î ÀÌ¹Ì ¼ö³³ÇÑ °ÇÀÔ´Ï´Ù.", "E999", "");
					return;
				}
			}

			//ºÎÀ¯ÇüÀÌ Á¸ÀçÇÒ °æ¿ì ÁÖÀ¯Çü ¼ö³³Àü¿¡ ºÎÀ¯ÇüÀÌ ¸ÕÁ® ¼ö³³µÇ¾î¾ß ÇÔ.
			//Áß°£±ÝÀº ¼ö³³ ÇÒ ¼ö ÀÖ¾î¾ß ÇÔ.
			//if (srcptflag == "B31" || srcptflag == "B21") {
			if (srcptflag == "B31") {
				for (i = 1; i <= getNodesetCount("/root/main/iphs_info/h_grdipatinfo/grdipatinfo"); i++) {
					if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_mskind") == "S" &&
						model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_rcptyn") == "N") {
						messageBox("ÁÖÀ¯Çü ¼ö³³Àü¿¡ ºÎÀ¯ÇüÀ» ¼ö³³ÇÏ¼Å¾ß ÇÕ´Ï´Ù.", "E999");
						return;
					}
				}
			}
		}

		if ((srcptflag != "B01") && (srcptflag != "B11") && (srcptflag != "B21") && (srcptflag != "B31") && (srcptflag != "B41") && (srcptflag != "C01")) {
			messageBox("ÀÔ·ÂµÈ ¼ö³³°èÁ¤À¸·Î´Â ¼ö³³Ã³¸®¸¦", "E001","");
			return;
		}
		
		// °¨¸éÄÚµå À¯È¿¼º°ËÁõ¿¡ ¹®Á¦°¡ Àִ°æ¿ì Åð¿ø¼ö³³(B31) ºÒ°¡
		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_dcucynfrom") == "N"
                || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_dcucynto") == "N") {
            messageBox("°¨¸éÄڵ尡 À¯È¿ÇÏÁö ¾Ê½À´Ï´Ù. À¯Çüº° °¨¸éÄڵ带 È®ÀÎÇϽʽÿä.", "E999");
            return;
		}
		
		//°¡Åð¿øÀÏ °æ¿ì ½É»ç ¿©ºÎ´Â üũÇÏÁö ¾Ê´Â´Ù.
		if ((srcptflag == "B31") ||(srcptflag == "B21")) {
			var stime = getCurrentTime();
			var sdate = getCurrentDate();
			//Â÷ÈÄ °£È£ÀÔ½Ç ½Ã°£À¸·Î ½Ã°£ °è»ê ÇÔ.
			var schkcalcdd = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_calcdd")
			if (schkcalcdd == "-" || schkcalcdd == null || schkcalcdd == "" || schkcalcdd == "00000000") {
				messageBox("°£È£ ÀÔ½Ç Ã¼Å© µÇÁö ¾Ê¾Ò½À´Ï´Ù. È®ÀÎÇÏ¿© ÁֽʽÿÀ.", "E999", "");
				return;

			} else {
				if ((sordtype != "I") && (sbrateflag == "-" || sbrateflag == null || sbrateflag =="")) {
					messageBox("[ÀÀ±Þ, DSC] °è»ê ¿äÀ²ÀÌ ¾ø¾î ¼ö³³Ã³¸®¸¦", "E001", "");
					return;
				} else if (sordtype == "I") {
					//º°µµ ½Ã°£ üũ ÇÏÁö ¾ÊÀ½. °£È£¿¡¼­ ¿Ü·¡ ¿äÀ² °è»êÇؼ­ ³Ö±â·Î ÇÔ.
//					var sintime = getTimeInterval(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_calctm"),stime.substr(0,4)) / 60 ;
//					if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd") == sdate && sintime < 360) {
//						messageBox("ÀÔ¿ø½Ã°£ÀÌ 6½Ã°£ ¹Ì¸¸ ÀÔ´Ï´Ù.","E001","");
//						//return;
//					}
				}
			}

			//ÀÇ»ç »çÀÎÀº üũ ÇÏÁö ¾ÊÀ½. ÀÀ±Þ, DSC´Â Åð¿øÅ뺸¸¸ üũ ÇÑ´Ù.
			//if (sordtype == "I") {
			//	var sdschdclrdt = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdclrdt");
			//	if ((sdschrcptflag == "D") && (sdschdclrdt == "" || sdschdclrdt == "-" || sdschdclrdt == null)) {
			//		messageBox("ÀÇ»ç Sign(Åð¿ø¿¹°í)ÀÌ ¾ø¾î ¼ö³³Ã³¸®¸¦", "E001","");
			//		return;
			//	}
			//}

			var sdschnotidt = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt");
			if ((sdschrcptflag == "D") && (sdschnotidt == "" || sdschnotidt == "-" || sdschnotidt == null)) {
				messageBox("°£È£ Sign(Åð¿øÅ뺸)ÀÌ ¾ø¾î ¼ö³³Ã³¸®¸¦", "E001","");
				return;
			}

		}

		if (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_reduamt")) > 0) {
			if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_discreducd") == "") {
				messageBox("ÀÓÀÇ°¨¸é Äڵ尡 ÀԷµÇÁö", "E007","");
				return;
			}
		}

		if (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt")) > 0) {
			if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncocd") == "") {
				messageBox("¹Ì¼ö Äڵ尡 ÀԷµÇÁö", "E007","");
				return;
			}
			
			//ÀϹݹ̼ö ±ÇÇÑ Ã¼Å©
			if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncocd") == "A01") {
				getRcptuserInfo(); 	//¼ö³³¸¶°¨ »ç¿ëÀÚ°ü¸® Á¶È¸
				if(model.getValue("/root/rcptuser/rcptuserinfo/uncoyn") != "Y"){
					messageBox("ÀϹݹ̼ö ¹ß»ý ±ÇÇÑÀÌ ¾ø½À´Ï´Ù.","E999","");								
					return;
				}
			}
		}

		if (srcptflag == "B21") {
			if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_bloddiscamt") != "0") {
				messageBox("°¡Åð¿ø(B21)½Ã ¼öÇ÷´ëü¸¦ ÇÒ ¼ö ¾ø½À´Ï´Ù. Åð¿ø¼ö³³(B31)½Ã ¼öÇ÷´ëü¸¦ ÇϽʽÿÀ.", "I999");
				return;
			}
			if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_reduamt") != "0") {
				messageBox("°¡Åð¿ø(B21)½Ã ÀÓÀÇ°¨¸éÀ» »ý¼ºÇÒ ¼ö ¾ø½À´Ï´Ù. Åð¿ø¼ö³³(B31)½Ã ÀÓÀÇ°¨¸éÀ» »ý¼º ÇϽʽÿÀ.", "I999");
				return;
			}
			if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt") != "0") {
				messageBox("°¡Åð¿ø(B21)½Ã ¹Ì¼ö¸¦ »ý¼ºÇÒ ¼ö ¾ø½À´Ï´Ù. Åð¿ø¼ö³³(B31)½Ã ¹Ì¼ö¸¦ »ý¼º ÇϽʽÿÀ.", "I999");
				return;
			}

		}

		if (srcptflag == "B01") {
			if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_bloddiscamt") != "0") {
				messageBox("¼±¼ö±Ý ÀԱݽà ¼öÇ÷´ëü¸¦ ÇÒ ¼ö ¾ø½À´Ï´Ù. Åð¿ø¼ö³³(B31)½Ã ¼öÇ÷´ëü¸¦ ÇϽʽÿÀ.", "I999");
				return;
			}
			if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_reduamt") != "0") {
				messageBox("¼±¼ö±Ý ÀԱݽà ÀÓÀÇ°¨¸éÀ» »ý¼ºÇÒ ¼ö ¾ø½À´Ï´Ù. Åð¿ø¼ö³³(B31)½Ã ÀÓÀÇ°¨¸éÀ» »ý¼º ÇϽʽÿÀ.", "I999");
				return;
			}
			if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt") != "0") {
				messageBox("¼±¼ö±Ý ÀԱݽà ¹Ì¼ö¸¦ »ý¼ºÇÒ ¼ö ¾ø½À´Ï´Ù. Åð¿ø¼ö³³(B31)½Ã ¹Ì¼ö¸¦ »ý¼º ÇϽʽÿÀ.", "I999");
				return;
			}
		}

		//flag °ª È®ÀÎ
		//A:¹Ì½É»ç, B:½É»çÁß, C:½É»ç¿Ï·á, E:ÅëÇսɻç¿Ï·á
		// ½É»ç»óÅ´ °Çº¸, ±Þ¿©, ÀÚº¸, »êÀçÀÇ °æ¿ì¿¡¸¸ üũ by  Á¶Áß·¡ 20180112
		//if (sdschrcptflag == "D" && srcptflag == "B31" && sordtype == "I") {
		if (sdschrcptflag == "D" && srcptflag == "B31" 
		    && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "11"
                || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "21"
                || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "22"
                || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "31"
                || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "41")) {
		    
			//¿Ü·¡¿äÀ²·Î °è»ê½Ã¿¡´Â ½É»ç ¿©ºÎ¸¦ üũÇÏÁö ¾Ê´Â´Ù.
			//ÀÔ¿øÀÏ °æ¿ì¸¸ ½É»ç¿©ºÎ¸¦ üũ ÇÑ´Ù.
			//if (sbrateflag == "I") {
			if (sordtype == "I" && sbrateflag == "I") {
				if (sjudgrcsstat == "A" ||sjudgrcsstat == "B" || sjudgrcsstat == "") {
					messageBox("½É»ç¿Ï·áÀü¿¡´Â ¼ö³³Ã³¸®¸¦", "E001","");
					return;
				}
			}
			if (sjudgrcsstat == "B") {
				messageBox("ÇØ´çȯÀÚ´Â ÇöÀç [½É»çÁß]ÀÔ´Ï´Ù. È®ÀÎ ÈÄ ¼ö³³Ã³¸® ÇϽʽÿÀ.", "I999");
				return;
			}
		}
		
        // DSC / CHEMO ¿Ü·¡¿äÀ² ÀϹÝÀ¯Çü ȯÀÚ È®Àοë Æ˾÷ Ãß°¡ by Á¶Áß·¡ 20180201
        if (sdschrcptflag == "D" 
                && srcptflag  == "B31" 
                && sordtype   == "D"
                && sbrateflag == "O"
                && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "51") {
            
            if (messageBox("DSC / CHEMO ÀϹÝÀ¯Çü ¿Ü·¡¿äÀ² ȯÀÚÀÔ´Ï´Ù.\r\n¼ö³³À» ÁøÇàÇϽðڽÀ´Ï±î?", "Q000") == 7) {
                return;
            }
        }
		
        // ¼ö³³´ë»óÀ¯Çü ÀÌÀü À¯ÇüÀÇ ISCL¿¡ ¿ø¹«Å°°¡ ºüÁ®ÀÖ´Â °æ¿ì ¿¡·¯Ã³¸®
        if (srcptflag == "B31") {
            if (!fGetISCLNoRcptKey("R")) {
                return;
            }
        }

		/* ¿ø¹«ÆÀ Á¤Çý¿¬ ¼±»ý´Ô ¿äûÀ¸·Î »èÁ¦
		//DSC, CHEMO ȯÀÚ´Â ÆòÀÏ 17½Ã 30ºÐ ÀÌÀü, ÈÞÀÏ ¾øÀ½, Åä¿äÀÏ 13½Ã ÀÌÀü, ÈÞÀÏÀº ½É»ç ÇÏÁö ¾ÊÀ½
		//if (srcptflag == "B31" && sordtype == "D" && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotiyn") == "Y" && (sjudgrcsstat == "A" || sjudgrcsstat == "B")  && sbrateflag == "O") {
		if (srcptflag == "B31" && sordtype == "D" && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotiyn") == "Y" && (sjudgrcsstat == "A" || sjudgrcsstat == "B")) {
			if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt") == null || model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt") == "") {
				messageBox("Åð¿øÅ뺸ÀϽð¡ À߸ø µÇ¾ú½À´Ï´Ù.", "I999");
			}
			var sDschNotiRgstDD = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt").substr(0, 8);
			var sDschNotiRgstTM = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt").substr(8, 4);
			//if (sDschNotiRgstDD == model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")) {
			model.resetInstanceNode("/root/hidden/hschinfo");
			model.setValue("/root/hidden/hschinfo/hsch/hsch_basedd", sDschNotiRgstDD);
			//PMCMCODE cdgrupid = P0004 ½É»ç½Ã°£ Á¤ÀÇ
			submit("TRPAI00123");
			//dutflag  8/ÈÞÀÏ 4/Åä¿äÀÏ 0/ÆòÀÏ
			if (model.getValue("/root/hidden/hschinfo/hsch/hsch_dutflag") == "0") {
				if (model.getValue("/root/hidden/hschinfo/hsch/hsch_tm") == null || model.getValue("/root/hidden/hschinfo/hsch/hsch_tm") == "") {
					var iJudgTM = 0;
				} else {
					var iJudgTM = model.getValue("/root/hidden/hschinfo/hsch/hsch_tm");
				}
				if (iJudgTM != 0) {
					if (sDschNotiRgstTM < iJudgTM) {
						if (messageBox("[DSC, CHEMOȯÀÚ´Â ÆòÀÏÀÇ °æ¿ì " + iJudgTM + "ºÐ±îÁö ½É»ç¿Ï·á ÈÄ ¼ö³³ÇϽʽÿÀ]\n½É»ç°¡(Åð¿øÅ뺸µî·Ï½Ã°£ : " + sDschNotiRgstTM.substr(0, 2) + ":" + sDschNotiRgstTM.substr(2, 2) + " ) ¿Ï·áµÇÁö ¾Ê¾Ò½À´Ï´Ù.\n¼ö³³À»", "Q003","") == 7) {
							return;
						}
					}
				}
			} else if (model.getValue("/root/hidden/hschinfo/hsch/hsch_dutflag") == "4") {
				if (model.getValue("/root/hidden/hschinfo/hsch/hsch_tm") == null || model.getValue("/root/hidden/hschinfo/hsch/hsch_tm") == "") {
					var iJudgTM = 0;
				} else {
					var iJudgTM = model.getValue("/root/hidden/hschinfo/hsch/hsch_tm");
				}
				if (iJudgTM != 0) {
					if (sDschNotiRgstTM < iJudgTM) {
						if (messageBox("[DSC, CHEMOȯÀÚ´Â Åä¿äÀÏÀÇ °æ¿ì " + iJudgTM + "ºÐ±îÁö ½É»ç¿Ï·á ÈÄ ¼ö³³ÇϽʽÿÀ]\n½É»ç°¡(Åð¿øÅ뺸µî·Ï½Ã°£ : " + sDschNotiRgstTM.substr(0, 2) + ":" + sDschNotiRgstTM.substr(2, 2) + " ) ¿Ï·áµÇÁö ¾Ê¾Ò½À´Ï´Ù.\n¼ö³³À»", "Q003","") == 7) {
							return;
						}
					}
				}
			}
			//}
		}
		*/

		if (model.getValue("/root/main/admi_info/rcptmthd/rcptmthd") == "1") {
			if (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cardamt")) < 0
			         && model.getValue("/root/init/option/checkcard") != "Y") {
				messageBox("Ä«µå °áÁ¦¾×ÀÌ - ±Ý¾×ÀÔ´Ï´Ù. \r\n½ÂÀοϷᰡ üũµÈ »óÅ¿¡¼­¸¸ ¼ö³³°¡´ÉÇÕ´Ï´Ù.", "E000", "");
				return;
			}
		}

		var sVanFlag = model.getValue("/root/init/PAM/P0032list/P0032[cdid = '200']/cdnm");
		
		//Ä«µå±Ý¾× üũ
		//2009-01-15 À̵¿½Ä Ãß°¡
		var checkCardYN = model.getValue("/root/init/option/checkcard");
		if (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cardamt")) > 0 ) {
			var scardno = (model.getValue("/root/main/admi_info/rcptmthd/cardcashno")).getTrim();
			var svalidterm = (model.getValue("/root/main/admi_info/rcptmthd/validterm")).getTrim();
			var sallotmm = (model.getValue("/root/main/admi_info/rcptmthd/allotmm")).getTrim();

			if (model.getValue("/root/main/admi_info/rcptmthd/rcptmthd") != "1") {
				messageBox("Ä«µå¼ö³³Àº ¼ö³³¹æ¹ýÀÌ Ä«µå·Î ¼±ÅõǾî ÀÖ¾î¾ß ÇÕ´Ï´Ù. ", "C999","");
				return;
			}
			
			/* Ä«µå¼ö³³Æ˾÷¿¡¼­ ó¸®
			// Ãּұݾ×üũ
			if (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cardamt")) < 1000
			        && parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cardamt")) > -1000) {
			    messageBox("1,000¿ø¹Ì¸¸ ±Ý¾×Àº Ä«µå°áÁ¦ ÇÒ ¼ö ¾ø½À´Ï´Ù.","E999");
                return;
			}
			*/

			if( checkCardYN != 'Y' ){
				//Ä«µå Æ˾÷¿¡¼­ ÀÔ·ÂÇÑ °æ¿ì üũ ÇÏÁö ¾ÊÀ½.
				if (model.getValue("/root/main/admi_info/card/card[1]/card_pid") == "")  {
				    
				    // KocesICPos ÀÌ¿ÜÀÇ °æ¿ì¿¡¸¸ °ËÁõ
				    if (sVanFlag != "KOCES_IC") {
				    
    					if (scardno == "" || scardno == "-" || scardno == null) {
    						messageBox("Ä«µå¹øÈ£°¡ ÀԷµÇÁö", "E007","");
    						model.setFocus("ipt_cardcashno");
    						return;
    					}
    					if (svalidterm == "" || svalidterm ==  "-" || svalidterm == null) {
    						messageBox("Ä«µå À¯È¿±â°£ÀÌ ÀԷµÇÁö", "E007","");
    						model.setFocus("ipt_valiterm");
    						return;
    					}
    
    					if (sallotmm == "" || sallotmm ==  "-" || sallotmm == null) {
    						messageBox("Ä«µå ÇҺΰ³¿ùÀÌ ÀԷµÇÁö", "E007","");
    						model.setFocus("ipt_allotmm");
    						return;
    					}
				    }
					
				}
				
			}else{
				if (scardno != null && scardno.length > 0) {
					messageBox("½ÂÀÎ¿Ï·á ¼±ÅÃÇϽðí Ä«µå¹øÈ£¸¦ ÀÔ·ÂÇϼ̽À´Ï´Ù. Ä«µå¹øÈ£¸¦ Áö¿ì½Ã°Å³ª ½ÂÀοϷá üũ ÇØÁ¦ÇϽŠÈÄ ´Ù½Ã ¼ö³³½ÂÀÎÇϼ¼¿ä!", "E999","");
					model.setFocus("ipt_cardcashno");
					return;
				}
			}
		}

		//¼ö³³¹æ¹ý 3 : Çö±Ý¿µ¼öÁõ ¹ßÇà ÇÏÁö ¾ÊÀ½.
		//Â÷ÈÄ Çö±Ý ¿µ¼öÁõ üũ ·ÎÁ÷ º¯°æ ÇØ¾ß ÇÔ.
		//Ä«µå¿Í Çö±Ý °°ÀÌ ¼ö³³ ÇÏ´Â °æ¿ì scashno Ç׸ñÀº Ä«µå·Î °¡Á®°¡¸ç, Çö±Ý ¿µ¼öÁõ ½ÂÀÎ Á¤º¸´Â ÀúÀåµÈ ³»¿ªÀ¸·Î ÇØ¾ß ÇÒµí ÇÔ.
		if (model.getValue("/root/main/admi_info/rcptmthd/rcptmthd") == "2") {
			//Çö±Ý¿µ¼öÁõ üũ
			if (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cashamt")) >= 1) {
				
			    // ICPosÀÇ °æ¿ì Çö±Ý¿µ¼öÁõÄ«µå¹øÈ£´Â ´Ü¸»±â¿¡¼­ ÀԷµǵµ·Ï ¿¹¿Üó¸®
			    if (sVanFlag != "KOCES_IC" || model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmflag") != "3") {
			        
    			    var scashno = (model.getValue("/root/main/admi_info/rcptmthd/cardcashno")).getTrim();
    				if  (scashno == "" || scashno ==  "-" || scashno == null) {
    					var smsg = messageBox("Çö±Ý¿µ¼öÁõ ½ÂÀÎÁ¤º¸°¡ ÀԷµÇÁö", "E007");
    					model.setFocus("ipt_cardcashno");
    					return;
    				}
			    }
			}
		}

		if (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_totamt")) == 0 && sdschrcptflag == "D" && srcptflag == "B31") {
			if (messageBox("ÃÑÁø·áºñ°¡ 0 ¿ø ÀÔ´Ï´Ù. Åð¿ø¼ö³³À»", "Q003", "") == 7) {
				return;
			}
		}
		if (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt")) == 0 && sdschrcptflag == "D" && srcptflag == "B31") {
			if (messageBox("³³ºÎÇұݾ×ÀÌ 0 ¿ø ÀÔ´Ï´Ù. Åð¿ø¼ö³³À»", "Q003", "") == 7) {
				return;
			}
		}

		if (srcptflag == "C01") {
			if ((parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cardamt")) +
				parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_onlineamt")) +
				parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cashamt"))
				) < 1) {
					messageBox("¹Ì¼öÀԱݱݾ×ÀÌ 0¿øÀ̰ųª - ±Ý¾×ÀÔ´Ï´Ù. ÀԱݱݾ×À» È®ÀÎÇϽʽÿÀ.", "I999");
				return;
			}
		}

		//Åð¿ø¼ö³³½Ã ¹Ì°è»ê³»¿ª check, blocking ÇÒÁö ÁøÇàÇÒÁö È®ÀÎÇÊ¿ä.
		if (srcptflag == "B21" || srcptflag == "B31") {
			//¼Ò±Þ³»¿ªÀÌ ÀÖÀ» °æ¿ì ¼ö³³ºí·°Å· ó¸® ÇÑ´Ù.
			if(fRetcSpec() != true)	return false;
			
			model.removenode("/root/send/chkdata9");
			model.makeNode("/root/send/chkdata9");
			model.makeValue("/root/send/chkdata9/pid", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_pid"));
			model.makeValue("/root/send/chkdata9/indd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_indd"));
			model.makeValue("/root/send/chkdata9/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno"));
			model.makeValue("/root/send/chkdata9/instcd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_instcd"));
			model.makeValue("/root/send/chkdata9/fromdd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd"));
			model.makeValue("/root/send/chkdata9/todd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd"));
			submit("TRPAI00127");
			model.removenode("/root/send/chkdata9");
			if (getNodesetCount("/root/chkvalue/nocalcchk") > 0) {
				if (messageBox("¹Ì°è»ê³»¿ª(ISCL2)ÀÌ Á¸ÀçÇÕ´Ï´Ù. ¼ö³³À» ó¸®ÇϽðڽÀ´Ï±î?", "Q999","") == 7) {
					model.removenode("/root/chkvalue/nocalcchk");
					model.makeNode("/root/chkvalue/nocalcchk");
					return;
				}
			}
			
			var dupexecdd = model.getValue("/root/chkvalue/dup/dupexecdd");
			if (dupexecdd != "") {
				dupexecdd = dupexecdd.toDate().getDateFormat("YYYY/MM/DD")
				messageBox(dupexecdd + "Áߺ¹°è»ê ³»¿ªÀÌ Á¸ÀçÇÕ´Ï´Ù. " + dupexecdd + "ÀÏ Àç°è»ê","I008");
				model.removenode("/root/chkvalue/dup");
				model.makeNode("/root/chkvalue/dup");
				return;
			}
			
//			var prcphistcdecnt = model.getValue("/root/chkvalue/histcde/prcphistcdecnt");
//			if (prcphistcdecnt != "" && prcphistcdecnt != "0") {
//				messageBox("¹Ýȯ¿äûó¹æ ³»¿ªÀÌ Á¸ÀçÇÕ´Ï´Ù. °£È£ÆÀ¿¡ ¿¬¶ôÇϼż­ ¹ÝȯȮÀÎ ÈÄ Åð¿ø¼ö³³À» ÁøÇàÇϼ¼¿ä","I008");
//				model.removenode("/root/chkvalue/histcde");
//				model.makeNode("/root/chkvalue/histcde");
//				return;
//			}
							
			model.removenode("/root/chkvalue/nocalcchk");
			model.makeNode("/root/chkvalue/nocalcchk");
		}
		
		
		//2011-04-09
		//¼ö³³½Ã¿¡ ȯÀÚ º¸Çè ÀÚ°Ý Ã¼Å©
		//B21, B31À϶§¸¸ üũ
		if( srcptflag == 'B31' || srcptflag == 'B21' ){
			//°ø´ÜÀÚ°ÝÁ¶È¸
			var retVal = fCheckInsuRgst();
			if( retVal == false ){
				//ÀÚ°ÝÁ¶È¸
				button48.dispatch("DOMActivate");
				return false;
				
			}else if( retVal == true ){
				//Àå¾ÖÀÎÀû¿ëÈ®ÀÎ
				return false;
			}
		}

		var smessage ="";
		if (sordtype == "E" && sbrateflag == "O" && srcptflag == "B31") {
			smessage = "ÀÀ±Þ [¿Ü·¡ºÎ´ãÀ²] ";
		} else if (sordtype == "E" && sbrateflag == "I" && srcptflag == "B31") {
			smessage = "ÀÀ±Þ [ÀÔ¿øºÎ´ãÀ²] ";
		} else {
			if (srcptflag == "B31") {
				smessage = "ÀÔ¿ø [Á¤»óÅð¿ø] ";
			} else if (srcptflag == "B21") {
				smessage = "ÀÔ¿ø [°¡Åð¿ø] ";
			} else if (srcptflag == "B01") {
				if (model.getValue("/root/init/option/pregdmndamtchk") == "Y") {
					smessage = "ÀÔ¿ø [»êÀüÁø·áºñ] ";
				} else {
					smessage = "ÀÔ¿ø [¼±¼ö±Ý] ";
				}
			} else if (srcptflag == "B41") {
				smessage = "[Åð¿øÈÄÃß°¡¼ö³³±Ý] ";
			} else if (srcptflag == "C01") {
				smessage = "[¹Ì¼öÀÔ±Ý] ";
			}
		}

		var sCardAndCash = false;
		if (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cashamt")) >= 1 && model.getValue("/root/main/admi_info/rcptmthd/rcptmthd") == "1") {
			if (messageBox("Ä«µå, Çö±Ý¿µ¼öÁõÀ» µ¿½Ã ½ÂÀÎó¸® ÇϽðڽÀ´Ï±î?\nÇö±Ý¿µ¼öÁõ ½ÂÀιøÈ£°¡ ÀúÀåµÇ¾î ÀÖÁö ¾ÊÀ» °æ¿ì ÁֹιøÈ£·Î ½ÂÀε˴ϴÙ.\n[    ¿¹    ] Ä«µå½ÂÀÎ + Çö±Ý¿µ¼öÁõ½ÂÀÎ ¼ö³³\n[¾Æ´Ï¿À] Ä«µå½ÂÀÎ + Çö±Ý ¼ö³³", "Q999","") != 7) {
				sCardAndCash = true;
			}
		}

		if (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_onlineamt")) >= 1) {
			// 2009.10.22 - üũ³ëµå º¯°æ
			//if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_onlnno") == "" || model.getValue("/root/main/inpt_info/inptpatinfo/inpt_onlnno") == "-") {
			if (isNull(model.getValue("/root/main/admi_info/onln/onln/onln_acntno"))) {
				messageBox("ÅëÀå¹øÈ£°¡ ¼±ÅõÇÁö ¾Ê¾Ò½À´Ï´Ù. [ÅëÀåÀÔ±Ý] ¹öÆ°À» Ŭ¸¯ÇÑ ÈÄ ÅëÀå¹øÈ£¸¦ ¼±ÅÃÇϽʽÿÀ. ", "C999","");
				return;
			}
		}

		//¼ö³³Ã³¸®***************************
		if (messageBox(smessage + "¼ö³³À» ó¸®ÇϽðڽÀ´Ï±î?", "Q999","") == 7) {
			return;
		}

		model.resetInstanceNode("/root/send/data1");
		model.resetInstanceNode("/root/send/data2");
		model.resetInstanceNode("/root/send/data3");

		//ÇöÀç ȯÀÚ »óÅ Á¶È¸
		if ((srcptflag == "B21" || srcptflag == "B31") && (sdschrcptflag == "D")) {
            model.copyNode("/root/send/data11/iphs", "/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]");
            model.copyNode("/root/send/data11/admi", "/root/main/admi_info/ordamt/admispec");

            //Ä«µå ÀÓÀÇ ½ÂÀνà À̷»ý¼º Ãß°¡¸¦ À§ÇØ
            if( model.getValue("/root/init/option/checkcard") == 'Y'){
                model.makeValue("/root/send/data11/admi/admi_checkcard", "Y");
            }

			submit("TRPAI00129");
			
            // ȸ¼Û °ü·Ã ¸Þ¼¼Áö ó¸®
            var patReturnMsg = model.getValue("/root/temp2/ipatchk/patreturnmsg");
            
            if (!isNull(patReturnMsg)) {
                
                if (patReturnMsg == "1") {
                    
                    if (messageBox("Åð¿ø ¼ö¼ÓÀü Áø·áÀÇ·Ú¼¾ÅÍ ¹æ¹®ÇÏ¿© ȸ¼Û¼­¸¦ ¹ÞÀ¸¼¼¿ä.\r\n(¹®ÀÇ:Áø·áÀÇ·Ú¼¾ÅÍ)\r\n¼ö³³À» °è¼Ó ÁøÇàÇϽðڽÀ´Ï±î?", "Q000") == "7") {
                        return; 
                    }
                    
                } else if (patReturnMsg == "2") {
                    
                    // Á¦Áõ¸í ó¸® ½Ã ÁøÇà¿©ºÎ È®ÀÎ ÇÊ¿ä
                    if (messageBox("Á¦Áõ¸í ⱸ ¹æ¹®ÈÄ Åð¿ø¼ö¼ÓÇϼ¼¿ä.\r\n¼ö³³À» °è¼Ó ÁøÇàÇϽðڽÀ´Ï±î?", "Q000") == "7") {
                        return;
                    }
                }
            }

			if (model.getValue("/root/temp2/ipatchk/indschacptstat") == "D") {
				messageBox("Åð¿øó¸®µÈ ȯÀÚÀÔ´Ï´Ù. ȯÀÚ¸¦ ÀçÁ¶È¸ ÇÏ¿© ¼ö³³³»¿ªÀ» È®ÀÎÇϽʽÿÀ.", "E999");
				return;
			}
			if (srcptflag == "B21" && model.getValue("/root/temp2/ipatchk/indschacptstat") == "T") {
				messageBox("°¡Åð¿øó¸®µÈ ȯÀÚÀÔ´Ï´Ù. ȯÀÚ¸¦ ÀçÁ¶È¸ ÇÏ¿© ¼ö³³³»¿ªÀ» È®ÀÎÇϽʽÿÀ.", "E999");
				return;
			}

			// ½É»ç»óÅ´ °Çº¸, ±Þ¿©, ÀÚº¸, »êÀçÀÇ °æ¿ì¿¡¸¸ üũ by  Á¶Áß·¡ 20180112
			if (sordtype == "I" && sbrateflag == "I" 
			        && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "11"
    		             || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "21"
    	                 || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "22"
                         || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "31"
                         || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "41")) {
				if (srcptflag == "B31" && (model.getValue("/root/temp2/ipatchk/dschjudgprcsstat") == "A" || model.getValue("/root/temp2/ipatchk/dschjudgprcsstat") == "B")) {
					messageBox("º¸Çè½É»ç »óÅ°¡ ¹Ì½É ¶Ç´Â ½É»çÁß »óÅÂÀÔ´Ï´Ù. ȯÀÚ¸¦ ÀçÁ¶È¸ ÇÏ¿© »óŸ¦ È®ÀÎÇϽʽÿÀ.", "E999");
					return;
				}
				//È­¸éÀÇ ½É»ç»óÅÂ¿Í ÀçÁ¶È¸ÇÑ ½É»ç»óÅ°¡ Ʋ¸° °æ¿ì
				if (srcptflag == "B31" || srcptflag == "B21") {
				        
		            var j1 = sjudgrcsstat;
		            var j2 = model.getValue("/root/temp2/ipatchk/dschjudgprcsstat");
		            
		            // ½É»ç»óÅ ¿Ï·á(C), ÅëÇÕ(E), ¿¹°í½É»ç(G)ÀÇ °æ¿ì ÅëÇÕ(E)À¸·Î ÀÏ°ýó¸®(¿ø¹«¿¡¼­ ¹Ù¶óº¸´Â ±âÁØÀº C, E, G°¡ µ¿ÀÏ)
		            if (j1 == 'C' || j1 == 'G') j1 = 'E';
		            if (j2 == 'C' || j2 == 'G') j2 = 'E';
		            
		            if (j1 != j2) {
				            
    					messageBox("º¸Çè½É»ç »óÅ°¡ º¯°æ µÇ¾ú½À´Ï´Ù. ȯÀÚ¸¦ ÀçÁ¶È¸ ÇÏ¿© »óŸ¦ È®ÀÎÇϽʽÿÀ.", "E999");
    					return;
		            }
				}
			}

			if (model.getValue("/root/temp2/ipatchk/dschnotiyn") != "Y") {
				messageBox("°£È£Åð¿øÅ뺸»óÅ°¡ º¯°æµÇ¾ú½À´Ï´Ù. ȯÀÚ¸¦ ÀçÁ¶È¸ ÇÏ¿© »óŸ¦ È®ÀÎÇϽʽÿÀ.", "E999");
				return;
			}

			///////////////Ä«µå½ÂÀαݾ׺ñ±³///////////////////
			if(model.getvalue("/root/temp2/h_msg/msg/msg_cardvan") != "") {
				var msg_cardvan = model.getvalue("/root/temp2/h_msg/msg/msg_cardvan"); 
				var rtn = messageBox(msg_cardvan,"Q999","");
				if (rtn == 7) {
					return false;
				}
			}
			///////////////Ä«µå½ÂÀαݾ׺ñ±³ ³¡///////////////////

			model.removenode("/root/temp2");
			model.makeNode("/root/temp2");
			model.resetInstanceNode("/root/send/data2");

			model.removenode("/root/send/data11/iphs");
			model.removenode("/root/send/data11/admi");
			model.makeNode("/root/send/data11/iphs");
			model.makeNode("/root/send/data11/admi");
		}


		if (srcptflag == "B21" || srcptflag == "C01") {
			fMdlAmtRcpt("D");
		}

		if (srcptflag == "B41") {
			fMdlAmtRcpt("B41");
		}

		if (srcptflag == "B01") {
			if (model.getValue("/root/init/option/pregdmndamtchk") != "Y") {
				fMdlAmtRcpt("R");
			}
		}

		// °³ÀÎ Á¤º¸ ÀÌ¿ë µ¿ÀǼ­ È®ÀÎ ¹× Ãâ·Â
		if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_scanyn") == "X"
		 && messageBox("°³ÀÎ Á¤º¸ ÀÌ¿ë µ¿ÀǼ­°¡ ÀÛ¼ºµÇ¾î ÀÖÁö ¾Ê½À´Ï´Ù.\n°³ÀÎ Á¤º¸ ÀÌ¿ë µ¿ÀǼ­¸¦ Ãâ·ÂÇϽðڽÀ´Ï±î?", "Q999") == 6){
			
			//°³ÀÎÁ¤º¸ÀÌ¿ë µ¿ÀǼ­ ÀüÀÚµ¿ÀǼ­¸¦ À§ÇÑ Ã³¸®·ÎÁ÷ Ãß°¡ by Á¶Áß·¡ 20130305
			var ocrtype = "O";
			if(model.getValue("/root/init/PAM/PK018list/PK018[cdid='" + app.clientIp + "']/cdnm") == "Y"){
				
				if (messageBox("°³ÀÎÁ¤º¸À̿뵿ÀǼ­", "Q017") == "6") {
					ocrtype = "S";
				}
			}
			
			var nodeCnt = getNodesetCount("/root/init/prncd/hardcd");
			
			//±¸ºÐ¿¡ ¸ÂÃç ÆûÄÚµå ó¸®(1:ÀϹݾàÁ¤¼­ / 2:±â°£¾àÁ¤¼­ / 3:°³ÀÎÁ¤º¸À̿뵿ÀǼ­)
			var formcd = model.getValue("/root/init/prncd/hardcd[cdseqno='3']/hardcd");
			
			fPerPrintOCR(formcd
			           , ipt_pid
			           , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")
			           , model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + srow + "]/iphs_cretno")
			           , "I"
			           , ocrtype);
		}
		
		model.copyNode("/root/send/data1", "/root/main/inpt_info/inptpatinfo");
		model.copyNode("/root/send/data2", "/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]");
		model.copyNode("/root/send/data3", "/root/main/admi_info/ordamt/admispec");
		model.setValue("/root/send/data3/admi_rcptexecdd", getCurrentDate());
		model.setValue("/root/send/data3/admi_rcpttm", getCurrentTime());


		//Åð¿ø¼ö³³¿¡¼­ Áß°£±Ý ¼ö³³½Ã incalcenddd´Â incalcfromdd·Î º¯°æÇÑ´Ù.
		if ((model.getValue("/root/send/data3/admi_rcptflag") == "B01" || model.getValue("/root/send/data3/admi_rcptflag") == "B11") 
		        && model.getValue("/root/send/data3/admi_incalcenddd") == "99991231") {
			model.setValue("/root/send/data3/admi_incalcenddd", model.getValue("/root/main/admi_info/ordamt/admispec/admi_incalcfromdd"))
		}

		//Åð¿øÀÏ °æ¿ì
		if (model.getValue("/root/send/data3/admi_rcptflag") == "B31" || model.getValue("/root/send/data3/admi_rcptflag") == "B21") {
			var sdschdt = model.getValue("/root/send/data1/inpt_dschnotidt")
			var stime = getCurrentTime();
			model.setValue("/root/send/data1/inpt_dschdd", sdschdt.substr(0, 8));
			
			// °¡Åð¿ø -> Åð¿øÀÇ °æ¿ì¿¡´Â ±âÁ¸ÀÇ Åð¿ø½Ã°£À» À¯ÁöÇؾßÇÒ ÇÊ¿ä ÀÖÀ½ by Á¶Áß·¡ 20140717
			if (model.getValue("/root/send/data1/inpt_indschacptstat") == "T") {
			    model.setValue("/root/send/data1/inpt_dschtm",  model.getValue("/root/send/data1/inpt_dschtm"));
			} else {
			    model.setValue("/root/send/data1/inpt_dschtm",  stime.substr(0, 4));
			}
			
			if (model.getValue("/root/send/data3/admi_incalcenddd") == "99991231") {
				model.setValue("/root/send/data3/admi_incalcenddd", model.getValue("/root/send/data1/inpt_dschdd"));
			}

			if (model.getValue("/root/send/data3/admi_rcptflag") == "B21") {
				model.setValue("/root/send/data3/admi_pregdmndamt", "0");	//Åð¿ø¼ö³³½Ã¿¡´Â »êÀüÁø·áºñ¸¦ ¹ß»ýÇÏÁö ¾Ê´Â´Ù.
			}
			
//			alert("Åð¿ø");
//			return false;
		}

		//¹Ì¼ö ÀÔ±Ý󸮽à ¹Ì¼ö³»¿ªÀ» ³Ñ±ä´Ù.
		if (model.getValue("/root/send/data3/admi_rcptflag") == "C01") {
			if (parseInt(model.getValue("/root/main/admi_info/unco/unco/unco_uncoamt")) > 0) {
				model.removenode("/root/send/set_unco/unco");
				copyNodeListType("/root/send/set_unco","/root/main/admi_info/unco/unco","replace");

				for(var i=1; i<=getNodesetCount("/root/send/set_unco/unco"); i++) {
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_pid", model.getValue("/root/send/data1/inpt_pid"));
					//model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptdd", model.getValue("/root/main/admi_info/unco/unco/unco_rcptdd"));
					//model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptno", model.getValue("/root/main/admi_info/unco/unco/unco_rcptno"));
					//model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptseqno", model.getValue("/root/main/admi_info/unco/unco/unco_rcptseqno"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_seqno", i);
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_instcd", model.getValue("/root/send/data1/inpt_instcd"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptstat", model.getValue("/root/send/data3/admi_rcptstat"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_orddeptcd", model.getValue("/root/send/data2/iphs_orddeptcd"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_orddrid", model.getValue("/root/send/data2/iphs_medispclid"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_dschdd", model.getValue("/root/send/data1/inpt_dschdd"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_insukind", model.getValue("/root/send/data2/iphs_insukind"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_suppkind", model.getValue("/root/send/data2/iphs_suppkind"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_ordtype",  model.getValue("/root/send/data1/inpt_ordtype"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_uncorcptflag", "2");
					//model.setValue("/root/send/set_unco/unco[" + i + "]/unco_uncocls", "1");
					//model.setValue("/root/send/set_unco/unco[" + i + "]/unco_orddd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
					//model.setValue("/root/send/set_unco/unco[" + i + "]/unco_uncocd", model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncocd"));
					//model.setValue("/root/send/set_unco/unco[" + i + "]/unco_uncoamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt"));
					//model.setValue("/root/send/set_unco/unco[" + i + "]/unco_apprsn", "");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptamt", model.getValue("/root/send/data3/admi_rcptpayamt"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_debtamt"	, "0");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_endyn", "Y");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_clincstdyno", "-");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_empid", "-");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptexecdd",  model.getValue("/root/send/data3/admi_rcptexecdd"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptrid", "");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_remfact", "");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_fstrgstrid", "");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_fstrgstdt", "");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_lastupdtrid", "");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_lastupdtdt", "");
				}
				model.setValue("/root/send/data3/admi_uncocalcflag", "2");
				model.setValue("/root/send/data3/admi_orgrcptdd", model.getValue("/root/send/set_unco/unco/unco_rcptdd"));
				model.setValue("/root/send/data3/admi_orgrcptno", model.getValue("/root/send/set_unco/unco/unco_rcptno"));
				model.setValue("/root/send/data3/admi_orgrcptseqno", model.getValue("/root/send/set_unco/unco/unco_rcptseqno"));
			}
		}

		//Åð¿øÈÄÃß°¡¼ö³³½Ã ¼öÇ÷³»¿ªÀº ó¸®ÇÔ.
		if (model.getValue("/root/send/data3/admi_rcptflag") == "B41" || model.getValue("/root/send/data3/admi_rcptflag") == "B31") {
			//¼öÇ÷³»¿ª// ¼öÇ÷ °¨¸éÀº Æ˾÷¿¡¼­ send·Î ÀÌ¹Ì node »ý¼º// ¼ö³³ÀÏÀÚ, ¼ö³³½Ã°£ Àû¿ë
			var ibldc = parseInt(model.getValue("/root/send/data3/admi_bloddiscamt"));
			if (ibldc > 0) {
				for(var i=1; i<=getNodesetCount("/root/send/set_bldc/bldc"); i++){
					model.setValue("/root/send/set_bldc/bldc[" + i + "]/bldc_rcptexecdd",  model.getValue("/root/send/data3/admi_rcptexecdd"));
					model.setValue("/root/send/set_bldc/bldc[" + i + "]/bldc_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
				}
			}
		}

		//¹Ì¼ö±Ý¼ö³³, °¨¾× Åð¿ø¼ö³³½Ã¸¸ ¹ß»ý
		if (model.getValue("/root/send/data3/admi_rcptflag") == "B31") {
			//¹Ì¼ö±Ý ³»¿ª
			var iunco = parseInt(model.getValue("/root/send/data3/admi_uncoamt"));
			if (iunco > 0) {
				model.removenode("/root/send/set_unco/unco");
				copyNodeListType("/root/send/set_unco","/root/main/admi_info/unco/unco","replace");

				for(var i=1; i<=getNodesetCount("/root/send/set_unco/unco"); i++) {
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_pid", model.getValue("/root/send/data1/inpt_pid"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptdd", model.getValue("/root/send/data3/admi_rcptdd"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptno", model.getValue("/root/send/data3/admi_rcptno"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptseqno", model.getValue("/root/send/data3/admi_rcptseqno"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_seqno", i);
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_instcd", model.getValue("/root/send/data1/inpt_instcd"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptstat", model.getValue("/root/send/data3/admi_rcptstat"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_orddeptcd", model.getValue("/root/send/data2/iphs_orddeptcd"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_orddrid", model.getValue("/root/send/data2/iphs_medispclid"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_dschdd", model.getValue("/root/send/data1/inpt_dschdd"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_insukind", model.getValue("/root/send/data2/iphs_insukind"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_suppkind", model.getValue("/root/send/data2/iphs_suppkind"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_ordtype",  model.getValue("/root/send/data1/inpt_ordtype"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_uncorcptflag", "1");
					//model.setValue("/root/send/set_unco/unco[" + i + "]/unco_uncocls", "1");
					//model.setValue("/root/send/set_unco/unco[" + i + "]/unco_orddd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
					//model.setValue("/root/send/set_unco/unco[" + i + "]/unco_uncocd", model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncocd"));
					//model.setValue("/root/send/set_unco/unco[" + i + "]/unco_uncoamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt"));
					//model.setValue("/root/send/set_unco/unco[" + i + "]/unco_apprsn", "");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptamt"	, "0");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_debtamt"	, "0");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_endyn", "N");
					if (model.getValue("/root/send/set_unco/unco[" + i + "]/unco_uncocd") == "I41") {
						model.setValue("/root/send/set_unco/unco[" + i + "]/unco_clincstdyno", model.getValue("/root/send/data1/inpt_clincstdycd"));
					} else {
						model.setValue("/root/send/set_unco/unco[" + i + "]/unco_clincstdyno", "-");
					}
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_empid", "-");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptexecdd",  model.getValue("/root/send/data3/admi_rcptexecdd"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_rcptrid", "");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_remfact", "");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_fstrgstrid", "");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_fstrgstdt", "");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_lastupdtrid", "");
					model.setValue("/root/send/set_unco/unco[" + i + "]/unco_lastupdtdt", "");
				}
			}

			//°¨¸é³»¿ª
			var idcgm = parseInt(model.getValue("/root/send/data3/admi_reduamt"));
			if (idcgm > 0) {
				model.removenode("/root/send/set_dcgm/dcgm");
				copyNodeListType("/root/send/set_dcgm", "/root/main/admi_info/dcgm/dcgm","replace");
				for(var i=1; i<=getNodesetCount("/root/send/set_dcgm/dcgm"); i++) {
					//ÀÌ¹Ì »ý¼º µÊ.
					//model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_discreducd", model.getValue("/root/main/admi_info/ordamt/admispec/admi_discreducd"));
					//model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_discreduamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_reduamt"));
					//model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_discreduflag", "G");
					//model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_apprsn", "");
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_pid", model.getValue("/root/send/data1/inpt_pid"));
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_seqno", i);
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_rcptdd", model.getValue("/root/send/data3/admi_rcptdd"));
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_rcptno", model.getValue("/root/send/data3/admi_rcptno"));
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_instcd", model.getValue("/root/send/data1/inpt_instcd"));
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_rcptstat", model.getValue("/root/send/data3/admi_rcptstat"));
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_rcptseqno", model.getValue("/root/send/data3/admi_rcptseqno"));
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_ordtype", model.getValue("/root/send/data1/inpt_ordtype"));
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_rcptexecdd", model.getValue("/root/send/data3/admi_rcptexecdd"));
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_remfact", "");
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_rcptrid", "");
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_fstrgstrid", "");
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_fstrgstdt", "");
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_lastupdtrid", "");
					model.setValue("/root/send/set_dcgm/dcgm[" + i + "]/dcgm_lastupdtdt", "");

				}
			}

			//ÇÒÀγ»¿ª
			var idiscamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_discamt"));
			if (idiscamt > 0) {
				//ÀÓÀÇ°¨¸éÀÌ ¾øÀ» °æ¿ì ù¹ø° index »ý¼º
				var sdcgmchk = model.getValue("/root/send/set_dcgm/dcgm/dcgm_pid");
				if (sdcgmchk == "" ||  sdcgmchk == null || sdcgmchk == "") {
					model.makeNode("root/send/set_dcgm/dcgm");
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_pid", model.getValue("/root/send/data1/inpt_pid"));
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_rcptdd", model.getValue("/root/send/data3/admi_rcptdd"));
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_rcptno", model.getValue("/root/send/data3/admi_rcptno"));
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_seqno", "1");
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_rcptseqno", model.getValue("/root/send/data3/admi_rcptseqno"));
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_instcd", model.getValue("/root/send/data1/inpt_instcd"));
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_rcptstat", model.getValue("/root/send/data3/admi_rcptstat"));
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_ordtype", model.getValue("/root/send/data1/inpt_ordtype"));

					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_discreducd", model.getValue("/root/send/data2/iphs_disccd"));
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_discreduamt", model.getValue("/root/send/data3/admi_discamt"));
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_discreduflag", "D");
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_apprsn", "");

					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_rcptexecdd", model.getValue("/root/send/data3/admi_rcptexecdd"));
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_remfact", "");
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_rcptrid", "");
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_fstrgstrid", "");
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_fstrgstdt", "");
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_lastupdtrid", "");
					model.makeValue("/root/send/set_dcgm/dcgm/dcgm_lastupdtdt", "");
				} else {
					var ii = getNodesetCount("/root/send/set_dcgm/dcgm");
					ii++;
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_pid", model.getValue("/root/send/data1/inpt_pid"));
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_rcptdd", model.getValue("/root/send/data3/admi_rcptdd"));
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_rcptno", model.getValue("/root/send/data3/admi_rcptno"));
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_seqno", ii);
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_rcptseqno", model.getValue("/root/send/data3/admi_rcptseqno"));
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_instcd", model.getValue("/root/send/data1/inpt_instcd"));
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_rcptstat", model.getValue("/root/send/data3/admi_rcptstat"));
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_ordtype", model.getValue("/root/send/data1/inpt_ordtype"));

					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_discreducd", model.getValue("/root/send/data2/iphs_disccd"));
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_discreduamt", model.getValue("/root/send/data3/admi_discamt"));
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_discreduflag", "D");
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_apprsn", "");

					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_rcptexecdd", model.getValue("/root/send/data3/admi_rcptexecdd"));
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_remfact", "");
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_rcptrid", "");
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_fstrgstrid", "");
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_fstrgstdt", "");
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_lastupdtrid", "");
					model.makeValue("/root/send/set_dcgm/dcgm[" + ii + "]/dcgm_lastupdtdt", "");
				}
			}
		}

		//Ä«µå³»¿ª
		var icard = parseInt(model.getValue("/root/send/data3/admi_cardamt"));
//		if (icard == 0 ) {
//			if (model.getValue("/root/main/admi_info/card/card[1]/card_cardamt") != "" || model.getValue("/root/main/admi_info/card/card[1]/card_cardamt") != " " ||
//				model.getValue("/root/main/admi_info/card/card[1]/card_cardamt") != null)  {
//				icard = parseInt(model.getValue("/root/main/admi_info/card/card[1]/card_cardamt"));
//				if (icard < 0) {
//					icard = icard * -1;
//				}
//			}
//		}
		//1-Ä«µå, 2-Çö±Ý¿µ¼öÁõ, 3-Çö±Ý
		if (icard > 0 && model.getValue("/root/main/admi_info/rcptmthd/rcptmthd") == "1") {
			model.removenode("/root/send/set_card/card");
			var scardcount = getNodesetCount("/root/main/admi_info/card/card/card_pid");
			if( model.getValue("/root/main/admi_info/card/card/card_pid") == '' || model.getValue("/root/main/admi_info/card/card/card_pid") == ' ' || model.getValue("/root/main/admi_info/card/card/card_pid") == null ){
				scardcount = 0;
			}

			var bCardAprv = false;
			//Æ˾÷¿¡¼­ ¹Þ¾Æ¿À´Â °ªÀÌ ¾øÀ» °æ¿ì È­¸é¿¡¼­ ÀÔ·ÂµÈ Ä«µå¸¸ ó¸®ÇÑ´Ù.
			if (model.getValue("/root/main/admi_info/card/card[1]/card_pid") == "" &&
				model.getValue("/root/main/admi_info/card/card[1]/card_aprvdd") == "" &&
				model.getValue("/root/main/admi_info/card/card[1]/card_aprvtm") == "") {
				var bCardAprv = true;
			}

//======================================================================================================================================ÀÓ½Ã
//	if (scardcount <= 1) {
			//Ä«µå³»¿ªÀÌ 2°³ ÀÌ»óÀÎ °æ¿ì Ä«µåpopup ¿¡¼­ ÀÌ¹Ì ½ÂÀÎµÇ¾î ³Ñ¾î ¿È, Ä«µå °³¼ö¸¸Å­ Ä«µå³»¿ª¸¸ »ý¼º.
			//´ÜÀÏ Ä«µåÀÏ °æ¿ì Ä«µåpopupÀ» È£ÃâÇÏ¿© ½ÂÀÎ ÈÄ Ä«µå³»¿ª »ý¼º
			if (bCardAprv == true && checkCardYN != 'Y' ) {
				var iCardAmt = parseInt(model.getValue("/root/send/data3/admi_cardamt"));	//card ±Ý¾×
				var sPid = model.getValue("/root/send/data1/inpt_pid");	//ȯÀÚ¹øÈ£
				var sVanCD ="";						//van»ç ±¸ºÐ
				var sAprvFlag = "";					//½ÂÀα¸ºÐ
				var sKeyInptFlag = model.getValue("/root/main/admi_info/rcptmthd/keyinptflag");	//ÀԷ±¸ºÐ
				var sSwipeData = model.getValue("/root/main/admi_info/rcptmthd/swipedata");	//swipedata
				var sCardNo = model.getValue("/root/main/admi_info/rcptmthd/cardcashno");		//Ä«µå¹øÈ£
				var sValidterm = model.getValue("/root/main/admi_info/rcptmthd/validterm");		//À¯È¿±â°£
				var sAllotmm = model.getValue("/root/main/admi_info/rcptmthd/allotmm");		//ÇҺαⰣ
				var sAprvDD = "";					//¿ø°Å·¡½ÂÀÎÀÏÀÚ(Ãë¼Ò)
				var sAprvTm = "";					//¿ø°Å·¡½ÂÀÎÀϽÃ(Ãë¼Ò)
				var sAprvNo = "";					//¿ø°Å·¡½ÂÀιøÈ£(Ãë¼Ò)
				var sOrdType = model.getValue("/root/send/data1/inpt_ordtype");				//ordtype
				var sOrdDeptCd = model.getValue("/root/send/data2/iphs_orddeptcd");			//orddeptcd
				var sCrdtNo = model.getValue("/root/send/data2/iphs_cretno");					//cretno
				var sOrdDD = model.getValue("/root/send/data1/inpt_indd");					//orddd
				var iSeqno = 1;

				parm =	"0"											+ "¢Ë" + 	//¸ÖƼ°Ç¼ö
							""											+ "¢Ë" + 	//¸ÖƼopmi
							""											+ "¢Ë" +  	//rcptdd º¯°æ ȤÀº Ãë¼ÒÀÎ °æ¿ì ÇÊ¿ä
							""											+ "¢Ë" +	//rcptno
							""											+ "¢Ë" +	//rcptseqno
							iCardAmt								+ "¢Ë" +	//totalamt
						""												+ "¢Ë" +	//send
						"/root/main/admi_info/card"		+ "¢Ë" +	//receive
						sPid											+ "¢Ë" +	//pid
						sOrdDD										+ "¢Ë" +	//orddd
						sCrdtNo									+ "¢Ë" +	//cretno
						""												+ "¢Ë" +	//strRcvVan
						sOrdType									+ "¢Ë" +	//ordtype
						""												+ "¢Ë" +	//fromdd
						""												+ "¢Ë" +	//todd
						sOrdDeptCd								+ "¢Ë" +	//orddeptcd
						//´ÜÀÏ°Ç Á¢¼ö ½ÂÀÎÀ϶§¸¸ ÇÊ¿ä
						sCardNo									+ "¢Ë" +	//cardno
						sValidterm									+ "¢Ë" +	//valiterm
						sAllotmm									+ "¢Ë" +	//allotmm
						sKeyInptFlag								+ "¢Ë" +	//keyinptflag
						sSwipeData								+ "¢Ë" ;	//sSwipeData

				setParameter("SPPAO00400_PARM",parm);
				setParameter("SPPAO00400_FLAG", "I");			// I : ½ÂÀÎ, D : Ãë¼Ò

				//iviewer »ý¼º ÈÄ Ä«µåpopup È£Ãâ
				var ivrObjt = document.all("ivr_cardpopup");
				if (ivrObjt == null) {
					//body.createChild("xforms:iviewer", "id:ivr_cardpopup; visibility:visible; src:../../../pam/pamcomnweb/xrw/SPPAO00400_½Å¿ëÄ«µå½ÂÀÎ.xrw; left:200px; top:200px; width:790px; height:650px");
					body.createChild("xforms:iviewer", "id:ivr_cardpopup; src:../../../pam/pamcomnweb/xrw/SPPAO00400_½Å¿ëÄ«µå½ÂÀÎ.xrw");
					ivrObjt = document.all("ivr_cardpopup");
				}

				//setParameter("SPPAO00400_PARM",parm);

				//if( flag == 'I' ){
				ivrObjt.window.javascript.fInit();
				var retMsg = ivrObjt.window.javascript.fAutoGetCardAprv();
				//}else{
				//	ivrObjt.window.javascript.fInit();
				//	var retMsg = ivrObjt.window.javascript.fAutoCnclCardAprv();
				//}

				body.removeChild("ivr_cardpopup");
				setParameter("SPPAO00400_FLAG", "");
				if (retMsg != true) {
					return;
				}
				
				//Ä«µå °³¼ö 1 seting
				scardcount = 1;
			}

			for(var icard=1; icard<=scardcount; icard++) {
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_pid", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_pid"));
				//¿µ¼öÁõ¹øÈ£´Â ¿µ¼öÁõ ¹øÈ£ »ý¼º ÈÄ ¹Þ´Â´Ù
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptdd", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_rcptdd"));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptno", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_rcptno"));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptseqno", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_rcptseqno"));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_seqno", icard);
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_instcd", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_instcd"));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptstat", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_rcptstat"));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_ordtype", model.getValue("/root/send/data1/inpt_ordtype"));
				//Ä«µåÁ¤º¸ Â÷ÈÄ Á¤¸®
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_keyinptflag", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_keyinptflag"));	//S:Swipe, K:Key in
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_cardcmpycd", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_cardcmpycd"));
				//Ä«µå¹øÈ£
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_cardno", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_cardno"));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_aprvflag", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_aprvflag"));	//12:Ä«µå½ÂÀÎÀÀ´ä, 22:Ä«µå½ÂÀÎÃë¼Ò
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_aprvdd", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_aprvdd"));		//½ÂÀÎÀÏÀÚ
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_aprvtm", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_aprvtm"));		//½ÂÀνð£
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_aprvno", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_aprvno"));		//½ÂÀιøÈ£
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_vancd", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_vancd"));		//VANÄÚµå
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_allotmm", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_allotmm"));	//ÇҺΰ³¿ù¼ö
				//Ä«µå°áÁ¦±Ý¾×
//				model.makeValue("/root/send/set_card/card[" + icard + "]/card_cardamt", parseInt(model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_cardamt")));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_cardamt", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_cardamt"));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_valiterm", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_valiterm"));	//À¯È¿±â°£
				//¼ö³³ÀÏÀÚ
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptexecdd", model.getValue("/root/send/data3/admi_rcptexecdd"));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptrid", "");			//¼ö³³ÀÚ
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_innrtretyn", "N");		//³»ºÎ󸮿©ºÎ
				if (srcptflag == "B01") {
					model.makeValue("/root/send/set_card/card[" + icard + "]/card_preamtyn", "Y");		//¼±¼ö±Ý¿©ºÎ
				} else {
					model.makeValue("/root/send/set_card/card[" + icard + "]/card_preamtyn", "N");		//¼±¼ö±Ý¿©ºÎ
				}
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_remfact", "");		//¼ö³³³»¿ª¿¡ ´ëÇÑ Âü°í»çÇ×
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_fstrgstrid", "");
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_fstrgstdt", "");
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_lastupdtrid", "");
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_lastupdtdt", "");
			}
		}
/***************************************************************************************************************************************


		var sCardCancel = false;
		var iCardAmt = 0;					//card ±Ý¾×
		var sVanCD ="";						//van»ç ±¸ºÐ
		var sAprvFlag = "";					//½ÂÀα¸ºÐ
		var sKeyInptFlag = "";				//ÀԷ±¸ºÐ
		var sSwipeData = "";				//swipedata
		var sCardNo = "";					//Ä«µå¹øÈ£
		var sValidterm = "";				//À¯È¿±â°£
		var sAllotmm = "";					//ÇҺαⰣ
		var sAprvDD = "";					//¿ø°Å·¡½ÂÀÎÀÏÀÚ(Ãë¼Ò)
		var sAprvTm = "";					//¿ø°Å·¡½ÂÀÎÀϽÃ(Ãë¼Ò)
		var sAprvNo = "";					//¿ø°Å·¡½ÂÀιøÈ£(Ãë¼Ò)
		var iSeqno = 1;
		
		for(var icard=1; icard<=scardcount; icard++){
			model.removenode("/root/tmp");
			//Ä«µå ³»¿ªÀÌ 2°Ç ÀÌ»óÀÏ °æ¿ì Ä«µå popup ¿¡¼­ »ý¼ºµÈ °ÍÀÓ.
			if (scardcount >= 2) {
				//¼ö³³±Ý¾×ÀÌ - ÀÏ°æ¿ì Ãë¼Ò µÈ ³»¿ªÀÓ.
				if (parseInt(model.getValue("/root/main/admi_info/card/card[" + icard + "]/card_cardamt")) < 0 )  {
					sCardCancel = 		true;
					sVanCD = 		model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_vancd");
					iCardAmt = 		parseInt(model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_cardamt")) * -1;
					sAprvFlag = 		"21";
					sAprvDD =			model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_aprvdd");
					sAprvTm =		model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_aprvtm");
					sAprvNo = 		model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_aprvno");
				} else {	//¼ö³³½ÂÀÎ
					sCardCancel = 		false;
					iCardAmt = 		parseInt(model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_cardamt"));
					sVanCD = 		"";
					sAprvFlag = 		"11";
					sAprvDD =			"";
					sAprvTm =		"";
					sAprvNo = 		"";
				}
				sKeyInptFlag = 			model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_keyinptflag");
				sSwipeData = 			model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_swipedata");
				sCardNo =  			model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_cardno");
				sValidterm =  			model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_valiterm");
				sAllotmm =  			model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_allotmm");

			} else {	//¼ö³³È­¸é¿¡¼­ Ä«µå ÀÔ·ÂµÈ ³»¿ª
				sCardCancel = 			false;
				sVanCD = 			"";
				iCardAmt = 			model.getValue("/root/send/data3/admi_cardamt");

				sAprvFlag = 			"11";
				sKeyInptFlag = 			model.getValue("/root/main/admi_info/rcptmthd/keyinptflag");
				sSwipeData = 			model.getValue("/root/main/admi_info/rcptmthd/swipedata");
				sCardNo = 			model.getValue("/root/main/admi_info/rcptmthd/cardcashno");
				sValidterm = 			model.getValue("/root/main/admi_info/rcptmthd/validterm");
				sAllotmm = 			model.getValue("/root/main/admi_info/rcptmthd/allotmm");
				sAprvDD =				"";
				sAprvTm =			"";
				sAprvNo = 			"";
			}

			//Ä«µå½ÂÀÎ
			//swipe µ¥ÀÌŸ Àоî, ÀԷ±¸ºÐ ¼¼ÆÃ
			fAppCardVanData(sVanCD												//data1		//vangb	van»ç±¸ºÐ
									,sAprvFlag												//data2		//ordergb	°Å·¡±¸ºÐ
									,getCurrentDate()											//data3		//mdate	ȸ°èÀÏÀÚ
									,model.getValue("/root/send/data1/inpt_pid") 						//data4		//pano	µî·Ï¹øÈ£
									,model.getValue("/root/send/data1/inpt_ordtype")					//data5		//iogb	ÀԿܱ¸ºÐ
									,model.getValue("/root/send/data2/iphs_orddeptcd")				//data6		//deptcode	Áø·á°úÄÚµå
									,model.getValue("/root/send/data1/inpt_indd")						//data7		//diagdate	Áø·áÀÏÀÚ
									,model.getValue("/root/hidden/session/userid")					//data8		//clientid		¼ö³³ÀÚ
									,sKeyInptFlag												//data9		//entrymode	ÀԷ±¸ºÐ
									,sSwipeData												//data10		//track2data	Æ®·¢data
									,sCardNo										 		//data11		//cardnumber	Ä«µå¹øÈ£
									,sValidterm									 			//data12		//cardperiod	À¯È¿±â°£
									,sAllotmm									 			//data13		//carddivide	ÇҺΰ³¿ù¼ö
									,iCardAmt												//data14		//netamt	±Ý¾×
									,sAprvDD													//data15		//oldappdate	¿ø°Å·¡½ÂÀÎÀÏÀÚ(Ãë¼Ò½Ã)
									,sAprvTm												//data16		//oldapptime	¿ø°Å·¡½ÂÀνð£(Ãë¼Ò½Ã)
									,sAprvNo													//data17		//oldappno	¿ø°Å·¡½ÂÀιøÈ£(Ãë¼Ò½Ã)
									 );

			if (model.getValue("/root/tmp/appvanif/replystat") != "0000" ) {
				messageBox("Ä«µå½ÂÀνÇÆÐ => "+ model.getValue("/root/tmp/appvanif/cardname") ,"E999","");
				return;

			} else {
				//ÀüÀÚ¼­¸íÀº Ä«µå½ÂÀÎ ÀÏ°æ¿ì¸¸ ó¸®
				if (sCardCancel == false) {
					//ÀüÀÚ¼­¸í ó¸®
					var parm = model.getValue("/root/send/data1/inpt_pid")        	+ "¢Ë" + //PID
							model.getValue("/root/send/data3/admi_cardamt") + "¢Ë" + //¼ö³³´ë»ó±Ý¾×
					 "12" + "¢Ë" + //½ÂÀα¸ºÐ
							model.getValue("/root/tmp/appvanif/approvaldate") + "¢Ë" + //½ÂÀÎÀÏÀÚ
							model.getValue("/root/tmp/appvanif/approvaltime") + "¢Ë" + //½ÂÀνð£
							model.getValue("/root/tmp/appvanif/approvalno") + "¢Ë"  +//½ÂÀιøÈ£
							model.getValue("/root/hidden/session/posinstcd") + "¢Ë"  //±â°üÄÚµå
					 ;
					setParameter("SPPAO02101_PARM",parm);
					modal("../../../pam/pamcomnweb/xrw/SPPAO02101", "1","400", "400", "SPPAO02101", "", "");

					//ÀüÀÚ¼­¸í¿¡ ½ÇÆÐÇÏ´õ¶óµµ, Ä«µå½ÂÀÎÀ» ¹Þ¾Ò±â ¶§¹®¿¡, Continue
					//if (getParameter("SPPAO02101_RTN") == "N" || getParameter("SPPAO02101_RTN") == "") return;
				}
			}

			model.makeValue("/root/send/set_card/card[" + icard + "]/card_pid", model.getValue("/root/send/data1/inpt_pid"));
			//¿µ¼öÁõ¹øÈ£´Â ¿µ¼öÁõ ¹øÈ£ »ý¼º ÈÄ ¹Þ´Â´Ù
			if (sCardCancel == false) {
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptdd", model.getValue("/root/send/data3/admi_rcptdd"));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptno", model.getValue("/root/send/data3/admi_rcptno"));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptseqno", model.getValue("/root/send/data3/admi_rcptseqno"));
			} else {
				//Ãë¼Ò ÀÏ °æ¿ì ¿ø ¿µ¼öÁõ ¹øÈ£¸¦ °¡Á® °£´Ù.
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptdd", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_rcptdd_old"));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptno", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_rcptno_old"));
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptseqno", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_rcptseqno_old"));
//				model.makeValue("/root/send/set_card/card[" + icard + "]/card_seqno", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_seqno"));
			}
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_seqno", icard);
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_instcd", model.getValue("/root/send/data1/inpt_instcd"));
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptstat", model.getValue("/root/send/data3/admi_rcptstat"));
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_ordtype", model.getValue("/root/send/data1/inpt_ordtype"));
			//Ä«µåÁ¤º¸ Â÷ÈÄ Á¤¸®
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_keyinptflag", sKeyInptFlag);	//S:Swipe, K:Key in
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_cardcmpycd", model.getValue("/root/tmp/appvanif/bankid"));
			//Ä«µå¹øÈ£
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_cardno", sCardNo);
			if (sCardCancel == false) {
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_aprvflag", "12");	//12:Ä«µå½ÂÀÎÀÀ´ä
			} else {
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_aprvflag", "22");	//22:Ä«µå½ÂÀÎÃë¼Ò
			}
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_aprvdd", model.getValue("/root/tmp/appvanif/approvaldate"));	//½ÂÀÎÀÏÀÚ
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_aprvtm", model.getValue("/root/tmp/appvanif/approvaltime"));	//½ÂÀνð£
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_aprvno", model.getValue("/root/tmp/appvanif/approvalno"));		//½ÂÀιøÈ£
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_vancd", model.getValue("/root/tmp/appvanif/vangb"));			//VANÄÚµå
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_allotmm", sAllotmm );	//ÇҺΰ³¿ù¼ö
			//Ä«µå°áÁ¦±Ý¾×
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_cardamt", iCardAmt );
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_valiterm", sValidterm );	//À¯È¿±â°£
			//¼ö³³ÀÏÀÚ
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptexecdd", model.getValue("/root/send/data3/admi_rcptexecdd"));
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptrid", "");			//¼ö³³ÀÚ
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_innrtretyn", "N");		//³»ºÎ󸮿©ºÎ
			if (srcptflag == "B01") {
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_preamtyn", "Y");		//¼±¼ö±Ý¿©ºÎ
			} else {
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_preamtyn", "N");		//¼±¼ö±Ý¿©ºÎ
			}
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_remfact", "");		//¼ö³³³»¿ª¿¡ ´ëÇÑ Âü°í»çÇ×
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_fstrgstrid", "");
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_fstrgstdt", "");
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_lastupdtrid", "");
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_lastupdtdt", "");
			//}
		}
	} else {
		for(var icard=1; icard<=scardcount; icard++){
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_pid", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_pid"));
			//¿µ¼öÁõ¹øÈ£´Â ¿µ¼öÁõ ¹øÈ£ »ý¼º ÈÄ ¹Þ´Â´Ù
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptdd", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_rcptdd"));
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptno", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_rcptno"));
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptseqno", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_rcptseqno"));
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_seqno", icard);
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_instcd", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_instcd"));
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptstat", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_rcptstat"));
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_ordtype", model.getValue("/root/send/data1/inpt_ordtype"));
			//Ä«µåÁ¤º¸ Â÷ÈÄ Á¤¸®
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_keyinptflag", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_keyinptflag"));	//S:Swipe, K:Key in
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_cardcmpycd", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_cardcmpycd"));
			//Ä«µå¹øÈ£
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_cardno", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_cardno"));
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_aprvflag", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_aprvflag"));	//12:Ä«µå½ÂÀÎÀÀ´ä, 22:Ä«µå½ÂÀÎÃë¼Ò
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_aprvdd", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_aprvdd"));		//½ÂÀÎÀÏÀÚ
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_aprvtm", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_aprvtm"));		//½ÂÀνð£
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_aprvno", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_aprvno"));		//½ÂÀιøÈ£
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_vancd", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_vancd"));		//VANÄÚµå
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_allotmm", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_allotmm"));	//ÇҺΰ³¿ù¼ö
			//Ä«µå°áÁ¦±Ý¾×
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_cardamt", parseInt(model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_cardamt")));
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_valiterm", model.getValue("/root/main/admi_info/card/card["+ icard +"]/card_valiterm"));	//À¯È¿±â°£
			//¼ö³³ÀÏÀÚ
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptexecdd", model.getValue("/root/send/data3/admi_rcptexecdd"));
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_rcptrid", "");			//¼ö³³ÀÚ
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_innrtretyn", "N");		//³»ºÎ󸮿©ºÎ
			if (srcptflag == "B01") {
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_preamtyn", "Y");		//¼±¼ö±Ý¿©ºÎ
			} else {
				model.makeValue("/root/send/set_card/card[" + icard + "]/card_preamtyn", "N");		//¼±¼ö±Ý¿©ºÎ
			}
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_remfact", "");		//¼ö³³³»¿ª¿¡ ´ëÇÑ Âü°í»çÇ×
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_fstrgstrid", "");
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_fstrgstdt", "");
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_lastupdtrid", "");
			model.makeValue("/root/send/set_card/card[" + icard + "]/card_lastupdtdt", "");
		}
	}
}
***************************************************************************************************************************************/


//////////////////////////////////////////////////////////////Çö±Ý½ÂÀÎ Ãß°¡start/////////////////////////////////////////////////////////////////////////
	//È­¸é¿¡¼­ ½Ç½ÂÀÎ ÇÑ ³»¿ªÀÌ ¾øÀ¸¸é ½ÂÀνõµÇÑ´Ù. 20110422 cys
	if(getNodesetCount("/root/send/set_cash/cash[cash_innrtretyn='N']") == 0) { 
		//Çö±Ý¿µ¼öÁõ ³»¿ª(ÅëÀåÀԱݳ»¿ªµµ Çö±Ý¿µ¼öÁõ ó¸® ÇÑ´Ù)
		//1-Ä«µå, 2-Çö±Ý¿µ¼öÁõ, 3-Çö±Ý
		var icash = parseInt(model.getValue("/root/send/data3/admi_cashamt")) + parseInt(model.getValue("/root/send/data3/admi_onlineamt"));
		if((sCardAndCash == true && model.getValue("/root/main/admi_info/rcptmthd/rcptmthd") == "1") 
			|| (icash >= 1 && model.getValue("/root/main/admi_info/rcptmthd/rcptmthd") == "2")) {
			model.removenode("/root/tmp");
			var sCashNo = "";						//Ä«µå¹øÈ£(½ÂÀιøÈ£)
			var sCashAllotmm = "";					//¼Òµæ°øÁ¦, ÁöÃâÁõºù
			var sCashQualcnfmFlag = "";				//Çö±Ý½ÂÀÎÁ¾·ù(ÁֹιøÈ£, ÈÞ´ëÆù, Ä«µå, »ç¾÷Àå)
			var sCashKeyInptFlag = "";				//keyin

			//Ä«µåÇö±Ý¿µ¼öÁõµ¿½Ã ½ÂÀÎ(½ÂÀιøÈ£°¡ ÀúÀåµÇ¾î ÀÖÁö ¾ÊÀ» °æ¿ì ¹«Á¶°Ç ÁֹιøÈ£·Î ÇÔ.)
			if (sCardAndCash == true) {	
				if (model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno") == "" || model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno") == null) {
					sCashNo = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno");
					sCashAllotmm = "00";
					sCashKeyInptFlag = "K";
					if (model.getValue("/root/main/admi_info/rcptmthd/qualcnfmflag") != "") {
						sCashQualcnfmFlag = model.getValue("/root/main/admi_info/rcptmthd/qualcnfmflag");
					} else {
						sCashQualcnfmFlag = "1";	//ÁֹιøÈ£
					}

				} else {
					sCashNo =  model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno");
					sCashQualcnfmFlag = model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmflag");
					sCashKeyInptFlag = "K";
					if (sCashQualcnfmFlag == "4") {
						sCashAllotmm = "01";	//ÁöÃâÁõºù
					} else {
						sCashAllotmm = "00";	//¼Òµæ°øÁ¦
					}
				}

				// 02 ¹Ì½ÂÀÎ
				if (model.getValue("/root/main/admi_info/rcptmthd/cashmthd") == "02") {
					if (model.getvalue("/root/init/PAM/P0022list/P0022[cdid = '163' ]/cdnm") != "" && model.getvalue("/root/init/PAM/P0022list/P0022[cdid = '163' ]/cdnm") != null) {
						sCashNo =  model.getvalue("/root/init/PAM/P0022list/P0022[cdid = '163' ]/cdnm")
						sCashQualcnfmFlag = "2"
						sCashKeyInptFlag = "K";
						sCashAllotmm = "00";	//¼Òµæ°øÁ¦
					} else {
						messageBox("¼ÒºñÀÚ ¹Ì¹ß±Þ½Ã ±¹¼¼Ã» Çö±Ý¿µ¼öÁõ ¹øÈ£°¡ µî·ÏµÇ¾î ÀÖÁö ¾Ê¾Æ Çö±Ý¿µ¼öÁõÀ» ½ÂÀÎ ÇÒ ¼ö ¾ø½À´Ï´Ù. È®ÀÎÇÏ¿© ÁֽʽÿÀ.[P0022/163]", "I999");
						return;
					}
				}
				
			} else {
				sCashNo = model.getValue("/root/main/admi_info/rcptmthd/cardcashno");
				sCashAllotmm = model.getValue("/root/main/admi_info/rcptmthd/cashmthd");
				if (model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmflag") =="" || model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmflag") ==null) {
					if (model.getValue("/root/main/admi_info/rcptmthd/qualcnfmflag") != "") {
						sCashQualcnfmFlag = model.getValue("/root/main/admi_info/rcptmthd/qualcnfmflag");
					} else {
						sCashQualcnfmFlag = "1";	//ÁֹιøÈ£
					}
				} else {
					sCashQualcnfmFlag = model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmflag");
				}
				
				// ICPosÀÇ °æ¿ì Ä«µåÁ¤º¸´Â Swipe·Î ó¸®(Ä«µå¸®µù, Å°ÀÔ·Â ¸ðµÎ)
				if (sVanFlag == "KOCES_IC" && sCashQualcnfmFlag == "3") {
				    sCashKeyInptFlag = "S";
				} else {
				    sCashKeyInptFlag = "K";
				}

			}

			//Çö±Ý¿µ¼öÁõ½ÂÀÎ
			//swipe µ¥ÀÌŸ Àоî, ÀԷ±¸ºÐ ¼¼ÆÃ
			fAppCardVanData("01"                                                             //data1     //vangb      van»ç±¸ºÐ
							,"41"                                                            //data2     //ordergb    °Å·¡±¸ºÐ  41:Çö±Ý¿µ¼öÁõ½ÂÀÎ
							,getCurrentDate()                                                //data3     //mdate      ȸ°èÀÏÀÚ
							,model.getValue("/root/send/data1/inpt_pid")                     //data4     //pano       µî·Ï¹øÈ£
							,model.getValue("/root/send/data1/inpt_ordtype")                 //data5     //iogb       ÀԿܱ¸ºÐ
							,model.getValue("/root/send/data2/iphs_orddeptcd")               //data6     //deptcode   Áø·á°úÄÚµå
							,model.getValue("/root/send/data1/inpt_indd")                    //data7     //diagdate   Áø·áÀÏÀÚ
							,model.getValue("/root/hidden/session/userid")                   //data8     //clientid   ¼ö³³ÀÚ
							,sCashKeyInptFlag                                                //data9     //entrymode  ÀԷ±¸ºÐ
							,model.getValue("/root/main/admi_info/rcptmthd/swipedata")       //data10    //track2data Æ®·¢data
							,sCashNo                                                         //data11    //cardnumber Ä«µå¹øÈ£
							,sCashQualcnfmFlag                                               //data12    //cardperiod À¯È¿±â°£(Çö±Ý¿µ¼öÁõÀÏ °æ¿ì ÀÚ°ÝÈ®Àα¸ºÐ)
							,sCashAllotmm                                                    //data13    //carddivide    ÇҺΰ³¿ù¼ö-°³ÀιýÀα¸ºÐ
							,parseInt(model.getValue("/root/send/data3/admi_cashamt")) 
							   + parseInt(model.getValue("/root/send/data3/admi_onlineamt")) //data14    //netamt    ±Ý¾×
							,""                                                              //data15    //oldappdate    ¿ø°Å·¡½ÂÀÎÀÏÀÚ(Ãë¼Ò½Ã)
							,""                                                              //data16    //oldapptime    ¿ø°Å·¡½ÂÀνð£(Ãë¼Ò½Ã)
							,""                                                              //data17    //oldappno      ¿ø°Å·¡½ÂÀιøÈ£(Ãë¼Ò½Ã)
							,""
							,""
							,""
		                    ,sVanFlag                                                        //data21    //VAN±¸ºÐ
							);

			if (model.getValue("/root/tmp/appvanif/replystat") != "0000" ) {

				messageBox("Çö±Ý¿µ¼öÁõ½ÂÀνÇÆÐ => "+ model.getValue("/root/tmp/appvanif/cardname") ,"E999","");
				return;

			}
			
			// ICPosÀÇ °æ¿ì Ä«µåÁ¤º¸ ¿ªÀ¸·Î Àü´ÞÇØÁà¾ßÇÔ
			if (sVanFlag == "KOCES_IC" && sCashQualcnfmFlag == "3") {
			    
			    model.setValue("/root/main/admi_info/rcptmthd/cardcashno", model.getValue("/root/main/cash2/cash_qualcnfmno"));
			    sCashNo = model.getValue("/root/main/cash2/cash_qualcnfmno");
			}

			//copyNodeListType("/root/send/set_cash", "/root/main/admi_info/cash/cash", "replace");

			//Çö±Ý¿µ¼öÁõ³»¿ª ó¸® //Â÷ÈÄ Çö±Ý¿µ¼öÁõ µÎ°³ ÀÌ»óÀÏ °æ¿ì Àû¿ë ÇØ¾ß ÇÔ
			//for(var i=1; i<=getNodesetCount("/root/send/set_cash/cash"); i++) {
			i = 1;
			model.removenode("/root/send/set_cash/cash");
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_pid", model.getValue("/root/send/data1/inpt_pid"));
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_rcptdd", model.getValue("/root/send/data3/admi_rcptdd"));
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_rcptno", model.getValue("/root/send/data3/admi_rcptno"));
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_rcptseqno", model.getValue("/root/send/data3/admi_rcptseqno"));
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_seqno", i);
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_instcd", model.getValue("/root/send/data1/inpt_instcd"));

			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_rcptstat", model.getValue("/root/send/data3/admi_rcptstat"));

			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_ordtype", model.getValue("/root/send/data1/inpt_ordtype"));
			//Å°ÀԷ±¸ºÐ K:Kind in, S:Swipe
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_keyinptflag", sCashKeyInptFlag);
			//°³ÀιýÀα¸ºÐ P:°³ÀÎ, C:¹ýÀÎ(00, 01) È®ÀÎ ÇÊ¿ä
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_indinstflag", sCashAllotmm);
			//ÀÚ°ÝÈ®Àα¸ºÐ(ÁÖ¹Î, ÇÚµåÆù, ½Å¿ëÄ«µå)
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_qualcnfmflag", sCashQualcnfmFlag);
			//ÀÚ°ÝÈ®ÀιøÈ£
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_qualcnfmno", sCashNo);
			//½ÂÀα¸ºÐ //42:Çö±Ý¿µ¼öÁõ½ÂÀÎÀÀ´ä
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_aprvflag", model.getValue("/root/tmp/appvanif/ordergb"));
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_aprvno", model.getValue("/root/tmp/appvanif/approvalno"));//½ÂÀιøÈ£
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_aprvdd", model.getValue("/root/tmp/appvanif/approvaldate"));//½ÂÀÎÀÏÀÚ
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_aprvtm", model.getValue("/root/tmp/appvanif/approvaltime"));//½ÂÀνð£
			//½ÂÀαݾ×
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_cashamt", parseInt(model.getValue("/root/send/data3/admi_cashamt")) + parseInt(model.getValue("/root/send/data3/admi_onlineamt")));
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_rcptexecdd", model.getValue("/root/send/data3/admi_rcptexecdd"));
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_rcptrid", "");				//¼ö³³ÀÚ
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_innrtretyn", "N");			//³»ºÎ󸮿©ºÎ
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_preamtyn", "N");			//¼±¼ö±Ý¿©ºÎ
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_remfact", "");				//¼ö³³³»¿ª¿¡ ´ëÇÑ Âü°í»çÇ×
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_fstrgstrid", "");
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_fstrgstdt", "");
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_lastupdtrid", "");
			model.makeValue("/root/send/set_cash/cash[" + i + "]/cash_lastupdtdt", "");
			//}
		}

	}
//////////////////////////////////////////////////////////////Çö±Ý½ÂÀÎ Ãß°¡end/////////////////////////////////////////////////////////////////////////

		//ÅëÀåÀÔ±Ý±Ý¾× ³»¿ª
		var ionln = parseInt(model.getValue("/root/send/data3/admi_onlineamt"));
		if (ionln > 0) {
			model.removenode("/root/send/set_onln/onln")
			copyNodeListType("/root/send/set_onln", "/root/main/admi_info/onln/onln", "replace");
			var j = 1;
			for(var i=1; i<=getNodesetCount("/root/main/admi_info/onln/onln"); i++) {
				//¿µ¼öÁõÀÏÀÚ°¡ ÀÖÀ» °æ¿ì ±âÁ¸¿¡ ÀÔ·ÂµÈ ³»¿ªÀ̹ǷΠÀԷ½à Á¦¿ÜÇÑ´Ù.
				if ((model.getValue("/root/main/admi_info/onln/onln[" + i + "]/onln_rcptdd") == "") ||
					(model.getValue("/root/main/admi_info/onln/onln[" + i + "]/onln_rcptdd") == null)) {
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_pid", model.getValue("/root/send/data1/inpt_pid"));
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_rcptdd", model.getValue("/root/send/data3/admi_rcptdd"));
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_rcptno", model.getValue("/root/send/data3/admi_rcptno"));
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_rcptseqno", model.getValue("/root/send/data3/admi_rcptseqno"));
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_seqno", j);
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_instcd", model.getValue("/root/send/data1/inpt_instcd"));
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_rcptstat", model.getValue("/root/send/data3/admi_rcptstat"));
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_ordtype", model.getValue("/root/send/data1/inpt_ordtype"));
					//ÅëÀåÀÔ±ÝÁ¤º¸ ÀÔ·Â ¹ÞÀ½
					//ÅëÀåÀÔ±ÝÁ¤º¸´Â ÅëÀå¹øÈ£¸¸ »ç¿ëÇϱâ·Î ÇÔ. Â÷ÈÄ ÅëÀå°ü¸® ÇÒ °æ¿ì ÅëÀåÀÔ±ÝÁ¤º¸¸¦ ¹Þ¾Æ¼­ ¼öÁ¤ÇØ¾ß ÇÔ.
					// 2009.10.22 - onln_onlineamt, onln_bankcd, onln_acntno, onln_paydd, onln_paypsnnm Æ˾÷ÀÇ °ªÀ» ±×´ë·Î ÀÔ·Â
					//model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_onlineamt", model.getValue("/root/send/data3/admi_onlineamt"));
					//model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_bankcd", "-");
					//model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_acntno", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_onlnno"));
					//model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_paydd", getCurrentDate());
					//model.makeValue("/root/send/set_onln/onln[" + j + "]/onln/onln_paypsnnm", "-");
		
					//model.makeValue("/root/send/set_onln/onln/onln_onlineamt", "");
					//model.makeValue("/root/send/set_onln/onln/onln_bankcd", "");
					//model.makeValue("/root/send/set_onln/onln/onln_acntno", "");
					//model.makeValue("/root/send/set_onln/onln/onln_paydd", getCurrentDate());
					//model.makeValue("/root/send/set_onln/onln/onln_paypsnnm", "");
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_rcptexecdd", model.getValue("/root/send/data3/admi_rcptexecdd"));
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_innrtretyn", "N");
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_preamtyn", "N");
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_rcptrid", "");				//¼ö³³ÀÚ
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_remfact", "");				//¼ö³³³»¿ª¿¡ ´ëÇÑ Âü°í»çÇ×
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_fstrgstrid", "");
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_fstrgstdt", "");
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_lastupdtrid", "");
					model.makeValue("/root/send/set_onln/onln[" + j + "]/onln_lastupdtdt", "");
					j++;
				}
			}
		}

		//2009-01-16 À̵¿½Ä Ãß°¡
		//Ä«µå ÀÓÀÇ ½ÂÀνà À̷»ý¼º Ãß°¡¸¦ À§ÇØ
		if( model.getValue("/root/init/option/checkcard") == 'Y' ){
			model.makeNode("/root/send/data3/admi_checkcard");
			model.setValue("/root/send/data3/admi_checkcard", "Y");
		}

		//20090701 1.´Ü¼öó¸® °í½ÃÀû¿ë
		if (srcptflag == "B31" && model.getValue("/root/send/data1/inpt_brateflag") == "O" 
		    && (model.getValue("/root/send/data2/iphs_insukind") == "11"  || model.getValue("/root/send/data2/iphs_insukind") == "21" || model.getValue("/root/send/data2/iphs_insukind") == "22")
		    && model.getValue("/root/send/data2/iphs_suppkind") != "01") {
			
		    if (parseInt(model.getValue("/root/send/data3/admi_payinsurestamt")) != 0) {
				model.setValue("/root/send/data3/admi_payownbamt", parseInt(model.getValue("/root/send/data3/admi_payownbamt")) + parseInt(model.getValue("/root/send/data3/admi_payinsurestamt")));
				model.setValue("/root/send/data3/admi_payinsubamt", parseInt(model.getValue("/root/send/data3/admi_payinsubamt")) - parseInt(model.getValue("/root/send/data3/admi_payinsurestamt")));
				model.setValue("/root/send/data3/admi_totownbamt", parseInt(model.getValue("/root/send/data3/admi_totownbamt")) + parseInt(model.getValue("/root/send/data3/admi_payinsurestamt")));
			}
        // ÀÔ¿ø¿äÀ² ´Ü¼öó¸® Ãß°¡ by Á¶Áß·¡ 20160401
        // ÀÔ¿ø¿äÀ²ÀÇ °æ¿ì ¿ø´ÜÀ§Àý»ç±Ý¾×¿¡ ´ëÇÏ¿© º¸ÇèÀںδãÀ¸·Î ó¸®
        } else if (srcptflag == "B31" && model.getValue("/root/send/data1/inpt_brateflag") == "I"
                && model.getValue("/root/send/data1/inpt_indd") >= '20160401'
                && (model.getValue("/root/send/data2/iphs_insukind") == "11"  || model.getValue("/root/send/data2/iphs_insukind") == "21" || model.getValue("/root/send/data2/iphs_insukind") == "22")
                && model.getValue("/root/send/data2/iphs_suppkind") != "01") {
		    
		    if (parseInt(model.getValue("/root/send/data3/admi_payinsurestamt")) != 0) {
                model.setValue("/root/send/data3/admi_payownbamt", parseInt(model.getValue("/root/send/data3/admi_payownbamt")) + parseInt(model.getValue("/root/send/data3/admi_payinsurestamt")));
                model.setValue("/root/send/data3/admi_payinsubamt", parseInt(model.getValue("/root/send/data3/admi_payinsubamt")) - parseInt(model.getValue("/root/send/data3/admi_payinsurestamt")));
                model.setValue("/root/send/data3/admi_totownbamt", parseInt(model.getValue("/root/send/data3/admi_totownbamt")) + parseInt(model.getValue("/root/send/data3/admi_payinsurestamt")));
            }
		}
		
		/*
        // °³ÀÎÁ¤º¸À̿뵿ÀǼ­°¡ Ãâ·ÂµÇÁö ¾Ê¾ÒÀ» °æ¿ì µ¿ÀǼ­ ÀÚµ¿Ãâ·Â by Á¶Áß·¡ 20120328
        if (model.getValue("/root/hidden/inpt_info/inptpatinfo/inpt_scanyn") == "X") {
            // °³ÀÎÁ¤º¸À̿뵿ÀǼ­´Â Àç¿ø»óÅÂ(indschacptstat = 'A')À϶§¸¸ Àû¿ë½ÃÅ°µµ·Ï ÇÔ
            if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indschacptstat") == 'A') {
                var nodeCnt = getNodesetCount("/root/init/prncd/hardcd");
                var formcd;
                
                // ±¸ºÐ¿¡ ¸ÂÃç ÆûÄÚµå ó¸®(1:ÀϹݾàÁ¤¼­ / 2:±â°£¾àÁ¤¼­ / 3:°³ÀÎÁ¤º¸À̿뵿ÀǼ­)
                for (var i = 1; i <= nodeCnt; i++) {
                    if (3 == model.getValue("/root/init/prncd/hardcd[" + i + "]/cdseqno")) {
                        formcd = model.getValue("/root/init/prncd/hardcd[" + i + "]/hardcd");
                        break;
                    }
                }
                
                fPerPrintOCR (formcd,
                                model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"),
                                model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"),
                                model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno"),
                                model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype"));
            }
        }
        */
		
		// °¡Åð¿ø Á¤»ê ½Ã Á¤»ê³»¿ë SMSÀü¼Û Ãß°¡
		// Á¤»êSMS Àü¼ÛÀº °¡Åð¿ø Á¤»ê½Ã¿¡¸¸ ó¸® by Á¶Áß·¡ 20120625
        if (model.getValue("/root/init/option/receiptsms") == "Y") {
            var cardAmt = model.getValue("/root/main/admi_info/ordamt/admispec/admi_cardamt");
            
            if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptflag") == "B31"
                    && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_indschacptstat") == "T"
                    && cardAmt != 0) {
                
                // »ç¸ÁȯÀÚÀÇ °æ¿ì °¡Åð¿ø Á¤»êSMS´Â ¹ß¼ÛµÇÁö ¾ÊÀ½
                if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dethdt") != "-" 
                        && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dethdt") != "") {
                    
                    messageBox("»ç¸ÁȯÀÚÀÇ °æ¿ì °¡Åð¿ø Á¤»ê SMS´Â Àü¼ÛÇÏÁö ¾Ê½À´Ï´Ù.", "I000");
                    
                } else {
                
                    var ivrObjt = document.all("ivr_receiptsms");
                    
                    if (ivrObjt == null) {
                        body.createChild("xforms:iviewer", "id:ivr_receiptsms; src:../../../com/shortmsgweb/xrw/SPZMS00100_´Ü¹®¸Þ½ÃÁöÀü¼Û.xrw");
                        ivrObjt = document.all("ivr_receiptsms");
                    }
                    
                    var submitType = "";
                    if (parseInt(cardAmt) > 0) {
                        submitType = "Ãß°¡½ÂÀÎ";
                    } else {
                        submitType = "Ãë¼ÒÁ¤»ê";
                    }
                    
                    if (cardAmt.length > 3) {
                      var reg = /(^[+-]?\d+)(\d{3})/;   
                      cardAmt += '';
                      while (reg.test(cardAmt)) {
                          cardAmt = cardAmt.replace(reg, '$1' + ',' + '$2');
                      }
                    }
                    
                    // °¡Åð¿øÁ¤»ê sms.pam.0005
                    ivrObjt.window.javascript.fSendSmsId(model.getValue("/root/init/receiptsms/smsmsg/msgfrmtid"), 
                                                            model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm"),
                                                            model.getValue("/root/main/inpt_info/inptpatinfo/inpt_mpphontel"),
                                                            model.getValue("/root/init/receiptsms/smsmsg/replytelno"),
                                                            model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm"), // param1
                                                            cardAmt,                                                       // param2
                                                            submitType                                                     // param3
                                                            );
                }
            }
        }
        
        // EZPassȯÀÚ CHEMO ¼ö³³±Ý¾×À» ±âµî·ÏµÈ ½Å¿ëÄ«µå·Î ó¸®ÇÒ °æ¿ì SMS Àü¼Û±â´É Ãß°¡ (Ä¥°î¿äû)
        // Åð¿ø¼ö³³½Ã¿¡¸¸ Àü¼Û by Á¶Áß·¡ 20150904
        if (model.getValue("/root/init/option/ezpasssms") == "Y"
                && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_roomcd") == "CHEMO"
                && model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptflag") == "B31") {
            
            var cardAmt = model.getValue("/root/main/admi_info/ordamt/admispec/admi_cardamt");
            
                // »ç¸ÁȯÀÚÀÇ °æ¿ì °¡Åð¿ø Á¤»êSMS´Â ¹ß¼ÛµÇÁö ¾ÊÀ½
                if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dethdt") != "-" 
                        && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dethdt") != "") {
                    
                    messageBox("»ç¸ÁȯÀÚÀÇ °æ¿ì ÀÌÁöÆнº ¼ö³³ SMS´Â Àü¼ÛÇÏÁö ¾Ê½À´Ï´Ù.", "I000");
                    
                } else {
                
                    var ivrObjt = document.all("ivr_ezpasssms");
                    
                    if (ivrObjt == null) {
                        body.createChild("xforms:iviewer", "id:ivr_ezpasssms; src:../../../com/shortmsgweb/xrw/SPZMS00100_´Ü¹®¸Þ½ÃÁöÀü¼Û.xrw");
                        ivrObjt = document.all("ivr_ezpasssms");
                    }
                    
                    var strMsg = "¼ö³³";
                    
                    if (cardAmt.length > 3) {
                      var reg = /(^[+-]?\d+)(\d{3})/;   
                      cardAmt += '';
                      while (reg.test(cardAmt)) {
                          cardAmt = cardAmt.replace(reg, '$1' + ',' + '$2');
                      }
                    }
                    
                    // ÀÌÁöÆнºÁ¤»ê sms.pam.0007
                    ivrObjt.window.javascript.fSendSmsId(model.getValue("/root/init/receiptsms/ezpasssmsmsg/msgfrmtid"), 
                                                            model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm"),
                                                            model.getValue("/root/main/inpt_info/inptpatinfo/inpt_mpphontel"),
                                                            model.getValue("/root/init/receiptsms/ezpasssmsmsg/replytelno"),
                                                            cardAmt,
                                                            strMsg
                                                            );
                }
        }
        
        // [Ä¥°î] Ç׾Ϲ̼ö ¼ö³³½Ã SMS Àü¼Û
        if (getUserInfo("dutplceinstcd") == "032" &&
        	model.getValue("/root/init/option/chemosms") == "Y" &&
            model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncocd") == "A71") {
        
            var ivrObjt = document.all("ivr_chemosms");
            
            if (ivrObjt == null) {
                body.createChild("xforms:iviewer", "id:ivr_chemosms; src:../../../com/shortmsgweb/xrw/SPZMS00100_´Ü¹®¸Þ½ÃÁöÀü¼Û.xrw");
                ivrObjt = document.all("ivr_chemosms");
            }
            
            var admi_uncoamt = model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt");
            
            if (admi_uncoamt.length > 3) {
            	
            	var reg = /(^[+-]?\d+)(\d{3})/;
            	
            	admi_uncoamt += '';
            	
            	while (reg.test(admi_uncoamt)) {
            		admi_uncoamt = admi_uncoamt.replace(reg, '$1' + ',' + '$2');
            	}
            }
            
            ivrObjt.window.javascript.fSendSmsId(model.getValue("/root/init/receiptsms/chemosms/msgfrmtid")
            		                           , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm")
            		                           , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_mpphontel")
            		                           , model.getValue("/root/init/receiptsms/chemosms/replytelno")
            		                           , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm")
            		                           , admi_uncoamt);
            
            body.removeChild("ivr_chemosms");
        }

        // Åð¿øó¸®
		if (submit("TXPAI00101") == true) {
		    
		    //Åð¿ø¼ö³³¿µ¼öÁõ Ãâ·Â(¼±ÅÃÇØÁ¦ÇÑ °æ¿ì¿¡´Â ½ºÅµ)
			if (model.getValue("/root/init/option/receipt") == "Y") {
				//Áß°£±Ý
				if (srcptflag == "B01" || srcptflag == "B41" ) {
					//ordtype : Åð¿ø¿µ¼öÁõ/ÀÔ¿øÁß°£±Ý¿µ¼öÁõ/Åð¿ø°è»ê¼­/Áß°£°è»ê¼­
					model.makeValue("/root/temp/receipt/ordtype", "ÀÔ¿øÁß°£±Ý¿µ¼öÁõ" );
					model.makeValue("/root/temp/receipt/ioflag", "I");
				} else if (srcptflag == "B11") {    //ÀÔ¿øÁß°£¼ö³³¿µ¼öÁõ
                    model.makeValue("/root/temp/receipt/ordtype", "ÀÔ¿øÁß°£¼ö³³¿µ¼öÁõ" );
                    model.makeValue("/root/temp/receipt/ioflag", "I");
				} else if (srcptflag == "B31") {	//°¡Åð¿ø, Åð¿ø¿µ¼öÁõ
					//ordtype : Åð¿ø¿µ¼öÁõ/ÀÔ¿øÁß°£±Ý¿µ¼öÁõ/Åð¿ø°è»ê¼­/Áß°£°è»ê¼­
					if ( drgflag == "Y") {
						model.makeValue("/root/temp/receipt/ordtype", "DRGÅð¿ø¿µ¼öÁõ" );
					} else {
						model.makeValue("/root/temp/receipt/ordtype", "Åð¿ø¿µ¼öÁõ" );
					}
					//model.makeValue("/root/temp/receipt/ordtype", "Åð¿ø¿µ¼öÁõ" );
					model.makeValue("/root/temp/receipt/ioflag", "I");
				} else if (srcptflag == "B21") {
					model.makeValue("/root/temp/receipt/ordtype", "°¡Åð¿ø¿µ¼öÁõ" );
					model.makeValue("/root/temp/receipt/ioflag", "I");
				} else if (srcptflag == "B51") {
					//model.makeValue("/root/temp/receipt/ordtype", "ÀÀ±Þ¿µ¼öÁõ" );
					model.makeValue("/root/temp/receipt/ordtype", "ÀÔ¿øÁß°£±Ý¿µ¼öÁõ" );
					model.makeValue("/root/temp/receipt/ioflag", "I");
				} else if (srcptflag == "C01") {
					model.makeValue("/root/temp/receipt/ordtype", "¹Ì¼ö¿µ¼öÁõ");
					model.makeValue("/root/temp/receipt/ioflag", "I");
				}
				var srow = grd_inpatinfo.row
				//Àç¿øÁ¤º¸ grid ¼±ÅÃÀÌ ¾øÀ»½Ã 1¹ø°¸¦ ¼±ÅÃÇϵµ·Ï ÇÑ´Ù
				if (srow <= 0 ) {
					srow = 1;
				}
				model.makeValue("/root/temp/receipt/disccd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_disccd"));
				model.makeValue("/root/temp/receipt/rareobstflag", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_rareobstflag"));
				model.makeValue("/root/temp/receipt/roomcd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_roomcd"));
				model.makeValue("/root/temp/receipt/brateflag", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag"));
				model.makeValue("/root/temp/receipt/ordreqformflag", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordreqformflag"));
				model.makeValue("/root/temp/receipt/rcptsite", "S");	//µî·Ï¼ö³³¹ßÇà󱸺РS:¼ö³³, J:µî·Ï
				if (model.getValue("/root/init/option/engreceipt") == "Y") {
					model.makeValue("/root/temp/receipt/engYN", "Y");  	//ÀÔ¿ø ¿µ¹® ¿µ¼öÁõ Ãâ·Â.
				} else {
					model.makeValue("/root/temp/receipt/engYN", "N");  	//ÀÔ¿ø ¿µ¹® ¿µ¼öÁõ Ãâ·Â.
				}
				model.makeValue("/root/temp/receipt/reprintYN", "N" );	//Àç¹ßÇà¿©ºÎ
				model.makeValue("/root/temp/receipt/ordtype_org", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype"));	// Áø·á±¸ºÐ

				//¿µ¼öÁõ Æ˾÷È­¸é È£Ãâ
				//modal("../../../pam/pamcomnweb/xrw/SPPAO01900_¿µ¼öÁõÃâ·Â", "1", "100", "100" ,"SPPAO01900_¿µ¼öÁõÃâ·Â", "", "");
				modal("SPPAO01900");
				if (srcptflag == "B31") {
					model.removenode("/root/send/data5");
					model.makeValue("/root/send/data5/pid", model.getValue("/root/temp/receipt/pid"));
					model.makeValue("/root/send/data5/rcptdd", model.getValue("/root/temp/receipt/rcptdd"));
					model.makeValue("/root/send/data5/rcptno", model.getValue("/root/temp/receipt/rcptno"));
					model.makeValue("/root/send/data5/rcptseqno", model.getValue("/root/temp/receipt/rcptseqno"));
					model.makeValue("/root/send/data5/cretno", model.getValue("/root/temp/receipt/cretno"));
					model.makeValue("/root/send/data5/indd", model.getValue("/root/temp/receipt/indd"));
					model.makeValue("/root/send/data5/instcd", model.getValue("/root/temp/receipt/instcd"));
					model.makeValue("/root/send/data5/mskind", model.getValue("/root/temp/receipt/mskind"));
					model.makeValue("/root/send/data5/insukind", model.getValue("/root/temp/receipt/insukind"));
					model.makeValue("/root/send/data5/suppkind", model.getValue("/root/temp/receipt/suppkind"));
					model.makeValue("/root/send/data5/fromdd", model.getValue("/root/temp/receipt/fromdd"));
					model.makeValue("/root/send/data5/todd", model.getValue("/root/temp/receipt/todd"));
					model.makeValue("/root/send/data5/ordtype", model.getValue("/root/send/data1/inpt_ordtype"));
					model.makeValue("/root/send/data5/wardcd", model.getValue("/root/send/data1/inpt_wardcd"));
					model.makeValue("/root/send/data5/roomcd", model.getValue("/root/send/data1/inpt_roomcd"));

					model.makeValue("/root/send/data5/orddeptcd", model.getValue("/root/temp/receipt/orddeptcd"));
					model.makeValue("/root/send/data5/medispclid", model.getValue("/root/temp/receipt/medispclid"));
					model.makeValue("/root/send/data5/atdoctid", model.getValue("/root/temp/receipt/atdoctid"));
					model.makeValue("/root/send/data5/drgno", model.getValue("/root/temp/receipt/drgno"));
					model.makeValue("/root/send/data5/rcptexecdd", model.getValue("/root/temp/receipt/rcptexecdd"));
					model.makeValue("/root/send/data5/rcpttm", model.getValue("/root/temp/receipt/rcpttm"));
					submit("TXPAI00107");
				}
			}
			
            // Áø·áºñ ¼¼ºÎ³»¿ª¼­ ÀÚµ¿Ãâ·Â by Á¶Áß·¡ 20150528
            if (srcptflag == "B31" && model.getValue("/root/init/option/specbillyn") == "Y" ) {

                // DRGȯÀÚ´Â ¼¼ºÎ³»¿ª¼­ ½É»çÆÀÀ¸·Î ¾È³»Çϵµ·Ï Æ˾÷ó¸®
                if (drgflag == "Y") {
                    messageBox("DRGȯÀÚÀÇ °æ¿ì ¼¼ºÎ³»¿ª¼­´Â ½É»çÆÀ¿¡¼­ Ãâ·ÂÇϽʽÿÀ.", "I000");
                    
                // ÀϹÝȯÀÚ
                } else {

                    // Áø·áºñ¼¼ºÎ»êÁ¤³»¿ª¼­ ÅëÇÕÀ¸·Î ±âÁ¸ / ½Å±Ô¼­½Ä ºÐ±âó¸® by Á¶Áß·¡ 20180223
                    // ±âÁ¸¼­½Ä
                    if (model.getValue("/root/init/PAM/P0032list/P0032[cdid = '370']/cdnm") != "Y") {
                        
                        // ÀÇ·á±Þ¿© º¸ÇèÀ¯Çü ÅëÇÕó¸®
                        // ¼¼ºÎ³»¿ª¼­ ¿É¼Ç : ¼ö°¡º°ÇÕ»ê ÀÇ °æ¿ì ºÒÇÊ¿ä by Á¶Áß·¡ 20160330
                        var sInsuKind = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind");
    //                    if (sInsuKind == "21" || sInsuKind == "22") {
    //                        sInsuKind = "20";
    //                    }
                    
                        
                        model.removenode("/root/rex/rex_detl/rex_detl_inpt");
                        model.makeNode  ("/root/rex/rex_detl/rex_detl_inpt");
                        
                        model.removenode("/root/rex/rex_detl/rex_detl_iscl");
                        model.makeNode  ("/root/rex/rex_detl/rex_detl_iscl");
                        
                        model.removenode("/root/rex/rex_detl/isclsum");
                        model.makeNode  ("/root/rex/rex_detl/isclsum");
                        
                        model.makeValue("/root/send/dataprint1/prt_pid",            model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_pid"));
                        model.makeValue("/root/send/dataprint1/prt_indd",           model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_indd"));
                        model.makeValue("/root/send/dataprint1/prt_cretno",         model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno"));
                        model.makeValue("/root/send/dataprint1/prt_insukind",       sInsuKind);
                        model.makeValue("/root/send/dataprint1/prt_fromdd",         model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd"));
                        model.makeValue("/root/send/dataprint1/prt_todd",           model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd"));
                        model.makeValue("/root/send/dataprint1/prt_todd_iphs",      model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd"));
                                                                                    
                        model.makeValue("/root/send/dataprint1/prt_prntflag",       "1"); // 1:¼¼ºÎ³»¿ª¼­, 2:¼öÀÍÀüü, 3:¼öÀͺ°
                        model.makeValue("/root/send/dataprint1/prt_useflag",        "1"); // 1:º¸Çèȸ»ç, 2:±âŸ
                                                                                    
                        model.makeValue("/root/send/dataprint1/srchflag",           "O"); // O:Áø·á, R:¼ö³³
                        model.makeValue("/root/send/dataprint1/prt_payflag",        "-','0','2','1','5"); // 0:±Þ¿©, 2:ÀϹÝ, 1:º»ÀÎ100%, 5:¼±ÅÃÁø·á
                                                                                    
                        model.makeValue("/root/send/dataprint1/prt_specflag",       "1"); // Áø·áºñ»ó¼¼³»¿ª È­¸é¿¡¼­ 1·Î °íÁ¤
                        model.makeValue("/root/send/dataprint1/prt_incls",          "");  // ¼öÀͱ¸ºÐ
                        model.makeValue("/root/send/dataprint1/prt_calcsum",        "Y"); // ¼ö°¡º°ÇÕ»ê
                        model.makeValue("/root/send/dataprint1/prt_drgyn",          "N"); // DRG¿©ºÎ
                        
                        // ISCL_SUM¿ë ÆĶó¹ÌÅÍ
                        model.makeValue("/root/send/dataprint1/todd_iphs",          model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd"));
                        model.makeValue("/root/send/dataprint1/disccd",             model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_disccd"));
                        model.makeValue("/root/send/dataprint1/rareobstflag",       model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_rareobstflag"));
                        model.makeValue("/root/send/dataprint1/mig",                model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mig"));
                        model.makeValue("/root/send/dataprint1/ownbmaxgradeflag",   model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_ownbmaxgradeflag"));
                        model.makeValue("/root/send/dataprint1/ownoveryn",          model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_ownoveryn"));
                        model.makeValue("/root/send/dataprint1/mskind",             model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind"));
                        model.makeValue("/root/send/dataprint1/suppkind",           model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind"));
                        
                        model.makeValue("/root/send/dataprint1/log_ipaddr",     app.clientIp);             // º¸¾È·Î±ë¿ë
                        model.makeValue("/root/send/dataprint1/log_logdeptcd",  getUserInfo("dutplcecd")); // º¸¾È·Î±ë¿ë
                        model.makeValue("/root/send/dataprint1/log_scrncd",     "SMPAI00100");             // º¸¾È·Î±ë¿ë
                        
                        // Áø·áºñ ¼¼ºÎ³»¿ª(ISCL), ISCL_SUM Á¶È¸
                        submit("TRPAI00111");
                        
                        // inpt_xxxx ¼³Á¤ ó¸®
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_hoslog",              getLogoImageURL()); // ·Î°í
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_brateflag",           model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag")); // ¿Ü·¡/ÀÔ¿ø±¸ºÐ
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_proccorpcd",          model.getValue("/root/hidden/init/proccd/cd"));                     // ¿ä¾ç±â°üÄÚµå
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_pid",                 model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));       // ȯÀÚ¹øÈ£
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_hngnm",               model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm"));     // ȯÀÚ¼º¸í
                        var itemNode = instance1.selectSingleNode("/root/hidden/init/insukind[cd='" + model.getValue("/root/main/inpt_info/inptpatinfo/inpt_insukind") + "']"); // º¸ÇèÀ¯Çü
                        if (itemNode == null) {
                            model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_insukind", "");
                        } else {
                            model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_insukind", itemNode.nm.nodeValue);
                        }
                        var itemNode = instance1.selectSingleNode("/root/hidden/init/suppkind[cd='" + model.getValue("/root/main/inpt_info/inptpatinfo/inpt_suppkind") + "']"); // º¸Á¶À¯Çü
                        if (itemNode == null) {
                            model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_suppkind", "");
                        } else {
                            model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_suppkind", itemNode.nm.nodeValue);
                        }
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_rrgstno",             model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno1") + "-*******"); // ÁֹιøÈ£
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_agesex",              model.getValue("/root/main/inpt_info/inptpatinfo/inpt_age") + "/" + model.getValue("/root/main/inpt_info/inptpatinfo/inpt_sex"));     // ³ªÀÌ/¼ºº°
                        var itemNode = instance1.selectSingleNode("/root/hidden/init/orddeptcdall[cd='" + model.getValue("/root/main/inpt_info/inptpatinfo/inpt_orddeptcd") + "']"); // Áø·á°ú
                        if (itemNode == null) {
                            model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_orddeptcd", "");
                        } else {
                            model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_orddeptcd", itemNode.nm.nodeValue);
                        }
                        var itemNode = instance1.selectSingleNode("/root/hidden/init/orddrid[cd='" + model.getValue("/root/main/inpt_info/inptpatinfo/inpt_medispclid") + "']"); // Áø·áÀÇ»ç
                        if (itemNode == null) {
                            model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_medispclid", "");
                        } else {
                            model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_medispclid", itemNode.nm.nodeValue);
                        }
                        var itemNode = instance1.selectSingleNode("/root/hidden/init/orddrid[cd='" + model.getValue("/root/main/inpt_info/inptpatinfo/inpt_medispclid") + "']"); // ¸éÇã¹øÈ£
                        if (itemNode == null) {
                            model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_licnsno", "");
                        } else {
                            model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_licnsno", itemNode.licnsno.nodeValue);
                        }
                        
                        // À¯Çüº° Á¾·áÀÏÀÚ ¼³Á¤ 
                        var iphs_todd = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd");
                        if (iphs_todd == "99991231") {
                            iphs_todd = model.getValue("/root/send/data1/inpt_dschdd");
                        }
                        
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_roomcd",              model.getValue("/root/main/inpt_info/inptpatinfo/inpt_roomcd"));     // º´½Ç
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_disccd",              model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_disccd")); // °èÁ¤°¨¸é
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_indd",                model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));       // ÀÔ¿øÀÏÀÚ
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_dschdd",              model.getValue("/root/send/data1/inpt_dschdd"));                     // Åð¿øÀÏÀÚ
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_insucd",              model.getValue("/root/main/inpt_info/inptpatinfo/inpt_insucd"));     // Á¶ÇÕ±âÈ£
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_indayno",             parseInt(getDateInterval(model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd"), iphs_todd, "DD")) + 1); // Àç¿øÀϼö(¾çÀÔ¹ý)
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_fromdd",              model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd")); // ½ÃÀÛÀÏÀÚ
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_todd",                iphs_todd);                                                                                // Á¾·áÀÏÀÚ
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_chgroomhist",         model.getValue("/root/rex/rex_detl/isclsum/isclsum_chgroomhist")); // Àü½Ç³»¿ª
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_totalamt",            model.getValue("/root/rex/rex_detl/isclsum/isclsum_totalamt"));
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_payamt",              model.getValue("/root/rex/rex_detl/isclsum/isclsum_payamt"));
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_payinsubamt",         parseInt(model.getValue("/root/rex/rex_detl/isclsum/isclsum_payinsubamt"))
                                                                                                         + parseInt(model.getValue("/root/rex/rex_detl/isclsum/isclsum_nopyinsubamt"))
                                                                                                         + parseInt(model.getValue("/root/rex/rex_detl/isclsum/isclsum_specinsubamt")));
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_payownamt",           model.getValue("/root/rex/rex_detl/isclsum/isclsum_payownamt"));
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_allownownbamt",       model.getValue("/root/rex/rex_detl/isclsum/isclsum_allownownbamt"));
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_nopyownbamt_org",     model.getValue("/root/rex/rex_detl/isclsum/isclsum_nopyownbamt_org"));
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_specamt",             model.getValue("/root/rex/rex_detl/isclsum/isclsum_specamt"));
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_discamt",             model.getValue("/root/rex/rex_detl/isclsum/isclsum_discamt"));
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_bloddiscamt",         model.getValue("/root/rex/rex_detl/isclsum/isclsum_bloddiscamt"));
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_ownoveramt",          model.getValue("/root/rex/rex_detl/isclsum/isclsum_ownoveramt"));
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_suppamt",             model.getValue("/root/rex/rex_detl/isclsum/isclsum_suppamt"));
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_ownbamt",             model.getValue("/root/rex/rex_detl/isclsum/isclsum_ownbamt"));
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_taxamt",              model.getValue("/root/rex/rex_detl/isclsum/isclsum_taxamt"));
                        model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_prercptamt",          model.getValue("/root/rex/rex_detl/isclsum/isclsum_prercptamt"));
                        
                        
    //                    model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_chgdepthist",         model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
    //                    model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_wardcd",              model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
    //                    model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_nopyamt",             model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
    //                    model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_cashamt",             model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
    //                    model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_cardamt",             model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
    //                    model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_limitdiffamt",        model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
    //                    model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_drgnopyamt",          model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
    //                    model.makeValue("/root/rex/rex_detl/rex_detl_inpt/inpt_drgallownbamt",       model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
    
                        model.refresh();
                        
                        // Áø·áºñ ¼¼ºÎ³»¿ª¼­ Ãâ·Â
                        exeReportPreview("RPPAI00207", "XMLSTR", "", "", "true", "", "", "", "", "true", "", "", "", "", "", model.getValue("/root/init/option/specbillcnt"));
                    
                    // ½Å±Ô¼­½Ä
                    } else {
                        
                        // Çì´õ
                        var sValues = "";
                        sValues += "ordtype¢Ë";
                        sValues += "pid¢Ë";
                        sValues += "orddd¢Ë";
                        sValues += "cretno¢Ë";
                        sValues += "fromdd¢Ë";
                        sValues += "todd¢Ë";
                        sValues += "calcfromdd¢Ë";
                        sValues += "calctodd¢Ì";

                        // µ¥ÀÌÅÍ
                        sValues += model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") +                            "¢Ë";
                        sValues += model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_pid") +      "¢Ë";
                        sValues += model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_indd") +     "¢Ë";
                        sValues += model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno") +   "¢Ë";
                        sValues += model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd") +   "¢Ë";
                        sValues += model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd") +     "¢Ë";
                        sValues += model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd") +   "¢Ë";
                        sValues += model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd") +     "¢Ì";

                        setParameter("SPPAC00200_HNGNM",    model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm")); // ȯÀÚ¼º¸í
                        setParameter("SPPAC00200_VALUES",   sValues);                                                       // ¼öÁø/¼ö³³ÀÌ·Â
                        setParameter("SPPAC00200_PRNTCNT",  model.getValue("/root/init/option/specbillcnt"));               // Ãâ·ÂºÎ¼ö

                        modal("SPPAC00200", "1", "300", "300"); // Áø·áºñ¼¼ºÎ»êÁ¤³»¿ª°ü¸®È­¸é È£Ãâ
                    }
                }
            }
            
            // Åð¿ø ÈÄ ¿Ü·¡°Ë»ç ¹Ì¿¹¾à°Ç Æ˾÷ó¸®
            if ((srcptflag == "B31" || srcptflag == "B21")
                    && getUserInfo("dutplceinstcd") == "031" 
                    && model.getValue("/root/main/admi_info/ordamt/admispec/admi_dschrcptflag") == "D"
                    && model.getValue("/root/temp/receipt/excuflag") == "Y") {
                messageBox("¿Ü·¡ ¹Ì¿¹¾à ÅëÇÕ¿¹¾à°Ë»ç°¡ Á¸ÀçÇÕ´Ï´Ù.\r\nÀÏ°úÁß Åð¿ø½Ã : 1Ãþ ⱸ 10, 11ⱸ¿¡¼­ ¿¹¾à\r\nÀÏ°úÈÄ Åð¿ø½Ã : 053-200-6023  ÀüÈ­·Î °Ë»ç¿¹¾à ", "I000");
            }
            
			//°¡Åð¿ø¿¡¼­ Á¤»óÅð¿øÀ¸·Î 󸮽à º¸°ü±Ý(- ±Ý¾× ¹ß»ý)ÀÌ ¹ß»ýÇÒ °æ¿ì º¸°ü±Ý âÀ» ¶ç¿î´Ù
			var srow = grd_inpatinfo.row
			var sindschstat = model.getValue("/root/send/data2/iphs_indschacptstat");
			if (sindschstat == "T" && parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt")) < 0 && srcptflag == "B31") {
				if (messageBox("º¸°ü±ÝÀ» µî·ÏÇÏ°Ú½À´Ï±î?", "Q999","") == 6) {
					model.makeValue("/root/main/inpt_info/inptpatinfo/keepamt", (parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt")) * -1));
					modal("../../../pam/inordamtmngtweb/xrw/SMPAI02300", "1","", "", "SMPAI02300", "/root/main/inpt_info/inptpatinfo", "/root/send/patinfo");
				}
			}
			fRtnRcpt("2");//¼ö³³Çϸé ÀνºÅϽº°¡ Áö¿öÁö¹Ç·Î ÃʱâÈ­ Àü¿¡ ÇÑ´Ù.
			//Åð¿ø¼ö³³ÀÌ ¾Æ´Ñ À¯ÇüÀÇ ¼ö³³Ã³¸®½Ã ÃʱâÈ­ ÇÏÁö ¾ÊÀ½.
			//if (sdschrcptflag == "R" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind") == "S" ) {
			//	var sPid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid");
			//	fInitialize("all");
			//	model.setValue("/root/main/inpt_info/inptpatinfo/inpt_pid", sPid);
			//	fInPatInfoRef("1");
			//} else {
				//¼ö³³ ÈÄ È¯ÀÚ ÀçÁ¶È¸ ¿äû(20080908)
				// 2012.01.17 - ¼ö³³ ÈÄ ÀçÁ¶È¸ ±â´É Á¦°Å by Á¶Áß·¡
				var sPid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid");
				fInitialize("all");
				// 2009.04.22 - ¼ö³³Ãë¼Ò ÈÄ ÀçÁ¶È¸ ±â´É Á¦°Å
				// 2009.05.18 - ¼ö³³Ãë¼Ò ÈÄ ÀçÁ¶È¸ ±â´É º¹¿ø
				// 2012.01.17 - ¼ö³³ ÈÄ ÀçÁ¶È¸ ±â´É Á¦°Å by Á¶Áß·¡
				model.makeValue("/root/main/inpt_info/inptpatinfo/inpt_pid", sPid);
				model.refresh();
				//fInPatInfoRef("1");

			//}
		}
	}

	//¼ö³³Ãë¼Ò
	function fRcptCnclProcess() {
	    
        // ¼ö³³ÀÚ ¸¶°¨¿©ºÎ üũÇÏ¿© ó¸®
        if (isMagmAprv()) {
            return false; // ¸¶°¨°áÁ¦ ¿Ï·áµÇ¾îÀÖÀ¸¹Ç·Î ´õÀÌ»ó ÁøÇàÇÏÁö ¾ÊÀ½
        }
                        
		var srowcount = getNodesetCount("/root/main/iphs_info/h_grdipatinfo/grdipatinfo");
		var srow = grd_inpatinfo.row
		//Àç¿øÁ¤º¸ grid ¼±ÅÃÀÌ ¾øÀ»½Ã 1¹ø°¸¦ ¼±ÅÃÇϵµ·Ï ÇÑ´Ù
		if (srow <= 0 ) {
			srow = 1;
		}
		if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd") == "" || model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd") == null) {
			messageBox("¼ö³³Ãë¼ÒÇÒ ÀÔ¿ø³»¿ªÀÌ ¾ø½À´Ï´Ù.","E999","");
			return;
		}
		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd") == "" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd") == null) {
			messageBox("¼ö³³Ãë¼ÒÇÒ Àç¿øÁ¤º¸°¡ ¾ø½À´Ï´Ù.","E999","");
			return;
		}

		var srcptflag = model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptflag")
		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mig") == "Y") {
			if (srcptflag != "C01") {
				messageBox("¸¶À̱׷¹ÀÌ¼Ç µ¥ÀÌÅÍ´Â ¼ö³³Ãë¼Ò ÇÒ ¼ö ¾ø½À´Ï´Ù.","I999","");
				return;
			}
		}

		if ((srcptflag) == "" || (srcptflag) == null) {
			messageBox("¼ö³³°èÁ¤ÀÌ ¾ø½À´Ï´Ù. ¼ö³³°èÁ¤À»","C001","");
			model.setFocus("ipt_rcptcd");

			return;
		}

		if ((srcptflag != "B03") && (srcptflag != "B13") && (srcptflag != "B23") && (srcptflag != "B33") && (srcptflag != "B43") && (srcptflag != "B53")) {
			messageBox("ÀÔ·ÂµÈ ¼ö³³°èÁ¤À¸·Î´Â ¼ö³³Ãë¼Ò¸¦ ÇÒ ¼ö ¾ø½À´Ï´Ù.", "E999","");
			return;
		}

		var srcptnochk = model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptno");
		if (srcptnochk == null || srcptnochk == "" || srcptnochk == " " || srcptnochk == "-") {
			messageBox("¼ö³³Ãë¼ÒÇÒ ³»¿ªÀ» [û±¸¼ö³³]¿¡¼­ ´õºíŬ¸¯ ÇϽʽÿÀ.", "E999", "");
			return;
		}

		//ÀÚ·á¼öÁý üũ
		var slastmdlclamdd = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_lastmdlclamdd");

		var bLastmdlclamyn = false;
		if (srcptflag == "B33" &&  (slastmdlclamdd == "" || slastmdlclamdd == "-" || slastmdlclamdd == "00000000")) {
		} else {
			if (srcptflag == "B33" && slastmdlclamdd >= model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd")) {


                if (messageBox("º¸Çè ÀÚ·á¼öÁýÀÌ ¿Ï·áµÈ ȯÀÚ ÀÔ´Ï´Ù.(ÇÒÀÎÁ¤º¸ º¯°æ¿Ü¿¡´Â ¼ö³³Ãë¼Ò ÇÏÁö ¸¶½Ê½Ã¿À) ¼ö³³Ãë¼Ò¸¦ ÇϽðڽÀ´Ï±î?", "Q999","") == 7) {
                    return;
                }

                /* 2011/01/14 cys ±è»óÁø ´ë¸®¿äûÇß´Ù°¡ ´Ù½Ã ¿øº¹
                messageBox("º¸Çè ÀÚ·á¼öÁýÀÌ ¿Ï·áµÈ ȯÀÚÀÔ´Ï´Ù. ÀÚ·á¼öÁýÀÌ »èÁ¦µÇ¾î¾ß Ãë¼Ò°¡´ÉÇÕ´Ï´Ù. ½É»çÆÀ¿¡ ÀüÈ­ÇÏ¿© Ãë¼ÒÇϽʽÿÀ!","E999");
                return;
                */

                bLastmdlclamyn = true;
			}
		}

		if (srcptflag == "B03" || srcptflag == "B53") {
			if (model.getValue("/root/main/admi_info/admi/grdclamrcpt/rcptflag") != "") {
				var iRcptRow1 = getNodesetCount("/root/main/admi_info/admi/grdclamrcpt");
				for(var iRcptRow=1; iRcptRow<=iRcptRow1; iRcptRow++){
					if (model.getValue("/root/main/admi_info/admi/grdclamrcpt["+ iRcptRow +"]/rcptstat") == "Y") {
						if (model.getValue("/root/main/admi_info/admi/grdclamrcpt["+ iRcptRow +"]/rcptflag") == "E70") {
							messageBox("Åð¿øû±¸(E70)°èÁ¤ÀÌ »ý¼ºµÇ¾î ÀÖ½À´Ï´Ù. ÇØ´ç °èÁ¤À¸·Î ¼ö³³Ã³¸®(Ãë¼Ò) ÇÒ ¼ö", "I004");
							fInitialize("inpatinfo");
							fDschamtVisible(false);
							fCalcInfo("2");
							//fOrdAmtInfo();	//Áø·áºñ³»¿ª
							//fRcptInfo("1");
							//Áø·áºñ³»¿ª,û±¸¼ö³³ ³»¿ª
							fRcpt_AllInfo("Y","Y","1");
							return;
						}
					}
				}
			}
		}

		/*
		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind") != "S") {
			if ((srcptflag == "B31" || srcptflag == "B21") && (srow != 1) && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ (srow - 1) +"]/iphs_rcptyn") == "Y")) {
				messageBox("ÀÌÀü À¯ÇüÀÌ ¼ö³³µÇ¾î ÀÖÁö ¾Ê½À´Ï´Ù. ÇöÀç À¯ÇüÀ» ¼ö³³", "E001", "");
				return;
			}
		}
		*/

		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind") != "S") {
			
			if ((srcptflag == "B33") || (srcptflag == "B22")) {

			var iphs_todd = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd");	


				//alert(getNodesetCount("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[iphs_mskind = 'M' and iphs_rcptyn = 'Y' and iphs_todd > " + iphs_todd + "]/iphs_rcptyn"));

				if(getNodesetCount("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[iphs_mskind = 'M' and iphs_rcptyn = 'Y' and iphs_todd > " + iphs_todd + "]/iphs_rcptyn") >0){
					messageBox("ÀÌÈÄ Àç¿ø À¯ÇüÁß ¼ö³³Ãë¼Ò ó¸® µÇÁö ¾ÊÀº ³»¿ªÀÌ ÀÖ½À´Ï´Ù.\nÇöÀç À¯ÇüÀ» ¼ö³³Ãë¼Ò", "E001", "");
					return;
				}

				/*
				if (srow !=  1) {
					var i = srow - 1;
					if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_rcptyn") == "Y") {
						if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_mskind") == "M") {
							messageBox("ÀÌÈÄ Àç¿ø À¯ÇüÁß ¼ö³³Ãë¼Ò ó¸® µÇÁö ¾ÊÀº ³»¿ªÀÌ ÀÖ½À´Ï´Ù.\nÇöÀç À¯ÇüÀ» ¼ö³³Ãë¼Ò", "E001", "");
							return;
						}
					}
				}
				*/
			}
		} else {

			//ºÎÀ¯ÇüÀÌ Á¸ÀçÇÒ °æ¿ì ÁÖÀ¯Çü ¼ö³³Ãë¼Ò ÈÄ ºÎÀ¯ÇüÀ» Ãë¼ÒÇØ¾ß ÇÔ.
			for (i = 1; i <= srowcount; i++) {
				if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_mskind") == "M" &&
					model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_rcptyn") == "Y" &&
					model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_mig") != "Y") {
					messageBox("ºÎÀ¯Çü ¼ö³³Ãë¼ÒÀü¿¡ ÁÖÀ¯Çü ¼ö³³À» Ãë¼Ò ÇÏ¼Å¾ß ÇÕ´Ï´Ù.", "E999");
					return;
				}
			}
		}

		if (srcptflag == "B33") {
			var iBloodCount = getNodesetCount("/root/main/admi_info/admietc/grdbloodspec");
			if (iBloodCount > 0) {
				var iDiscCnt = 0;
				for (i = 1; i <= iBloodCount; i++) {
					if (model.getValue("/root/main/admi_info/admietc/grdbloodspec["+  i  +"]/rcptflag") == "B31") {
						iDiscCnt = iDiscCnt + parseInt(model.getValue("/root/main/admi_info/admietc/grdbloodspec["+  i  +"]/disccnt"));
					}
				}
				if (iDiscCnt > 0) {
					var sDiscCnt = "(" + iDiscCnt + " ¸Å)";
					messageBox("Åð¿ø¼ö³³¹Ýȯ(B33)½Ã ¼öÇ÷´ëü¾×ÀÌ ¹Ýȯó¸® µË´Ï´Ù. ÇåÇ÷Áõ¸Å¼ö¸¦ È®ÀÎÇϽʽÿÀ." + sDiscCnt, "I999");
				}
			}
		}

		if (srcptflag == "B43") {
			var iBloodCount = getNodesetCount("/root/main/admi_info/admietc/grdbloodspec");
			if (iBloodCount > 0) {
				var iDiscCnt = 0;
				for (i = 1; i <= iBloodCount; i++) {

					if (model.getValue("/root/main/admi_info/admietc/grdbloodspec["+  i  +"]/rcptflag") == "B41") {
						//B41ÀÌ µÎ°³ ÀÌ»ó ¹ß»ýÇÒ ¼ö ÀÖÀ½.
						if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptdd") == model.getValue("/root/main/admi_info/admietc/grdbloodspec["+  i  +"]/rcptdd") &&
							model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptno") == model.getValue("/root/main/admi_info/admietc/grdbloodspec["+  i  +"]/rcptno")) {
							iDiscCnt = iDiscCnt + parseInt(model.getValue("/root/main/admi_info/admietc/grdbloodspec["+  i  +"]/disccnt"));
						}
					}
				}
				if (iDiscCnt > 0) {
					var sDiscCnt = "(" + iDiscCnt + " ¸Å)";
					messageBox("Åð¿øÈÄÃß°¡¼ö³³¹Ýȯ(B43)½Ã ¼öÇ÷´ëü¾×ÀÌ ¹Ýȯó¸® µË´Ï´Ù. ÇåÇ÷Áõ¸Å¼ö¸¦ È®ÀÎÇϽʽÿÀ." + sDiscCnt, "I999");
				}
			}
		}

		var sdschrcptflag = model.getValue("/root/main/admi_info/ordamt/admispec/admi_dschrcptflag");
//				var srateflag = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag");
//				var sOrdType = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype");
		var sDschJudgPrcsStat = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschjudgprcsstat");
		var bjudgprcsyn = false;
		var bRcptCnclYN = false;
		var bHeallifeamtclamamt = false;
		if (srcptflag == "B33" || srcptflag == "B23") {
			if (sdschrcptflag != "R") {
				if (srcptflag == "B33") {
					if (sDschJudgPrcsStat != "A"
					       //&& bLastmdlclamyn == false
					       ) {
					    
						//¼ö³³Ãë¼Ò½Ã º¸Çè½É»ç³»¿ª »èÁ¦ ¿©ºÎ
						if (messageBox("Åð¿ø¼ö³³Ãë¼Ò½Ã º¸Çè½É»ç³»¿ªÀ» ¹Ì½É»ç·Î º¯°æ ÇϽðڽÀ´Ï±î?", "Q999","") == 7) {
							bjudgprcsyn = false;
						} else {
							bjudgprcsyn = true;
						}
					}

					if (messageBox("Åð¿ø¼ö³³Ãë¼Ò½Ã Åð¿ø¼ö³³±Ý¾×ÀÇ ¼ö³³À» Ãë¼Ò ÇϽðڽÀ´Ï±î?\n[    ¿¹    ] Åð¿ø¼ö³³±Ý¾× ¹Ýȯ(Àç¿ø»óÅÂ)\n[¾Æ´Ï¿À] Åð¿ø´çÀÏ °æ¿ì Áß°£±ÝÀüȯ(Àç¿ø»óÅÂ), Åð¿øÀÏÀÌ °ú°ÅÀÏ °æ¿ì °¡Åð¿ø±ÝÀüȯ(°¡Åð¿ø»óÅÂ)", "Q999","") == 7) {
						bRcptCnclYN = false;
					} else {
						bRcptCnclYN = true;
					}

					var iheallifeamtclamamt = model.getValue("/root/main/admi_info/ordamt/admispec/admi_heallifeamtclamamt");
					if (iheallifeamtclamamt != "0") {
						messageBox("°Ç°­»ýÈ°À¯Áöºñ(" + iheallifeamtclamamt + ")°¡ ¼ö³³µÈ ȯÀÚÀÔ´Ï´Ù. ¼ö³³³»¿ªÀº ¹ÝȯµÇ¸ç, ¼ö³³Ãë¼Ò ÈÄ ÀÇ·á±Þ¿©½ÂÀÎÀ» Ãë¼ÒÇϽʽÿÀ.", "I999");
						bHeallifeamtclamamt = true;
					}
				} else {
					if (sDschJudgPrcsStat != "A") {
						//¼ö³³Ãë¼Ò½Ã º¸Çè½É»ç³»¿ª »èÁ¦ ¿©ºÎ
						if (messageBox("°¡Åð¿ø¼ö³³Ãë¼Ò½Ã º¸Çè½É»ç³»¿ªÀ» ¹Ì½É»ç·Î º¯°æ ÇϽðڽÀ´Ï±î?", "Q999","") == 7) {
							bjudgprcsyn = false;
						} else {
							bjudgprcsyn = true;
						}
					}

					if (messageBox("°¡Åð¿ø¼ö³³Ãë¼Ò½Ã °¡Åð¿ø¼ö³³±Ý¾×ÀÇ ¼ö³³À» Ãë¼Ò ÇϽðڽÀ´Ï±î?\n[    ¿¹    ] Åð¿ø¼ö³³±Ý¾× ¹Ýȯ(Àç¿ø»óÅÂ)\n[¾Æ´Ï¿À] Áß°£±ÝÀüȯ(Àç¿ø»óÅÂ)", "Q999","") == 7) {
						bRcptCnclYN = false;
					} else {
						bRcptCnclYN = true;
					}
				}
			}
		}
		var bUncoCnclYN = false;
		if (srcptflag == "B33") {
			//Åð¿ø¼ö³³ Ãë¼Ò½Ã ¹Ì¼öÀÔ±Ý ±Ý¾×ÀÌ ÀÖÀ» °æ¿ì ¸Þ¼¼Áö 󸮷Π ¹Ì¼ö -> Áß°£±ÝÀ¸·Î º¯°æÇÑ´Ù.
			var iUncoCount = getNodesetCount("/root/main/admi_info/admi/grdclamrcpt");
			for (i = 1; i <= iUncoCount; i++) {
				if (model.getValue("/root/main/admi_info/admi/grdclamrcpt["+ i +"]/rcptflag") == "C01" && model.getValue("/root/main/admi_info/admi/grdclamrcpt["+ i +"]/rcptstat") == "Y") {
					messageBox("¹Ì¼öÀԱݾ×ÀÌ Á¸ÀçÇÕ´Ï´Ù. ¹Ì¼öÀԱݾ×Àº ¸ðµÎ ÀÔ¿ø¼±¼ö±Ý(B01)À¸·Î ÀüȯµË´Ï´Ù.", "I999")
					bUncoCnclYN = true;
					break;
				}
			}
		}

		//Áß°£±Ý ¼ö³³Ãë¼Ò½Ã card, cash, onlnÀ¸·Î ¼ö³³µÇ¾ú´ÂÁö È®ÀÎ ÈÄ ½ÂÀÎÃë¼Ò ¸Þ¼¼Áö¿Í ÇÔ²² Ãë¼Ò ó¸® ÇÑ´Ù.
		if (srcptflag == "B03" || srcptflag == "B53" || bRcptCnclYN == true) {

			var srcptdd = model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptdd");
			var srcptno = model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptno");
			var srcptseqno = model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptseqno");
			var sdd = "";
			var sno = "";
			var sseqno = "";
			var j = 0;
			var scardcancel = false;
			var scashcancel = false;

//					for(var i=1; i<=getNodesetCount("/root/hidden/admi_info/ordamt/card"); i++) {
//						sdd = model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_rcptdd");
//						sno = model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_rcptno");
//						sseqno = model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_rcptseqno");
//						if (sdd != null && sdd != "" && sdd != " " && sdd != "-") {
//							if (srcptdd == sdd && srcptno == sno && srcptseqno == sseqno) {
//								j = j + 1
//
//							}
//						}
//					}
//
//					if (j != 0) {
//						if (messageBox("Ä«µå¼ö³³(" + j + " °Ç) µÈ ³»¿ªÀÔ´Ï´Ù. ¼ö³³Ãë¼Ò¿Í ÇÔ²² ½ÂÀÎÃë¼Ò°¡ µË´Ï´Ù.", "Q003","") == 7) {
//							return;
//						}
//						scardcancel = true;
//					}
			var selectedRow = grd_rcptamt.row;
			if ( parseInt( model.getValue("/root/main/admi_info/admi/grdclamrcpt["+ selectedRow +"]/cardamt")) > 0) {
				if (messageBox("Ä«µå¼ö³³ ±Ý¾×ÀÌ ÀÖ½À´Ï´Ù. [½Å¿ëÄ«µå ÀÚµ¿Ãë¼Ò´Â µÇÁö ¾Ê½À´Ï´Ù. Á÷Á¢ ½ÂÀÎÃë¼ÒÇϼ¼¿ä!]", "Q003","") == 7) {
					return;
				}
				scardcancel = false;
			}

			j = 0;
			for(var i=1; i<=getNodesetCount("/root/hidden/admi_info/ordamt/cash"); i++) {
				sdd = model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_rcptdd");
				sno = model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_rcptno");
				sseqno = model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_rcptseqno");
				if (srcptdd == sdd && srcptno == sno && srcptseqno == sseqno) {
					j = j + 1
				}
			}
			if (j != 0) {
				if (messageBox("Çö±Ý¿µ¼öÁõ¼ö³³(" + j + " °Ç) µÈ ³»¿ªÀÔ´Ï´Ù. ¼ö³³Ãë¼Ò¿Í ÇÔ²² ½ÂÀÎÃë¼Ò°¡ µË´Ï´Ù.", "Q003","") == 7) {
					return;
				}
				scashcancel = true;
			}
			j = 0;
			for(var i=1; i<=getNodesetCount("/root/hidden/admi_info/ordamt/onln"); i++) {
				sdd = model.getValue("/root/hidden/admi_info/ordamt/onln[" + i + "]/onln_rcptdd");
				sno = model.getValue("/root/hidden/admi_info/ordamt/onln[" + i + "]/onln_rcptno");
				sseqno = model.getValue("/root/hidden/admi_info/ordamt/onln[" + i + "]/onln_rcptseqno");
				if (srcptdd == sdd && srcptno == sno && srcptseqno == sseqno) {
					j = j + 1
				}
			}
			//°­³² ¿Â¶óÀÎ »ç¿ëÇÏÁö ¾ÊÀ½.(ÇÏÁö¸¸ ó¸® ·ÎÁ÷ ÇÊ¿ä)
			if (j != 0) {
				if (messageBox("¿Â¶óÀÎÀԱݼö³³(" + j + " °Ç) µÈ ³»¿ªÀÔ´Ï´Ù. ¼ö³³Ãë¼Ò¿Í ÇÔ²² ¿Â¶óÀÎÀÔ±Ý Ãë¼Ò°¡ µË´Ï´Ù.", "Q003","") == 7) {
					return;
				}
			}
		}

		//¼ö³³Ãë¼Ò***********************
		if (messageBox("¼ö³³Ãë¼Ò¸¦ ó¸®ÇϽðڽÀ´Ï±î?", "Q999","") == 7) {
			return;
		}
		
		// Åð¿øÃë¼Ò(B330 »çÀ¯ µî·Ï
		if (srcptflag == "B33") {
		    modal("SMPAI00101", "1","300", "300", "SMPAI00101", "", "", "sysmenu:hidden;");
		}
		
		model.resetInstanceNode("/root/send/data1");
		model.resetInstanceNode("/root/send/data2");
		model.resetInstanceNode("/root/send/data3");
		model.copyNode("/root/send/data1", "/root/main/inpt_info/inptpatinfo");
		//Åð¿ø¼ö³³½Ã º¸Çè½É»ç ³»¿ª º¯°æ ó¸®
		if (bjudgprcsyn == true) {
			model.makeValue("/root/send/data1/inpt_judgprcsyn", "Y");
		} else {
			model.makeValue("/root/send/data1/inpt_judgprcsyn", "N");
		}
		//¼ö³³±ÝÃë¼Ò ¿©ºÎ
		if (bRcptCnclYN == true) {
			model.makeValue("/root/send/data1/inpt_rcptcnclyn", "Y");
		} else {
			model.makeValue("/root/send/data1/inpt_rcptcnclyn", "N");
		}

		//¹Ì¼öÀÔ±Ý Àüȯ¿©ºÎ
		if (bUncoCnclYN == true) {
			model.makeValue("/root/send/data1/inpt_uncocnclyn", "Y");
		} else {
			model.makeValue("/root/send/data1/inpt_uncocnclyn", "N");
		}

		model.copyNode("/root/send/data2", "/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]");
		model.copyNode("/root/send/data3", "/root/main/admi_info/ordamt/admispec");
		//model.setValue("/root/send/data3/admi_appdd", getCurrentDate());
		model.setValue("/root/send/data3/admi_rcptexecdd", getCurrentDate());
		model.setValue("/root/send/data3/admi_rcpttm", getCurrentTime());
		model.setValue("/root/send/data3/admi_dschrcptflag", sdschrcptflag);

		//ÇöÀç ȯÀÚ »óÅ Á¶È¸
		/*
		if ((srcptflag == "B23" || srcptflag == "B33") && (sdschrcptflag == "D")) {
			submit("TRPAI00129");
			if (model.getValue("/root/temp2/ipatchk/indschacptstat") == "A") {
				messageBox("Àç¿ø ȯÀÚÀÔ´Ï´Ù. ȯÀÚ¸¦ ÀçÁ¶È¸ ÇÏ¿© ȯÀÚ »óŸ¦ È®ÀÎÇϽʽÿÀ.", "E999");
				return;
			}
			if (srcptflag == "B33" && model.getValue("/root/temp2/ipatchk/indschacptstat") != "D") {
				messageBox("Åð¿øȯÀÚ°¡ ¾Æ´Õ´Ï´Ù. ȯÀÚ¸¦ ÀçÁ¶È¸ ÇÏ¿© ¼ö³³³»¿ªÀ» È®ÀÎÇϽʽÿÀ.", "E999");
				return;
			}
			model.removenode("/root/temp2");
			model.makeNode("/root/temp2");
		}
		*/


		if (scardcancel == true) {

			model.removenode("/root/send/set_card/card");
///--------------------------------------------------------------------------------------------------------------------------Ä«µå Ãë¼Ò ·ÎÁ÷ º¯°æ
//					var iCardAmt = parseInt(model.getValue("/root/send/data3/admi_cardamt"));	//card ±Ý¾×
//					var sPid = model.getValue("/root/send/data1/inpt_pid");	//ȯÀÚ¹øÈ£
//					var sVanCD ="";						//van»ç ±¸ºÐ
//					var sAprvFlag = "";					//½ÂÀα¸ºÐ
//					var sKeyInptFlag = model.getValue("/root/main/admi_info/rcptmthd/keyinptflag");	//ÀԷ±¸ºÐ
//					var sSwipeData = model.getValue("/root/main/admi_info/rcptmthd/swipedata");	//swipedata
//					var sCardNo = model.getValue("/root/main/admi_info/rcptmthd/cardcashno");		//Ä«µå¹øÈ£
//					var sValidterm = model.getValue("/root/main/admi_info/rcptmthd/validterm");		//À¯È¿±â°£
//					var sAllotmm = model.getValue("/root/main/admi_info/rcptmthd/allotmm");		//ÇҺαⰣ
//					var sAprvDD = "";					//¿ø°Å·¡½ÂÀÎÀÏÀÚ(Ãë¼Ò)
//					var sAprvTm = "";					//¿ø°Å·¡½ÂÀÎÀϽÃ(Ãë¼Ò)
//					var sAprvNo = "";					//¿ø°Å·¡½ÂÀιøÈ£(Ãë¼Ò)
//					var sOrdType = model.getValue("/root/send/data1/inpt_ordtype");				//ordtype
//					var sOrdDeptCd = model.getValue("/root/send/data2/iphs_orddeptcd");			//orddeptcd
//					var sCrdtNo = model.getValue("/root/send/data2/iphs_cretno");					//cretno
//					var sOrdDD = model.getValue("/root/send/data1/inpt_indd");					//orddd
//					var iSeqno = 1;
			model.removenode("/root/hidden/cncl_card");		//Ä«µå½ÂÀÎÃë¼Ò
			model.makeNode("/root/hidden/cncl_card");
			//model.removenode("/root/hidden/cncl_cash/cash");	//Çö±Ý¿µ¼öÁõ½ÂÀÎÃë¼Ò
			//model.makeNode("/root/hidden/cncl_cash/cash");

			var iCardCount = 0;
			for(var i=1; i<=getNodesetCount("/root/hidden/admi_info/ordamt/card"); i++) {
				sdd = model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_rcptdd");
				sno = model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_rcptno");
				sseqno = model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_rcptseqno");
				if (sdd != null && sdd != "" && sdd != " " && sdd != "-") {
					if (srcptdd == sdd && srcptno == sno && srcptseqno == sseqno) {
						iCardCount = parseInt(iCardCount) + 1;
						model.makeNode("/root/hidden/cncl_card/card[" + iCardCount + "]");
						copyNodeType("/root/hidden/cncl_card/card[" + iCardCount + "]", "/root/hidden/admi_info/ordamt/card[" + i + "]", "after");
					}
				}
			}

			//Ä«µåÃë¼Ò´Â Ãë¼Ò node -> Ãë¼Ò -> Ãë¼Ò³»¿ª node ó¸®ÇÑ´Ù.
			parm =	"0"                                                         + "¢Ë" +    //¸ÖƼ°Ç¼ö
					""                                                          + "¢Ë" +    //¸ÖƼopmi
					""                                                          + "¢Ë" +    //rcptdd º¯°æ ȤÀº Ãë¼ÒÀÎ °æ¿ì ÇÊ¿ä
					""                                                          + "¢Ë" +    //rcptno
					""                                                          + "¢Ë" +    //rcptseqno
					"0"                                                         + "¢Ë" +    //totalamt
					"/root/hidden/cncl_card"                                    + "¢Ë" +    //send
					"/root/send/set_card/card"                                  + "¢Ë" +    //receive
					model.getValue("/root/send/data1/inpt_pid")                 + "¢Ë" +    //pid
					model.getValue("/root/send/data1/inpt_indd")                + "¢Ë" +    //orddd
					""                                                          + "¢Ë" +    //cretno
					""                                                          + "¢Ë" +    //strRcvVan
					model.getValue("/root/hidden/cncl_card/card/card_ordtype")  + "¢Ë" +    //ordtype
					""                                                          + "¢Ë" +    //fromdd
					""                                                          + "¢Ë" +    //todd
					model.getValue("/root/send/data2/iphs_orddeptcd")           + "¢Ë" +    //orddeptcd
					//´ÜÀÏ°Ç Á¢¼ö ½ÂÀÎÀ϶§¸¸ ÇÊ¿ä
					""                                                          + "¢Ë" +    //cardno
					""                                                          + "¢Ë" +    //valiterm
					""                                                          + "¢Ë" +    //allotmm
					""                                                          + "¢Ë" +    //keyinptflag
					""                                                          + "¢Ë" ;    //sSwipeData

			setParameter("SPPAO00400_PARM",parm);
			setParameter("SPPAO00400_FLAG", "D");			// I : ½ÂÀÎ, D : Ãë¼Ò
			//iviewer »ý¼º ÈÄ Ä«µåpopup È£Ãâ
			var ivrObjt = document.all("ivr_cardpopup");
			if (ivrObjt == null) {
				//body.createChild("xforms:iviewer", "id:ivr_cardpopup; visibility:visible; src:../../../pam/pamcomnweb/xrw/SPPAO00400_½Å¿ëÄ«µå½ÂÀÎ.xrw; left:200px; top:200px; width:790px; height:650px");
				body.createChild("xforms:iviewer", "id:ivr_cardpopup; src:../../../pam/pamcomnweb/xrw/SPPAO00400_½Å¿ëÄ«µå½ÂÀÎ.xrw");
				ivrObjt = document.all("ivr_cardpopup");
			}


			//setParameter("SPPAO00400_PARM",parm);

			//if( flag == 'I' ){
			//ivrObjt.window.javascript.fInit();
			//var retMsg = ivrObjt.window.javascript.fAutoGetCardAprv();
			//}else{
			ivrObjt.window.javascript.fInit();
			var retMsg = ivrObjt.window.javascript.fAutoCnclCardAprv();

//}
			body.removeChild("ivr_cardpopup");
			setParameter("SPPAO00400_FLAG", "");

			if (retMsg != true) {
				model.removenode("/root/hidden/cncl_card");		//Ä«µå½ÂÀÎÃë¼Ò
				model.makeNode("/root/hidden/cncl_card");
				return;
			}

			for(var i=1; i<=getNodesetCount("/root/send/set_card/card"); i++) {
				model.setValue("/root/send/set_card/card[" + i + "]/card_aprvflag",  "22");
				model.setValue("/root/send/set_card/card[" + i + "]/card_rcptexecdd",  model.getValue("/root/send/data3/admi_rcptexecdd"));
				model.setValue("/root/send/set_card/card[" + i + "]/card_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
				model.setValue("/root/send/set_card/card[" + i + "]/card_innrtretyn", "N");		//³»ºÎ󸮿©ºÎ
				model.setValue("/root/send/set_card/card[" + i + "]/card_preamtyn", "N");		//¼±¼ö±Ý¿©ºÎ
				model.setValue("/root/send/set_card/card[" + i + "]/card_rcptstat", model.getValue("/root/send/data3/admi_rcptstat"));
				model.setValue("/root/send/set_card/card[" + i + "]/card_ordtype", model.getValue("/root/send/data1/inpt_ordtype"));
				//model.setValue("/root/send/set_card/card[" + i + "]/card_aprvdd", model.getValue("/root/tmp/appvanif/approvaldate"));	//½ÂÀÎÀÏÀÚ
				//model.setValue("/root/send/set_card/card[" + i + "]/card_aprvtm", model.getValue("/root/tmp/appvanif/approvaltime"));	//½ÂÀνð£
				//model.setValue("/root/send/set_card/card[" + i + "]/card_aprvno", model.getValue("/root/tmp/appvanif/approvalno"));	//½ÂÀιøÈ£
				//model.setValue("/root/send/set_card/card[" + i + "]/card_vancd", model.getValue("/root/tmp/appvanif/vangb"));			//VANÄÚµå
			}

//*/
/********************************************************************************************************************************************

			j = 0
			for(var i=1; i<=getNodesetCount("/root/hidden/admi_info/ordamt/card"); i++) {
				sdd = model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_rcptdd");
				sno = model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_rcptno");
				sseqno = model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_rcptseqno");
				if (sdd != null && sdd != "" && sdd != " " && sdd != "-") {
					if (srcptdd == sdd && srcptno == sno && srcptseqno == sseqno) {
						//Ä«µå½ÂÀÎ
						//swipe µ¥ÀÌŸ Àоî, ÀԷ±¸ºÐ ¼¼ÆÃ

						fAppCardVanData(model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_vancd")			//data1		//vangb	van»ç±¸ºÐ
												,"21"																//data2		//ordergb	°Å·¡±¸ºÐ
												,getCurrentDate()														//data3		//mdate	ȸ°èÀÏÀÚ
												,model.getValue("/root/send/data1/inpt_pid") 									//data4		//pano	µî·Ï¹øÈ£
												,model.getValue("/root/send/data1/inpt_ordtype")								//data5		//iogb	ÀԿܱ¸ºÐ
												,model.getValue("/root/send/data2/iphs_orddeptcd")							//data6		//deptcode	Áø·á°úÄÚµå
												,model.getValue("/root/send/data1/inpt_indd")									//data7		//diagdate	Áø·áÀÏÀÚ
												,model.getValue("/root/hidden/session/userid")								//data8		//clientid		¼ö³³ÀÚ
												,"K"																	//data9		//entrymode	ÀԷ±¸ºÐ
												,"" 																	//data10		//track2data	Æ®·¢data
												,model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_cardno") 	//data11		//cardnumber	Ä«µå¹øÈ£
												,model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_valiterm") 		//data12		//cardperiod	À¯È¿±â°£
												,model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_allotmm") 		//data13		//carddivide	ÇҺΰ³¿ù¼ö
												,parseInt(model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_cardamt"))		//data14		//netamt	±Ý¾×
												,model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_aprvdd")			//data15		//oldappdate	¿ø°Å·¡½ÂÀÎÀÏÀÚ(Ãë¼Ò½Ã)
												,model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_aprvtm")			//data16		//oldapptime	¿ø°Å·¡½ÂÀνð£(Ãë¼Ò½Ã)
												,model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_aprvno")			//data17		//oldappno	¿ø°Å·¡½ÂÀιøÈ£(Ãë¼Ò½Ã)
												 );

						if (model.getValue("/root/tmp/appvanif/replystat") != "0000" ) {

							messageBox("Ä«µå½ÂÀνÇÆÐ => "+ model.getValue("/root/tmp/appvanif/cardname") ,"E999","");
							return;
						}
						j = j + 1
						model.makeValue("/root/send/set_card/card[" + j + "]/card_pid", model.getValue("/root/send/data1/inpt_pid"));
						//¿µ¼öÁõ¹øÈ£´Â ¿µ¼öÁõ ¹øÈ£ »ý¼º ÈÄ ¹Þ´Â´Ù
						model.makeValue("/root/send/set_card/card[" + j + "]/card_rcptdd", model.getValue("/root/send/data3/admi_rcptdd"));
						model.makeValue("/root/send/set_card/card[" + j + "]/card_rcptno", model.getValue("/root/send/data3/admi_rcptno"));
						model.makeValue("/root/send/set_card/card[" + j + "]/card_rcptseqno", model.getValue("/root/send/data3/admi_rcptseqno"));
						model.makeValue("/root/send/set_card/card[" + j + "]/card_seqno", model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_seqno"));
						model.makeValue("/root/send/set_card/card[" + j + "]/card_instcd", model.getValue("/root/send/data1/inpt_instcd"));
						model.makeValue("/root/send/set_card/card[" + j + "]/card_rcptstat", model.getValue("/root/send/data3/admi_rcptstat"));
						model.makeValue("/root/send/set_card/card[" + j + "]/card_ordtype", model.getValue("/root/send/data1/inpt_ordtype"));
						//Ä«µåÁ¤º¸ Â÷ÈÄ Á¤¸®
						model.makeValue("/root/send/set_card/card[" + j + "]/card_keyinptflag", model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_keyinptflag"));	//S:Swipe, K:Key in
						model.makeValue("/root/send/set_card/card[" + j + "]/card_cardcmpycd", model.getValue("/root/tmp/appvanif/bankid"));
						//Ä«µå¹øÈ£
						model.makeValue("/root/send/set_card/card[" + j + "]/card_cardno", model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_cardno"));
						model.makeValue("/root/send/set_card/card[" + j + "]/card_aprvflag", "22");	//12:Ä«µå½ÂÀÎÀÀ´ä
						model.makeValue("/root/send/set_card/card[" + j + "]/card_aprvdd", model.getValue("/root/tmp/appvanif/approvaldate"));		//½ÂÀÎÀÏÀÚ
						model.makeValue("/root/send/set_card/card[" + j + "]/card_aprvtm", model.getValue("/root/tmp/appvanif/approvaltime"));	//½ÂÀνð£
						model.makeValue("/root/send/set_card/card[" + j + "]/card_aprvno", model.getValue("/root/tmp/appvanif/approvalno"));	//½ÂÀιøÈ£
						model.makeValue("/root/send/set_card/card[" + j + "]/card_vancd", model.getValue("/root/tmp/appvanif/vangb"));	//VANÄÚµå
						model.makeValue("/root/send/set_card/card[" + j + "]/card_allotmm", model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_allotmm"));	//ÇҺΰ³¿ù¼ö
						//Ä«µå°áÁ¦±Ý¾×
						model.makeValue("/root/send/set_card/card[" + j + "]/card_cardamt", model.getValue("/root/send/data3/admi_cardamt"));
						model.makeValue("/root/send/set_card/card[" + j + "]/card_valiterm", model.getValue("/root/hidden/admi_info/ordamt/card[" + i + "]/card_validterm"));	//À¯È¿±â°£
						//¼ö³³ÀÏÀÚ
						model.makeValue("/root/send/set_card/card[" + j + "]/card_rcptexecdd", model.getValue("/root/send/data3/admi_rcptexecdd"));
						model.makeValue("/root/send/set_card/card[" + j + "]/card_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
						model.makeValue("/root/send/set_card/card[" + j + "]/card_rcptrid", "");			//¼ö³³ÀÚ
						model.makeValue("/root/send/set_card/card[" + j + "]/card_innrtretyn", "N");		//³»ºÎ󸮿©ºÎ
						model.makeValue("/root/send/set_card/card[" + j + "]/card_preamtyn", "N");		//¼±¼ö±Ý¿©ºÎ
						model.makeValue("/root/send/set_card/card[" + j + "]/card_remfact", "");			//¼ö³³³»¿ª¿¡ ´ëÇÑ Âü°í»çÇ×
						model.makeValue("/root/send/set_card/card[" + j + "]/card_fstrgstrid", "");
						model.makeValue("/root/send/set_card/card[" + j + "]/card_fstrgstdt", "");
						model.makeValue("/root/send/set_card/card[" + j + "]/card_lastupdtrid", "");
						model.makeValue("/root/send/set_card/card[" + j + "]/card_lastupdtdt", "");
					}
				}
			}
//********************************************************************************************************************************************/

		} //Ä«µåÃë¼Ò End..
		
		//Çö±Ý¿µ¼öÁõ Ãë¼Ò.
		if (scashcancel == true) {
			model.removenode("/root/send/set_cash/cash");
			//model.removenode("/root/hidden/cncl_cash/cash");	//Çö±Ý¿µ¼öÁõ½ÂÀÎÃë¼Ò
			//model.makeNode("/root/hidden/cncl_cash/cash");
			
			var sVanFlag = model.getValue("/root/init/PAM/P0032list/P0032[cdid = '200']/cdnm");

			var iCash = 0;
			for(var i=1; i<=getNodesetCount("/root/hidden/admi_info/ordamt/cash"); i++) {
				sdd = model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_rcptdd");
				sno = model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_rcptno");
				sseqno = model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_rcptseqno");
				if (srcptdd == sdd && srcptno == sno && srcptseqno == sseqno) {
					iCash = iCash + 1;
					
					var sCashKeyInptFlag = 'K'
					    
					// ICPosÀÇ °æ¿ì Ä«µåÁ¤º¸´Â Swipe·Î ó¸®(Ä«µå¸®µù, Å°ÀÔ·Â ¸ðµÎ)
	                if (sVanFlag == "KOCES_IC" && model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_qualcnfmflag") == "3") {
	                    sCashKeyInptFlag = "S";
	                }

					fAppCardVanData("01"//model.getValue("/root/hidden/h_cvan/cvan/cvan_vancd")								//data1    //vangb van»ç±¸ºÐ
									,"51"																					//data2    //ordergb   °Å·¡±¸ºÐ
									,getCurrentDate()																		//data3    //mdate ȸ°èÀÏÀÚ
									,model.getValue("/root/send/data1/inpt_pid")											//data4    //pano  µî·Ï¹øÈ£
									,model.getValue("/root/send/data1/inpt_ordtype")										//data5    //iogb  ÀԿܱ¸ºÐ
									,model.getValue("/root/send/data2/iphs_orddeptcd")										//data6    //deptcode  Áø·á°úÄÚµå
									,model.getValue("/root/send/data1/inpt_indd")											//data7    //diagdate  Áø·áÀÏÀÚ
									,model.getValue("/root/hidden/session/userid")											//data8    //clientid      ¼ö³³ÀÚ
									,sCashKeyInptFlag																		//data9    //entrymode ÀԷ±¸ºÐ
									,""																						//data10   //track2data    Æ®·¢data
									,model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_qualcnfmno")		//data11   //cardnumber    Ä«µå¹øÈ£
									,""																						//data12   //cardperiod    À¯È¿±â°£
									,model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_indinstflag")		//data13   //carddivide    ÇҺΰ³¿ù¼ö
									,parseInt(model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_cashamt")) //data14   //netamt    ±Ý¾×
									,model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_aprvdd")			//data15   //oldappdate    ¿ø°Å·¡½ÂÀÎÀÏÀÚ(Ãë¼Ò½Ã)
									,model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_aprvtm")			//data16   //oldapptime    ¿ø°Å·¡½ÂÀνð£(Ãë¼Ò½Ã)
									,model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_aprvno")			//data17   //oldappno  ¿ø°Å·¡½ÂÀιøÈ£(Ãë¼Ò½Ã)
									,""                                                                                     //data18 
									,""                                                                                     //data19
									,""                                                                                     //data20
									,sVanFlag                                                                               //data21   //VAN»ç ±¸ºÐ
									);

					if (model.getValue("/root/tmp/appvanif/replystat") != "0000" ) {
						//Çö±Ý¿µ¼öÁõÀº Ãë¼Ò½ÇÆа¡ µÇ´õ·¡µµ ÁøÇàÇÑ´Ù.
						messageBox("Çö±Ý¿µ¼öÁõÃë¼Ò½ÂÀνÇÆÐ => "+ model.getValue("/root/tmp/appvanif/cardname") ,"E999","");
						//return;

					}


					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_pid", model.getValue("/root/send/data1/inpt_pid"));
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_rcptdd", model.getValue("/root/send/data3/admi_rcptdd"));
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_rcptno", model.getValue("/root/send/data3/admi_rcptno"));
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_rcptseqno", model.getValue("/root/send/data3/admi_rcptseqno"));
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_seqno", model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_seqno"));
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_instcd", model.getValue("/root/send/data1/inpt_instcd"));

					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_rcptstat", model.getValue("/root/send/data3/admi_rcptstat"));

					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_ordtype", model.getValue("/root/send/data1/inpt_ordtype"));
					//Å°ÀԷ±¸ºÐ K:Kind in, S:Swipe
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_keyinptflag", 'K');
					//°³ÀιýÀα¸ºÐ P:°³ÀÎ, C:¹ýÀÎ(00, 01) È®ÀÎ ÇÊ¿ä
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_indinstflag", model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_indinstflag"));
					//ÀÚ°ÝÈ®Àα¸ºÐ(ÁÖ¹Î, ÇÚµåÆù, ½Å¿ëÄ«µå)
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_qualcnfmflag", model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_qualcnfmflag"));
					//ÀÚ°ÝÈ®ÀιøÈ£
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_qualcnfmno", model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_qualcnfmno"));
					//½ÂÀα¸ºÐ //42:Çö±Ý¿µ¼öÁõ½ÂÀÎÀÀ´ä, 52:Çö±Ý¿µ¼öÁõÃë¼ÒÀÀ´ä
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_aprvflag", model.getValue("/root/tmp/appvanif/ordergb"));
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_aprvno", model.getValue("/root/tmp/appvanif/approvalno"));//½ÂÀιøÈ£
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_aprvdd", model.getValue("/root/tmp/appvanif/approvaldate"));//½ÂÀÎÀÏÀÚ
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_aprvtm", model.getValue("/root/tmp/appvanif/approvaltime"));//½ÂÀνð£
					//½ÂÀαݾ×
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_cashamt", parseInt(model.getValue("/root/hidden/admi_info/ordamt/cash[" + i + "]/cash_cashamt")));
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_rcptexecdd", model.getValue("/root/send/data3/admi_rcptexecdd"));
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_rcpttm", model.getValue("/root/send/data3/admi_rcpttm"));
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_rcptrid", "");				//¼ö³³ÀÚ
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_innrtretyn", "N");			//³»ºÎ󸮿©ºÎ
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_preamtyn", "N");			//¼±¼ö±Ý¿©ºÎ
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_remfact", "");			//¼ö³³³»¿ª¿¡ ´ëÇÑ Âü°í»çÇ×
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_fstrgstrid", "");
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_fstrgstdt", "");
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_lastupdtrid", "");
					model.makeValue("/root/send/set_cash/cash[" + iCash + "]/cash_lastupdtdt", "");
				}//Ãë¼Ò Çö±Ý¿µ¼öÁõ end..
			}//Çö±Ý¿µ¼öÁõ °³¼ö for end.
		}//Çö±Ý¿µ¼öÁõÃë¼Ò end..



		if (submit("TXPAI00102") == true) {

			if (bHeallifeamtclamamt == true) {
				//º¸ÇèÁõ¹øÈ£ Á¶È¸(º¸ÇèÀÚ°ÝÁ¶È¸)
				var parm = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno1") 				+
								model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno2") 								+ "¢Ë" + //ÁֹιøÈ£
										model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm") 						+ "¢Ë" + //À̸§
										model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd") 							+ "¢Ë" + //Áø·áÀÏÀÚ
										model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno") 						+ "¢Ë" + //Áø·á»ý¼º¹øÈ£(´çÀÏ ¿Ü·¡¿äÀ²¸¸ Àû¿ëÇÏ´Ï iphs°ÍÀ» »ç¿ëÇÏÁö ¾ÊÀ½)
										model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype")						+ "¢Ë" +//ordtype
										""																												+ "¢Ë"+ //Åð¿øÀÏÀÚ
										model.getValue("/root/main/admi_info/ordamt/admispec/admi_payownbamt")+ "¢Ë"+//º»ÀÎÀϺκδã±Ý
										model.getValue("/root/main/admi_info/ordamt/admispec/admi_payinsubamt")+ "¢Ë"+//±â°üºÎ´ã±Ý
										model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")								+ "¢Ë"+  //µî·Ï¹øÈ£
										model.getValue("/root/main/inpt_info/inptpatinfo/inpt_orddeptcd")					+ "¢Ë";  //Áø·á°ú


				setParameter("SPPMC03900_PARM",parm);
				setParameter("SPPMC03900_RTN","");

				modal("SPPMC03900", "1","0", "0", "SPPMC03900", "", "");
			}

			var sPid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid");
			fInitialize("all");
			// 2009.04.22 - ¼ö³³Ãë¼Ò ÈÄ ÀçÁ¶È¸ ±â´É Á¦°Å
			// 2009.05.18 - ¼ö³³Ãë¼Ò ÈÄ ÀçÁ¶È¸ ±â´É º¹¿ø
			model.setValue("/root/main/inpt_info/inptpatinfo/inpt_pid", sPid);
			fInPatInfoRef("1");
		}
	}

	//Áß°£±Ý¼ö³³(B01)
	function fMdlAmtRcpt(flag) {
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_totamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_payamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_payinsubamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_payownbamt10", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_payownbamt20", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_payownblimamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_totnopyamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_specordamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_totownbamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_handcapfund", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_procsubtamt", 0);

		model.setValue("/root/main/admi_info/ordamt/admispec/admi_discamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_discreducd", "");
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_reduamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd", "");
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_prercptamt", 0);
		//model.setValue("/root/main/admi_info/ordamt/admispec/admi_cardamt", 0);
		//model.setValue("/root/main/admi_info/ordamt/admispec/admi_cashamt", 0);
		//model.setValue("/root/main/admi_info/ordamt/admispec/admi_onlineamt", 0);
		if (flag != "B41") {
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_restamt", 0);
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_bloddiscamt", 0);
		}
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_outmoveyn", "N");
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_allownbamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_nopyamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_payownbamt", 0);

		model.setValue("/root/main/admi_info/ordamt/admispec/admi_precashamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_precardamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_preonlineamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocalcflag", "1");
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_orgrcptdd", "-");
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_orgrcptno", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_orgrcptseqno", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_clamlastdd", "-");
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_calcrcptrem", "-");
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_cardprercptamt", 0);

		model.setValue("/root/main/admi_info/ordamt/admispec/admi_totnopyinsubamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_nopyinsubamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_allowninsubamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_specinsubamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_nopyownbamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_allownownbamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_specownbamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_suppamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_heallifeamtclamamt", 0);
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_payinsurestamt", 0);
		
		//2011-07-01 ¹Ì¿ë ºÎ°¡¼¼
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_taxamt", 0);
		
		if (flag == "R" || flag == "F") {
			//¹Ì¼ö, °¨¸é, ¼öÇ÷ node ó¸®
			model.removenode("/root/main/admi_info/unco/unco");
			model.makenode("/root/main/admi_info/unco/unco");
			model.removenode("/root/main/admi_info/dcgm/dcgm");
			model.makenode("/root/main/admi_info/dcgm/dcgm");
			model.removenode("/root/send/set_bldc/bldc");
			model.makenode("/root/send/set_bldc/bldc");
		}
		if (flag != "F") {
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_pregdmndamt", 0);
		}
		model.refresh();
	}

	//ÀÓÀÇ°¨¸é, ¹Ì¼ö ÀԷ½à ±Ý¾× Àç°è»ê
	function fReCalcAmt(){
		var sUncoamt = 0;			//¹Ì¼ö±Ý
		var sReduAmt = 0;			//°¨¸é¾×
		var sBloddiscamt = 0;		//¼öÇ÷´ëü¾×
		var sTotownbamt = 0;		//º»ÀκδãÃѾ×
		var sHandcapfund = 0;		//Àå¾ÖÀαâ±Ý
		var sProcsubtamt = 0;		//´ëºÒ¾×

		var sDiscamt = 0;			//°èÁ¤°¨¸é¾×
		var sPrercptamt = 0;		//Áß°£±Ý
		var sSuppamt = 0;			//Èñ±Í³­Ä¡Áö¿ø±Ý
		var sHealamt = 0;			//°ÇÀ¯ºñ
		var spregdmndamt = 0;		//»êÀüÁø·áºñ
		
		//var sPayinsuRestamt = 0;    //±Þ¿©º»Àκδã Àý»ç±Ý °ø´ÜºÎ´ã±Ý ó¸®
		
		//2011-07-01 ¹Ì¿ë¼ºÇü ºÎ°¡¼¼
		var sTaxAmt = 0;
		
		var srow = grd_inpatinfo.row
		//Àç¿øÁ¤º¸ grid ¼±ÅÃÀÌ ¾øÀ»½Ã 1¹ø°¸¦ ¼±ÅÃÇϵµ·Ï ÇÑ´Ù
		if(srow <= 0){
			srow = 1;
		}

		//¼ö³³ÀÌ µÇ¾î ÀÖÀ» °æ¿ì ¾Æ·¡ ¼¼Á¾·ù¸¸ ¼ö³³Ã³¸® ÇÒ ¼ö ÀÖÀ½.
		sUncoamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt"));			//¹Ì¼ö±Ý
		sReduAmt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_reduamt"));			//°¨¸é¾×
		sBloddiscamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_bloddiscamt"));		//¼öÇ÷´ëü¾×

		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_rcptyn") != "Y") {
			sTotownbamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_totownbamt"));		//º»ÀκδãÃѾ×
			sHandcapfund = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_handcapfund"));		//Àå¾ÖÀαâ±Ý
			sProcsubtamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_procsubtamt"));		//´ëºÒ¾×
			sDiscamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_discamt"));				//°èÁ¤°¨¸é¾×
			sPrercptamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_prercptamt"));			//Áß°£±Ý
			sSuppamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_suppamt"));			//Èñ±Í³­Ä¡Áö¿ø±Ý
			sHealamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_heallifeamtclamamt"));			//°ÇÀ¯ºñ
			spregdmndamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_pregdmndamt"));			//»êÀüÁø·áºñ
			sTaxAmt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_taxamt"));          //»êÀüÁø·áºñ
			//sPayinsuRestamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_payinsurestamt"));     //±Þ¿©Àý»ç±Ý¾×
		}
		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_indschacptstat") == "T") {
			sTotownbamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_totownbamt"));		//º»ÀκδãÃѾ×
			sHandcapfund = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_handcapfund"));		//Àå¾ÖÀαâ±Ý
			sProcsubtamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_procsubtamt"));		//´ëºÒ¾×
			sDiscamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_discamt"));				//°èÁ¤°¨¸é¾×
			sPrercptamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_prercptamt"));			//Áß°£±Ý
			sSuppamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_suppamt"));			//Èñ±Í³­Ä¡Áö¿ø±Ý
			sHealamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_heallifeamtclamamt"));			//°ÇÀ¯ºñ
			spregdmndamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_pregdmndamt"));			//»êÀüÁø·áºñ
			sTaxAmt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_taxamt"));			//»êÀüÁø·áºñ
			//sPayinsuRestamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_payinsurestamt"));     //±Þ¿©Àý»ç±Ý¾×
		}

		var sTotrcptpayamt = sTotownbamt - sPrercptamt - sDiscamt - sReduAmt 
		                        - sBloddiscamt - sSuppamt - sHandcapfund - sProcsubtamt - sHealamt - spregdmndamt - sUncoamt + sTaxAmt;
		
		// º´¿øÀý»ç±Ý¾× Àç¼³Á¤(¿ø´ÜÀ§ Àý»ç)
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt", (Math.floor(sTotrcptpayamt / 10) * 10));
		var sRcptPayAmt = sTotrcptpayamt - parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt"));
		model.setValue("/root/main/admi_info/ordamt/admispec/admi_restamt", sRcptPayAmt);

		//°¡Åð¿ø±Ý º¯°æ ÈÄ ´Ù½Ã °¡Åð¿ø±Ý °è»êÀ» Çϱâ À§ÇØ ³³ºÎ±Ý¾×À» ¼¼ÆÃÇÔ.
		model.setValue("/root/temp1/admi_orgrcptpayamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt"));


		rdo_rcptmthd.value = "3"; 	//1-Ä«µå, 2-Çö±Ý¿µ¼öÁõ, 3-Çö±Ý
		fRcptMthd("3"); 			//1-Ä«µå, 2-Çö±Ý¿µ¼öÁõ, 3-Çö±Ý

		model.refresh();
	}


	//¿µ¼öÁõ Àç¹ßÇà ¼öÁ¤½Ã fRcptIss2 °°ÀÌ ¼öÁ¤
	function fRcptIss() {
	    
		//¿µ¼öÁõ Àç¹ßÇà(¿øº»)
		model.removenode("/root/temp/receipt");
		//¼±ÅÃµÈ row Àд´Ù.
		var i = grd_rcptamt.row;

		var srow = grd_inpatinfo.row
		if (srow <= 0 ) {
			srow = 1;
		}

		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mig") == "Y") {
			if (model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptflag") != "C01") {
				messageBox("¸¶À̱׷¹ÀÌ¼Ç µ¥ÀÌÅÍ´Â ¿µ¼öÁõ Àç¹ßÇàÀ» ÇÒ ¼ö ¾ø½À´Ï´Ù.","I999","");
				return;
			}
		}

		var srcptflag = model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptflag");
		var drgflag = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_drgyn");
		
        // ¿µ¼öÁõ Àç¹ßÇà °¡´É¿©ºÎ °ËÁõ
        if (srcptflag == "B31") {
            if (!fGetISCLNoRcptKey("P")) {
                return;
            }
		}
		
		if (srcptflag == "" || srcptflag == null || srcptflag == "E50" || srcptflag == "E70" ) {
			return;
		}
		model.makeValue("/root/temp/receipt/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
		model.makeValue("/root/temp/receipt/rcptdd", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptdd"));
		model.makeValue("/root/temp/receipt/rcptno", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptno"));
		model.makeValue("/root/temp/receipt/rcptseqno", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptseqno"));
		model.makeValue("/root/temp/receipt/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
		model.makeValue("/root/temp/receipt/instcd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_instcd"));
		model.makeValue("/root/temp/receipt/fromdd", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/fromdd"));
		model.makeValue("/root/temp/receipt/todd", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/todd"));
		model.makeValue("/root/temp/receipt/mskind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind"));
		model.makeValue("/root/temp/receipt/insukind", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/insukind"));
		model.makeValue("/root/temp/receipt/suppkind", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/suppkind"));
		model.makeValue("/root/temp/receipt/orddeptcd", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/orddeptcd"));
		model.makeValue("/root/temp/receipt/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno"));
		model.makeValue("/root/temp/receipt/roomcd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_roomcd"));
		model.makeValue("/root/temp/receipt/disccd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_disccd"));
		model.makeValue("/root/temp/receipt/rareobstflag", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_rareobstflag"));
		model.makeValue("/root/temp/receipt/brateflag", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag"));
		model.makeValue("/root/temp/receipt/ordreqformflag", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordreqformflag"));
		model.makeValue("/root/temp/receipt/ioflag", "I");

		if (srcptflag == "B01" ||srcptflag == "B03" ||srcptflag == "B41" ||srcptflag == "B43") {
			//ordtype : Åð¿ø¿µ¼öÁõ/ÀÔ¿øÁß°£±Ý¿µ¼öÁõ/Åð¿ø°è»ê¼­/Áß°£°è»ê¼­
			//if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") == "E") {
			//	model.makeValue("/root/temp/receipt/ordtype", "ÀÔ¿øÁß°£±Ý¿µ¼öÁõ" );
			//} else {
				model.makeValue("/root/temp/receipt/ordtype", "ÀÔ¿øÁß°£±Ý¿µ¼öÁõ" );
			//}
        } else if (srcptflag == "B11") {    //ÀÔ¿øÁß°£¼ö³³¿µ¼öÁõ
            model.makeValue("/root/temp/receipt/ordtype", "ÀÔ¿øÁß°£¼ö³³¿µ¼öÁõ" );
		} else if (srcptflag == "B31" || srcptflag == "B33") {	//°¡Åð¿ø, Åð¿ø¿µ¼öÁõ
		    
		    // °ú°Å B31¿¡ ´ëÇÑ ¿µ¼öÁõ ÀçÃâ·Â Á¦¾î¿ë
		    // °ú°ÅÀÇ ¿µ¼öÁõÀÎ °æ¿ì¿¡¸¸ isclhistyn = 'Y'¸¦ ¼³Á¤
		    if (model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptstat") != 'Y') {
		        model.makeValue("/root/temp/receipt/isclhistyn", "Y");
		    }
		    if ( drgflag == "Y") {
		    	model.makeValue("/root/temp/receipt/ordtype", "DRGÅð¿ø¿µ¼öÁõ");
		    } else {
			//ordtype : Åð¿ø¿µ¼öÁõ/ÀÔ¿øÁß°£±Ý¿µ¼öÁõ/Åð¿ø°è»ê¼­/Áß°£°è»ê¼­
				model.makeValue("/root/temp/receipt/ordtype", "Åð¿ø¿µ¼öÁõ" );
				} 
			//model.makeValue("/root/temp/receipt/ioflag", "I");
		} else if (srcptflag == "B21" || srcptflag == "B23") {
			model.makeValue("/root/temp/receipt/ordtype", "°¡Åð¿ø¿µ¼öÁõ" );
			//model.makeValue("/root/temp/receipt/ioflag", "I");
		} else if (srcptflag == "B51" || srcptflag == "B53") {	//ÀϹݿµ¼öÁõÀ¸·Î Ãâ·Â
			model.makeValue("/root/temp/receipt/ordtype", "ÀÔ¿øÁß°£±Ý¿µ¼öÁõ" );
		} else if (srcptflag == "C01") {
			model.makeValue("/root/temp/receipt/ordtype", "¹Ì¼ö¿µ¼öÁõ");
		}

		if (model.getValue("/root/init/option/engreceipt") == "Y") {
			model.makeValue("/root/temp/receipt/engYN", "Y");  	//ÀÔ¿ø ¿µ¹® ¿µ¼öÁõ Ãâ·Â.
		} else {
			model.makeValue("/root/temp/receipt/engYN", "N");  	//ÀÔ¿ø ¿µ¹® ¿µ¼öÁõ Ãâ·Â.
		}

		model.makeValue("/root/temp/receipt/reprintYN", "N" );	//Àç¹ßÇà¿©ºÎ
		model.makeValue("/root/temp/receipt/ordtype_org", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype"));	// Áø·á±¸ºÐ

		//¿µ¼öÁõ Æ˾÷È­¸é È£Ãâ
		//modal("../../../pam/pamcomnweb/xrw/SPPAO01900_¿µ¼öÁõÃâ·Â", "1", "100", "100" ,"SPPAO01900_¿µ¼öÁõÃâ·Â", "", "");
		modal("SPPAO01900");
		//modal("SPPAO01900" );
		//Ãâ·Â ÈÄ ³ëµå »èÁ¦
		model.removenode("/root/temp/receipt");
	}

	function fRcptIss2() {
		//¿µ¼öÁõ Àç¹ßÇà(»çº»)
		model.removenode("/root/temp/receipt");
		//¼±ÅÃµÈ row Àд´Ù.
		var i = grd_rcptamt.row;

		var srow = grd_inpatinfo.row
		if (srow <= 0 ) {
			srow = 1;
		}
		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mig") == "Y") {
			if (model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptflag") != "C01") {
				messageBox("¸¶À̱׷¹ÀÌ¼Ç µ¥ÀÌÅÍ´Â ¿µ¼öÁõ Àç¹ßÇàÀ» ÇÒ ¼ö ¾ø½À´Ï´Ù.","I999","");
				return;
			}
		}

		var srcptflag = model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptflag");
		var drgflag = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_drgyn");
		
		// ¿µ¼öÁõ Àç¹ßÇà °¡´É¿©ºÎ °ËÁõ
        if (srcptflag == "B31") {
            if (!fGetISCLNoRcptKey("P")) {
                return;
            }
        }
		
		if (srcptflag == "" || srcptflag == null || srcptflag == "E50" || srcptflag == "E70" ) {
			return;
		}
		model.makeValue("/root/temp/receipt/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
		model.makeValue("/root/temp/receipt/rcptdd", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptdd"));
		model.makeValue("/root/temp/receipt/rcptno", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptno"));
		model.makeValue("/root/temp/receipt/rcptseqno", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptseqno"));
		model.makeValue("/root/temp/receipt/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
		model.makeValue("/root/temp/receipt/instcd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_instcd"));
		model.makeValue("/root/temp/receipt/fromdd", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/fromdd"));
		model.makeValue("/root/temp/receipt/todd", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/todd"));
		model.makeValue("/root/temp/receipt/mskind", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_mskind"));
		model.makeValue("/root/temp/receipt/insukind", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/insukind"));
		model.makeValue("/root/temp/receipt/suppkind", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/suppkind"));
		model.makeValue("/root/temp/receipt/orddeptcd", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/orddeptcd"));
		model.makeValue("/root/temp/receipt/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno"));
		model.makeValue("/root/temp/receipt/roomcd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_roomcd"));
		model.makeValue("/root/temp/receipt/disccd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_disccd"));
		model.makeValue("/root/temp/receipt/rareobstflag", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_rareobstflag"));
		model.makeValue("/root/temp/receipt/brateflag", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag"));
		model.makeValue("/root/temp/receipt/ordreqformflag", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordreqformflag"));
		model.makeValue("/root/temp/receipt/ioflag", "I");
		if (srcptflag == "B01" || srcptflag == "B03" ||srcptflag == "B41" ||srcptflag == "B43") {
			//ordtype : Åð¿ø¿µ¼öÁõ/ÀÔ¿øÁß°£±Ý¿µ¼öÁõ/Åð¿ø°è»ê¼­/Áß°£°è»ê¼­
			//if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") == "E") {
			//	model.makeValue("/root/temp/receipt/ordtype", "ÀÀ±Þ¿µ¼öÁõ" );
			//} else {
				model.makeValue("/root/temp/receipt/ordtype", "ÀÔ¿øÁß°£±Ý¿µ¼öÁõ" );
			//}
        } else if (srcptflag == "B11") {    //ÀÔ¿øÁß°£¼ö³³¿µ¼öÁõ
            model.makeValue("/root/temp/receipt/ordtype", "ÀÔ¿øÁß°£¼ö³³¿µ¼öÁõ" );
		} else if (srcptflag == "B31" || srcptflag == "B33") {	//°¡Åð¿ø, Åð¿ø¿µ¼öÁõ
			//ordtype : Åð¿ø¿µ¼öÁõ/ÀÔ¿øÁß°£±Ý¿µ¼öÁõ/Åð¿ø°è»ê¼­/Áß°£°è»ê¼­
			
			if ( drgflag == "Y") {
		    	model.makeValue("/root/temp/receipt/ordtype", "DRGÅð¿ø¿µ¼öÁõ");
		  } else {
				model.makeValue("/root/temp/receipt/ordtype", "Åð¿ø¿µ¼öÁõ" );
			}	
			//model.makeValue("/root/temp/receipt/ioflag", "I");
		} else if (srcptflag == "B21" || srcptflag == "B23") {
			model.makeValue("/root/temp/receipt/ordtype", "°¡Åð¿ø¿µ¼öÁõ" );
			//model.makeValue("/root/temp/receipt/ioflag", "I");
		} else if (srcptflag == "B51" || srcptflag == "B53") {
			model.makeValue("/root/temp/receipt/ordtype", "ÀÔ¿øÁß°£±Ý¿µ¼öÁõ" );
		} else if (srcptflag == "C01") {
			model.makeValue("/root/temp/receipt/ordtype", "¹Ì¼ö¿µ¼öÁõ");
		}

		if (model.getValue("/root/init/option/engreceipt") == "Y") {
			model.makeValue("/root/temp/receipt/engYN", "Y");  	//ÀÔ¿ø ¿µ¹® ¿µ¼öÁõ Ãâ·Â.
		} else {
			model.makeValue("/root/temp/receipt/engYN", "N");  	//ÀÔ¿ø ¿µ¹® ¿µ¼öÁõ Ãâ·Â.
		}

		model.makeValue("/root/temp/receipt/reprintYN", "Y" );	//Àç¹ßÇà¿©ºÎ
		model.makeValue("/root/temp/receipt/ordtype_org", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype"));	// Áø·á±¸ºÐ

		//¿µ¼öÁõ Æ˾÷È­¸é È£Ãâ
		//modal("../../../pam/pamcomnweb/xrw/SPPAO01900_¿µ¼öÁõÃâ·Â", "1", "100", "100" ,"SPPAO01900_¿µ¼öÁõÃâ·Â", "", "");
		modal("SPPAO01900");
		//modal("SPPAO01900" );

		//Ãâ·Â ÈÄ ³ëµå »èÁ¦
		model.removenode("/root/temp/receipt");
	}
	
	//û±¸¼ö³³ ¹Ì¼ö³»¿ª È®ÀÎ
	function fRcptUnco() {

		//¼±ÅÃµÈ row Àд´Ù.
		var i = grd_rcptamt.row;

		var srow = grd_inpatinfo.row
		if (srow <= 0 ) {
			srow = 1;
		}
		
		var srcptflag = model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptflag");
		
		if (srcptflag != "B33" && srcptflag != "B31" ) {
			return;
		}
		
		if (model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/uncoamt") == "0") {
			return;
		}
		
		model.resetInstanceNode("/root/send/data10");
		
		model.makeValue("/root/send/data10/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
		model.makeValue("/root/send/data10/rcptdd", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptdd"));
		model.makeValue("/root/send/data10/rcptno", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptno"));
		model.makeValue("/root/send/data10/rcptseqno", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptseqno"));
		model.makeValue("/root/send/data10/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
		model.makeValue("/root/send/data10/instcd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_instcd"));
		model.makeValue("/root/send/data10/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno"));

		if (submit("TRPAI00134") == true) {
			if (model.getValue("/root/temp_node/frcptuncocd/rcptuncocd/pid") != "") {
				var sUncoCd = "";
				var sUncoNm = "";
				var sUncoAmt = "";
				var sUncMsg = "";
				
				var sCount = getNodesetCount("/root/temp_node/frcptuncocd/rcptuncocd");
				for(var i=1; i<=sCount; i++) {
					sUncoCd = model.getValue("/root/temp_node/frcptuncocd/rcptuncocd[" + i + "]/uncocd");
					sUncoNm = model.getValue("/root/temp_node/frcptuncocd/rcptuncocd[" + i + "]/unconm");
					sUncoAmt = model.getValue("/root/temp_node/frcptuncocd/rcptuncocd[" + i + "]/uncoamt");
					sUncMsg = sUncMsg + sUncoCd + " - " + sUncoNm + "   [ " + sUncoAmt + " ¿ø]\n";
				}
				messageBox(sUncMsg,"I999","");
				model.resetInstanceNode("/root/temp_node/frcptuncocd")
			}
		}
		
		model.resetInstanceNode("/root/send/data10");
	}

	//°è»ê¼­ Àç¹ßÇà
	function fCalcIss() {
		if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid") == "") {
			return;
		}
		//¿µ¼öÁõ Àç¹ßÇà
		model.removenode("/root/temp/receipt");
		//¼±ÅÃµÈ row Àд´Ù.
		var i = grd_rcptamt.row;

		var srow = grd_inpatinfo.row
		if (srow <= 0 ) {
			srow = 1;
		}

		if (model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptflag") =="E70" || model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptflag") =="E50") {
		} else {
			messageBox("Ãâ·ÂÇÒ °è»ê¼­¸¦ ¼±ÅÃÇÏ¿© ÁֽʽÿÀ..", "I999");
			return;
		}

		if (i == 0) {
			messageBox("Ãâ·ÂÇÒ °è»ê¼­¸¦ ¼±ÅÃÇÏ¿© ÁֽʽÿÀ.", "I999");
			return;
		}

		if (model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptstat") =="D") {
			messageBox("ÀÌ¹Ì »èÁ¦µÈ °è»ê¼­ ÀÔ´Ï´Ù.", "I999");
			return;
		}

		var srcptflag = model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptflag");

		if (srcptflag == "" || srcptflag == null || srcptflag == "B01" || srcptflag == "B21" || srcptflag == "B31" || srcptflag == "B51") {
			return;
		}
		model.makeValue("/root/temp/receipt/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
		model.makeValue("/root/temp/receipt/rcptdd", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptdd"));
		model.makeValue("/root/temp/receipt/rcptno", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptno"));
		model.makeValue("/root/temp/receipt/rcptseqno", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/rcptseqno"));
		model.makeValue("/root/temp/receipt/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
		model.makeValue("/root/temp/receipt/instcd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_instcd"));
		model.makeValue("/root/temp/receipt/fromdd", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/fromdd"));
		model.makeValue("/root/temp/receipt/todd", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/todd"));
		model.makeValue("/root/temp/receipt/mskind", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_mskind"));
		model.makeValue("/root/temp/receipt/insukind", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/insukind"));
		model.makeValue("/root/temp/receipt/suppkind", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/suppkind"));
		model.makeValue("/root/temp/receipt/orddeptcd", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/orddeptcd"));
		model.makeValue("/root/temp/receipt/seqno", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + i + "]/seqno"));

		model.makeValue("/root/temp/receipt/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno"));
		model.makeValue("/root/temp/receipt/roomcd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_roomcd"));
		model.makeValue("/root/temp/receipt/disccd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_disccd"));
		model.makeValue("/root/temp/receipt/rareobstflag", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_rareobstflag"));
		model.makeValue("/root/temp/receipt/ioflag", "I");

		if (srcptflag == "E50") {
			model.makeValue("/root/temp/receipt/ordtype", "Áß°£°è»ê¼­" );
			model.makeValue("/root/temp/receipt/reprintYN", "N" );	//Àç¹ßÇà¿©ºÎ
			model.makeValue("/root/temp/receipt/ret_act_label", "û±¸¼­");		//Áß°£°è»ê¼­ ÀÏ °æ¿ì û±¸¼­, ¿µ¼öÁõ ¿©ºÎ
			model.makeValue("/root/temp/receipt/ret_act_form", "¿µ¼öÁõ¾ç½Ä");	//¿µ¼öÁõ¾ç½Ä, Áß°£°è»ê¼­¾ç½Ä
			model.makeValue("/root/temp/receipt/rcptexe_label", "¼ö³³ÇÒ ±Ý¾×");	//¼ö³³±Ý¾×ºÎºÐ¶óº§
			model.makeValue("/root/temp/receipt/endmidflag", "Áß°£");		//Åð¿ø, Áß°£(¿µ¼öÁõ »ó´Ü üũ¹Ú½º)
		} else {
			model.makeValue("/root/temp/receipt/ordtype", "Åð¿ø°è»ê¼­" );
			model.makeValue("/root/temp/receipt/reprintYN", "N" );	//Àç¹ßÇà¿©ºÎ
		}
		if (model.getValue("/root/init/option/engreceipt") == "Y") {
			model.makeValue("/root/temp/receipt/engYN", "Y");  	//ÀÔ¿ø ¿µ¹® ¿µ¼öÁõ Ãâ·Â.
		} else {
			model.makeValue("/root/temp/receipt/engYN", "N");  	//ÀÔ¿ø ¿µ¹® ¿µ¼öÁõ Ãâ·Â.
		}

		modal("SPPAO01900");
		//modal("SPPAO01900" );

		//Ãâ·Â ÈÄ ³ëµå »èÁ¦
		model.removenode("/root/temp/receipt");
	}

	//°è»ê¼­³»¿ª »èÁ¦
	function fCalcDel() {
		if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdd") != "99991231") {
			messageBox("Åð¿øȯÀÚÀÇ °è»ê¼­ ³»¿ªÀº »èÁ¦ÇÒ ¼ö", "I004","")
			return;
		}
		var iphssrow = grd_inpatinfo.row;
		if (iphssrow <= 0) {
			iphssrow = 1;
		}

		var srow = grd_rcptamt.row;

		if (srow == 0) {
			messageBox("»èÁ¦ÇÒ °è»ê¼­¸¦ ¼±ÅÃÇÏ¿© ÁֽʽÿÀ.", "I999");
			return;
		}

		if (model.getValue("/root/main/admi_info/admi/grdclamrcpt[" +srow + "]/rcptstat") =="D") {
			messageBox("ÀÌ¹Ì »èÁ¦µÈ °è»ê¼­ ÀÔ´Ï´Ù.", "I999");
			return;
		}

		model.removenode("/root/send/data5");
		model.makeValue("/root/send/data5/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
		model.makeValue("/root/send/data5/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
		model.makeValue("/root/send/data5/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ iphssrow +"]/iphs_cretno"));
		model.makeValue("/root/send/data5/instcd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_instcd"));
		model.makeValue("/root/send/data5/seqno", model.getValue("/root/main/admi_info/admi/grdclamrcpt[" +srow + "]/seqno"));

		if (submit("TXPAI00104") == true) {
			fCalcInfo("2");
			//fOrdAmtInfo();
			//fRcptInfo("1");
			//Áø·áºñ³»¿ª,û±¸¼ö³³ ³»¿ª
			fRcpt_AllInfo("Y","Y","1");
		}

	}

	//Åð¿ø°è»ê¼­ »ý¼º
	function fDschCalcIns() {

		var srow = grd_inpatinfo.row;

		if (srow <= 0) {
			srow = 1;
		}
		//À¯ÇüÀÌ ºÐ¸® µÇ¾úÀ» °æ¿ì ÀÌÀü À¯Çü¿¡ ´ëÇؼ­ Åð¿ø °è»ê¼­ »ý¼ºÀº Áß°£Ã»±¸°¡ µÇ¾î ÀÖ¾î¾ß ÇÔ.
		//¸¶Áö¸· À¯Çü(À¯ÇüÀÌ Çϳª ÀÏ°æ¿ì)Åð¿ø°è»ê¼­ »ý¼ºÀº º¸Çè½É»ç°¡ ¿Ï·á µÇ¾î ÀÖ¾î¾ß ÇÔ.
//				if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd") == "99991231") {
//					messageBox("¼±ÅÃÇϽŠÀ¯ÇüÀº Åð¿ø°è»ê¼­¸¦ »ý¼º", "E001", "");
//					return;
//				}
//				if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdd") == model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd")) {
//					messageBox("¼±ÅÃÇϽŠÀ¯ÇüÀº Åð¿ø°è»ê¼­¸¦ »ý¼º", "E001", "");
//					 return;
//				}

		if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_totamt") == "0") {
			messageBox("Áø·áºñÃѾ×ÀÌ 0¿ø ÀÔ´Ï´Ù. Åð¿ø°è»ê¼­¸¦ »ý¼º ÇÒ ¼ö ¾ø½À´Ï´Ù.", "I999");
			return;
		}

		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_rcptyn") == "Y") {
			if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_indschacptstat") != "T") {
				messageBox("¼ö³³ÀÌ ¿Ï·áµÇ¾î Åð¿ø°è»ê¼­¸¦ »ý¼º", "E001", "");
				 return;
			}
		}

		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd") == "99991231") {
			if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_dschjudgprcsstat") == "A" ||
			   model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_dschjudgprcsstat") == "B") {
				messageBox("½É»ç°¡ ¿Ï·á µÇ¾î ÀÖÁö ¾Ê¾Æ Åð¿ø°è»ê¼­¸¦ »ý¼º", "E001", "");
				return;
			}
			var stodd = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt").substr(0, 8);
			var sorgtodd = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd");
		} else {
			if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_dschjudgprcsstat") == "A" ||
			   model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_dschjudgprcsstat") == "B") {
				var slastmdlclamdd = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_lastmdlclamdd");
				if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd") > slastmdlclamdd) {
					messageBox("¼±ÅÃÇϽŠÀ¯ÇüÀº Áß°£Ã»±¸°¡ µÇÁö ¾Ê¾Æ Åð¿ø°è»ê¼­¸¦ »ý¼º", "E001", "");
					 return;
				}
			}
			var stodd = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd");
			var sorgtodd = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd");
		}

		model.removenode("/root/send/data5");
		model.makeValue("/root/send/data5/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"));
		model.makeValue("/root/send/data5/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno"));
		model.makeValue("/root/send/data5/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
		model.makeValue("/root/send/data5/instcd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_instcd"));
		model.makeValue("/root/send/data5/mskind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind"));
		model.makeValue("/root/send/data5/insukind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind"));
		model.makeValue("/root/send/data5/suppkind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind"));
		model.makeValue("/root/send/data5/fromdd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd"));
		//todd°¡ 99991231 ÀÏ °æ¿ì Åð¿øÅ뺸ÀÏÀڷΠó¸®(È®ÀÎÇÊ¿ä)
		model.makeValue("/root/send/data5/todd", stodd);
		model.makeValue("/root/send/data5/orgtodd", sorgtodd);
		model.makeValue("/root/send/data5/flag", "I");
		model.makeValue("/root/send/data5/wardcd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_wardcd"));
		model.makeValue("/root/send/data5/roomcd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_roomcd"));

		model.makeValue("/root/send/data5/orddeptcd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_orddeptcd"));
		model.makeValue("/root/send/data5/medispclid", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_medispclid"));
		model.makeValue("/root/send/data5/disccd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_disccd"));
		model.makeValue("/root/send/data5/rcptflag", "E70");
		model.makeValue("/root/send/data5/ownbmaxgradeflag", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_ownbmaxgradeflag"));

		if (submit("TXPAI00105") == true) {
			fCalcInfo("2");
			//fOrdAmtInfo();
			//fRcptInfo("1");
			//Áø·áºñ³»¿ª,û±¸¼ö³³ ³»¿ª
			fRcpt_AllInfo("Y","Y","1");
			messageBox("Åð¿ø°è»ê¼­ »ý¼ºÀÌ", "I002", "");
		}


	}

	function fCardCashNo() {
		
	    //1-Ä«µå
		if(model.getValue("/root/main/admi_info/rcptmthd/rcptmthd") == "1"){
			model.setValue("/root/main/admi_info/rcptmthd/cashmthd"					, "00"); 	//00-¼Òµæ°øÁ¦, 01-ÁöÃâÁõºñ, 02-¹Ì½ÂÀÎ
			if ((ipt_cardcashno.currentText).length >16) {
				//16ÀÚ¸®º¸´Ù Å©¸é, "="ÀÌ ÀÖÀ¸¸é, swipe
				if ( (ipt_cardcashno.currentText).indexOf("=") >0  ) {
					var vSwipeData = "";
					var vCardno_array = "";
					var vCardno = "";

					//vSwipeData = model.getValue("/root/main/outrgst/m_etc/cardno");
					vSwipeData =  ipt_cardcashno.currentText;
					// swipe ½Ã ù±ÛÀÚ¿¡ ?
					if ( vSwipeData.indexOf("?") >= 0 ) {
						vSwipeData = (vSwipeData).substr(1,37);
					}

					if ( vSwipeData.indexOf("/") >= 0 ) {
						vSwipeData = (vSwipeData).substr(1,37);
					}
					model.setValue("/root/main/admi_info/rcptmthd/swipedata" 		, vSwipeData );
					
					vCardno_array = vSwipeData.split("=");
					vCardno = vCardno_array[0];
					// swipe ½Ã ù±ÛÀÚ¿¡ ?
					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);
					model.setValue("/root/main/admi_info/rcptmthd/cardcashno" 		, vCardno);
					model.setValue("/root/main/admi_info/rcptmthd/keyinptflag" 		, "S");
					model.setValue("/root/main/admi_info/rcptmthd/validterm" 		, vValiterm);
					model.setValue("/root/main/admi_info/rcptmthd/allotmm" 			, "00");
					model.refresh();
					model.setFocus("ipt_allotmm");
				}
			} else if ((ipt_cardcashno.currentText).length ==16) {
				model.setValue("/root/main/admi_info/rcptmthd/cardcashno" 			, ipt_cardcashno.currentText);
				model.setValue("/root/main/admi_info/rcptmthd/keyinptflag" 			, "K");
				model.refresh();
				model.setFocus("ipt_valiterm");
			}
		
		// 2-Çö±Ý¿µ¼öÁõ
		}else if( model.getValue("/root/main/admi_info/rcptmthd/rcptmthd") == "2"){
			model.setValue("/root/main/admi_info/rcptmthd/cashmthd" 				, "00"); 	//00-¼Òµæ°øÁ¦, 01-ÁöÃâÁõºñ, 02-¹Ì½ÂÀÎ
			model.setValue("/root/main/admi_info/rcptmthd/cardcashno", ipt_cardcashno.currentText);
			
            // ICPos´Ü¸»±âÀÇ °æ¿ì Çö±Ý¿µ¼öÁõÄ«µå¹øÈ£´Â ´Ü¸»±â¸¦ ÅëÇؼ­ ÀÔ·Â
            if (model.getValue("/root/init/PAM/P0032list/P0032[cdid = '200']/cdnm") != "KOCES_IC"
                    || model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmflag") != "3") {
			
    		  	//Çö±Ý¿µ¼öÁõ
    			//rdo_indyn.disabled = false;
    			//20100401 Çö±Ý¿µ¼öÁõ Àǹ«È­
    			
    			//Çö±Ý¿µ¼öÁõ ¼±ÅýÃ
    			if ((ipt_cardcashno.currentText).length >16) {
    				//16ÀÚ¸®º¸´Ù Å©¸é,
    				//"="ÀÌ ÀÖÀ¸¸é, swipe
    				if((ipt_cardcashno.currentText).indexOf("=") > 0){
    					var vSwipeData = "";
    					var vCardno_array = "";
    					var vCardno = "";
    
    					//vSwipeData = model.getValue("/root/main/outrgst/m_etc/cardno");
    					vSwipeData =  ipt_cardcashno.currentText;
    					//swipe ½Ã ù±ÛÀÚ¿¡ ?
    					if ( vSwipeData.indexOf("?") >= 0 ) {
    						vSwipeData = (vSwipeData).substr(1,37);
    					}
    					if ( vSwipeData.indexOf("/") >= 0 ) {
    						vSwipeData = (vSwipeData).substr(1,37);
    					}
    					vSwipeData = vSwipeData.getRightPad(40, " ");
    					model.setValue("/root/main/admi_info/rcptmthd/swipedata", vSwipeData );
    					
    					vCardno_array = vSwipeData.split("=");
    					vCardno = vCardno_array[0];
    					// swipe ½Ã ù±ÛÀÚ¿¡ ?
    					if ( vCardno.indexOf("?") >= 0 ) {
    						vCardno = (vCardno).substr(1,16);
    					}
    					//À¯È¿ÀÏÀÚ
    					var vValiterm = (vCardno_array[1]).substr(0,4);
    					model.setValue("/root/main/admi_info/rcptmthd/cardcashno"			, vCardno);
    					model.setValue("/root/main/admi_info/rcptmthd/keyinptflag"			, "S");
    					model.setValue("/root/main/admi_info/rcptmthd/qualcnfmflag"			, "3"); 		//Çö±Ý¿µ¼öÁõÈ®Àα¸ºÐ(1.ÁÖ¹Î,2.ÀüÈ­,3.Ä«µå,4.»ç¾÷ÀÚ)
    					model.setValue("/root/main/admi_info/rcptmthd/allotmm"				, model.getValue("/root/main/admi_info/rcptmthd/cashmthd") ); 		//Çö±Ý¿µ¼öÁõÀ϶§´Â ÇҺΰ³¿ù¿¡ ¹ýÀÎ/°³Àα¸ºÐ(°³ÀÎ:00 »ç¾÷ÀÚ:01)
    				}
    				//2013-01-28 
    				//Çö±Ý¿µ¼öÁõ »ç¾÷ÀÚ Ä«µå
    				vCardno = model.getValue("/root/main/admi_info/rcptmthd/cardcashno");
    				if( vCardno.length == 18 && vCardno.substr(8, 1) == '9' ){
    					model.setValue("/root/main/admi_info/rcptmthd/qualcnfmflag" 		, "3"); 		//Çö±Ý¿µ¼öÁõÈ®Àα¸ºÐ(1.ÁÖ¹Î,2.ÀüÈ­,3.Ä«µå,4.»ç¾÷ÀÚ)
    					model.setValue("/root/main/admi_info/rcptmthd/allotmm" 				, '01');		//Çö±Ý¿µ¼öÁõÀ϶§´Â ÇҺΰ³¿ù¿¡ ¹ýÀÎ/°³Àα¸ºÐ(°³ÀÎ:00 »ç¾÷ÀÚ:01)
    					model.setValue("/root/main/admi_info/rcptmthd/cashmthd" 			, '01');
    				}
    				model.refresh();
    				model.setFocus("ipt_cashamt");
    				
    			} else if ((ipt_cardcashno.currentText).length == 16){
    				var vSwipeData = "";
    				vSwipeData = model.getValue("/root/main/admi_info/rcptmthd/cardcashno")+"=";
    				vSwipeData = vSwipeData.getRightPad(40, " ");
    
    				model.setValue("/root/main/admi_info/rcptmthd/swipedata" 				, vSwipeData);
    				model.setValue("/root/main/admi_info/rcptmthd/keyinptflag" 				, "K");
    				model.setValue("/root/main/admi_info/rcptmthd/qualcnfmflag" 			, "3"); 		//Çö±Ý¿µ¼öÁõÈ®Àα¸ºÐ(1.ÁÖ¹Î,2.ÀüÈ­,3.Ä«µå,4.»ç¾÷ÀÚ)
    				model.refresh();
    				//model.setFocus("ipt_cashamt");
    
    			} else {
    			    
    				//16ÀÚ¸®º¸´Ù ÀÛÀ¸¸é, ÁֹιøÈ£ ȤÀº ÀüÈ­¹øÈ£ »ç¾÷Àå¹øÈ£
    				var vSwipeData = "";
    				vSwipeData = model.getValue("/root/main/admi_info/rcptmthd/cardcashno")+"=";
    				vSwipeData = vSwipeData.getRightPad(40, " ");
    
    				model.setValue("/root/main/admi_info/rcptmthd/swipedata" 				, vSwipeData);
    				model.setValue("/root/main/admi_info/rcptmthd/keyinptflag" 				, "K");
    
    				//±æÀÌ°¡ 13ÀÚ¸®À̸é,ÁֹιøÈ£
    				if (model.getValue("/root/main/admi_info/rcptmthd/cardcashno").length == 13 ){
    					model.setValue("/root/main/admi_info/rcptmthd/qualcnfmflag","1");
    				}else{
    					//¾Õ 3ÀÚ¸® 010,011,016,017,018,019 À̸é ÀüÈ­
    					if ( (model.getValue("/root/main/admi_info/rcptmthd/cardcashno")).substr(0,3)  == "010"  ||
    						 (model.getValue("/root/main/admi_info/rcptmthd/cardcashno")).substr(0,3)  == "011"  ||
    						 (model.getValue("/root/main/admi_info/rcptmthd/cardcashno")).substr(0,3)  == "016"  ||
    						 (model.getValue("/root/main/admi_info/rcptmthd/cardcashno")).substr(0,3)  == "017"  ||
    						 (model.getValue("/root/main/admi_info/rcptmthd/cardcashno")).substr(0,3)  == "018"  ||
    						 (model.getValue("/root/main/admi_info/rcptmthd/cardcashno")).substr(0,3)  == "019"
    					  ) {
    						model.setValue("/root/main/admi_info/rcptmthd/qualcnfmflag" 	, "2"); 			//Çö±Ý¿µ¼öÁõÈ®Àα¸ºÐ(1.ÁÖ¹Î,2.ÀüÈ­,3.Ä«µå,4.»ç¾÷ÀÚ)
    					} else {
    						//16ÀÚ¸® ±æÀÌ ¹Ì¸¸ÀÏ ¶§ 13ÀÚ¸® ÁֹιøÈ£ Á¦¿Ü ÈÄ ÇÚµåÆù ¾ÕÀÚ¸® üũ ³ª¸ÓÁö´Â »ç¾÷Àå
    						model.setValue("/root/main/admi_info/rcptmthd/qualcnfmflag" 	, "4"); 			//Çö±Ý¿µ¼öÁõÈ®Àα¸ºÐ(1.ÁÖ¹Î,2.ÀüÈ­,3.Ä«µå,4.»ç¾÷ÀÚ)
    						model.setValue("/root/main/admi_info/rcptmthd/cashmthd" 		, "01");			//00-¼Òµæ°øÁ¦, 01-ÁöÃâÁõºñ, 02-¹Ì½ÂÀÎ
    					}
    				}
    				model.refresh();
    				//model.setFocus("ipt_cashamt");
    			}
            }
			//1-Ä«µå, 2-Çö±Ý¿µ¼öÁõ, 3-Çö±Ý
//			} else if ( model.getValue("/root/main/admi_info/rcptmthd/rcptmthd") == "3" ){
//				model.setValue("/root/main/admi_info/rcptmthd/rcptmthd", "1");
//				model.refresh();
		// 3-Çö±Ý
		}else{
			model.setValue("/root/main/admi_info/rcptmthd/cashmthd" 					, "00"); 	//00-¼Òµæ°øÁ¦, 01-ÁöÃâÁõºñ, 02-¹Ì½ÂÀÎ
			model.setValue("/root/main/admi_info/rcptmthd/cardcashno" 					, "");
			model.setValue("/root/main/admi_info/rcptmthd/validterm" 					, "");
			model.setValue("/root/main/admi_info/rcptmthd/allotmm" 						, "");
			model.setValue("/root/main/admi_info/rcptmthd/swipedata" 					, "");
		}
	}

	function fPrcpCodeUncoChk() {
		//ÀÓ»ó¹Ì¼ö üũ
		var srow = grd_inpatinfo.row
		//Àç¿øÁ¤º¸ grid ¼±ÅÃÀÌ ¾øÀ»½Ã 1¹ø°¸¦ ¼±ÅÃÇϵµ·Ï ÇÑ´Ù
		if (srow <= 0 ) {
			srow = 1;
		}
		if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "71") {
			var iRcptAmt = model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt");
			messageBox("ÀÓ»óȯÀÚ ÀÔ´Ï´Ù. ¼ö³³±Ý¾×À» ¹Ì¼ö·Î »ý¼ºÇÕ´Ï´Ù.", "I999");
			//model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd", "I41");
			// 2009.10.28 - ¹Ì¼öÄÚµå ÇϵåÄÚµùÁ¦°Å
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd", model.getValue("/root/init/PAM/P0063list/P0063[cdid = 'C']/cdnm"));
			model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt", iRcptAmt);
			model.refresh();
			fReCalcAmt();

			model.removenode("/root/main/admi_info/unco/unco");
			model.makeValue("/root/main/admi_info/unco/unco/unco_pid", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_rcptdd", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_rcptno", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_rcptseqno", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_seqno", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_instcd", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_rcptstat", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_orddeptcd", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_orddrid", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_orddd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
			model.makeValue("/root/main/admi_info/unco/unco/unco_dschdd", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_insukind", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_suppkind", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_ordtype", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_uncorcptflag", "1");
			model.makeValue("/root/main/admi_info/unco/unco/unco_uncocls", "1");
			model.makeValue("/root/main/admi_info/unco/unco/unco_uncocd", model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncocd"));
			model.makeValue("/root/main/admi_info/unco/unco/unco_uncoamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt"));
			model.makeValue("/root/main/admi_info/unco/unco/unco_apprsn", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_rcptamt"	, "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_debtamt"	, "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_endyn", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_clincstdyno", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_clincstdycd"));
			model.makeValue("/root/main/admi_info/unco/unco/unco_empid", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_rcptexecdd", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_rcpttm", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_rcptrid", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_remfact", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_fstrgstrid", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_fstrgstdt", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_lastupdtrid", "");
			model.makeValue("/root/main/admi_info/unco/unco/unco_lastupdtdt", "");
		}

		//PMCMCODE cdgrupid = P0003 ÀÚµ¿¹Ì¼öÄÚµå Á¤ÀÇ
		//ó¹æÄÚµå ¹Ì¼ö ¹ß»ý, Áߺ¹À¸·Î ¹Ì¼ö°¡ ¹ß»ýÇÏÁö ¾Ê´Â´Ù°í ÇÔ.

		for(var i=1; i<=getNodesetCount("/root/main/prcpcodechk/prcpchk"); i++) {
			//bÇü°£¿° ¼öÁ÷°¨¿° ¿¹¹æÁ¢Á¾
			if (model.getValue("/root/main/prcpcodechk/prcpchk[" + i + "]/kind") != "") {

				if (model.getValue("/root/main/prcpcodechk/prcpchk[" + i + "]/kind") == "A") {
					var iunco = model.getValue("/root/main/prcpcodechk/prcpchk[" + i + "]/ownamt");
					messageBox("BÇü°£¿° ¼öÁ÷°¨¿° ¿¹¹æÁ¢Á¾ ó¹æÀÌ Á¸ÀçÇÕ´Ï´Ù.\nBÇü°£¿° ¼öÁ÷°¨¿° ¿¹¹æÁ¢Á¾ ó¹æÀÇ ±Ý¾×(" + iunco + ")À» ¹Ì¼ö·Î »ý¼ºÇÕ´Ï´Ù.", "I999");
					//model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd", "I22");		//BÇü°£¿° ¼öÁ÷°¨¿° ¿¹¹æ»ç¾÷
					// 2009.10.28 - ¹Ì¼öÄÚµå ÇϵåÄÚµùÁ¦°Å
					model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd",  model.getValue("/root/init/PAM/P0081list/P0081[cdid = 'A']/cdnm"));		//BÇü°£¿° ¼öÁ÷°¨¿° ¿¹¹æ»ç¾÷
					model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt", iunco);
					model.refresh();
					fReCalcAmt();
				}
				//¼ºÆø·Â kit
				if (model.getValue("/root/main/prcpcodechk/prcpchk[" + i + "]/kind") == "B") {
					var iunco = model.getValue("/root/main/prcpcodechk/prcpchk[" + i + "]/ownamt");
					messageBox("¼ºÆø·ÂÅ°Æ® ó¹æÀÌ Á¸ÀçÇÕ´Ï´Ù.\n¼ºÆø·ÂÅ°Æ® ó¹æÀÇ ±Ý¾×(" + iunco + ")À» ¹Ì¼ö·Î »ý¼ºÇÕ´Ï´Ù.", "I999");
					//model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd", "I23");			//¼ºÆø·ÂÅ°Æ®
					// 2009.10.28 - ¹Ì¼öÄÚµå ÇϵåÄÚµùÁ¦°Å
					model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd",  model.getValue("/root/init/PAM/P0081list/P0081[cdid = 'B']/cdnm"));			//¼ºÆø·ÂÅ°Æ®
					//model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd", "H02");		//ÀÀ±Þ½Ç ¹Ì¼ö
					model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt", iunco);
					model.refresh();
					fReCalcAmt();
				}
				//À½ÁÖäÇ÷
				if (model.getValue("/root/main/prcpcodechk/prcpchk[" + i + "]/kind") == "C") {
					var iunco = model.getValue("/root/main/prcpcodechk/prcpchk[" + i + "]/ownamt");
					messageBox("À½ÁÖ¿îÀüÀÚ Ã¤Ç÷ºñ¿ë ó¹æÀÌ Á¸ÀçÇÕ´Ï´Ù.\nÀ½ÁÖ¿îÀüÀÚ Ã¤Ç÷ºñ¿ë ó¹æÀÇ ±Ý¾×(" + iunco + ")À» ¹Ì¼ö·Î »ý¼ºÇÕ´Ï´Ù.", "I999");
					//model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd", "I24");		//¼­ÃÊ°æÂû¼­¹Ì¼ö
					// 2009.10.28 - ¹Ì¼öÄÚµå ÇϵåÄÚµùÁ¦°Å
					model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd",  model.getValue("/root/init/PAM/P0081list/P0081[cdid = 'C']/cdnm"));		//¼­ÃÊ°æÂû¼­¹Ì¼ö
					model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt", iunco);
					model.refresh();
					fReCalcAmt();
				}

				//½Å»ý¾Æ û·Â°Ë»ç
				if (model.getValue("/root/main/prcpcodechk/prcpchk[" + i + "]/kind") == "D") {
					var iunco = model.getValue("/root/main/prcpcodechk/prcpchk[" + i + "]/ownamt");
					messageBox("½Å»ý¾Æ û·Â°Ë»ç ó¹æÀÌ Á¸ÀçÇÕ´Ï´Ù.\n½Å»ý¾Æ û·Â°Ë»ç ó¹æÀÇ ±Ý¾×(" + iunco + ")À» ¹Ì¼ö·Î »ý¼ºÇÕ´Ï´Ù.", "I999");
					//model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd", "F342");		// º¸°Ç¼Ò ¹Ì¼ö - ÀÇÁ¤ºÎ¸¸ »ç¿ë
					// 2009.10.28 - ¹Ì¼öÄÚµå ÇϵåÄÚµùÁ¦°Å
					model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd",  model.getValue("/root/init/PAM/P0081list/P0081[cdid = 'D']/cdnm"));		// º¸°Ç¼Ò ¹Ì¼ö - ÀÇÁ¤ºÎ¸¸ »ç¿ë
					model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt", iunco);
					model.refresh();
					fReCalcAmt();
				}

				var nodeList =getNodesetCount("/root/main/admi_info/unco/unco");
				if (nodeList > 1) {
					messageBox("¹Ì¼ö ³»¿ªÀÌ 2°³ ÀÌ»óÀÔ´Ï´Ù. ¹Ì¼ö¾× ¹öÆ°À» Ŭ¸¯ÇÏ¿© º¯°æÇϽʽÿÀ.", "E999","");
					return;
				}

				model.removenode("/root/main/admi_info/unco/unco");
				model.makeValue("/root/main/admi_info/unco/unco/unco_pid", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_rcptdd", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_rcptno", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_rcptseqno", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_seqno", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_instcd", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_rcptstat", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_orddeptcd", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_orddrid", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_orddd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
				model.makeValue("/root/main/admi_info/unco/unco/unco_dschdd", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_insukind", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_suppkind", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_ordtype", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_uncorcptflag", "1");
				model.makeValue("/root/main/admi_info/unco/unco/unco_uncocls", "1");
				model.makeValue("/root/main/admi_info/unco/unco/unco_uncocd", model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncocd"));
				model.makeValue("/root/main/admi_info/unco/unco/unco_uncoamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt"));
				model.makeValue("/root/main/admi_info/unco/unco/unco_apprsn", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_rcptamt"	, "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_debtamt"	, "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_endyn", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_clincstdyno", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_empid", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_rcptexecdd", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_rcpttm", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_rcptrid", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_remfact", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_fstrgstrid", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_fstrgstdt", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_lastupdtrid", "");
				model.makeValue("/root/main/admi_info/unco/unco/unco_lastupdtdt", "");
			}
		}
		
		//Çʼö¿¹¹æÁ¢Á¾ ¹Ì¼ö »ý¼º
		var nodeList = getNodesetCount("/root/main/admi_info/prvnamt/prvnamt");
		if (nodeList > 0)  {
			if (model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmedccd") != null && model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmedccd") != "") {
				if (model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmedcamt") != null && model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmedcamt") != "0" 
					&& model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmedcamt") != "") {
					msg_prvntmedccd = model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmedccd");
					msg_prvntmedcamt = model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmedcamt");
					messageBox( "¿¹¹æÁ¢Á¾¹Ì¼ö" +msg_prvntmedccd+ " ó¹æÀÌ Á¸ÀçÇÕ´Ï´Ù.\n¿¹¹æÁ¢Á¾¹Ì¼öó¹æÀÇ ±Ý¾×(" + 
					msg_prvntmedcamt + "¿ø)À» ¹Ì¼ö·Î »ý¼ºÇÕ´Ï´Ù.", "I999");
					
					if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncocd") != "") {
						messageBox("¹Ì¼ö ³»¿ªÀÌ ÀԷµǾî ÀÖ½À´Ï´Ù. ¹Ì¼ö¾× ¹öÆ°À» Ŭ¸¯ÇÏ¿© º¯°æÇϽʽÿÀ.", "E999","");
						
					} else {
						model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd", msg_prvntmedccd);
						model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt", msg_prvntmedcamt);
						model.refresh();
						fReCalcAmt();
						
						model.removenode("/root/main/admi_info/unco/unco");
						model.makeValue("/root/main/admi_info/unco/unco/unco_pid", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptdd", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptno", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptseqno", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_seqno", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_instcd", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptstat", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_orddeptcd", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_orddrid", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_orddd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
						model.makeValue("/root/main/admi_info/unco/unco/unco_dschdd", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_insukind", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_suppkind", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_ordtype", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_uncorcptflag", "1");
						model.makeValue("/root/main/admi_info/unco/unco/unco_uncocls", "1");
						model.makeValue("/root/main/admi_info/unco/unco/unco_uncocd", model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncocd"));
						model.makeValue("/root/main/admi_info/unco/unco/unco_uncoamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt"));
						model.makeValue("/root/main/admi_info/unco/unco/unco_apprsn", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptamt"	, "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_debtamt"	, "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_endyn", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_clincstdyno", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_empid", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptexecdd", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcpttm", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptrid", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_remfact", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_fstrgstrid", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_fstrgstdt", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_lastupdtrid", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_lastupdtdt", "");
					}
				}
			}
			
			/* ¿¹¹æÁ¢Á¾¹Ì¼ö°¡ Á¸ÀçÇϴ ȯÀÚ¿¡°Ô´Â °¨¸éÀ» Àû¿ë½ÃÅ°Áö ¾ÊÀ½ by Á¶Áß·¡
			if (model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmeddiscccd") != null && model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmeddiscccd") != "") {
				if (model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmedcdiscamt") != null && model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmedcdiscamt") != "0" 
					&& model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmedcdiscamt") != "") {
					msg_prvntmeddiscccd = model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmeddiscccd");
					msg_prvntmedcdiscamt = model.getValue("/root/main/admi_info/prvnamt/prvnamt/prvntmedcdiscamt");
					
					messageBox( "°¨¸é°èÁ¤ÀÌ Àִ ȯÀÚ¿¡°Ô ¿¹¹æÁ¢Á¾Ã³¹æÀÌ Á¸ÀçÇÕ´Ï´Ù.\n¿¹¹æÁ¢Á¾±Ý¾×¿¡¼­ ¿¹¹æÁ¢Á¾¹Ì¼ö¸¦ Á¦¿ÜÇÑ º»Àκδã±Ý¿¡¼­ ÇÒÀαÝ(" + 
					msg_prvntmedcdiscamt + "¿ø)À» ÀÓÀÇ°¨¸é(" + msg_prvntmeddiscccd + ")À¸·Î »ý¼ºÇÕ´Ï´Ù.", "I999");
					
					
					if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_discreducd") != "") {
						messageBox("ÀÓÀÇ°¨¸é ³»¿ªÀÌ ÀԷµǾî ÀÖ½À´Ï´Ù. ÀÓÀÇ°¨¸é ¹öÆ°À» Ŭ¸¯ÇÏ¿© º¯°æÇϽʽÿÀ.", "E999","");
						
					} else {
						model.setValue("/root/main/admi_info/ordamt/admispec/admi_discreducd", msg_prvntmeddiscccd);
						model.setValue("/root/main/admi_info/ordamt/admispec/admi_reduamt", msg_prvntmedcdiscamt);
						model.refresh();
						fReCalcAmt();
						
						model.removenode("/root/main/admi_info/dcgm/dcgm");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_orddd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_discreducd", model.getValue("/root/main/admi_info/ordamt/admispec/admi_discreducd"));
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_discreduamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_reduamt"));
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_discreduflag", "G");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_apprsn", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_pid", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_seqno", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcptdd", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcptno", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_instcd", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcptstat", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcptseqno", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_ordtype", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcptexecdd", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcpttm", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_remfact", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcptrid", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_fstrgstrid", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_fstrgstdt", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_lastupdtrid", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_lastupdtdt", "");
					}
				}
			}
			*/
		}
		
		
		//¼±Ãµ¼º´ë»çÀÌ»ó°Ë»ç ¹Ì¼ö »ý¼º
		var nodeList = getNodesetCount("/root/main/admi_info/inbornamt/inbornamt");
		if (nodeList > 0)  {
			if (model.getValue("/root/main/admi_info/inbornamt/inbornamt/inbornuncocd") != null && model.getValue("/root/main/admi_info/inbornamt/inbornamt/inbornuncocd") != "") {
				if (model.getValue("/root/main/admi_info/inbornamt/inbornamt/inbornuncoamt") != null && model.getValue("/root/main/admi_info/inbornamt/inbornamt/inbornuncoamt") != "0" 
					&& model.getValue("/root/main/admi_info/inbornamt/inbornamt/inbornuncoamt") != "") {
					msg_inbornuncocd = model.getValue("/root/main/admi_info/inbornamt/inbornamt/inbornuncocd");
					msg_inbornuncoamt = model.getValue("/root/main/admi_info/inbornamt/inbornamt/inbornuncoamt");
					messageBox( "¼±Ãµ¼º´ë»çÀÌ»ó°Ë»ç¹Ì¼ö" +msg_inbornuncocd+ " ó¹æÀÌ Á¸ÀçÇÕ´Ï´Ù.\¼±Ãµ¼º´ë»çÀÌ»ó°Ë»ç ±Ý¾×(" + 
					msg_inbornuncoamt + "¿ø)À» ¹Ì¼ö·Î »ý¼ºÇÕ´Ï´Ù.", "I999");
					
					if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncocd") != "") {
						messageBox("¹Ì¼ö ³»¿ªÀÌ ÀԷµǾî ÀÖ½À´Ï´Ù. ¹Ì¼ö¾× ¹öÆ°À» Ŭ¸¯ÇÏ¿© º¯°æÇϽʽÿÀ.", "E999","");
						
					} else {
						model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncocd", msg_inbornuncocd);
						model.setValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt", msg_inbornuncoamt);
						model.refresh();
						fReCalcAmt();
						
						model.removenode("/root/main/admi_info/unco/unco");
						model.makeValue("/root/main/admi_info/unco/unco/unco_pid", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptdd", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptno", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptseqno", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_seqno", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_instcd", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptstat", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_orddeptcd", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_orddrid", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_orddd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
						model.makeValue("/root/main/admi_info/unco/unco/unco_dschdd", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_insukind", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_suppkind", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_ordtype", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_uncorcptflag", "1");
						model.makeValue("/root/main/admi_info/unco/unco/unco_uncocls", "1");
						model.makeValue("/root/main/admi_info/unco/unco/unco_uncocd", model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncocd"));
						model.makeValue("/root/main/admi_info/unco/unco/unco_uncoamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_uncoamt"));
						model.makeValue("/root/main/admi_info/unco/unco/unco_apprsn", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptamt"	, "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_debtamt"	, "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_endyn", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_clincstdyno", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_empid", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptexecdd", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcpttm", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_rcptrid", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_remfact", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_fstrgstrid", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_fstrgstdt", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_lastupdtrid", "");
						model.makeValue("/root/main/admi_info/unco/unco/unco_lastupdtdt", "");
					}
				}
			}
			
			/* ¼±Ãµ¼º´ë»çÀÌ»ó ¹Ì¼ö°¡ Á¸ÀçÇϴ ȯÀÚ¿¡°Ô´Â °¨¸éÀ» Àû¿ë½ÃÅ°Áö ¾ÊÀ½(by Á¶Áß·¡)
			if (model.getValue("/root/main/admi_info/inbornamt/inbornamt/inborndiscccd") != null && model.getValue("/root/main/admi_info/inbornamt/inbornamt/inborndiscccd") != "") {
				if (model.getValue("/root/main/admi_info/inbornamt/inbornamt/inborndiscamt") != null && model.getValue("/root/main/admi_info/inbornamt/inbornamt/inborndiscamt") != "0" 
					&& model.getValue("/root/main/admi_info/inbornamt/inbornamt/inborndiscamt") != "") {
					msg_inborndiscccd = model.getValue("/root/main/admi_info/inbornamt/inbornamt/inborndiscccd");
					msg_inborndiscamt = model.getValue("/root/main/admi_info/inbornamt/inbornamt/inborndiscamt");
					
					messageBox( "°¨¸é°èÁ¤ÀÌ Àִ ȯÀÚ¿¡°Ô ¼±Ãµ¼º´ë»çÀÌ»ó°Ë»ç ó¹æÀÌ Á¸ÀçÇÕ´Ï´Ù.\n¼±Ãµ¼º´ë»çÀÌ»ó°Ë»ç±Ý¾×¿¡¼­ ¼±Ãµ¼º´ë»çÀÌ»ó°Ë»ç ¹Ì¼ö¸¦ Á¦¿ÜÇÑ º»Àκδã±Ý¿¡¼­ ÇÒÀαÝ(" + 
					msg_inborndiscamt + "¿ø)À» ÀÓÀÇ°¨¸é(" + msg_inborndiscccd + ")À¸·Î »ý¼ºÇÕ´Ï´Ù.", "I999");
					
					
					if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_discreducd") != "") {
						messageBox("ÀÓÀÇ°¨¸é ³»¿ªÀÌ ÀԷµǾî ÀÖ½À´Ï´Ù. ÀÓÀÇ°¨¸é ¹öÆ°À» Ŭ¸¯ÇÏ¿© º¯°æÇϽʽÿÀ.", "E999","");
						
					} else {
						model.setValue("/root/main/admi_info/ordamt/admispec/admi_discreducd", msg_inborndiscccd);
						model.setValue("/root/main/admi_info/ordamt/admispec/admi_reduamt", msg_inborndiscamt);
						model.refresh();
						fReCalcAmt();
						
						model.removenode("/root/main/admi_info/dcgm/dcgm");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_orddd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_discreducd", model.getValue("/root/main/admi_info/ordamt/admispec/admi_discreducd"));
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_discreduamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_reduamt"));
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_discreduflag", "G");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_apprsn", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_pid", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_seqno", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcptdd", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcptno", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_instcd", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcptstat", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcptseqno", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_ordtype", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcptexecdd", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcpttm", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_remfact", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_rcptrid", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_fstrgstrid", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_fstrgstdt", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_lastupdtrid", "");
						model.makeValue("/root/main/admi_info/dcgm/dcgm/dcgm_lastupdtdt", "");
					}
				}
			}*/
		}

	}



	//¼¼¼ÇÁ¤º¸ ÃßÃâÇϱâ
	function fGetUserInfosSampling() {
		var sUserInfosS = getUserInfos();

		sUserInfosS = sUserInfosS + "|";

		var UserInfosS_Array = sUserInfosS.split("|");

		var userid        	= UserInfosS_Array[0];  //»ç¿ëÀÚ¹øÈ£
		var usernm        	= UserInfosS_Array[1];  //»ç¿ëÀÚÀ̸§
		var posinstcd     	= UserInfosS_Array[6];  //±Ù¹«Áö±â°üÄÚµå 2009.04.15
		var posinstnm     	= UserInfosS_Array[7];  //±Ù¹«Áö±â°ü¸í 2009.04.15
		var posdeptcd     	= UserInfosS_Array[4];  //¼Ò¼ÓºÎ¼­ÄÚµå
		var posdeptnm     	= UserInfosS_Array[5];  //¼Ò¼ÓºÎ¼­¸í

		model.makeNode("/root/hidden/session/" + "userid");
		model.makeNode("/root/hidden/session/" + "usernm");
		model.makeNode("/root/hidden/session/" + "posinstcd");
		model.makeNode("/root/hidden/session/" + "posinstnm");
		model.makeNode("/root/hidden/session/" + "posdeptcd");
		model.makeNode("/root/hidden/session/" + "posdeptnm")

		if (userid == null || userid == "" || userid == " " || userid == "-") userid = "pam";
		//if (posinstcd == null || posinstcd == "" || posinstcd == " " || posinstcd == "-") posinstcd = "";

		model.setValue("/root/hidden/session/userid",userid);
		model.setValue("/root/hidden/session/usernm",usernm);
		model.setValue("/root/hidden/session/posinstcd",posinstcd);
		model.setValue("/root/hidden/session/posinstnm",posinstnm);
		model.setValue("/root/hidden/session/posdeptcd",posdeptcd);
		model.setValue("/root/hidden/session/posdeptnm",posdeptnm);

		model.refresh();
	}

	//È­¸é ÃʱâÈ­
	function fInitialize(type) {
		if (type == "all") {
			model.resetInstanceNode("/root/send");
			model.resetInstanceNode("/root/main/inpt_info/inptpatinfo");  //ÀÎÀûÁ¤º¸
			model.resetInstanceNode("/root/hidden/inpt_info/inptpatinfo"); //ÀÎÀûÁ¤º¸(hidden)
			model.resetInstanceNode("/root/hidden/item01"); // ÀÔ¿øÀÏÀÚ
			ipt_dschdclrdt.hint="-";
			ipt_dschnotidt.hint="-";
			ipt_roomcd.hint= "-";
			cpt_ermesg.text = "";
			ipt_onlnno.visible = false;
			
		}
		if (type == "all" || type == "ipat")  {
			model.resetInstanceNode("/root/main/pat_info/h_emr_snw/emr_snw");  //»óº´Á¤º¸
			model.resetInstanceNode("/root/main/pat_info/h_otpt_rsrv/otpt_rsrv");  //¿Ü·¡¿¹¾à
			model.resetInstanceNode("/root/hidden/pat_info/otpt_rsrv");  //¿Ü·¡¿¹¾à
			model.resetInstanceNode("/root/hidden/pat_info/emr_snw");  //»óº´Á¤º¸
			model.resetInstanceNode("/root/main/ermngtamtmsg/ermsg");  //ÀÀ±Þ¸Þ¼¼Áö
			model.resetInstanceNode("/root/main/ermngtamtmsg/ermsg1");  //ÀÀ±Þ¸Þ¼¼Áö1
			model.resetInstanceNode("/root/main/pat_info/h_unco_uncoamt/unco_uncoamt");//ȯÀڹ̼ö³»¿ª
			model.resetInstanceNode("/root/hidden/pat_info/unco_uncoamt");//ȯÀڹ̼ö³»¿ª
			model.resetInstanceNode("/root/main/pat_info/h_ptsp_specpat/ptsp_specpat");  //ƯÀ̳»¿ª
			model.resetInstanceNode("/root/hidden/pat_info/ptsp_specpat");  //ƯÀ̳»¿ª
			model.resetInstanceNode("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum"); //Çö±Ý¿µ¼öÁõ½ÂÀιøÈ£
			model.resetInstanceNode("/root/hidden/etc2");
			model.resetInstanceNode("/root/hidden/etc3");
			model.resetInstanceNode("/root/hidden/etc4");
			model.resetInstanceNode("/root/hidden/etc5");
			model.resetInstanceNode("/root/hidden/etc6");
			model.resetInstanceNode("/root/hidden/etc7");
			btn_opdinfo.attribute("class") = "btn2_letter4";
			btn_opspec.attribute("class") = "btn2_letter2";
			btn_aipm.attribute("class") = "btn2_letter4";
			btn_dscharngmnmemo.attribute("class") = "btn2_letter4";
			//20100401 Çö±Ý¿µ¼öÁõ Àǹ«È­ ÁÖ¼®
			ipt_cardcashno.hint ="";
			ipt_cardcashno.attribute("background-color") = "#ffffff";
			
			//2012-01-03 ¼ö³³ ÈÄ °­Á¦ºÐ¸® ¿©ºÎ ¼¼Æà ÇØÁ¦
			//ÆĶó¹ÌÅÍ°¡ all, ipat ÀÏ ¶§¸¸ ¸®¼ÂÇÑ´Ù.
			model.setValue("/root/init/option/iphs_div", "false");
		}

		if (type == "all" || type == "ipat" || type == "ipatinfo")  {
			model.resetInstanceNode("/root/main/iphs_info/h_grdipatinfo/grdipatinfo"); //Àç¿øÁ¤º¸
			model.resetInstanceNode("/root/main/iphs_info/h_opspec/opspec"); //¼ö¼ú³»¿ª
			model.resetInstanceNode("/root/main/emr_ast_info/grdbabyhsct"); //»ê¸ð, ½Å»ý¾Æ Á¤º¸
			grd_inpatinfo.attribute("width") = "884"   //»ê¸ð, ½Å»ý¾Æ ±×¸®µå ÃʱâÈ­
			grdbabyhsct.attribute("visibility") = "hidden";
			cpt_iphs.text = "";	//Àç¿øÀ¯Çü ¸Þ¼¼Áö ÃʱâÈ­
			cpt_amtflag.text = ""; //¿äÀ² ¸Þ¼¼Áö ÃʱâÈ­
		}
		model.setValue("/root/init/option/pregdmndamtchk", "");
		model.resetInstanceNode("/root/hidden/source");
		model.resetInstanceNode("/root/main/admi_info/admi/grdclamrcpt"); 		//ÇåÇ÷ÁõÁ¤º¸
		model.resetInstanceNode("/root/main/iscl_info/grdearnflag1"); 			//¼öÀͱ¸ºÐ1
		model.resetInstanceNode("/root/main/iscl_info/grdearnflag2"); 			//¼öÀͱ¸ºÐ2
		model.resetInstanceNode("/root/main/prcpcodechk/prcpchk");				//ó¹æÄÚµå ¹Ì¼ö üũ
		model.resetInstanceNode("/root/main/iscl_info/reductexptamt"); 			//°¨¸éÁ¦¿Ü
		model.resetInstanceNode("/root/hidden/earnflag");  						//¼öÀͱ¸ºÐ¿¡¼­ doubleclick½Ã ³Ñ°ÜÁÖ´Â node
		model.resetInstanceNode("/root/main/admi_info/admi/grdclamrcpt");  		//û±¸¼ö³³ node
		model.resetInstanceNode("/root/hidden/admi_info/admi/grdclamrcpt");  	//û±¸¼ö³³ node
		model.resetInstanceNode("/root/hidden/admi_info/admietc/grdcardspec"); 	//Ä«µå³»¿ª

		model.resetInstanceNode("/root/main/admi_info/ordamt/admispec");  		//¼ö³³³»¿ª
		model.resetInstanceNode("/root/main/admi_info/card/card");  			//Ä«µå³»¿ª
		model.resetInstanceNode("/root/main/admi_info/cash/cash");  			//Çö±Ý³»¿ª
		model.resetInstanceNode("/root/main/admi_info/onln/onln");  			//¿Â¶óÀÎÀԱݳ»¿ª
		model.resetInstanceNode("/root/main/admi_info/unco/unco");  			//¹Ì¼ö³»¿ª
		model.resetInstanceNode("/root/main/admi_info/dcgm/dcgm");  			//°¨¾×³»¿ª
		model.resetInstanceNode("/root/main/admi_info/prvnamt/prvnamt");  		//Çʼö¿¹¹æÁ¢Á¾
		model.resetInstanceNode("/root/main/admi_info/inbornamt/inbornamt"); 	//¼±Ãµ¼º´ë»çÀÌ»ó°Ë»ç
//		model.resetInstanceNode("/root/send/set_dcgm/dcgm");
//		model.resetInstanceNode("/root/send/set_card/card");
//		model.resetInstanceNode("/root/send/set_cash/cash");
//		model.resetInstanceNode("/root/send/set_onln/onln");
//		model.resetInstanceNode("/root/send/set_unco/unco");
//		model.resetInstanceNode("/root/send/set_bldc/bldc");
		model.resetInstanceNode("/root/hidden/admi_info/ordamt/admispec");  	//¼ö³³³»¿ª
		model.resetInstanceNode("/root/hidden/admi_info/ordamt/card");  		//Ä«µå³»¿ª
		model.resetInstanceNode("/root/hidden/admi_info/ordamt/cash");  		//Çö±Ý³»¿ª
		model.resetInstanceNode("/root/hidden/admi_info/ordamt/onln");  		//¿Â¶óÀÎÀÔ±Ý
		model.resetInstanceNode("/root/hidden/admi_info/ordamt/unco");  		//¹Ì¼ö
		model.resetInstanceNode("/root/hidden/admi_info/ordamt/dcgm");  		//°¨¾×
		model.resetInstanceNode("/root/hidden/admi_info/ordamt/prvnamt");  		//Çʼö¿¹¹æÁ¢Á¾
		model.resetInstanceNode("/root/main/admi_info/rcptmthd");  				//¼ö³³¹æ¹ý, ¼ÒµæÁöÃâÁõºù, Ä«µå¹øÈ£, À¯È¿±â°£, ÇÒºÎ
		
		model.setValue("/root/main/admi_info/rcptmthd/rcptmthd" 	, "3"); 	//1-Ä«µå, 2-Çö±Ý¿µ¼öÁõ, 3-Çö±Ý
		model.setValue("/root/main/admi_info/rcptmthd/cashmthd" 	, "00"); 	//00-¼Òµæ°øÁ¦, 01-ÁöÃâÁõºù, 02-¹Ì½ÂÀÎ

		model.resetInstanceNode("/root/temp/receipt");							//¿µ¼öÁõ³»¿ª
		model.resetInstanceNode("/root/temp1");									//temp
		model.resetInstanceNode("/root/main/ipsc_info");  						//¼Ò±Þ³»¿ª Á¤º¸
		model.resetInstanceNode("/root/main/popupendflag");						//popup ³»¿ª

		model.resetInstanceNode("/root/main/emr_prcpspec/grdnexecspec");		//¹Ì½ÃÇàó¹æ
		model.setValue("/root/main/admi_info/rcptmthd/allotmm", "00");			//Ä«µå ¼±Åýà ÇҺΠ00 setting
		model.setValue("/root/init/option/receipt", "Y");
		//Çö±Ý¿µ¼öÁõ ÀÚµ¿½ÂÀÎ ¿©ºÎ
		if( model.getValue("/root/init/PAM/P0022list/P0022[cdid = '160' ]/cdnm") == 'Y'){
			model.setValue("/root/init/option/autocashyn", model.getvalue("/root/init/PAM/P0022list/P0022[cdid = '160' ]/cdnm"));
		}

        
		model.removeNodeset("/root/send/rcptinfo/bldc_info");
		model.removeNode("/root/send/rcptinfo/rcpt_info/bldcdiscamtdcYN");
		
		model.removenode("/root/send/set_card/card");
		model.makeNode("/root/send/set_card/card");
		model.removenode("/root/send/set_cash/cash");
		model.makeNode("/root/send/set_cash/cash");
		model.removenode("/root/send/set_onln/onln");
		model.makeNode("/root/send/set_onln/onln");
		model.removenode("/root/send/set_dcgm/dcgm");
		model.makeNode("/root/send/set_dcgm/dcgm");
		model.removenode("/root/send/set_unco/unco");
		model.makeNode("/root/send/set_unco/unco");
		model.removenode("/root/send/set_bldc/bldc");
		model.makeNode("/root/send/set_bldc/bldc");
		model.removenode("/root/hidden/cncl_card");		//´ÙÁßÄ«µå½ÂÀÎÃë¼Ò
		model.makeNode("/root/hidden/cncl_card");
		model.removenode("root/main/emr_prcpspec/grdnexecspec");
		model.makeNode("root/main/emr_prcpspec/grdnexecspec");
		model.removenode("/root/temp1/nexeccalc");
		model.makeNode("/root/temp1/nexeccalc");
		model.setValue("/root/etcvalue/popupcardamt", "");	//Æ˾÷Ä«µå°áÁ¦¾×
		model.removenode("/root/temp3");
		model.makeNode("/root/temp3");
//		opt_popupcard.visible = false;
		btn_remfactsave.attribute("class") = "btn2_letter2";
		tar_remfact.attribute("background-color") = "#ffffff";
		
		// µ¿ÀǼ­ Ãâ·Â¿©ºÎ ÃʱâÈ­
		cpt_scanyn.text = '';
		
		// »ç»ýÈ°º¸È£ °ü¸®¿©ºÎ ÃʱâÈ­
		cap_privacy.visible = false;
		
		// °Ý¸®¿©ºÎ ÃʱâÈ­
		cap_isolate.visible = false;
		cap_isolate.hint = "";
		
		// KTASÃʱâÈ­
		cap_ktas.text = "";

        // °Ý¸®Ç¥½Ä ÃʱâÈ­
        img_isolb.src = "../../../com/hismainweb/images/btn_top_infection0_d.gif";
        img_isolc.src = "../../../com/hismainweb/images/btn_top_infection1_d.gif";
        img_isola.src = "../../../com/hismainweb/images/btn_top_infection2_d.gif";

		//2009-01-19 À̵¿½Ä Ãß°¡
		//Ä«µåÀÚµ¿½ÂÀÎ ¿©ºÎ üũ ÃʱâÈ­
		model.setValue("/root/init/option/checkcard", "N");
		
		// °¡Åð¿ø Á¤»êSMS Àü¼Û¿©ºÎ ÃʱâÈ­ by Á¶Áß·¡
		model.setValue("/root/init/option/receiptsms", "Y");
		
		// ÀÌÁöÆнº SMS Àü¼Û¿©ºÎ ÃʱâÈ­ by Á¶Áß·¡
		model.setValue("/root/init/option/ezpasssms",  "");
		
		// DRG Á¤º¸ ÃʱâÈ­
		model.setValue("/root/hidden/drginfo/drgno", "");
        model.setValue("/root/hidden/drginfo/rowno", "");
        
        // ÀÀ±Þ½Ç Àü½Ç½Åû ½Ã Ãâ·Â¹° Á¦¾î ÃʱâÈ­ by Á¶Áß·¡
        model.setValue("/root/hidden/ervisityn", "");
        model.setValue("/root/hidden/erroomcd",  "");
        
        // Çʼö½É»ç ³»¿ª ÃʱâÈ­
        cpt_judgneedmsg.text = "";
        
        // Èñ±Í³­Ä¡ »êÁ¤Æ¯·Ê ½Åû¿©ºÎ
        model.setValue("/root/main/inpt_info/inptpatinfo/inpt_srdgsignyn", "");
        ipt_srdgsignyn.attribute("background-color") = "#ffffff";
		
		model.refresh();

		if (type == "all") {
			model.setFocus("ipt_pid");
		} else {
			model.setFocus("ipt_cardcashno");
		}

		ipt_rcptpayamt.disabled = true;
		
		fCloseAmt();

	}

	function fDschamtVisible(status){
		grp_rcptpayamt.visible = status;
	}

	function fRtnRcpt(flag) {
		if(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid") == null ||
		   (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")).getTrim == ""){
			messageBox("ȯÀÚ¹øÈ£°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù.", "E999");
		   }
		if(flag== "1"){
			var sValue = 	    flag 												+ "¢Ë" +  //1.ȯºÒ³»¿ª Á¶È¸¿ë  2.ȯºÒ¼ö³³ÈÄ È£Ãâ¿ë
							model.getValue("/root/hidden/session/posinstcd")			+ "¢Ë" +  //±â°üÄÚµå
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")		+ "¢Ë" +  //ȯÀÚµî·Ï¹øÈ£
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm")	+ "¢Ë" +   //ȯÀÚ¼º¸í
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno1")	+ "¢Ë" +   //Áֹεî·Ï¹øÈ£ ¾ÕÀÚ¸®
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno2")	+ "¢Ë" +   //Áֹεî·Ï¹øÈ£µÞÀÚ¸®
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hometel")	+ "¢Ë" +   //ÁýÀüÈ­
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_mpphontel")	+ "¢Ë" +   //ÈÞ´ëÆù
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")	       + "¢Ë" +   //Áø·áÀÏ
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno")	+ "¢Ë" +  //ÀϷùøÈ£
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_orddeptcd")	+ "¢Ë" +  //Áø·á°ú
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_medispclid")+ "¢Ë" +  //Áø·áÀÇ
																					 ""+  "¢Ë" +  //ȯºÒ±Ý¾×
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_insukind")	+ "¢Ë" +  //º¸ÇèÀ¯Çü
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype")	 ;  //Áø·áÀ¯Çü
			setParameter("SPPAO00600_PARM",sValue);
			modal("SPPAO00600", "1","50", "50", "SPPAO00600", "", "", "sysmenu:hidden");
		}else if(flag== "2"){
			var sCardAmt = model.getValue("/root/main/admi_info/ordamt/admispec/admi_cardamt");
			var sCashAmt = model.getValue("/root/main/admi_info/ordamt/admispec/admi_cashamt");
			var sOnlineAmt = model.getValue("/root/main/admi_info/ordamt/admispec/admi_onlineamt");
			if(sCashAmt + sCardAmt + sOnlineAmt >=0 ){
				return;
			}else{
				var rtn = messageBox("ȯºÒ³»¿ªÀ» µî·Ï ÇϽðڽÀ´Ï±î?", "Q999");
				if(rtn ==  "7"){	//¾Æ´Ï¿À
					return;
				}else if(rtn == "6"){
					var sValue = 		    flag 											+ "¢Ë" +  //1.ȯºÒ³»¿ª Á¶È¸¿ë  2.ȯºÒ¼ö³³ÈÄ È£Ãâ¿ë
									model.getValue("/root/hidden/session/posinstcd")			+ "¢Ë" +  //±â°üÄÚµå
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")		+ "¢Ë" +  //ȯÀÚµî·Ï¹øÈ£
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm")	+ "¢Ë" +   //ȯÀÚ¼º¸í
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno1")	+ "¢Ë" +   //Áֹεî·Ï¹øÈ£ ¾ÕÀÚ¸®
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno2")	+ "¢Ë" +   //Áֹεî·Ï¹øÈ£µÞÀÚ¸®
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hometel")	+ "¢Ë" +   //ÁýÀüÈ­
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_mpphontel")	+ "¢Ë" +   //ÈÞ´ëÆù
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")	       + "¢Ë" +   //Áø·áÀÏ
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno")	+ "¢Ë" +  //ÀϷùøÈ£
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_orddeptcd")	+ "¢Ë" +  //Áø·á°ú
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_medispclid")+ "¢Ë" +  //Áø·áÀÇ
									Math.abs(parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cashamt")))+  "¢Ë" +  //ȯºÒ±Ý¾×
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_insukind")	+ "¢Ë" +  //º¸ÇèÀ¯Çü
									model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype")	 ;  //Áø·áÀ¯Çü

						setParameter("SPPAO00600_PARM",sValue);
						modal("SPPAO00600", "1","50", "50", "SPPAO00600", "", "", "sysmenu:hidden");
				}//ȯºÒ¼ö³³¿©ºÎ üũ end
			}//ȯºÒ±Ý¾× Á¸Àç¿©ºÎ end
		}
	}//fRtnRcpt end
	
	function fEasyPadNoInsert(flag, ipt1, ipt2){
		var sValue =    flag ;	//rrgstno.¹Î¹ø phone.Àü¹ø
		setParameter("SPPAO00503_PARM",sValue);//1.Àü¹ø 2.¹Î¹ø
		modal("../../../pam/inordamtmngtweb/xrw/SPPAO00503", "1","", "", "SPPAO00503", "", "", "sysmenu:hidden");
		var SPPAO00503_RTN = getParameter("SPPAO00503_RTN");
		var array_parm = SPPAO00503_RTN.split("¢Ë"); //[0] Á¤»ó󸮿©ºÎY/N ,[1]Àü¹ø(phone)¹Î¹ø(rrgstno)±¸ºÐ°ª	,[2]Àü¹øÀ϶§°ª/¹Î¹øÀ϶§ ¾ÕÀÚ¸®, [3] Àü¹øÀ϶© ¾øÀ½ ¹Î¹øÀ϶© µÞÀÚ¸®
		if(array_parm[0] == "Y"){
			if (array_parm[1] == "phone"  ) {	//Àü¹ø
				if(model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptflag") == "B21" && grp_rcptpayamt.visible == true){
//					model.setValue("/root/main/inpt_info/inptpatinfo/inpt_smstel", getParameter("SPPAO00503_Mpphontel"));
					model.refresh();
					model.setFocus("button14");
							
				} else {
					if(array_parm[2].length > 0){
						model.setValue("/root/main/admi_info/rcptmthd/rcptmthd", "2"); 		//1-Ä«µå, 2-Çö±Ý¿µ¼öÁõ, 3-Çö±Ý
						fRcptMthd("2");	//Çö±Ý¿µ¼öÁõ ¼¼ÆÃ.
//							model.setValue("/root/main/admi_info/rcptmthd/cardcashno", getParameter("SPPAO00503_Mpphontel"));
						model.refresh();
						model.setFocus("btn_rcpt");
					}else{
						model.setValue("/root/main/admi_info/rcptmthd/rcptmthd", "3"); 		//1-Ä«µå, 2-Çö±Ý¿µ¼öÁõ, 3-Çö±Ý
						rdo_rcptmthd.refresh();
					}
				}
				ipt1.value = array_parm[2];
				ipt1.refresh();
				
			}else if (array_parm[1] == "rrgstno" ) {	//¹Î¹ø
				ipt1.value = array_parm[2];
				ipt2.value = array_parm[3];
				ipt1.refresh(); ipt2.refresh();
			}
		}else{
			messageBox("Æ˾÷ ºñÁ¤»óÁ¾·á","E999");
		}
	}

	// ER/DSC ÀÚµ¿°è»ê¹èÄ¡ - 2009.06.12
	// ER/DSC && ÀÔ¿ø »óÅÂÀÏ ¶§¸¸ µ¹¸°´Ù.
	function fSetAutoErDscCalc() {
		var sInstcd           = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_instcd");
		var sPid              = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid");
		var sIndd             = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd");
		var sCretno           = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno");
		var sOrdtype          = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype");
		var sIndschacptstat   = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indschacptstat");
		var sDschnotiyn       = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotiyn");
		var sDschnotidt       = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt");
		var sDschjudgprcsstat = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschjudgprcsstat");

		// ER/DSCüũ
		if (sOrdtype == "E" || sOrdtype == "D") {
			if (sIndschacptstat == "A") {			// Àç¿ø
				if (sDschjudgprcsstat == "A") {		// ¹Ì½É
					model.resetInstanceNode("/root/send/data10");

					model.makeValue("/root/send/data10/instcd",           sInstcd);
					model.makeValue("/root/send/data10/pid",              sPid);
					model.makeValue("/root/send/data10/indd",             sIndd);
					model.makeValue("/root/send/data10/cretno",           sCretno);
					model.makeValue("/root/send/data10/ordtype",          sOrdtype);
					model.makeValue("/root/send/data10/indschacptstat",   sIndschacptstat);
					model.makeValue("/root/send/data10/dschnotiyn",       sDschnotiyn);
					model.makeValue("/root/send/data10/dschnotidt",       sDschnotidt);
					model.makeValue("/root/send/data10/dschjudgprcsstat", sDschjudgprcsstat);

					submit("TXPAI00109");
				}
			}
		}

	}

	// 2009.11.14 - ±Ý¾×Ç¥½Ã±â ·ÎÁ÷ ºÐ¸®
	function fShowAmt() {
		// ¿ø¹«°øÅëÄڵ带 ÅëÇؼ­ ±Ý¾×Ç¥½Ã±â Á¾·ù ¹× »ç¿ë¿©ºÎ¸¦ üũÇÑ´Ù.
		var sMoneyDevice  = model.getValue("/root/init/PAM/P0022list/P0022[cdid = '91']/cdnm");

		// POPUP : µà¾ó ¸ð´ÏÅÍ, SERIAL : LED, null : »ç¿ë¾ÊÇÔ
		if (!isNull(sMoneyDevice)) {
			// ¿Ü·¡¿Í ÀÔ¿øÀÇ ±Ý¾×Ç¥½Ã±â°¡ ´Ù¸¦ ¼ö ÀÖÀ¸¹Ç·Î °øÅëÇÔ¼ö(¿Ü·¡±âÁØ)¸¦ ÅëÇÑ ÃʱâÈ­¸¦ »ç¿ëÇÏÁö ¾Ê°í Á÷Á¢ ¼³Á¤ÇÏ´Â ·ÎÁ÷À¸·Î ´ëü
			//±Ý¾×Ç¥½Ã±â ÃʱâÈ­
			//fInit_Display();                // PAM.js

			// PAM.jsÀÇ global variable¿¡ ¼³Á¤
			AmtDispKind = sMoneyDevice;

			//±Ý¾×Ç¥½Ã±â Æ÷Æ®¿­±â
			fOpenCom();                     // PAM.js

			// PAM.js
			fDisplayAmt(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm")
					  , model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt")
					  , model.getValue("/root/hidden/session/usernm"));

			//±Ý¾×Ç¥½Ã±â Æ÷Æ®´Ý±â
			fCloseCom();                    // PAM.js
		}
	}
	
	// 20009.11.19 - ±Ý¾×Ç¥½Ã±â ´Ý±â
	function fCloseAmt() {
		if( AmtDispKind == 'POPUP' ){
			var popupObjt = findChildWindowByScreenID("SPPMC06400");
			if( popupObjt == null ){
				return;
			}else{
				popupObjt.window.javascript.fClose();
			}
		} else if( AmtDispKind == 'SERIAL' ){
			try{
				if (document.all("NWSerial_OCX") != null){
					//Port Close
					var vreturn3 = -1;
					vreturn3 = AmtDisplay.CloseCom();
					if (vreturn3 == 0) {
						AmtDisplay.CloseCom();
					}
				}
			}catch(E){
				AmtDisplay = null;
			}
		}else if( AmtDispKind == '-' ){
			AmtDispKind = fGetAmtDispKind();
			fCloseCom();
		}
	}
	
	 // 20091215 JHP ÁßÁõ¹øÈ£ Èñ±Í¹øÈ£ µ¿½ÃÁ¸Àç½Ã ÄÞº¸·Î º¸¿©ÁÖ±â
	 // Èñ±Í³­Ä¡ Á¤º¸¿Í ÁßÁõ ¹øÈ£°¡ ÀÖ´Â °æ¿ì °°ÀÌ ÀÖ´Â ´ë»óÀÚ¸¸ ÄÞº¸·Î º¸À̵µ·Ï ÇÔ.
			   // DEFAULT·Î´Â ÁßÁõ¹øÈ£¸¦ ¸ÕÀú º¸¿©ÁÖ¼¼¿ä. ÄÞº¸°¡ Àִ ȯÀÚ´Â ÄÞº¸ ´©¸£¸é Èñ±Íµµ ÇÏ´Ü¿¡ Á¶È¸µÇµµ·Ï..
			   // º¯°æ°³¹ß¿äû 9553
	function fItemRareMsg(){
		var itemmsg = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_seridiagno");
		var raremsg = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rareobstno");
		
		model.setValue("/root/main/inpt_info/inptpatinfo/inpt_srdgsignyn", "");
		ipt_srdgsignyn.attribute("background-color") = "#ffffff";
		
		// ÁßÁõ¹øÈ£¸¸ Á¸Àç½Ã..itemmsg
		if(itemmsg != "" && raremsg == "-"){
			ipt_seridiagno.visible =  true;
			cmb_itemraremsg.visible = false;
			caption29.attribute("text") = "ÁßÁõ¹øÈ£";
			
			if(itemmsg.indexOf("ȯÀÚ¼­¸í(N") > -1){
			    model.setValue("/root/main/inpt_info/inptpatinfo/inpt_srdgsignyn", "N");
			    ipt_srdgsignyn.attribute("background-color") = "#ff0000";
			} else {
			    model.setValue("/root/main/inpt_info/inptpatinfo/inpt_srdgsignyn", "Y");
			}
		
		// Èñ±Í¹øÈ£¸¸ Á¸Àç½Ã.. raremsg					
		}else if(itemmsg == "" && raremsg != "-"){
			ipt_seridiagno.visible =  true;
			cmb_itemraremsg.visible = false;
			caption29.attribute("text") = "Èñ±Í¹øÈ£";
			
			if(raremsg.indexOf("ȯÀÚ¼­¸í(N") > -1){
                model.setValue("/root/main/inpt_info/inptpatinfo/inpt_srdgsignyn", "N");
                ipt_srdgsignyn.attribute("background-color") = "#ff0000";
            } else {
                model.setValue("/root/main/inpt_info/inptpatinfo/inpt_srdgsignyn", "Y");
            }
			
			// Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·ÊȯÀÚÀÇ µî·Ï¹øÈ£¸¦ º¸¿©ÁØ´Ù. - 20090622 ¹Úâ¿ø
			var raremsg = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rareobstno");
			if (raremsg != '-') {
				model.setValue("/root/main/inpt_info/inptpatinfo/inpt_seridiagno",raremsg);
				model.refresh();
			}
			
		// µÎ¹øÈ£ ¸ðµÎ Á¸Àç½Ã.. itemmsg, raremsg
		}else if(itemmsg != "" && raremsg != "-"){
			ipt_seridiagno.visible =  false;
			cmb_itemraremsg.visible = true;
			cmb_itemraremsg.attribute("top") = 127;
			caption29.attribute("text") = "ÁßÁõ/Èñ±Í";
			
			model.setValue("/root/hidden/itemraremsg/msg[" + 1 + "]/cd","itemmsg");
			model.setValue("/root/hidden/itemraremsg/msg[" + 1 + "]/nm",itemmsg);
			model.setValue("/root/hidden/itemraremsg/msg[" + 2 + "]/cd","raremsg");
			model.setValue("/root/hidden/itemraremsg/msg[" + 2 + "]/nm",raremsg);
			
			if(itemmsg.indexOf("ȯÀÚ¼­¸í(N") > -1 || raremsg.indexOf("ȯÀÚ¼­¸í(N") > -1){
                model.setValue("/root/main/inpt_info/inptpatinfo/inpt_srdgsignyn", "N");
                ipt_srdgsignyn.attribute("background-color") = "#ff0000";
            } else {
                model.setValue("/root/main/inpt_info/inptpatinfo/inpt_srdgsignyn", "Y");
            }
			
			// ±âº» ÁßÁõ ¼ÂÆÃ
			cmb_itemraremsg.value= "itemmsg";
		}else{
			ipt_seridiagno.visible =  true;
			cmb_itemraremsg.visible = false;
			caption29.attribute("text") = "ÁßÁõ¹øÈ£";
		}
		
	}


//¼öÇ÷´ëü
function  fbtn_bloddiscamt() {

        // ¼öÁ¤ÀÌ·Â JHP 20100409 ¼öÇ÷´ëü½Ã ¹«Á¶°Ç ÁÖÀ¯Çü¿¡ ¸ÅĪµÇ¹Ç·Î  ºÎÀ¯Çü¿¡ ¸ÅĪµÇµµ·Ï cretno¸¦ À¯Çüº° Àç¿øÁ¤º¸¿¡¼­ °¡Á®¿Àµµ·Ï ¼öÁ¤
        var inpatinforow = grd_inpatinfo.row;
        if(inpatinforow < 1){
            inpatinforow = 1;
        }
        
        var parm = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")                   + "¢Ë" + //ȯÀÚ¹øÈ£
                   model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")                  + "¢Ë" + //Áø·áÀÏÀÚ
                   //model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno")              + "¢Ë" + //»ý¼º¹øÈ£
                   model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + inpatinforow + "]/iphs_cretno")   + "¢Ë" + //»ý¼º¹øÈ£
                   model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo/iphs_orddeptcd")             + "¢Ë" + //Áø·á°ú
                   model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo/iphs_medispclid")            + "¢Ë" + //Áø·áÀÇ»ç
                   model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo/iphs_insukind")              + "¢Ë" + //º¸ÇèÀ¯Çü
                   model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo/iphs_suppkind")              + "¢Ë" + //º¸Á¶À¯Çü
                   model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype")               + "¢Ë" + //Áø·áÇüÅÂ
                   ""                                                                            + "¢Ë" + //Áø·áÇüÅÂ
                   ""                                                                            + "¢Ë" + //parent°¡ ÀÌ¹Ì °¡Áö°í ÀÖ´ø °¨¾× ³»¿ª
                   "/root/send/set_bldc"                                                         + "¢Ë" + //Æ˾÷ÀÌ ´ÝÈú¶§ °¨¾×³»¿ªÀ» ¹ÞÀ» À§Ä¡
                   model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + inpatinforow + "]/iphs_fromdd") + "¢Ë" + // À¯Çü Àû¿ë ½ÃÀÛÀÏ  
                   model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo[" + inpatinforow + "]/iphs_todd") + "¢Ë"; // À¯Çü Àû¿ë Á¾·áÀÏ

        setParameter("SPPAO01401_PARM",parm);

		//alert("parm :" + parm);

        if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indschacptstat") == "D") {
            messageBox("Åð¿ø¼ö³³µÈ ȯÀÚÀÇ Ãß°¡ ¼öÇ÷´ëüÀÎ °æ¿ì ¼ö³³°èÁ¤À» [B41]·Î ÀÔ·Â ÈÄ ´ëü ÇϽʽÿÀ.","I999","");
            setParameter("SPPAO01401_CopyBtn", "Y");
        } else {
            setParameter("SPPAO01401_CopyBtn", "");
        }

		//¼öÇ÷´ëü °¨¸éÀû¿ë Á¦¿Ü ´ë»ó ȯÀÚ´Â Åð¿ø Ãë¼Ò ÈÄ Ã³¸®Çϵµ·Ï À¯µµ
		if( model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ inpatinforow +"]/iphs_indschacptstat") == 'D' 
			&& model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ inpatinforow +"]/iphs_disccd") != '-'
			&& model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ inpatinforow +"]/iphs_disccd") != '' ){
			
			messageBox("°¨¸é´ë»ó ȯÀÚ´Â Åð¿ø»óÅ¿¡¼­ ¼öÇ÷´ëü ÇÒ ¼ö ¾ø½À´Ï´Ù."
							+ "\nÅð¿ø Ãë¼Ò ÈÄ ¼öÇ÷´ëü ó¸®Çϼ¼¿ä!!", "E999", "");
			
			return false;
		}
		
        modal("SPPAO01401", "1","300", "300", "SPPAO01401", "", "");

        if (getParameter("SPPAO01401_RTN") != "Y" ) return;

		//2013-01-21 ¼öÇ÷´ëü °¨¸é±Ý¾× Á¦¿Ü ÈÄ ´ëüµÇµµ·Ï ¼öÁ¤
		//°¨¸éÄڵ尡 ÀÖÀ» ¶§¸¸ ó¸®ÇÑ´Ù.		
		if( model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ inpatinforow +"]/iphs_disccd") != '-'
			&& model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ inpatinforow +"]/iphs_disccd") != '' ){
			
			fRcpt_AllInfo("Y","Y","4");
		}				
		
        var TotBlodDiscAmt = parseInt(getParameter("SPPAO01401_TotBldcDiscAmt"));

        model.setValue("/root/main/admi_info/ordamt/admispec/admi_bloddiscamt", TotBlodDiscAmt);

        //fReCalcAmt("1", TotBlodDiscAmt);  //r±Ý¾× Àç°è»ê
        fReCalcAmt();   //r±Ý¾× Àç°è»ê
        if (model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptflag") == "") {
            model.setFocus("ipt_rcptcd");
        } else {
            model.setFocus("ipt_cardcashno");
        }
        model.refresh();

}

//ÀÔ¿øÀÏÀÚ ÄÞº¸ ¹Ú½º¿¡¼­ ¼±ÅÃÇҽà À̺¥Æ®
function  fbtn_cmb_indd() {

		var sinddvalue = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd");
		model.setValue("/root/main/inpt_info/inptpatinfo/inpt_dschdclrdt", "");
		model.setValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt", "");
		model.setValue("/root/main/inpt_info/inptpatinfo/inpt_dethdt", "");

		var iSelectRow = cmb_indd.mouseRow;
		if (iSelectRow == 0) {
			var sPid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid");
			fInitialize("all");
			model.setValue("/root/main/inpt_info/inptpatinfo/inpt_pid", sPid);
			fInPatInfoRef("1");
			return;
		}

		iSelectRow =  iSelectRow + 1;
		fInitialize("ipat");
		copyNodesetType("/root/main/inpt_info/inptpatinfo","/root/hidden/inpt_info/inptpatinfo[" + iSelectRow + "]","replace");
		model.setValue("/root/hidden/etc7", model.getValue("/root/hidden/item01/indd[" + iSelectRow +"]/indd1"));
		model.refresh();
		fAgeCalc();
		fInDayNo();
		model.setValue("/root/send/indd",    model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"));
		model.setValue("/root/send/ordtype", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype"));

		// 20091215 JHP ¼öÁ¤Ãß°¡ ÁßÁõ¿¡ Èñ±Í Á¸ÀçÇҽÿ¡ ÄÞº¸¹Ú½º·Î º¸¿©ÁÖ±â
		fItemRareMsg();

		fIPatInfoChk();
		model.refresh();

}






//ÀÔ¿ø¼ö³³Çö±Ý¿µ¼öÁõ ¹öÆ° - ±âÁ¸Çö±Ý¿µ¼öÁõ ·ÎÁ÷(»ç¿ë¾ÈÇÔ 20110422 cys)
function  fbtn_cashdamt_org() {

		if( model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid") == '' || model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid") == ' ' ||
			model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm") == '' || model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm") == '' ){

			messageBox("ȯÀÚ¸¦ ¸ÕÀú Á¶È¸ÇϽŠÈÄ¿¡ Çö±Ý¿µ¼öÁõ Æ˾÷À» ¿­¾î ÀÛ¾÷À» ÇÏ½Ç ¼ö ÀÖ½À´Ï´Ù!!", "E999", "");
			return false;
		}

		var parm = "0"																				+ "¢Ë" + //¿Ü·¡µî·ÏÀÇ ¸ÖƼÁ¢¼öÀÎ °æ¿ì¸¸ ÇØ´ç¸ÖƼ°Ç¼ö ³ª¸ÓÁö´Â default '0'À¸·Î ¼¼ÆÃ
					"-" 																			+ "¢Ë" + //¿Ü·¡µî·Ï ¸ÖƼÁ¢¼öÀÎ °æ¿ì¸¸ °¢°¢ÀÇ º»Àκδã¾×À» º¸³½´Ù. ³ª¸ÓÁö´Â '-'
					 "" 																			+ "¢Ë" +
					 "" 																			+ "¢Ë" +
					 "" 																			+ "¢Ë" +
					 parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cashamt"))	+ "¢Ë" +
					"/root/main/admi_info/cash" 													+ "¢Ë" +
					"/root/main/admi_info/cash" 													+ "¢Ë";

		setParameter("SPPAO00500_PARM",parm);
		modal("../../../pam/pamcomnweb/xrw/SPPAO00500", "1","200", "200", "SPPAO00500", "", "");

}




//ÀÔ¿ø¼ö³³Çö±Ý¿µ¼öÁõ ¹öÆ° - ½Å±Ô·ÎÁ÷
function  fbtn_cashdamt() {

	if( model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid") == '' || model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid") == ' ' ||
		model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm") == '' || model.getValue("/root/main/inpt_info/inptpatinfo/inpt_hngnm") == '' ){

		messageBox("ȯÀÚ¸¦ ¸ÕÀú Á¶È¸ÇϽŠÈÄ¿¡ Çö±Ý¿µ¼öÁõ Æ˾÷À» ¿­¾î ÀÛ¾÷À» ÇÏ½Ç ¼ö ÀÖ½À´Ï´Ù!!", "E999", "");
		return false;
	}
	
	if(!fOpenCashPopUp()){return false;}

}

function fOpenCashPopUp(flag) {
		
        //Çö±Ý¿µ¼öÁõ ¼±ÅõǾî ÀÖ°í, Çö±Ý±Ý¾×ÀÌ ÀÖÀ» °æ¿ì Çö±Ý½ÂÀÎ
        var parm         = "";
		var cashamt      = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_cashamt"));
		var pre_cash_amt = 0;

		var totcashamt   = pre_cash_amt + cashamt;

		var cardamt      = model.getValue("/root/main/admi_info/ordamt/admispec/admi_cardamt");
		var pid          = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid");
        var ordtype      = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype");


		var indinstflag  = model.getValue("/root/main/admi_info/rcptmthd/cashmthd");
		var cardno       = model.getValue("/root/main/admi_info/rcptmthd/cardcashno");              
		var valiterm     = model.getValue("/root/main/admi_info/rcptmthd/validterm");
		//var allotmm    = ""
		var keyinpuflag  = model.getValue("/root/main/admi_info/rcptmthd/keyinptflag");
		var swipedata    = model.getValue("/root/main/admi_info/rcptmthd/swipedata");
		var qualcnfmflag = model.getValue("/root/main/admi_info/rcptmthd/qualcnfmflag");
		var vcheck_cashcard = "";


		var ordergb      = "";
		var approvaldate = "";
		var approvaltime = "";
		var approvalno   = "";
		
		//µðÆúÆ® Çö±Ý¿µ¼öÁõ¹øÈ£
		var cshb_qualcnfmno   = model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno");
		var cshb_qualcnfmflag = model.getValue("/root/main/admi_info/rcptmthd/qualcnfmflag"); //Çö±Ý¿µ¼öÁõÈ®Àα¸ºÐ(1.ÁÖ¹Î,2.ÀüÈ­,3.Ä«µå,4.»ç¾÷ÀÚ)
	
	
		if(cshb_qualcnfmno != "") {
			cshb_qualcnfmno   = model.getValue("/root/main/pat_info/h_cshb_cashrcptnum/cshb_cashrcptnum/cshb_qualcnfmno");
			cshb_qualcnfmflag = model.getValue("/root/main/admi_info/rcptmthd/qualcnfmflag");  
		}else{
			cshb_qualcnfmno = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_rrgstno");
			cshb_qualcnfmflag = "1";  //Çö±Ý¿µ¼öÁõÈ®Àα¸ºÐ(1.ÁÖ¹Î,2.ÀüÈ­,3.Ä«µå,4.»ç¾÷ÀÚ)
		}

		//Çö±Ý¿µ¼öÁõ ÀڰݹøÈ£
		//Ä«µå, Çö±Ý¿µ¼öÁõÀ» µ¿½Ã¼ö³³
		if (parseInt(cardamt) > 0 && 
			parseInt(cashamt) > 0)
		{
			vcheck_cashcard = "Y";
			cardno          = cshb_qualcnfmno;
			qualcnfmflag    = cshb_qualcnfmflag;
			if(qualcnfmflag == "3"){keyinpuflag = "S"; }else{keyinpuflag = "K";}

			swipedata = cshb_qualcnfmno+"=";										
			swipedata = swipedata.getRightPad(40, " ");
			
		}

		//Çö±Ý¿µ¼öÁõ¸¸ ¼ö³³
		if (parseInt(cardamt) == 0 && 
			parseInt(cashamt) > 0 )
		{
			vcheck_cashcard = "N"; 
			cardno       = model.getValue("/root/main/admi_info/rcptmthd/cardcashno");
			qualcnfmflag = model.getValue("/root/main/admi_info/rcptmthd/qualcnfmflag");
			keyinpuflag  = model.getValue("/root/main/admi_info/rcptmthd/keyinptflag");
			swipedata    = model.getValue("/root/main/admi_info/rcptmthd/swipedata");
		}

		/*		
		alert(
		 "¸ÖƼ°Ç¼ö     "  +     parm                        +   '\n'     +    
		 "¸ÖƼopmi     "  +     "/root/send/s_opmi"         +   '\n'     + 
		 "totalamt     "  +     cashamt                     +   '\n'     + 
		 "send         "  +     "/root/hidden/rcv1/h_cash"  +   '\n'     + 
		 "receive      "  +     "/root/send/s_cash"         +   '\n'     + 
		 "pid          "  +     pid                         +   '\n'     + 
		 "ordtype      "  +     ordtype                     +   '\n'     +         
		 "indinstflag  "  +     indinstflag                 +   '\n'     + 
		 "gQualcnfmno  "  +     cardno                      +   '\n'     + 
		 //,"valiterm     "  +   valiterm                    +   '\n'     + 
		 //,"allotmm      "  +   allotmm                     +   '\n'     + 
		 "keyinpuflag  "  +     keyinpuflag                 +   '\n'     + 
		 "swipedata    "  +     swipedata                   +   '\n'     + 
		 "qualcnfmflag "  +     qualcnfmflag                +   '\n'     
		)
		*/		

		//óÀ½¿¡´Â ±âÇö±Ý³ëµå¸¦ º¸³»°í ±×´ÙÀ½¿¡´Â send¿¡¼­ ÁÖ°í¹ÞÀ½
		var send_cash ="/root/send/set_cash" ;
		/*
		var send_cash = "";
		if(getNodesetCount("/root/send/set_cash/cash/cash_pid") == 0){
			send_cash = "/root/hidden/rcv1/h_cash";
		}else{
			send_cash = "/root/send/set_cash" ;
		}
		*/

		
		parm = "0"                   + "¢Ë" +   //¸ÖƼ°Ç¼ö    
		""                           + "¢Ë" +   //¸ÖƼopmi    
		totcashamt                   + "¢Ë" +   //totalamt    
		send_cash                    + "¢Ë" +   //send        
		"/root/send/set_cash"        + "¢Ë" +   //receive     
		pid                          + "¢Ë" +   //pid         
		ordtype                      + "¢Ë" +   //ordtype     
		indinstflag                  + "¢Ë" +   //indinstflag 
		cardno                       + "¢Ë" +   //gQualcnfmno 
		//valiterm                   + "¢Ë" +   //valiterm    
		//allotmm                    + "¢Ë" +   //allotmm     
		keyinpuflag                  + "¢Ë" +   //keyinpuflag 
		swipedata                    + "¢Ë" +   //swipedata   
		qualcnfmflag                 + "¢Ë" ;   //qualcnfmflag
			
		

		setParameter("SPPAO00500_PARM", parm);
		setParameter("SPPAO00500_FLAG", flag);
		
		//Æ˾÷ ¿ÀÇ ¹æ½Ä üũ
		if( flag == 'I' || flag == 'D'){
			
			var ivrObjt = document.all("ivr_cashpopup");
			if( ivrObjt == null ){
				body.createChild("xforms:iviewer", "id:ivr_cashpopup; src:../../../pam/pamcomnweb/xrw/SPPAO00501_Çö±Ý¿µ¼öÁõ½ÂÀÎ.xrw");
				ivrObjt = document.all("ivr_cashpopup");    
			}
			
			if( flag == 'I' ){
				ivrObjt.window.javascript.fInit();
				var retMsg = ivrObjt.window.javascript.fAutoGetCashAprv();
										
			}else{
				ivrObjt.window.javascript.fInit();
				var retMsg = ivrObjt.window.javascript.fAutoCnclCashAprv();
			}

			ordergb      = ivrObjt.model.getValue("/root/tmp/appvanif/ordergb");//42:Çö±Ý¿µ¼öÁõ½ÂÀÎÀÀ´ä
			approvaldate = ivrObjt.model.getValue("/root/tmp/appvanif/approvaldate");                  
			approvaltime = ivrObjt.model.getValue("/root/tmp/appvanif/approvaltime");                  
			approvalno   = ivrObjt.model.getValue("/root/tmp/appvanif/approvalno" );    

			body.removeChild("ivr_cashpopup");

			if( retMsg == false ){
				messageBox("Çö±Ý¿µ¼öÁõ ½ÂÀνà ¿À·ù°¡ ³µ½À´Ï´Ù. ¼ö³³º¯°æ¿¡¼­ Àç½ÂÀÎÇϽʽÿä.", "E999");
			}

			}else{
				
				modal("SPPAO00501", "1","400", "400", "SPPAO00501", "", "");
				//Æ˾÷ Á¤»óÁ¾·á ¿©ºÎ!
				if (getParameter("SPPAO00500_RTN") == "N" || getParameter("SPPAO00500_RTN") == ""){
					return false;
				}
			}
		/*
        for (var i = 1; i <= getNodesetCount("/root/hidden/rcv1/h_opmi/opmi/opmi_pid") ; i++) {
            for (var k = 1; k <= getNodesetCount("/root/send/s_cash/cash/cash_pid") ; k++) {
            if (model.getValue( "/root/send/s_cash/cash["+ k +"]/cash_mseqno") !=        model.getValue("/root/hidden/rcv1/h_opmi/opmi["+ i +"]/opmi_mseqno")) continue;

                model.makeValue("/root/send/s_cash/cash["+ k +"]/cash_orddd"           , model.getValue("/root/hidden/rcv1/h_opmi/opmi["+ i +"]/opmi_orddd_org"));
                model.makeValue("/root/send/s_cash/cash["+ k +"]/cash_cretno"          , model.getValue("/root/hidden/rcv1/h_opmi/opmi["+ i +"]/opmi_cretno_org"));
                model.makeValue("/root/send/s_cash/cash["+ k +"]/cash_orddd_org"       , model.getValue("/root/hidden/rcv1/h_opmi/opmi["+ i +"]/opmi_orddd_org"));
                model.makeValue("/root/send/s_cash/cash["+ k +"]/cash_cretno_org"      , model.getValue("/root/hidden/rcv1/h_opmi/opmi["+ i +"]/opmi_cretno_org"));
				model.makeValue("/root/send/s_cash/cash["+ k +"]/cash_orddeptcd_org"   , model.getValue("/root/hidden/rcv1/h_opmi/opmi["+ i +"]/opmi_orddeptcd_org"));
                model.makeValue("/root/send/s_cash/cash["+ k +"]/cash_orddrid_org"     , model.getValue("/root/hidden/rcv1/h_opmi/opmi["+ i +"]/opmi_orddrid_org"));
                model.makeValue("/root/send/s_cash/cash["+ k +"]/cash_rcptdd_org"      , model.getValue("/root/hidden/rcv1/h_opmi/opmi["+ i +"]/opmi_rcptdd_org")); 
                model.makeValue("/root/send/s_cash/cash["+ k +"]/cash_rcptno_org"      , model.getValue("/root/hidden/rcv1/h_opmi/opmi["+ i +"]/opmi_rcptno_org")); 
                model.makeValue("/root/send/s_cash/cash["+ k +"]/cash_rcptseqno_org"   , model.getValue("/root/hidden/rcv1/h_opmi/opmi["+ i +"]/opmi_rcptseqno_org"));
            }
        }
		*/

		return true;
}

//È®Àåâ Äѱâ
function fgrp_etc_open() {
	grp_etc.attribute("visibility") = "visible";
}

//È®Àåâ ²ô±â
function fgrp_etc_close() {
	grp_etc.attribute("visibility") = "hidden";
}

// ÇØ´ç ±â°£¿¡ ¿µ¼öÅ° Á¸ÀçÇÏÁö ¾Ê´Â ISCL °ËÁõ
function fGetISCLNoRcptKey(param) {
    
    var result = true;
    
    var i = grd_inpatinfo.row
    //Àç¿øÁ¤º¸ grid ¼±ÅÃÀÌ ¾øÀ»½Ã 1¹ø°¸¦ ¼±ÅÃÇϵµ·Ï ÇÑ´Ù
    if (i <= 0 ) {
        i = 1;
    }
    
    model.removenode("/root/send/data12");
    model.makeValue("/root/send/data12/pid",      model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_pid"));
    model.makeValue("/root/send/data12/indd",     model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_indd"));
    model.makeValue("/root/send/data12/cretno",   model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_cretno"));
    
    // ¼ö³³ ½Ã °ËÁõ
    if (param == 'R') {
        model.makeValue("/root/send/data12/fromdd",  model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_fromdd"));
        model.makeValue("/root/send/data12/todd",    model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_todd"));
        
    // ¿µ¼öÁõ ÀçÃâ·Â ½Ã °ËÁõ
    } else if (param == 'P') {
        
        // ¼ö³³Á¤º¸ ¼±ÅÃ
        var j = grd_rcptamt.row;
        
        // Y°Ç¿¡ ´ëÇؼ­¸¸ °ËÁõ
        if (model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + j + "]/rcptstat") != "Y") {
            return result;
        }
        
        model.makeValue("/root/send/data12/fromdd",  model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + j + "]/fromdd"));
        model.makeValue("/root/send/data12/todd",    model.getValue("/root/main/admi_info/admi/grdclamrcpt[" + j + "]/todd"));
    }
    
    // ±¸ºÐ R:¼ö³³, P:Ãâ·Â
    model.makeValue("/root/send/data12/gubun",    param);

    if (submit("TRPAI00109")) {
        
        var msg = model.getValue("/root/hidden/isclinfo/msg");
        
        if (msg != null && msg != "") {
    
            messageBox(msg + " ±â°£¿¡ ´ëÇÏ¿©\r\n¼ö³³(B31) ÀÌÈÄ ¼ö°¡°è»êÀÌ ¹ß»ýµÇ¾ú½À´Ï´Ù.\r\nÇØ´ç±â°£ÀÌ Æ÷ÇÔµÈ ¼ö³³°Ç¿¡ ´ëÇÑ Àç¼ö³³À» ÁøÇàÇϽñ⠹ٶø´Ï´Ù.", "C000");
            result = false;
        }
    }
    
    return result;
}