// =================================================================================================
// - 2009.04.27 Creation JHP
//==================================================================================================

/* --------------------------------------------------------------------------------------------------
  Fucntion Name   		||    Description   
----------------------------------------------------------------------------------------------------- 


	2009.07.23 JHP
	½É»çÈ­¸é ȯÀÚ ¸Þ¼¼Áö ¿©ºÎÈ®ÀÎ:							fGetPatMsgYn
	ȯÀÚ±âÁØ Àü¼Û¸Þ¼¼ÁöÀÛ¼º : 									fPatJudgPatMsgTrsm
    ó¹æ±âÁØ Àü¼Û¸Þ¼¼ÁöÀÛ¼º : 									fOrderJudgPatMsgTrsm
    ÇØ´ç°Ç ȯÀÚ Àüü ¸Þ¼¼Áö º¸±â : 							fJudgPatMsgTrsmRef
    
    2009.08.13 JHP
    ó¹æ»çÀ¯Á¶È¸ :													fPrcpResnRef
    ȯÀÚ¹øÈ£ ùÀÚ¸® ¹®ÀÚÀΰæ¿ì ȯÀÚ¹øÈ£·Î ÀÎ½Ä      fChkPidWordNumber
*/


// ¼öÁ¤ÀÌ·Â :
// 20090811 ¼öÁ¤Ãß°¡ JHP, º¯°æ¿äû 858 Àç¿ø½É»ç¿¡¼­ °è»êó¹æ Á¶È¸½Ã Áø·á°ú´Â Àüü·Î ³Ñ°Ü¾ßÇÔ.  ÇÏ¿© ±âÁ¸ °Í. ÁÖ¼®, ºó°ª ³Ñ±èÀ¸·Î ¼öÁ¤
// 20090811 ¼öÁ¤Ãß°¡ JHP, º¯°æ¿äû 858 Àç¿ø½É»ç¿¡¼­ °è»êó¹æ Á¶È¸½Ã Áø·á°ú´Â Àüü·Î ³Ñ°Ü¾ßÇÔ.  Áø·á°úº° Àǻ縦 º¸±â¶§¹®¿¡ Àǻ絵 ÀÏ´Ü Àüü·Î ÇسõÀ½.
// 20090817 ¼öÁ¤Ãß°¡ JHP, ¼öÁ¤¿äû °è»êó¹æ½ÃÇàÁ¶È¸ È­¸é edicd Á¶È¸Á¶°Ç¿¡ Á¸ÀçÇϱ⿡ Ãß°¡ÇÔ. ¾øÀ¸¸é singlenode ¿¡·¯³². 
var VAL_today = getCurrentDate();
var VAL_fromdd = VAL_today.toDate().getAddDate(-6,"M").getDateFormat("YYYYMM");
var VAL_userid = getUserId();	
var VAL_usernm = getUserName();

function fOpenSMPIS00500Detail() {	
	model.makeValue("/root/hidden/smpis00500/cond/patunitsrch", 	model.getValue("/root/main/item1/iteminfo/pid"));
	model.makeValue("/root/hidden/smpis00500/cond/code", 				grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("snglcalcscorcd")));
	model.makeValue("/root/hidden/smpis00500/cond/datecond", 		"");
	model.makeValue("/root/hidden/smpis00500/cond/fromdd", 			model.getValue("/root/main/item1/iteminfo/indd1"));
	model.makeValue("/root/hidden/smpis00500/cond/todd", 				model.getValue("/root/main/item1/iteminfo/dschdd"));
	model.makeValue("/root/hidden/smpis00500/cond/ioflag", 				"I");
	model.makeValue("/root/hidden/smpis00500/cond/orddeptcd", 		"");
	model.makeValue("/root/hidden/smpis00500/cond/orddrid", 			"");
	model.makeValue("/root/hidden/smpis00500/cond/codecond", 		"");
	model.makeValue("/root/hidden/smpis00500/cond/judgrid", 			"");
	model.makeValue("/root/hidden/smpis00500/cond/cancer", 			"");
	model.makeValue("/root/hidden/smpis00500/cond/large", 				"");
	model.makeValue("/root/hidden/smpis00500/cond/middle", 			"");
	model.makeValue("/root/hidden/smpis00500/cond/small", 				"");
	model.makeValue("/root/hidden/smpis00500/cond/edicd", 			"");
	modal("SMPIS00500", "1", "10", "10", "SMPIS00500", "/root/hidden/smpis00500/cond", "/root/send", "", "");						
}

function fOpenSMPIS00600Detail() {	
	fOpenSMPIS00600Call("false");
}

function fOpenSMPIS00600Detail2() {	
	fOpenSMPIS00600Call("true");
}

function fOpenSMPIS00600Call(cutonly) {	
	model.makeValue("/root/hidden/smpis00600/cond/patunitsrch", 	model.getValue("/root/main/item1/iteminfo/pid"));
	model.makeValue("/root/hidden/smpis00600/cond/code", 				grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("snglcalcscorcd")));
	model.makeValue("/root/hidden/smpis00600/cond/clamym", 			"");				
	model.makeValue("/root/hidden/smpis00600/cond/clamymfrom", 	VAL_fromdd);
	model.makeValue("/root/hidden/smpis00600/cond/clamdgfrom", 	"");
	model.makeValue("/root/hidden/smpis00600/cond/clamymto", 		VAL_today);
	model.makeValue("/root/hidden/smpis00600/cond/clamdgto", 		"");
	model.makeValue("/root/hidden/smpis00600/cond/clamflag", 		"");
	model.makeValue("/root/hidden/smpis00600/cond/ioflag", 				"I");
	model.makeValue("/root/hidden/smpis00600/cond/insukind", 		model.getValue("/root/main/item1/iteminfo/insukindcd"));
	model.makeValue("/root/hidden/smpis00600/cond/orddeptcd", 		model.getValue("/root/main/item1/iteminfo/orddeptcd"));
	model.makeValue("/root/hidden/smpis00600/cond/orddrid", 			model.getValue("/root/main/item1/iteminfo/medispclid"));
	model.makeValue("/root/hidden/smpis00600/cond/cutonly", 			cutonly);	
	modal("SMPIS00600", "1", "10", "10", "SMPIS00600", "/root/hidden/smpis00600/cond", "/root/send", "", "");
}

//È­¸é open½Ã(¿Í ÃʱâÈ­ ¹öÆ° Ŭ¸¯½Ã) È­¸é ÃʱâÈ­ ±â´ÉÀ» ¼öÇàÇÑ´Ù.
function fInitialize() {
	 // °øÅëÄڵ带 Á¶È¸ÇÑ´Ù.
	 zbcfGetCodeList( 
		new Array("P0111","P0110","P0112","P0008","P0010","P0117","P0506","P0551"),
		new Array("/root/init/P0111list","/root/init/P0110list","/root/init/P0112list","/root/init/P0008list","/root/init/P0010list","/root/init/P0117list","/root/init/P0506list","/root/init/P0551list"), false );
	
	model.setValue("/root/send/listval/uuee/scrnid","SMPIJ00300");
	
	// 2013.02.19 - ºÎ°¡ÄÚµå ¿ø¹«°øÅëÄÚµåÁ¶È¸
	pamfGetCodeList(new Array(
					"PK029"
					),
	new Array("/root/init/PAM/PK029list"
		));
	
	if ( submit("TRPIJ00407",false) ) {
		var grd_name = model.getValue("/root/hidden/listval/uuee[compsnm='grd_ordlist']/compsnm");
		var refdata = model.getValue("/root/hidden/listval/uuee[compsnm='grd_ordlist']/compscnts");
		var sizedata = model.getValue("/root/hidden/listval/uuee[compsnm='grd_ordlist']/compssizecnts");
		
		var diag_grd_name = model.getValue("/root/hidden/listval/uuee[compsnm='grd_diaglist']/compsnm");
		var diag_refdata = model.getValue("/root/hidden/listval/uuee[compsnm='grd_diaglist']/compscnts");
		var diag_sizedata = model.getValue("/root/hidden/listval/uuee[compsnm='grd_diaglist']/compssizecnts");
		
		if (grd_name != "") {
			setOrderInfoOfCol("grd_ordlist",refdata,sizedata);
		}
		
		if (diag_grd_name != "") {
			setOrderInfoOfCol("grd_diaglist",diag_refdata,diag_sizedata);
		}

	}
	
	// model.refresh(); - ºÒÇÊ¿äÇؼ­ Á¦°Å - 20080731 ¹Úâ¿ø
		
	fSetRdoReset();
	
	btn_clspcd.selected = true;
	// 20091109 JHP ½É»ç¸Þ¸ð¹öÆ°À¸·Î º¯°æ½Ã caseµµ ½É»ç¸Þ¸ð¿¡ ÇØ´çÇÏ´Â °ÍÀ¸·Î º¯°æÇؾßÇÔ.
	model.toggle("case_spclspec");
	
	model.setValue("/root/send/totalsumflag", "Y");
	model.setValue("/root/send/unitflag", "-");
	
	btn_attData.attribute("class") = "btn2_letter4"; 

	var indd = model.getValue("/root/main/item1/iteminfo/indd"); 
	model.setValue("/root/send/indd",indd);
	
	model.setValue("/root/send/curdd",VAL_today);
	
	submit("TRPIJ00305",false);
	// ÄÚµùÀ» À§ÇÏ¿© ÀÓ»ç·Î ¸ðµç ±ÇÇÑÀ» ÁØ´Ù. 
	//model.setValue("/root/hidden/properties/auth", "11100000");
	
	// (common.js) ÇöÀç ·Î±×ÀÎÇÑ »ç¿ëÀÚ ¹øÈ£(ID)
	model.makevalue("/root/hidden/userid",VAL_userid);
	model.makevalue("/root/hidden/usernm",VAL_usernm);		
	
}

/* ´ë»óÀÚÁ¶È¸¿¡¼­ ´ë»óÀÚ ¼±ÅÃÇÏ¿© ³Ñ¾î¿Ã¶§ ¸Þ¼¼Áö ¿©ºÎ È®ÀÎ, JHP. 2009.07.23 */
function fGetPatMsgYn(){

	var cnt = getNodesetCount("/root/main/msglist/list");
	if(cnt > 0){ 
		img_msg.visible = true;
	}else{
		img_msg.visible = false;
	}

}

/* ȯÀÚ±âÁØ Àü¼Û¸Þ¼¼ÁöÀÛ¼º, JHP. 2009.07.16 */
function fPatJudgPatMsgTrsm() {
	if (!isNull(model.getvalue("/root/main/item1/iteminfo/pid"))) {
		fMsgTrsmMakeNode("P");		
	} else {
		messageBox("±âº»Á¤º¸°¡ ", "I004");
	}
	model.refresh();
	modal("SPPIZ01900_½É»çȯÀÚ¸Þ¼¼ÁöÀÛ¼º", "", "400", "300", "", "/root/tmp/msgtrsm/info", "/root/main/patinfo");
	model.removenode("/root/tmp/msgtrsm");
}

/* ó¹æ±âÁØ Àü¼Û¸Þ¼¼ÁöÀÛ¼º, JHP. 2009.07.16 */
function fOrderJudgPatMsgTrsm() {
	if (!isNull(model.getvalue("/root/main/item1/iteminfo/pid"))) {
		
		if(grd_ordlist.row <= 0){
			return;
		}
		fMsgTrsmMakeNode("O");	
	} else {
		messageBox("±âº»Á¤º¸°¡ ", "I004");
	}
	model.refresh();
	modal("SPPIZ01900_½É»çȯÀÚ¸Þ¼¼ÁöÀÛ¼º", "", "400", "300", "", "/root/tmp/msgtrsm/info", "/root/main/patinfo");
	model.removenode("/root/tmp/msgtrsm");
}

function fMsgTrsmMakeNode(kindflag) {
	
	// ÀνºÅϽº»ý¼º
	model.makeValue("/root/tmp/msgtrsm/info/instcd", "");
	model.makeValue("/root/tmp/msgtrsm/info/msgwrtedd", VAL_today);
	model.makeValue("/root/tmp/msgtrsm/info/msgwrteno", "");
	model.makeValue("/root/tmp/msgtrsm/info/msgwrtehistno", "");
	model.makeValue("/root/tmp/msgtrsm/info/histstat", "Y");
	model.makeValue("/root/tmp/msgtrsm/info/pid", model.getValue("/root/main/item1/iteminfo/pid"));
	model.makeValue("/root/tmp/msgtrsm/info/orddd", model.getValue("/root/main/item1/iteminfo/indd1"));
	model.makeValue("/root/tmp/msgtrsm/info/cretno", model.getValue("/root/main/item1/iteminfo/cretno"));
	model.makeValue("/root/tmp/msgtrsm/info/mskind", model.getValue("/root/main/item1/iteminfo/mskind"));
	model.makeValue("/root/tmp/msgtrsm/info/orddeptcd", model.getValue("/root/main/item1/iteminfo/orddeptcd"));
	model.makeValue("/root/tmp/msgtrsm/info/orddrid", model.getValue("/root/main/item1/iteminfo/medispclid"));
	model.makeValue("/root/tmp/msgtrsm/info/orddrnm", model.getValue("/root/main/item1/iteminfo/medispclnm"));
	model.makeValue("/root/tmp/msgtrsm/info/ordtype", "I");
	model.makeValue("/root/tmp/msgtrsm/info/ordqty", 0);
	model.makeValue("/root/tmp/msgtrsm/info/ordtims", 0);
	model.makeValue("/root/tmp/msgtrsm/info/orddays", 0);
	model.makeValue("/root/tmp/msgtrsm/info/rgstrid", "-");
	model.makeValue("/root/tmp/msgtrsm/info/rgstdd", "-");
	model.makeValue("/root/tmp/msgtrsm/info/rgsttm", "-");
	model.makeValue("/root/tmp/msgtrsm/info/sendphone", "");
	model.makeValue("/root/tmp/msgtrsm/info/anybodyyn", "N");
	model.makeValue("/root/tmp/msgtrsm/info/sendflag", "O");
	model.makeValue("/root/tmp/msgtrsm/info/senddate", "");
	model.makeValue("/root/tmp/msgtrsm/info/sendid", VAL_userid);
	model.makeValue("/root/tmp/msgtrsm/info/deliveid", "-");
	model.makeValue("/root/tmp/msgtrsm/info/recvdate", "");
	model.makeValue("/root/tmp/msgtrsm/info/recvid", "");
	model.makeValue("/root/tmp/msgtrsm/info/recvcnfmyn", "N");
	model.makeValue("/root/tmp/msgtrsm/info/recvcnfmid", VAL_userid);
	model.makeValue("/root/tmp/msgtrsm/info/sendmsg", "");
	model.makeValue("/root/tmp/msgtrsm/info/recvmsg", "");
	model.makeValue("/root/tmp/msgtrsm/info/fstrgstrid", "");
	model.makeValue("/root/tmp/msgtrsm/info/fstrgstdt", "");
	model.makeValue("/root/tmp/msgtrsm/info/lastupdtrid", "");
	model.makeValue("/root/tmp/msgtrsm/info/lastupdtdt", "");
	
	if (kindflag == "P") {
		model.makeValue("/root/tmp/msgtrsm/info/kindflag", kindflag);
		model.makeValue("/root/tmp/msgtrsm/info/grupcalcscorcd", "-");
		model.makeValue("/root/tmp/msgtrsm/info/snglcalcscorcd", "-");
		model.makeValue("/root/tmp/msgtrsm/info/prcpdd", "-");
		model.makeValue("/root/tmp/msgtrsm/info/prcpno", 0);
		model.makeValue("/root/tmp/msgtrsm/info/prcppayflag", "-");
	} else if (kindflag == "O") {
		model.makeValue("/root/tmp/msgtrsm/info/kindflag",					kindflag); // ó¹æ±âÁØ 'O', chk
		model.makeValue("/root/tmp/msgtrsm/info/grupcalcscorcd",		grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("grupcalcscorcd"))); //chk
		model.makeValue("/root/tmp/msgtrsm/info/snglcalcscorcd",		grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("snglcalcscorcd")));; //chk
		model.makeValue("/root/tmp/msgtrsm/info/prcpdd",					"");  // ¼­¹ö´Ü¿¡¼­ Á¶È¸ÇÏ¿© °¡Á®¿Í¾ßÇÔ. chk(ÀÔ¿ø¸¸)
		model.makeValue("/root/tmp/msgtrsm/info/prcpno",					"");  // ¼­¹ö´Ü¿¡¼­ Á¶È¸ÇÏ¿© °¡Á®¿Í¾ßÇÔ. chk(ÀÔ¿ø¸¸)
		model.makeValue("/root/tmp/msgtrsm/info/prcppayflag",			"");  // ¼­¹ö´Ü¿¡¼­ Á¶È¸ÇÏ¿© °¡Á®¿Í¾ßÇÔ. chk (ÀÔ¿ø¸¸)
	} 
	
}

// ȯÀÚ Àüü ¸Þ¼¼Áö ³»¿ë Á¶È¸ÇÏ¿© Çϳª¾¿ º¸±â.
function fJudgPatMsgTrsmRef(){
	model.makeValue("/root/tmp/msgtrsm/info/refyn", "Y");
	model.makeValue("/root/tmp/msgtrsm/info/pid", model.getValue("/root/main/item1/iteminfo/pid"));
	model.makeValue("/root/tmp/msgtrsm/info/orddd", model.getValue("/root/main/item1/iteminfo/indd1"));
	model.makeValue("/root/tmp/msgtrsm/info/cretno", model.getValue("/root/main/item1/iteminfo/cretno"));
	model.makeValue("/root/tmp/msgtrsm/info/mskind", model.getValue("/root/main/item1/iteminfo/mskind"));
	model.makeValue("/root/tmp/msgtrsm/info/orddeptcd", model.getValue("/root/main/item1/iteminfo/orddeptcd"));
	model.makeValue("/root/tmp/msgtrsm/info/orddrid", model.getValue("/root/main/item1/iteminfo/medispclid"));
	model.makeValue("/root/tmp/msgtrsm/info/ordtype", "I");
	
	modal("SMPIJ02600_¸Þ¼¼ÁöÇöȲ", "", "100", "100", "", "/root/tmp/msgtrsm/info", "/root/init/openchk");
	model.removeNode("/root/tmp/msgtrsm");
}

// ó¹æ»çÀ¯Á¶È¸
// history.. Áø·á¿¡ ÀÖ´ÂÈ­¸é ±âº»Á¶°ÇÀ¸·Î Æ˾÷»ç¿ë..YS(À±»ù)¿äû
function fPrcpResnRef(){
	// ¼¼¼Ç°ª ¹Þ±â
	model.makeValue("/root/tmp/prcpresnref/info/pid", 			model.getValue("/root/main/item1/iteminfo/pid"));	// µî·Ï¹øÈ£
	model.makeValue("/root/tmp/prcpresnref/info/fromdd",		model.getValue("/root/main/item1/iteminfo/indd1"));	// ó¹æ½ÃÀÛÀÏ default indd
	model.makeValue("/root/tmp/prcpresnref/info/todd",		model.getValue("/root/main/item1/iteminfo/dschdd"));	// ó¹æÁ¾·áÀÏ default dschdd
	model.makeValue("/root/tmp/prcpresnref/info/orddeptcd",	"-");	// Áø·á°ú : ÁÖÁø·á°ú
	model.makeValue("/root/tmp/prcpresnref/info/orddrid",		"-");	// ÁÖÄ¡ÀÇ : default "-"
	model.makeValue("/root/tmp/prcpresnref/info/mainjudgid",	"-");	// ½É»çÀÚ : ÇöÀç½É»çÀÚ
    model.makeValue("/root/tmp/prcpresnref/info/prcpcd",		grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("grupcalcscorcd")));	// ¼ö°¡ÄÚµå : ±×·ìÄÚµå
	model.makeValue("/root/tmp/prcpresnref/info/insukind",		model.getValue("/root/main/item1/iteminfo/insukindcd"));	// º¸ÇèÀ¯Çü : ȯÀÚº¸ÇèÀ¯Çü
	model.makeValue("/root/tmp/prcpresnref/info/ioflag",			"I");	// ³»¿øÀ¯Çü : default "-"
	model.makeValue("/root/tmp/prcpresnref/info/resncd",		"FF"); 	// »çÀ¯±¸ºÐ : default "FF" Áߺ¹Ã³¹æ
	model.makeValue("/root/tmp/prcpresnref/info/popup",		"judg"); 	// Æ˾÷»ç¿ë󱸺Р: judg(½É»ç)
	
	modal("SPMMO19000_Áߺ¹Ã³¹æ»çÀ¯Á¶È¸", "", "400", "300", "", "/root/tmp/prcpresnref/info", "/root/tmp/prcpresnref/info");
	model.removeNode("/root/tmp/prcpresnref");
	
}

// ȯÀÚ¹øÈ£ ¹®ÀÚ ¼ýÀÚ ¿©ºÎ ÆÇ´Ü. (isNaN ¼ýÀÚ°¡¾Æ´Ò°æ¿ì true, isFinite ¼ýÀÚÀÏ°æ¿ì true)
// ¼º°¡È¯ÀÚ¹øÈ£Áß Ã¹±ÛÀÚ°¡ ¹®ÀÚÀΰæ¿ì°¡ À־ ÆÇ´ÜÇÔ. 
// ÇöÀç Àç¿ø¸ÞÀÎÀº Àû¿ë¾ÈÇÔ. ´ë»óÀÚÁ¶È¸¸¸ µû·Î È­¸é¿¡ Àû¿ëÇÔ.
function fChkPidWordNumber(pid)
{
	if( typeof( this ) == "undefined" ) return false;
	if( this.length == 0 ) return false;

	var thisSting = pid.toString();
	var firstpid = "";
	
	for( var i=0; i < thisSting.length; i++ ){
		var thisNumber = thisSting.substring( i, i+1 );

		// ¼ýÀÚ°¡ ¾Æ´Ï¸é
		if( isNaN( thisNumber ) ) firstpid = firstpid + 'W';
		// ¼ýÀÚ¸é 
		if( isNaN( thisNumber ) == false ) firstpid = firstpid + 'N';
		// °ø¹éÀ̸é FALSE ¸®ÅÏ
		if( " " == thisNumber ) firstpid = firstpid + 'L';
	}
	
	var firstpidYN = firstpid.substring( 0, 2 );
	
	// ù¹ø° µÎ¹ø° ±ÛÀÚ ¿©ºÎ
	// ¹®ÀÚ¼ýÀÚ, ¼ýÀÚ¼ýÀÚ :  pid·Î ÆÇ´Ü : true
	// ¹®ÀÚ¹®ÀÚ, ¼ýÀÚ¹®ÀÚ :  ±ÛÀÚ·Î ÆÇ´Ü : false
	// ±×¿Ü : ±ÛÀÚ·Î ÆÇ´Ü : false
	if ( firstpidYN == "WN"){ return true}
	else if ( firstpidYN == "NN"){ return true}
	else if ( firstpidYN == "WW"){ return false}
	else if ( firstpidYN == "NW"){ return false}
	else { return false }
}

//¼±ÅõÈȯÀÚ ÁÖ,ºÎÀ¯Çü¿¡ µû¸¥ º¸ÇèÁ¤º¸ ¸®½ºÆ®¸¦ °®°í ¿Â´Ù. (pmihiphs)
function fGetInsulist(){
	//»ö»ó ÃʱâÈ­
	opt_patientinfo.attribute("background-color") = "transparent";
	cmb_itemraremsg.attribute("background-color") = "transparent";
	
	// ±âÁ¸ Open µÇ¾î ÀÖ´Â À©µµ¿ì Áß ´ë»óÀÚ Á¶È¸È­¸éÀ» Á¦¿ÜÇÑ ¸ðµç âÀ» ´Ý´Â´Ù.
	var judgOpenWindow = getChildWindow("SPPMC02500");		// SPPMC02500_´ë»óÀÚ Á¶È¸.xrw

	var childCnt = window.children.length;
	childCnt = eval(childCnt) + 1;
	
	for( var i = childCnt; i > 1; i-- ) {
		var child = window.children.item(i-1);
		if (judgOpenWindow != child) {
			window.children.item(i-1).close();
		}
	}
	
	model.removeNodeset("/root/main/list1");
	model.resetInstanceNode("/root/hidden/sppiz00300/cond");			
	model.resetInstanceNode("/root/hidden/sppiz00300/rslt");
	model.resetInstanceNode("/root/hidden/smpiz00100/cond");			
	model.resetInstanceNode("/root/hidden/smpiz00100/rslt");

	model.setValue("/root/send/indd1", model.getValue("/root/main/item1/iteminfo/indd1"));
	model.setValue("/root/send/curdd",VAL_today);
	submit("TRPIJ00309",false);
} 

//´ë»óÀÚ Á¶È¸¿¡¼­ ¼±ÅõÈȯÀÚÀÇ º¸ÇèÁ¤º¸ ¸®½ºÆ®¸¦ Á¶È¸ ÇÑ ÈÄ ÃÖÁ¾°ÍÀ» ¼±Åà ÇÏ¿© ȯÀÚ Á¤º¸¸¦ ÀÚµ¿ Á¶È¸ ȯ´Ù. 
function fSelectInsulist(getinsukind, getmskind, getflag){
	var nodecnt = getNodesetCount("/root/main/list1/insulist");
	if (nodecnt == 0) {	// º¸Çè³»¿ªÀÌ ¾ø´Â°Ü¿ì
		return;
	}
	
	var mskind = "";
	var fromdd = "";
	var todd = "";
	var insukind = "";
	var suppkind = "";
	var cretno = "";
	var seqno = "";
	var row = 0;

	// ´ë»óÀÚ Á¶È¸¿¡¼­ ¼±ÅÃµÈ ³»¿ëÀÌ Á¶È¸µÇµµ·Ï ¼öÁ¤ - ¹Úâ¿ø
	// À¯ÇüÀÌ °°Àº µ¥ÀÌŸ Áß ¸¶Áö¸· µ¥ÀÌŸ ¼±ÅÃ
	var personflag = model.getValue("/root/send/personflag");
	if (personflag != "9") {
		//ÁÖ¼® ó¸®ÇÔ. 2007.08.22 ¹ÚµµÇü
		//À§ÀÇ ·ÎÁ÷ ¼öÁ¤. ½ÃÀÛÀÏÀÚ°¡ ÃÖÁ¾ÀÏÀÚ·Î µ¥ÀÌÅÍ °¡Á®¿È plet2.
		var maxfromdd = model.getXPathValue("max(/root/main/list1/insulist[mskind='"+getmskind+"']/fromdd)");
		mskind = model.getValue("/root/main/list1/insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']/mskind");
		fromdd = model.getValue("/root/main/list1/insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']/fromdd");
		todd = model.getValue("/root/main/list1/insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']/todd");
		insukind = model.getValue("/root/main/list1/insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']/insukind");
		suppkind = model.getValue("/root/main/list1/insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']/suppkind");
		cretno = model.getValue("/root/main/list1/insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']/cretno");
		seqno = model.getValue("/root/main/list1/insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']/seqno");
		
		model.setValue("/root/send/mskind",mskind);
		model.setValue("/root/send/fromdd",fromdd);
		model.setValue("/root/send/todd",todd);
		model.setValue("/root/send/ordfromdd",fromdd);
		model.setValue("/root/send/ordtodd",todd);
		model.setValue("/root/send/insukind",insukind);
		model.setValue("/root/send/suppkind",suppkind);
		model.setValue("/root/send/cretno",cretno);
		model.setValue("/root/send/seqno",seqno); 
	}

	// °Ë»öÁ¶°Ç ÃʱâÈ­
	model.setValue("/root/hidden/list1/isclcond/matractflag","");
	model.setValue("/root/hidden/list1/isclcond/calcpayflag","");
	model.setValue("/root/hidden/list1/isclcond/snglcalcscorcls","");
	model.setValue("/root/hidden/list1/isclcond/cpflag","");
	model.setValue("/root/hidden/list1/isclcond/edicd","");
	model.setValue("/root/hidden/list1/isclcond/snglcalcscorcd","");
	model.setValue("/root/hidden/list1/isclcond/actingflag","");
	grd_ordlist.attribute("nodeset") = "/root/main/list2/iscllist";

	fGetItemInfo(getflag);
	
}


// ó¹æ Grid ¸¶¿ì½º ¿À¸¥ÂÊ "ó¹æÁÖ¼®ÀÔ·Â"
function fOrderGridInsertCmt() {

	var rdounitflag = model.getValue("/root/send/unitflag");
	var pid = model.getValue("/root/main/item1/iteminfo/pid");
	var indd = model.getValue("/root/main/item1/iteminfo/indd1");
	var rows = grd_clcjlist.rows;
	
	if (rdounitflag == "M") {
		// ÁÙ´ÜÀ§·Î ¼ÂÆÃÇÏ°í ó¸®
		model.setValue(rdo_unitflag.attribute("ref"), "J");
		grd_clcjlist.attribute("nodeset") = "/root/main/list4/clcjlist[unitflag = 'J']";
		grd_clcjlist.rebuild();

		// ´ÜÀ§¿¡  ¿¡ µû¶ó ÇØ´ç ÇàÀִ ƯÁ¤ÄÚµå ÄÞº¸ Àç¼³Á¤
		for (var i=1; i< rows; i++) {
			var unitflag =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));
			var status =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("status"));
				
			if (status != "") {
				grd_clcjlist.rowStatus(i) = status;
			}

			if (unitflag == "M") {
				grd_clcjlist.cellComboNodeset(i,3) = "/root/init/P0117list/P0117[minval = 'M'' and cdid != 'MX999']";	
			} else if (unitflag == "J") {
				grd_clcjlist.cellComboNodeset(i,3) = "/root/init/P0117list/P0117[minval = 'J']";
			}				
		}
	}
	
	model.removenode("/root/hidden/sppij00500/rslt");		// SPPIJ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸® ¿¡¼­ ¼±ÅÃµÈ °á°ú°¡ copyNodeµÇ´Â °æ·ÎÀÓ
	model.removenode("/root/hidden/sppij00500/cond");


	for (var k=0; k < grd_ordlist.selectedRows; k++ ) {
		var row = grd_ordlist.selectedRow(k);
		var edicd = grd_ordlist.valueMatrix(row, grd_ordlist.colref("edicd"));
		var calcscorcd = grd_ordlist.valueMatrix(row, grd_ordlist.colref("snglcalcscorcd"));
		
		if (edicd) {
		} else {
			messageBox("EDIÄڵ尡 ¾ø´Â °æ¿ì ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ", "I004");	///EDIÄڵ尡 ¾ø´Â °æ¿ì ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ¾ø½À´Ï´Ù.
			return;
		}
	}
	

	var rowcnt = 1;
	var setrow = 0;

	for (var k=0; k < grd_ordlist.selectedRows; k++ ) {
		var row = grd_ordlist.selectedRow(k);
		var edicd = grd_ordlist.valueMatrix(row, grd_ordlist.colref("edicd"));
		var calcscorcd = grd_ordlist.valueMatrix(row, grd_ordlist.colref("snglcalcscorcd"));
		
		if (rows == 1) {
			model.makevalue("/root/hidden/sppij00500/cond/pid", pid);
			model.makevalue("/root/hidden/sppij00500/cond/indd", indd);
			model.makevalue("/root/hidden/sppij00500/cond/edicd", edicd);
			model.makevalue("/root/hidden/sppij00500/cond/unitflag","J");	
			model.makevalue("/root/hidden/sppij00500/cond/flag", "I");
			model.makevalue("/root/hidden/sppij00500/cond/spclcd", "JX999");
			model.makevalue("/root/hidden/sppij00500/cond/spclcdnm", "");
			model.makevalue("/root/hidden/sppij00500/cond/detldesc", "ƯÁ¤³»¿ªÀÇ ±¸ºÐÄڵ尡 ¾ø´Â °æ¿ì¿¡´Â ±âŸ ÁÙ¹øÈ£(È®Àå ¹øÈ£)´ÜÀ§ÀÇ ±âŸ³»¿ª¿¡ ±âÀç");
			model.makevalue("/root/hidden/sppij00500/cond/spclspec", "");
			model.makevalue("/root/hidden/sppij00500/cond/remfact","X(700)");
			model.makevalue("/root/hidden/sppij00500/cond/rownum", "");
			model.makevalue("/root/hidden/sppij00500/cond/calcscorcd", calcscorcd);

		} else if (getNodesetCount(grd_clcjlist.nodeset+"[calcscorcd='"+calcscorcd+"']") == 0) {
			
			model.makevalue("/root/hidden/sppij00500/cond/pid", pid);
			model.makevalue("/root/hidden/sppij00500/cond/indd", indd);
			model.makevalue("/root/hidden/sppij00500/cond/edicd", edicd);
			model.makevalue("/root/hidden/sppij00500/cond/unitflag","J");	
			model.makevalue("/root/hidden/sppij00500/cond/flag", "I");
			model.makevalue("/root/hidden/sppij00500/cond/spclcd", "JX999");
			model.makevalue("/root/hidden/sppij00500/cond/spclcdnm", "");
			model.makevalue("/root/hidden/sppij00500/cond/detldesc", "ƯÁ¤³»¿ªÀÇ ±¸ºÐÄڵ尡 ¾ø´Â °æ¿ì¿¡´Â ±âŸ ÁÙ¹øÈ£(È®Àå ¹øÈ£)´ÜÀ§ÀÇ ±âŸ³»¿ª¿¡ ±âÀç");
			model.makevalue("/root/hidden/sppij00500/cond/spclspec", "");
			model.makevalue("/root/hidden/sppij00500/cond/remfact","X(700)");
			model.makevalue("/root/hidden/sppij00500/cond/rownum", "");
			model.makevalue("/root/hidden/sppij00500/cond/calcscorcd", calcscorcd);
			
			model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/pid", pid);
			model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/indd", indd);
			model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/edicd", edicd);
			model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/unitflag","J");	
			model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/flag", "I");
			model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclcd", "JX999");
			model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclcdnm", "");
			model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/detldesc", "ƯÁ¤³»¿ªÀÇ ±¸ºÐÄڵ尡 ¾ø´Â °æ¿ì¿¡´Â ±âŸ ÁÙ¹øÈ£(È®Àå ¹øÈ£)´ÜÀ§ÀÇ ±âŸ³»¿ª¿¡ ±âÀç");
			model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclspec", "");
			model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/remfact","X(700)");
			model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/rownum", "");
			model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/calcscorcd", calcscorcd);
			
			rowcnt = rowcnt+1;
		} else {
			for (var i=1; i<rows; i++) {

				var clcjedicd = grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("edicd"));
				var spclcd = grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclcd"));
				
				if ( edicd == clcjedicd) {
					model.makevalue("/root/hidden/sppij00500/cond/pid", pid);
					model.makevalue("/root/hidden/sppij00500/cond/indd", indd);
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/flag", "U");
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/edicd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("edicd")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/detldesc", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("detldesc")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclcd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclcd")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclcdnm", "");
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclspec", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclspec")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/remfact", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("remfact")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/rownum", i);
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/unitflag","J")
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/oldspclcd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclcd")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/oldspclspec", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclspec")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/calcscorcd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("calcscorcd")));
																		
					rowcnt = rowcnt+1;
					
					// ƯÁ¤³»¿ª »ó¼¼ È­¸é¿¡ º¸¿©Á٠ƯÁ¤³»¿ª ¼±ÅÃ
					setrow = i;
						
				} 
	
				model.makevalue("/root/hidden/sppij00500/cond/edicd", edicd);
				model.makevalue("/root/hidden/sppij00500/cond/unitflag","J");	
				
				if ( model.getValue("/root/main/list4/clcjlist["+ setrow +"]/spclcd") == "JX999" ) {
					model.makevalue("/root/hidden/sppij00500/cond/pid", pid);
					model.makevalue("/root/hidden/sppij00500/cond/indd", indd);
					model.makevalue("/root/hidden/sppij00500/cond/flag", "U");
					model.makevalue("/root/hidden/sppij00500/cond/spclcd", grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("spclcd")));
					model.makevalue("/root/hidden/sppij00500/cond/spclcdnm", "");
					model.makevalue("/root/hidden/sppij00500/cond/detldesc", grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("detldesc")));
					model.makevalue("/root/hidden/sppij00500/cond/spclspec", grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("spclspec")));
					model.makevalue("/root/hidden/sppij00500/cond/remfact", grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("remfact")));
					model.makevalue("/root/hidden/sppij00500/cond/rownum", setrow);
					model.makevalue("/root/hidden/sppij00500/cond/calcscorcd", grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("calcscorcd")));
													
				} else {
					model.makevalue("/root/hidden/sppij00500/cond/pid", pid);
					model.makevalue("/root/hidden/sppij00500/cond/indd", indd);
					model.makevalue("/root/hidden/sppij00500/cond/flag", "I");
					model.makevalue("/root/hidden/sppij00500/cond/spclcd", "JX999");
					model.makevalue("/root/hidden/sppij00500/cond/spclcdnm", "");
					model.makevalue("/root/hidden/sppij00500/cond/detldesc", "ƯÁ¤³»¿ªÀÇ ±¸ºÐÄڵ尡 ¾ø´Â °æ¿ì¿¡´Â ±âŸ ÁÙ¹øÈ£(È®Àå ¹øÈ£)´ÜÀ§ÀÇ ±âŸ³»¿ª¿¡ ±âÀç");
					model.makevalue("/root/hidden/sppij00500/cond/spclspec", "");
					model.makevalue("/root/hidden/sppij00500/cond/remfact","X(700)");
					model.makevalue("/root/hidden/sppij00500/cond/rownum", "");
					model.makevalue("/root/hidden/sppij00500/cond/calcscorcd", calcscorcd);
				}
												
			}
			
		}
	}
	
	model.removenode("/root/hidden/sppij00500/rslt");
	modal("SPPIJ00500" ,"", "10", "10", "SPPIJ00500", "/root/hidden/sppij00500", "/root/hidden/clcj", "", "");	// SPPIJ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®.xrw

	var rsltcnt = getNodesetCount("/root/hidden/sppij00500/rslt/list");
	
	// ó¸® °Ç¼ö 
	if (rsltcnt > 0) {
		
		for(var i=rsltcnt; i>0; i--) {	
		
			var flag = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/flag");
			var rownum = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/rownum");
			var edicd = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/edicd");
			var newspclcd = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/spclcd");
			var newspclcdnm = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/spclcdnm");
			var newspclspec = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/spclspec");
			var newremfact  = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/remfact ");
			var newdetldesc = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/detldesc");
			var newdcalcscorcd = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/calcscorcd");
			var oldspclcd = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/oldspclcd");
			var oldspclspec = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/oldspclspec");
	
			// ƯÁ¤ÄÚµå Ãß°¡ÀÎ °æ¿ì
			if (flag == "I") {

				var clcjrow = grd_clcjlist.rows - 1;	// ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù. 
				grd_clcjlist.insertRow(clcjrow++, true,false,false);
				
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("pid")) =  model.getValue("/root/send/pid");
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("indd")) =  model.getValue("/root/send/indd");
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("cretno")) =  model.getValue("/root/send/cretno");
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("fromdd")) =  model.getValue("/root/send/fromdd");
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("mskind")) =  model.getValue("/root/send/mskind");
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("unitflag")) = "J";
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("edicd")) = edicd;
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclcd")) = newspclcd;
				//grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclspec")) = newspclspec;
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("remfact")) = newremfact;
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("detldesc")) = newdetldesc;
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("calcscorcd")) = newdcalcscorcd
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclmemoflag")) = "E";
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("status")) = "3";
				
				// ó¹æGrid¿¡¼­µµ ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÇ 'T' Ä÷³ÀÇ "*" ¸¦ Ç¥½ÃÇÑ´Ù.
				var rowcnt =  getNodesetCount("/root/main/list2/iscllist");		// ÇÊÅÍ
				rowcnt = eval(rowcnt) + 1;	
				for (var j = 1; j < rowcnt; j++) {
				//for (var j = 1; j < grd_ordlist.rows; j++) {
					var clcjedicd = model.getValue("/root/main/list2/iscllist["+ j +"]/edicd");
					if (edicd == clcjedicd) {
						model.setValue("/root/main/list2/iscllist["+ j +"]/text", "*");
						//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î º¯°æ - 20080731 ¹Úâ¿ø
						//model.refreshpart("/root/main/list2/iscllist/text");
					}
				}
				
			// ƯÁ¤ÄÚµå  º¯°æÀÎ °æ¿ì	
			} else if (flag == "U") {
				
				grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcd")) = newspclcd;
				//grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
				grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclspec")) = newspclspec;
				grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("remfact")) = newremfact;
				grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("detldesc")) = newdetldesc;
				grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("calcscorcd")) = newdcalcscorcd;

				if ( grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) != "3") {
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "0";
				}
				
				//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î º¯°æ - 20080731 ¹Úâ¿ø
				model.refreshpart("/root/main/list4/clcjlist");
				// ƯÁ¤ÄÚµå, ƯÁ¤³»¿ªÀÌ º¯°æµÇ¾ú°Å³ª »èÁ¦µÈ ƯÁ¤Äڵ带 Á¶È¸ÇÏ¿© "È®ÀÎ"À» ¼±ÅÃÇÑ °æ¿ì
				if (oldspclcd != newspclcd || oldspclspec != newspclspec || grd_clcjlist.rowstatus(row) == 4) {
					var rowstatus = grd_clcjlist.rowstatus(rownum);
					if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
					} else {
						grd_clcjlist.rowstatus(rownum) = 2;		// 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "2";
					}
				}
					
				// ó¹æGrid¿¡¼­µµ ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÇ 'T' Ä÷³ÀÇ "*" ¸¦ Ç¥½ÃÇÑ´Ù.
				var rowcnt =  getNodesetCount("/root/main/list2/iscllist");		// ÇÊÅÍ
				rowcnt = eval(rowcnt) + 1;
				for (var j = 1; j < rowcnt; j++) {
				//for (var j = 1; j < grd_ordlist.rows; j++) {
					var clcjedicd = model.getValue("/root/main/list2/iscllist["+ j +"]/edicd");
					if (edicd == clcjedicd) {
						model.setValue("/root/main/list2/iscllist["+ j +"]/text", "*");
						//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î º¯°æ - 20080731 ¹Úâ¿ø
						model.refreshpart("/root/main/list2/iscllist/text");
					}
				}
				model.setValue("/root/hidden/item1/message", "ƯÁ¤ÄÚµå - "+ newspclcd +" / ƯÁ¤³»¿ª : "+ newspclspec +" / ±âÀçÇü½Ä : "+ newremfact);
				model.refreshpart("/root/hidden/item1/message");
																			
			// ƯÁ¤ÄÚµå »èÁ¦ÀÎ °æ¿ì	
			} else if (flag == "D" && rownum != "" ) {
				
				var cnt = 0;
				
				for (var j = 1; j < grd_clcjlist.rows; j++) {
					var clcjedicd = model.getValue("/root/main/list4/clcjlist["+ j +"]/edicd");
					if (edicd == clcjedicd) {
						if (grd_clcjlist.rowstatus(j) != 4) {
							cnt++;
						}
					}
				}
				
				if (cnt > 0) {
				} else {
					grd_ordlist.valueMatrix(row, grd_ordlist.colref("text")) = "";
					//model.resetInstanceNode("/root/main/list2/iscllist["+ row +"]/text");
				}
				
				// ƯÁ¤³»¿ª Grid¿¡¼­ »èÁ¦
				var rowstatus = grd_clcjlist.rowstatus(rownum);
				if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
					grd_clcjlist.deleteRow(rownum, false);		// ÇØ´ç ¶óÀÎÀ» Grid¿¡¼­ »èÁ¦ÇÑ´Ù.
				} else {							// 0 : new, 2 : update
					grd_clcjlist.rowstatus(rownum) = 4;		// 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
				}
				grd_clcjlist.row = rownum;
					
				var rowcnt =  getNodesetCount("/root/main/list2/iscllist");		// ÇÊÅÍ
				rowcnt = eval(rowcnt) + 1;
				for (var j = 1; j < rowcnt; j++) {
				//for (var j = 1; j < grd_ordlist.rows; j++) {
					var clcjedicd = model.getValue("/root/main/list2/iscllist["+ j +"]/edicd");
					if (edicd == clcjedicd) {
						model.setValue("/root/main/list2/iscllist["+ j +"]/text", "");
						//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î º¯°æ - 20080731 ¹Úâ¿ø
						model.refreshpart("/root/main/list2/iscllist/text");
					}
				}
	
			} // ƯÁ¤ ÄÚµå »óÅ µû¸¥ if end
		} // for end

		var rdounitflag = model.getValue("/root/send/unitflag");

		if (rdounitflag == "-") {
			for (var i=1; i<grd_clcjlist.rows; i++) {
				var delstatus = grd_clcjlist.rowStatus(i);
				var delspclspec = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec"));
				if (delstatus == 1 || delstatus == 3) { 	// 0 : new, 3 : insert & new
					if (delspclspec == "") {
						grd_clcjlist.deleteItem(i);
					}
				}
			}
			
			// ÀÔ·ÂÇà Ãß°¡
			fSpclGridInsertRow();
			
		} else if (rdounitflag == "M") {							
			grd_clcjlist.attribute("nodeset") = "/root/main/list4/clcjlist[unitflag = 'M']";
			grd_clcjlist.rebuild();
		} else if (rdounitflag == "J") {						
			grd_clcjlist.attribute("nodeset") = "/root/main/list4/clcjlist[unitflag = 'J']";
			grd_clcjlist.rebuild();
		}

		for (var i=1; i<grd_clcjlist.rows; i++) {
			var unitflag =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));
			var status =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("status"));
	
			if (status != "") {
				grd_clcjlist.rowStatus(i) = status;
			}
			
			if (unitflag == "M") {
				grd_clcjlist.cellComboNodeset(i,3) = "/root/init/P0117list/P0117[minval = 'M' and cdid != 'MX999']";	
			} else if (unitflag == "J") {
				grd_clcjlist.cellComboNodeset(i,3) = "/root/init/P0117list/P0117[minval = 'J']";
			}
												
		}	
		//fSaveClcjList();
	} // ó¸® °Ç¼ö  if end
	
	//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î º¯°æ - 20080731 ¹Úâ¿ø
		
	
}

//Àç¿ø½É»ç ÀÎÀû»çÇ×, º¸Çè³»¿ª, »óº´, ±Ý¾×³»¿ªÀ» °®°í ¿Â´Ù. 
function fGetItemInfo(paramFlag){
	group9.visible = false;
	
	btn_attData.attribute("class") = "btn2_letter4"; 
	btn_drginfo.attribute("visibility") = "hidden";

	// NST °ü·Ã¹öÆ° ÃʱâÈ­(2015.11.16 LEJ)
	btn_nst.disabled = true;
	btn_nst.attribute("class") = "btn2_letter8";
	btn_nst.attribute("text") = "NST";
		
	
	// ÀбâÀü¿ëÀ» À§ÇÑ º¯¼ö
	var readonly = model.getValue("/root/send/readonly");
	// ¿ÀÇÂÀÏÀÚ¸¦ °¡Á®¿È - ÇϵåÄÚµù Á¦°Å 20090302 ¹Úâ¿ø, ÀÇÁ¤ºÎ,¿©Àǵµ,¼º°¡,ºó¼¾Æ®¸¦ À§Çؼ­ ¿¹¿ÜÀÛ¾÷ÇÔ ³ªÁß¿¡ Á¦°ÅÇÊ¿ä
	var opendd = model.getValue("/root/main/item1/iteminfo/opendd");

	if(ipt_pid.currentText.length >0)
	{
		model.resetInstanceNode("/root/main/item1/iteminfo");
		model.resetInstanceNode("/root/main/item18/cnstinfo");
		model.removeNodeset("/root/main/list1/insulist");
		model.removeNodeset("/root/main/list3/diaglist");
		model.removeNodeset("/root/main/list2/iscllist");
		model.setValue("/root/hidden/item1/vcode","");
		grd_ordlist.refresh();
		
		model.setValue("/root/send/curdd",VAL_today);
		model.makeValue("/root/send/paramflag",paramFlag);
		
		asyncSend("TRPIJ00322", "/root/send", "/root/chklist/goso", "responseHandlerTRPIJ00322");

		if(!submit("TRPIJ00301")){
			messageBox("¼±ÅÃµÈ È¯ÀÚ°¡","I004");
			return;
		}
		//model.refresh();

		// 20091109 JHP ºó¼¾Æ® º´¿ø ¿À·ùÈ®ÀÎ, fGetItemInfo¿¡¼­ »ó´ÜÁ¤º¸´Â ȯÀÚ Á¤º¸ Á¶È¸ÈÄ¿¡ ¹Ù·Î »ó´ÜÁ¤º¸¼ÂÆÃµÇ°Ô ¹Ù²Ù°Ô ¿äûÇÔ. 
		// ÇÏ¿© delPatientInfos(), fSetOutPatPamInfo()¸¦ »ó´ÜÂÊ È¯ÀÚÁ¤º¸Á¶È¸ ÀÌÈÄ·Î À̵¿½ÃÅ´. ¿Í À±¿µ¿Á, Á¤½Â¿ì, ¹Úâ¿ø.
		// »ó´Ü¿¡ ȯÀÚÁ¤º¸ ÃʱâÈ­ÇÏ°í ±âÀÔÇϱâ (ÀÌ¹Ì Åð¿øȯÀÚ´Â Á¦¿Ü)
		delPatientInfos();
		fSetOutPatPamInfo();
		
		//ó¹æÁ¶È¸Á¶°ÇºÎºÐ Ŭ¸®¾î
		fSetRdoReset();
		fGetSelectedOrderData();	
		
		// ó¹æ³»¿ªÀ» °®°í ¿Â´Ù. 
		fGetIsclList(paramFlag);
		
		// 2009.07.27 ±âÁ¸ »ó´Ü¿¡ Á¦¸ñÁÙ ¹«Á¶°Ç È÷µç.
		// grd_insuhistory.rowhidden(0)=true; 
		// 2009.07.27 4°ÇÀÌ»óÀÌ¸é ¾È¾ø¾Ö°í 4°ÇÀÌÇÏ¸é ¾ø¾Ø´Ù. 
		var nodecnt = getNodesetCount("/root/main/list1/insulist");
		if(nodecnt < 4) {
			grd_insuhistory.rowhidden(0)=true; 
		} 
		
		// ¼öÁ¤Ãß°¡, 2009.07.27 À¯ÇüÁ¤º¸°¡ ¸¹À»°æ¿ì ½ºÅ©·Ñ¹Ù »ý°Ü¼­ Àϼö°¡ ¾Èº¸À̱⶧¹®¿¡ ¹öÆ°À» µÎ¾î¼­ ¸¹ÀÌ º¸°Ô²ûÇß´Ù. 
		// ´Ù¸¥°Å ¼Õ´ë¸é ÀÏÀÌÄ¿Áö´Ï±ø. ¤»¤»
		// ÀÏ´Ü ¸ÕÀú ¹öÆ°¿¡ ÃʱâÈ­Çü½ÄÀ¸·Î ¸ðµÎ ¼û±èÇسõ´Â´Ù. 
		btn_insuhistoryup.visible =  false;
		btn_insuhistorydown.visible =  false;
		grd_insuhistory.attribute("height") = "77";
		
		// À¯Çü°¹¼ö¿¡ µû¶ó¼­ ¹öÆ°º¸¿©ÁÖ°í ±æÀÌüũÇÑ´Ù. 
		var nodecnt = getNodesetCount("/root/main/list1/insulist");
		if(nodecnt >= 4) {
			btn_insuhistorydown.visible =  true;
		} 

		//»óº´ÀÌ ÇѰǵµ ¾ø´Â°æ¿ì ÀÚµ¿À¸·Î ó¹æ»óº´À» °»½ÅÇÑ´Ù. 
		if(grd_diaglist.rows < 2)
		{
			if(grd_diaglist.rows == 1){
				var chkdiag = model.getValue("/root/main/list3/diaglist["+ 1 +"]/diagcd");
				if(!chkdiag){
					fRefreshDiag();		
				}
			}
		}
							
		fSpclGridInsertRow();
		// 20080811 ÀÚµ¿À¸·Î »óº´ÁÙÃß°¡ Á¦¿ÜÇϱâ·ÎÇÔ
		fDiagGridInsertRow();

		var lastjudgendid = model.getValue("/root/main/item1/iteminfo/lastjudgendid");
		var lastjudgendnm = model.getValue("/root/main/item1/iteminfo/lastjudgendnm");
		var opyn = model.getValue("/root/main/item1/iteminfo/opflag");
		var age = model.getValue("/root/main/item1/iteminfo/age");					
		model.setValue("/root/send/age",age);

		var userid  = model.getValue("/root/hidden/userid");
		
		btn_save.disabled = false;
		//»ó¼¼È­¸é ÀúÀå¹öÆ° 󸮸¦ À§ÇØ ³Ö¾î ³õ´Â´Ù.   - 2007-11.29 ¹ÚµµÇü
		model.setValue("root/hidden/item1/chksave","N");
		btn_recalc.disabled = false;
		btn_sugicalc.disabled = false;
		btn_dclrtclose.disabled = false;
		btn_dschclose.disabled = false;
		btn_totjudgclose.disabled = false;
		btn_dschclosecancel.disabled = false;
		btn_midregist.disabled = false;
		btn_midregistyn.disabled = false;
		
	}else
	{
		messageBox("ȯÀÚ¹øÈ£¸¦","C001");
		return;
	}
	// ¼ö¼ú½É»ç»óŸ¦ °¡Á®¿Â´Ù. -- ¼ö¼ú½É»ç»óÅ´  ¼ö¼úÀÌ ÀÖ´Â »ç¶÷¸¸ °¡Á®¿Â´Ù. - 20080922  ¹Úâ¿ø
	//if (opyn == "Y") {
	//	fGetOperStat();
	//}
	
	// ¿Ü·¡ Çʼö ½É»ç Ç°¸ñ Á¶È¸¸¦ À§ÇØ ¿äÀ² Ä®·³À» ºÒ·¯¿Â´Ù! (2012.06.01 LEJ)                              
	var brateflag = model.getValue("/root/main/item1/iteminfo/brateflag");
	model.setValue("/root/send/brateflag",brateflag);
	
	fGetPatMsgYn();
	
	// Áø·áºñ °è»ê³»¿ªÀ» °®°í ¿Â´Ù.
	//fGetCalc();
	//Ç׸ñº°¼Ò°è
	//fSetItemSubTotal();				
	// ƯÁ¤³»¿ª Áß MT015, MT016 Á¤º¸°¡ ÀÔ·ÂµÈ È¯ÀÚÀÎÁö¸¦ È®ÀÎÇÑ´Ù.
	fCheckSpclSpecData();
	// 2008. 01. 27 ¹ÚÁö¿í Ãß°¡ (ó¹æ »ö±ò Ç× ±¸ºÐ¿¡ µû¶ó Èò»ö-ȸ»ö ±¸ºÐµÇµµ·Ï ó¸®)
	//fSetOrderColorByEdiitem();
	//¹ü·Ê »ö±òÀ» Ç¥½ÃÇÑ´Ù.
	//fSetColorSpclJudgOrder();
	//ƯÁ¤³»¿ªÀÌ Àִ ó¹æ¿¡ 'T'Çʵ忡 *Ç¥¸¦ ÇØÁØ´Ù. 
	//fSetOrdSpclTxt();
	//Áß°£Ã»±¸ µî·Ï¿©ºÎ, ½É»ç ¸¶°¨»óÅÂ, ¹®Á¦È¯ÀÚ¿©ºÎ¸¦ üũÇÏ¿© ¹öÆ°ÀÇ »ö»óÀ» ¼ÂÆÃÇØÁØ´Ù.
	fSetItemInfoSetting();
	


	// ¸¶À̱׷¹ÀÌ¼ÇµÈ Áß°£Ã»±¸µî·ÏÀÌ µÇÁö ¾ÊÀº µ¥ÀÌÅÍ¿¡ ´ëÇÏ¿© ÀÏ°ýÀûÀ¸·Î Áß°£Ã»±¸ µî·ÏÀÏÀ» 20081003 À¸·Î ÇÑ´Ù. - 20081003 ¹Úâ¿ø
	var midcflag = model.getValue("/root/main/item1/iteminfo/midcflag");
	var indd =  model.getValue("/root/main/item1/iteminfo/indd1");
	var fromdd =  model.getValue("/root/main/item1/iteminfo/fromdd");

	if (midcflag == "N" && indd < opendd && fromdd == opendd) {
		model.setValue("/root/main/item1/iteminfo/lastmdlclamdd",opendd);
	}

	// ÇÏ´ÜÀÇ Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·ÊȯÀÚÀÇ µî·Ï¹øÈ£ ÇÔ¼ö·Î ´ëüÇÔ. 20091020 JHP (Ãß°¡ÀÛ¾÷¹ß»ý)############################################# ½ÃÀÛ
//	// Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·ÊȯÀÚÀÇ µî·Ï¹øÈ£¸¦ º¸¿©ÁØ´Ù. - 20090622 ¹Úâ¿ø
//	var raremsg = model.getValue("/root/main/item1/iteminfo/raremsg");
//	
//	if (raremsg != '-') {
//		model.setValue("/root/main/item1/iteminfo/itemmsg",raremsg);
//		model.refresh();
//	}
	// ÁßÁõ¹øÈ£, Èñ±Í³­Ä¡¹øÈ£ º¸¿©ÁÖ´Â ¹æ¹ý º¯°æ¿¡ µû¸¥ ¼öÁ¤.
	fItemRareMsg();
	// ÇÏ´ÜÀÇ Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·ÊȯÀÚÀÇ µî·Ï¹øÈ£ ÇÔ¼ö·Î ´ëüÇÔ. 20091020 JHP (Ãß°¡ÀÛ¾÷¹ß»ý)############################################# ³¡
	
	// Èñ±Í³­Ä¡¿©ºÎ Ç¥½Ã - 20080811 ¹Úâ¿ø Ãß°¡
	var rareyn = model.getValue("/root/main/item1/iteminfo/rareyn");
	cap_rare.visible= false;
	cap_tb.visible= false;
	cap_g1.visible = false;
	cap_c1c.visible= false;
	cap_c2e.visible= false;
	cap_c2f.visible= false;
	cap_cp.visible= false;
	
	if (rareyn == "Y") {
		cap_rare.visible= true;
	}else if(rareyn == "T") {
		cap_tb.visible= true;
	}
	// Â÷»óÀ§ Ç¥½Ã
	var cfe = 	model.getValue("/root/main/item1/iteminfo/cfe");
	var dcuc = 	model.getValue("/root/main/item1/iteminfo/dcuc");
	if (cfe == "C") {
		cap_c1c.visible= true;
	} else if (cfe == "E") {
		cap_c2e.visible= true;
	} else if (cfe == "F") {
		cap_c2f.visible= true;
	} else if (dcuc =="G") {
		cap_g1.visible = true;
	}
	// ¿ÏÈ­ÀÇ·á ½Ã¹ü»ç¾÷...20091228 Á¤½Â¿ì ȯÀÚ±¸ºÐÃß°¡
	pm_flag.visible=false;
	var calcscorrecalflag = 	model.getValue("/root/main/item1/iteminfo/calcscorrecalflag");
	if (calcscorrecalflag == "7" || calcscorrecalflag == "8") {
		pm_flag.visible=true;
	}
	
	var cpflag = model.getValue("/root/main/item1/iteminfo/cpyn");
	
	if (cpflag == "Y") {
		cap_cp.visible=true;
	}
	
	//¸Þ¼¼Áö Ŭ¸®¾î
	model.setValue("/root/hidden/item1/message","");
	
	// 20091109 JHP ½É»ç¸Þ¸ð¹öÆ°À¸·Î º¯°æ½Ã caseµµ ½É»ç¸Þ¸ð¿¡ ÇØ´çÇÏ´Â °ÍÀ¸·Î º¯°æÇؾßÇÔ.
	var sixtimyn = model.getValue("/root/main/item1/iteminfo/sixtimyn");
	if (sixtimyn == "Y"){
		btn_clspcd.selected = true;
		model.toggle("case_spclspec");
	} else {
		btn_judgrmk.selected = true;
		model.toggle("case_judgrmemo");
	}
	
	model.setValue("/root/hidden/item1/snglcalcscorcd", "");
	model.setValue("/root/hidden/item1/edicd", "");

	//ºÐ¸¸Á¤º¸ üũ
	fCheckBorn();
	//¼ö¼ú¿©ºÎ üũ
	fCheckOper();
	//Åð¿ø¸Þ¸ð¿©ºÎ üũ
	fCheckDschMemo();
	//°ø¿©ÀÚ ¼öÇýÀÚ Ã¼Å©
	fCheckDnorPat();
	
	// ¼öÁ¤Ãß°¡ 20090813 ¿Ü·¡¿äÀ²È¯ÀÚ ÀÏ°æ¿ì º¸Çè, º¸Á¶À¯Çü Á¤º¸°¡ ¸Â´ÂÁö È®ÀÎÇÏ¿© üũ
	fOutRateInsuSuppflag();
	
	// ƯÀÌȯÀÚ ¹öÆ° ¼³Á¤ - 20080923 ¹Úâ¿ø
	if (model.getValue("/root/main/item1/iteminfo/pamprobjudgflag") == "Y") {
		btn_patspcfyn.attribute("background-image") = "../../../com/commonweb/images/icon_btn_s.gif";		// ÁÖȲ»ö
	} else {
		btn_patspcfyn.attribute("background-image") = "../../../com/commonweb/images/icon_btn.gif";		// ÆĶõ»ö
	}
	// ÀÚº¸Çѵµ¾× ÃÊ°úÀÚ Ã¼Å© : ÀÚº¸È¯ÀÚÀ϶§¸¸ ÀÚº¸¹ß»ý±Ý¾× ¹öÆ° È°¼ºÈ­ ÃÊ°úÀÚ´Â ÀÚº¸¹ß»ý±Ý¾× ¹öÆ° »ö±òº¯°æ - 20080923 ¹Úâ¿ø
	var insukind = model.getValue("/root/main/item1/iteminfo/insukindcd");
	var suppkind = model.getValue("/root/main/item1/iteminfo/suppkindcd");
	var suppkindflag = model.getValue("/root/main/item1/iteminfo/suppkindcd");				
	if ( insukind == "31" && suppkind == "18") {
		var paylimityn = model.getValue("/root/main/item1/iteminfo/paylimityn");
		// ÀÚº¸¹ß»ý±Ý¾× ¹öÆ° ¼³Á¤
		if (paylimityn == "Y") {
			btn_autolimit.attribute("background-image") = "../../../com/commonweb/images/icon_btn_s.gif";	// ÁÖȲ»ö
		} else {
			btn_autolimit.attribute("background-image") = "../../../com/commonweb/images/icon_btn.gif";		// ÆĶõ»ö
		}
	} else { // ÀÚº¸ÀÚ¼ÕÀÌ ¾Æ´Ò°æ¿ì ÆĶõ»öÀ¸·Î - 20081108 ¹Úâ¿ø
		btn_autolimit.attribute("background-image") = "../../../com/commonweb/images/icon_btn.gif";		// ÆĶõ»ö
	}
	
	// 20091016 JHP ¿äû¹øÈ£8558 Áø·á»óº´°ú½É»ç»óº´Ã¼Å© ############################################################################################ ½ÃÀÛ
	fCheckEmrDiagPamDiag();
	// 20091016 JHP ¿äû¹øÈ£8558 Áø·á»óº´°ú½É»ç»óº´Ã¼Å© ############################################################################################ ³¡
	
	
	
	// »ç¸ÁȯÀÚ ¸Þ¼¼Áö 20090602 ¹Úâ¿ø
	var dethdt = model.getValue("/root/main/item1/iteminfo/dethdt");
	var maxexecdd = model.getValue("/root/main/item1/iteminfo/maxexecddt");
	var dethdd = dethdt.substr(0,8);
	  
	if (dethdt != '-') {
		if (maxexecdd > dethdd) {
			messageBox("»ç¸ÁÀÏÀÚ ÀÌÈÄ ½Ç½Ãó¹æÀÌ ÀÖ½À´Ï´Ù. Á¤¸® ÈÄ ","C003");
		}
		else {
			messageBox("»ç¸ÁȯÀÚ[»ç¸Á½Ã°£ "+ dethdt.substr(0,4) + ":" + dethdt.substr(4,2) + ":" + dethdt.substr(6,2) + "  " + dethdt.substr(8,2) + ":" + dethdt.substr(10,2) + "]", "I005");
			
			// 20090921 ¼öÁ¤Ãß°¡ : JHP inpt »ç¸ÁÁ¤º¸ Á¸ÀçÇÏ¸é  Áø·á°á°úÀÇ °ªÀ» »ç¸ÁÀ¸·Î¹Ù²Ù¾î¼­ ÀúÀåÇÒ¶§ ÀúÀåµÇ°Ô²ûÇÑ´Ù..
			var dschdd  = model.getValue("/root/main/item1/iteminfo/dschdd");
			var ordrslt = model.getValue("/root/main/item1/iteminfo/ordrslt");
			// Åð¿øÀÏÀÚ¿Í »ç¸ÁÀÏÀÚ°¡ µ¿ÀÏÇÒ ¶§¸¸ Áø·á°á°ú üũÇÑ´Ù. 
			if(dethdd == dschdd && ordrslt != "4"){   
				model.setValue("/root/main/item1/iteminfo/ordrslt","4");
			}
		}
	}
	// ´çÀÏ¿Ü·¡Áø·áÈÄ ÀÔ¿øȯÀÚ ¹× ´ýÇÁµÈ ¿ø³»,¿ø¿Ü ¾àÁ¦ üũ ¾Ë·µ - 20090616 ¹Úâ¿ø
	var todayoutyn = model.getValue("/root/main/item1/iteminfo/todayoutyn");
	var dumpinyn = model.getValue("/root/main/item1/iteminfo/dumpinyn");
	var dumpoutyn = model.getValue("/root/main/item1/iteminfo/dumpoutyn");
	var lastjudgdt = model.getValue("/root/main/item1/iteminfo/lastjudgdt");
	var dumpclamkeyexistyn = model.getValue("/root/main/item1/iteminfo/dumpclamkeyexistyn");
	var serdiagfromdd = model.getValue("/root/main/item1/iteminfo/serdiagfromdd"); //ÁßÁõ½ÃÀÛÀÏÀÚ
	
	if (todayoutyn == "Y" && lastjudgdt == "-") {
		if (dumpinyn == "N" && dumpoutyn == "N") {
			messageBox("´çÀÏ ¿Ü·¡Áø·á ÈÄ ÀÔ¿ø󸮵È", "I005");
		} else if (dumpinyn == "Y" && dumpoutyn == "N") {
			messageBox("´çÀÏ ¿Ü·¡Áø·á ÈÄ ÀÔ¿øó¸®µÇ°í ¿ø³» ¾àÁ¦ ´ýÇÁó¹æÀÌ ÀÖ´Â", "I005");
		} else if (dumpinyn == "N" && dumpoutyn == "Y") {
			messageBox("´çÀÏ ¿Ü·¡Áø·á ÈÄ ÀÔ¿øó¸®µÇ°í ¿ø¿Ü ¾àÁ¦ ´ýÇÁó¹æÀÌ ÀÖ´Â", "I005");
		}else if (dumpinyn == "Y" && dumpoutyn == "Y") {
			messageBox("´çÀÏ ¿Ü·¡Áø·á ÈÄ ÀÔ¿øó¸®µÇ°í ¿ø³»/¿ø¿Ü ¾àÁ¦ ´ýÇÁó¹æÀÌ ÀÖ´Â", "I005");
		}
	}
		
	// 6½Ã°£¹Ì¸¸¿©ºÎüũ - 20080722 ¹Úâ¿ø
	var sixtimyn = model.getValue("/root/main/item1/iteminfo/sixtimyn");
	if (sixtimyn == "Y" && indd < serdiagfromdd) {
		messageBox("ÁßÁõµî·ÏÀÏ°ú ÀÔ¿øÀÏÀÚ°¡ ´Ù¸£¹Ç·Î Àç¿ø ÀÌ·Â ºÐ¸® ÈÄ ÁßÁõ Àû¿ë ¹Ù¶ø´Ï´Ù", "I005");
	}
	// º»Àκδã»óÇÑÁ¦ ´ë»óÀÚüũ - 200800808 ¹Úâ¿ø
	var ownbmaxyn = model.getValue("/root/main/item8/ownbmaxamt/ownbmaxyn");
	if (ownbmaxyn == "Y") {
		messageBox("º»Àκδã»óÇÑÁ¦ ´ë»ó", "I005");
	}
	
	var ownbmaxgradeflag 	= model.getValue("/root/main/item1/iteminfo/ownbmaxgradeflag");
	var ownlimmitamt 	    = model.getValue("/root/main/item1/iteminfo/ownlimmitamt");      // º»Àκδ㠻óÇÑ ±¸ºÐ¿¡ µû¸¥ »óÇѱâÁØ¾×  
	var suppkindflag		= model.getValue("/root/main/item1/iteminfo/suppkindcd");
	var ownbmaxgrade 	    = model.getValue("/root/main/item1/iteminfo/ownbmaxgrade");      // º¸ÇèÀ¯Çü°ú Àç¿øÀÌ·ÂÀÇ º»Àκδ㠻óÇÑ ±¸ºÐ ºñ±³   
	
	// ¼öÁ¤Ãß°¡ : 20090820 : JHP : »óÇÑÁ¦ Â÷µî±¸ºÐ(iphsÀÇ ownbmaxgradeflag)À» È®ÀÎÇÏ¿© º¸Á¶À¯Çü Â÷»óÀ§ ȯÀÚ¿¡ ´ëÇؼ­´Â »óÇÑÁ¦ Â÷µî±¸ºÐÀÌ 200¸¸¿ø ÄÚµåÀÎ 3ÀÎÁö È®ÀÎÇÑ´Ù.
	// 2011.01.17 °æºÏ´ëº´¿ø Â÷»óÀ§ »óÇѱݾױ¸ºÐ ¸Þ½ÃÁö »èÁ¦¿äû
	/*

	if(suppkindflag  == '32' ||suppkindflag  == '33' ||suppkindflag  == '34' ||suppkindflag  == '35' ||suppkindflag  == '36' ||suppkindflag  == '37' ||suppkindflag  == '38' ||suppkindflag  == '39' ||
	   suppkindflag  == '40' ||suppkindflag  == '41' ||suppkindflag  == '42' ||suppkindflag  == '43' ||suppkindflag  == '44' ||suppkindflag  == '45' ||suppkindflag  == '46'){
	   	if(ownbmaxgradeflag != "3"){
	   		messageBox("Â÷»óÀ§ ȯÀÚÀÔ´Ï´Ù. ÇöÀç »óÇÑÁ¦±Ý¾×±¸ºÐÀÌ 200¸¸¿øÀÌ ¾Æ´Ï¹Ç·Î \n¿ø¹«ÆÀ¿¡ ¿äûÇÏ½Ã¾î »óÇÑÁ¦±Ý¾×±¸ºÐÀ» º¯°æ","I008");
	   	}
	}
	*/
	
					
	// ÀÀ±Þ½ÇÀ» ÅëÇÏ¿© ¼Ò¾Æ°ú·Î ÀÔ¿øÇÑ 6¼¼¹Ì¸¸ ȯÀÚ´Â À¯ÇüÀ» º¯°æÇÒ °ÍÀÎÁö ¾Ë·µÀ» ¶ç¿öÁØ´Ù.
	// ÇöÀç°ú(PD),ÀÔ¿ø°æ·Î(ÀÀ±Þ½Ç),6¼¼¹Ì¸¸, º¸ÇèÀ¯ÇüÀº º¸Çè°ú º¸È£¸¸, Àç¿øÁßÀΠȯÀÚ·Î º¸Á¶À¯ÇüÀÌ 6¼¼¹Ì¸¸ÀÌ ¾Æ´Ñ ȯÀÚ¸¦ Á¶°ÇÀ¸·ÎÇÔ - 20081007 ¹Úâ¿ø
	// ÀÔ¿ø°æ·Î Á¶°ÇÀ» ¾ø¾Ú - 20081013 ¹Úâ¿ø
	// ½Å»ý¾Æ Ãß°¡ - 20081013 ¹Úâ¿ø
	var age = parseInt(model.getValue("/root/main/item1/iteminfo/age"));
	var inpath = model.getValue("/root/main/item1/iteminfo/inpath");
	var orddeptcd = model.getValue("/root/main/item1/iteminfo/orddeptcd");
	var rrgstno = model.getValue("/root/main/item1/iteminfo/rrgstno");
	var canceryn = "N"; // 6¼¼¹Ì¸¸°ú µî·Ï¾ÏÀÌ °øÁ¸ÇÏÁö ¸øÇϵµ·Ï 20090602 ¹Úâ¿ø
	var indschacptstat = model.getValue("/root/main/item1/iteminfo/indschacptstat");

	var babyyn ="N";
	var end6yn = "N";
	var brthdd = "20" + rrgstno.substr(0,6);
	var cfe = model.getValue("/root/main/item1/iteminfo/cfe");
	// ½Å»ý¾Æ¸¦ ±¸º°ÁöÀ½
	
	if (indschacptstat != 'D' && dumpclamkeyexistyn == "Y") {
		messageBox("¿Ü·¡ ÀÚ·á ¼öÁýÀÌ µÈ Àç¿ø ³» ½Ç½Ãó¹æÀÌ ÀÖ½À´Ï´Ù. ¿Ü·¡ »çÈÄ ÀڷḦ »ý¼º »èÁ¦ÇÑ ÈÄ Dumpó¸®","I008");
	}
	
	//ÀÀ±Þ½Ç °ü¸®·á ¿©ºÎ üũ
	var nog3reasnyn = model.getValue("/root/main/item1/iteminfo/nog3reasnyn");
	if (nog3reasnyn == "Y") {
		messageBox("ÀÀ±Þ ÀÇ·á°ü¸®·á ¹Ì¹ß»ý  ȯÀÚÀÔ´Ï´Ù.","I007");
	}
	
	if (rrgstno.substr(7,1) == "3" || rrgstno.substr(7,1) == "4" || rrgstno.substr(7,1) == "7" || rrgstno.substr(7,1) == "8" && (cfe != "E" && cfe != "F")) {
		var interval = getDateInterval(brthdd,indd);
		if (interval <  "28") {
			babyyn = "Y";
		}
	}
	// 6¼¼¹Ì¸¸ »ýÀÏ ¿©ºÎ¸¦ ÆÇ´ÜÇÔ
	if ((rrgstno.substr(7,1) == "3" || rrgstno.substr(7,1) == "4" || rrgstno.substr(7,1) == "7" || rrgstno.substr(7,1) == "8") && age <= 6) {
		var curdd = VAL_today.substr(2,6);
		brthdd = brthdd.substr(2,6);
		if (age == 6) {
			if (brthdd >= curdd) {
				end6yn = "N";
			} else if (brthdd < curdd) {
				end6yn = "Y";
			}
		} else if(age < 6) {
			end6yn = "N";
		} else if (age > 6) {
			end6yn ="Y";
		} 
	}
	
	//35¼¼ ÀÌ»ó °íÀ§Çè ÀӽźΠ°ü·Ã ¸Þ¼¼Áö (2015.07.29 LEJ)
	if (orddeptcd == "2100000000" && age >= 35 ){
		if (model.getValue("/root/main/item17/obgydiag/obgydiagyn") == "Y"){   //ÀӽŠ»óº´ üũ Ãß°¡ (2015.10.05 LEJ)
			messageBox("35¼¼ ÀÌ»ó °íÀ§Çè ÀӽźΠÀÔ¿øÁø·á ³»¿ªÀÔ´Ï´Ù!!","I007");
		}
	}
	 
	if ( (insukind == "11" || insukind == "21" || insukind == "22") && suppkind != "31" && !(insukind == "22" && suppkind == "08") ){  //20100318 Á¤½Â¿ì ½Å»ý¾ÆÀ¯ÇüÀº ¸Þ¼¼Áö ¶ßÁö ¾Êµµ·Ï Àû¿ëÇÏ°í ¹öÆ°µµ º¸ÀÌÁö ¾Êµµ·Ï
		//»êÁ¤Æ¯·Ê¿©ºÎ üũ
		fCheckEssc();
		//»êÁ¤Æ¯·Ê + Á¤»ó¿äÀ² + Åð¿øÈ®Á¤ÀÎ °æ¿ì´Â ¸Þ½ÃÁötó¸® ÇÑ´Ù. 
		var chkBtn = "False";
		if(btn_esscdiag.visible){
			chkBtn = "True";
		}else{
			chkBtn = "False";
		}
		
		// Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·Ê üũ - 20090622 ¹Úâ¿ø
		var rareesscyn = model.getValue("/root/main/item12/rareessc/rareesscyn");
		
		//20100318 Á¤½Â¿ì ¸Þ¼¼Áö Á¤¸® º¸Á¶À¯ÇüÀÌ 50ÀÌ¸é ¶ç¿ìÁö ¾Ê´Â´Ù. 					
		//if (chkBtn == "True" && rareesscyn == "Y" && suppkindflag != "50") {
		//	messageBox("Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·Ê", "I005");
			// Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·Ê ȯÀÚÀÇ °æ¿ì ¸Þ¼¼ÁöÈÄ return¶§¹®¿¡ ÁøÇà¾ÈµÇ´Â ºÎºÐ comment ó¸® - 20100221 ¹Úâ¿ø
			//return;
		//}
		var rare = model.getValue("/root/main/list1/insulist[rare='H']/rare");
		if (rare.length > 0 && (indschacptstat == 'A' || indschacptstat == 'T') ){
			messageBox("Èñ±Í´ëºÒ ȯÀÚÀÔ´Ï´Ù. ÀÚ°Ý", "I007");
		}
		
		if (insukind == "11") {
			
			if (ownbmaxgrade == 'Y') {
				 messageBox("ȯÀÚÀÇ º»Àκδ㠻óÇѱ¸ºÐÀÌ º¸ÇèÀ¯Çü ±âÁØÀÚ·áÀÇ »óÇѱ¸ºÐ°ú ÀÏÄ¡ÇÏÁö ¾Ê½À´Ï´Ù. ", "I007");
			}
			else {

				// ¿¬µµº° ºÐ¸® ¾È µÈ ÀÌ·Â Áß º»Àκδ㠻óÇÑ¾× ÃÊ°ú ȯÀÚ ¸Þ¼¼Áö ¹ß»ý
				var todd = model.getValue("/root/main/item1/iteminfo/todd");
			    var dschnotidt = model.getValue("/root/main/item1/iteminfo/dschnotidt");
				var curyear = VAL_today.substr(0,4);
				var fromyear = fromdd.substr(0,4);
				var toyear = todd.substr(0,4);
				if ( todd == "99991231" ) {
					if ( dschnotidt.substr(0,8) == "99991231" || dschnotidt.substr(0,8) == "" ) {
						toyear = curyear ;
					}
					else {
						toyear = dschnotidt.substr(0,4) ;
					}
				}
				if ( fromyear != toyear && cfe != 'F' ) {
					if(parseInt(model.getValue("/root/main/item2/itemcalc/ownbpayamt")) > ownlimmitamt) {
						 messageBox("¿¬µµº° ºÐ¸® µÇÁö ¾ÊÀº º»Àκδã»óÇÑÁ¦ ȯÀÚÀÔ´Ï´Ù. \nÀç¿ø ºÐ¸® ", "I007");
					}
				}
				else {
					//º»ÀӺδã»óÇÑÁ¦ üũ : ±âÁØ ±Ý¾× ÀÌ»óÀÌ¸é ¸Þ½ÃÁö ¹ß»ý.
					if ((indschacptstat == 'A' || indschacptstat == 'T')) {
						if(parseInt(model.getValue("/root/main/item2/itemcalc/ownbpayamt")) > ownlimmitamt) {
							 messageBox("º»Àκδã»óÇÑÁ¦ ȯÀÚ", "I009");
						}
					}
				}
			}
		}
		
		// ÁßÁõ¼ö¼ú ó¹æÀÌ ÀÖÀ»°æ¿ì »óº´ÀÌ ¸ÂÁö ¾ÊÀ¸¸é Alert - 20080908 ¹Úâ¿ø
		var chkSuppkind = model.getValue("/root/main/item1/iteminfo/suppkindcd");
		var insukind = model.getValue("/root/main/item1/iteminfo/insukindcd");
		var v191prcpyn = model.getValue("/root/main/item1/iteminfo/v191prcpyn");
		var v192prcpyn = model.getValue("/root/main/item1/iteminfo/v192prcpyn");
		var v191diagyn = model.getValue("/root/main/item1/iteminfo/v191diagyn");
		var v192diagyn = model.getValue("/root/main/item1/iteminfo/v192diagyn");
		var vcode = model.getvalue("/root/hidden/item1/vcode");
		// 20090602  °³½É°³µÎ´Â ÀÔ¿ø¿äÀ²¸¸ Àû¿ëµÇ°Ô
		var sixtimyn = model.getValue("/root/main/item1/iteminfo/sixtimyn");
		// °³½É°³µÎ »óº´ ¸Þ¼¼Áö  ÅëÇÕ - 20081010 ¹Úâ¿ø
		var opmessageyn = "N";
		
		if (v191prcpyn == "Y" && chkSuppkind != "05" && chkSuppkind != "32" && chkSuppkind != "34" && sixtimyn == "N") { // 20090325 Â÷»óÀ§ 2Á¾Ãß°¡
			//if (v191diagyn == "N") {                              // °³½É/°³µÎ ¼ö¼úÀÎ °æ¿ì »óº´°ú »ó°ü¾øÀÌ º¸Á¶À¯Çü Àû¿ë ¾È µÇ¸é ¸Þ¼¼Áö ¶ç¿ò (2015.02.10 LEJ)
				messageBox("ÁßÁõÇØ´ç ¼ö¼úÀÌ ÀÖ½À´Ï´Ù. »óº´À»", "I007");
				opmessageyn = "Y";
			//}
		}
		if (v192prcpyn == "Y" && chkSuppkind != "05" && chkSuppkind != "32" && chkSuppkind != "34") { // 20090325 Â÷»óÀ§ 2Á¾Ãß°¡
			//if (v192diagyn == "N" && opmessageyn == "N") {        // °³½É/°³µÎ ¼ö¼úÀÎ °æ¿ì »óº´°ú »ó°ü¾øÀÌ º¸Á¶À¯Çü Àû¿ë ¾È µÇ¸é ¸Þ¼¼Áö ¶ç¿ò (2015.02.10 LEJ)
				messageBox("ÁßÁõÇØ´ç ¼ö¼úÀÌ ÀÖ½À´Ï´Ù. »óº´À»", "I007");
			//}
		} 
		// °³µÎ¼ú °ü·Ã Àû¿ë ¾àÁ¦ Ãß°¡¿¡ µû¸¥ Àç¿ø½É»ç ¾Ë¸² ¸Þ¼¼Áö [ÀÔÅð + ¿ÜÅð] : (ÇØ´ç ¾àÁ¦ + ÇØ´ç »óº´)À̸鼭 º¸Á¶À¯ÇüÀÌ °³µÎ¼úÀÌ ¾Æ´Ñ °æ¿ì ¸Þ¼¼Áö (2015.02.10 LEJ)
		if (v191prcpyn == "D" && v191diagyn == "Y" && chkSuppkind != "05" && chkSuppkind != "39") {
			messageBox("°³½É/°³µÎ °ü·Ã ¾àÁ¦°¡ ÀÖ½À´Ï´Ù. º¸Á¶ À¯ÇüÀ»", "I007");
			opmessageyn = "Y";
		}
		// °³½É¼ú °ü·Ã Àû¿ë ¾àÁ¦ Ãß°¡¿¡ µû¸¥ Àç¿ø½É»ç ¾Ë¸² ¸Þ¼¼Áö [ÀÔÅð + ¿ÜÅð] : (ÇØ´ç ¾àÁ¦ + ÇØ´ç »óº´)À̸鼭 º¸Á¶À¯ÇüÀÌ °³½É¼úÀÌ ¾Æ´Ñ °æ¿ì ¸Þ¼¼Áö (2015.02.10 LEJ)
		if (v192prcpyn == "D" && v192diagyn == "Y" && chkSuppkind != "05" && chkSuppkind != "39") {
			messageBox("°³½É/°³µÎ °ü·Ã ¾àÁ¦°¡ ÀÖ½À´Ï´Ù. º¸Á¶ À¯ÇüÀ»", "I007");
			opmessageyn = "Y";
		}

		if(insukind == "11" && chkBtn == "True" && chkSuppkind != "05" && chkSuppkind != "06" && chkSuppkind != "32" && chkSuppkind != "39" && cfe != "C"  && chkSuppkind != "40"  && chkSuppkind != "50" ){ //20090325 Â÷»óÀ§ 2Á¾Ãß°¡ 
			messageBox("ÁßÁõÁ¤º¸°¡ Á¸ÀçÇÏ´Â", "I005");
			canceryn = "Y";
		}
		if( (insukind == "21" || insukind == "22")  && chkBtn == "True" && chkSuppkind != "05" && chkSuppkind != "06" && chkSuppkind != "32" && cfe != "C" && chkSuppkind != "39" && chkSuppkind != "40"  && chkSuppkind != "50" ){ //20090325 Â÷»óÀ§ 2Á¾Ãß°¡
			if (!(sixtimyn == "N" && end6yn == "N"  && babyyn == "N" && age <= 6))  {
				messageBox("ÁßÁõÁ¤º¸°¡ Á¸ÀçÇÏ´Â", "I005");
			}
		} 
	} else {
		btn_esscdiag.visible= false;
	}
	
	// 6½Ã°£ ¹Ì¸¸¿©ºÎ Ãß°¡ - 20081105 ¹Úâ¿ø
	// Áø·á°ú Á¦ÇÑ Á¶°Ç »èÁ¦ - 20090219 ¹Úâ¿ø
	// Á¶°Ç »èÁ¦ 20091008 JHP ¹Úâ¿ø ¿äû.( insukind == "21" || insukind == "22" )
	if (sixtimyn == "N" && babyyn == "Y" &&age == 0 && indd >= "20080101"  && (insukind == "11")  && suppkind != "31" && cfe != "C" && readonly != "Y") {
		var msg = messageBox("ÀÔ¿øÇÑ ½Å»ý¾Æ ÀÔ´Ï´Ù. ½Å»ý¾Æ À¯ÇüÀ» Àû¿ë","S001");
		if (msg == 6) { // ½Å»ý¾Æ ¿äÀ²À» Àû¿ëÇÑ´Ù.
			Insuchange("31");
		}
	}

	// 6½Ã°£ ¹Ì¸¸¿©ºÎ Ãß°¡ - 20081105 ¹Úâ¿ø
	// Áø·á°ú Á¦ÇÑÁ¶°Ç »èÁ¦ - 20080219 ¹Úâ¿ø 
	// Èñ±Í³­Ä¡À϶§ 6¼¼¹Ì¸¸ ¸Þ¼¼Áö Àû¿ë¾ÈÇÔ - 20100630 ¹Úâ¿ø
	if (insukind == "11") {
		var opchkyn =  model.getValue("/root/main/item11/drginfo/opchkyn");
		var drgmchkyn = model.getValue("/root/main/item11/drginfo/drgmchkyn");
		var fromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
		var dschjudgprcsstat 	= model.getValue("/root/main/item1/iteminfo/dschjudgprcsstat");
		var indaycnt = parseInt(model.getValue("/root/main/list1/insulist[fromdd='"+fromdd+"']/indaycnt"));

		if (opchkyn == "Y" && indaycnt <= 30 ) {
			btn_drginfo.attribute("visibility") = "visible";
		} else {
			btn_drginfo.attribute("visibility") = "hidden";
		}
		
		if (opchkyn == "Y" && (indschacptstat == 'A' || indschacptstat == 'T') && indaycnt <= 30 ) {
			messageBox("DRG ´ë»óÀÔ´Ï´Ù.","I");
		} else if ( opchkyn == "Y" && (indschacptstat == 'A' || indschacptstat == 'T') && indaycnt > 30 ) {
			messageBox("DRG ´ë»óÀÔ´Ï´Ù¸¸ Àç¿øÀϼö ÃÊ°ú ÀÔ´Ï´Ù.","I");
		}
		var zdiagcd =  model.getValue("/root/main/list3/diaglist[diagcd='Z201']/seqno");
		if (suppkind == "00" && zdiagcd != "") {
			messageBox("Àẹ°áÇÙ ´ë»óÀÔ´Ï´Ù.","I");
		}
		
		if (sixtimyn == "N" && end6yn == "N"  && canceryn == "N"  && babyyn == "N" && age <= 6   && suppkind != "08"  && suppkind != "41" && suppkind != "06" 
		    && cfe != "C" && suppkind != "40"  && readonly != "Y"
		    && suppkind != "46"  && suppkind != "50" && suppkind != "51" && dschjudgprcsstat != "C") {
	         	var msg = messageBox("6¼¼¹Ì¸¸ ȯÀÚÀÔ´Ï´Ù. 6¼¼¹Ì¸¸ À¯ÇüÀ» Àû¿ë","S001");
			if (msg == 6) { // 6¼¼¹Ì¸¸ ¿äÀ²À» Àû¿ëÇÑ´Ù.
				var cfe = model.getValue("/root/main/item1/iteminfo/cfe");
				if (cfe == "E" || cfe == "F") {
					var suppkind = "41";
				} else {
					var suppkind = "08";
				}
				Insuchange(suppkind);
			}
		 }
	}
	if (insukind == "21" || insukind == "22"){
		if (sixtimyn == "N" && end6yn == "N"  && babyyn == "N" && age <= 6   && suppkind != "08"  && suppkind != "41" && readonly != "Y" ) {
	          var msg = messageBox("6¼¼¹Ì¸¸ ȯÀÚÀÔ´Ï´Ù. 6¼¼¹Ì¸¸ À¯ÇüÀ» Àû¿ë","S001");
			if (msg == 6) { // 6¼¼¹Ì¸¸ ¿äÀ²À» Àû¿ëÇÑ´Ù.
				var cfe = model.getValue("/root/main/item1/iteminfo/cfe");
				var suppkind = "08";
				if (cfe == "E" || cfe == "F") {
					suppkind = "41";
				}
				
				Insuchange(suppkind);
			}
		 }
	} 
	if (insukind == "31"){
		var paygrntyn = model.getValue("/root/main/item1/iteminfo/paygrntyn");
		
		if (paygrntyn != "Y") {
			messageBox("ÀÚµ¿Â÷º¸Çè Áö±Þº¸Áõ¹øÈ£ ´©¶ôÀÔ´Ï´Ù.","I007");
		}
	}
	//Áø·á°á°ú üũ		- Áß°£Ã»±¸Àΰæ¿ì : °è¼Ó, Åð¿øÀΰæ¿ì : Åð¿ø
	var dschnotiyn = model.getValue("/root/main/item1/iteminfo/dschnotiyn");
	var ordrslt = model.getValue("/root/main/item1/iteminfo/ordrslt");
	
	if(dschnotiyn == "Y"){
		if(ordrslt == "" || ordrslt == "-" || ordrslt == "1"){
			if(ordrslt != "4"){
				model.setValue("/root/main/item1/iteminfo/ordrslt","9");
			}
		}
	}else{
		if(ordrslt == "" || ordrslt == "-"){
			model.setValue("/root/main/item1/iteminfo/ordrslt","1");
		}
	}
	
	//ÀÀ±Þ 6½Ã°£ ¹Ì¸¸ üũ¸¦ À§ÇÏ¿© ³Ö¾î µÐ´Ù. 
	var ordtype = model.getValue("/root/main/item1/iteminfo/ordtype");
	var brateflag = model.getValue("/root/main/item1/iteminfo/brateflag");
	
	model.setValue("/root/send/ordtype",ordtype);
	model.setValue("/root/send/brateflag",brateflag);
	
	//º»ÀκδãÀ²ÀÌ 20%°¡ ¾Æ´Ñ °æ¿ì »ó´ÜÁ¤º¸¿¡ º¸Á¶À¯ÇüÁ¤º¸¸¦  ºÓÀº »öÀ¸·Î Ç¥½ÃÇØÁØ´Ù. 
	var insukind = model.getValue("/root/main/item1/iteminfo/insukindcd");
	var payownbrate = model.getValue("/root/main/item1/iteminfo/ownrate");
	
	//º¸ÇèÀΰæ¿ì º»ÀκδãÀ² 20%°¡ ¾Æ´Ï¸é ºÓÀº»öÀ¸·Î Ç¥½ÃÇØÁØ´Ù.
	if(insukind == "11"){
		if(payownbrate == "20"){
			opt_suppkind.attribute("class") = "output_fix";
			cmb_suppkind.attribute("class") = "combo_default";
			opt_ownrate.attribute("class") = "output_fix";
		}else{
			opt_suppkind.attribute("color") = "#ff0066";
			cmb_suppkind.attribute("color") = "#ff0066";			
			opt_ownrate.attribute("color") = "#ff0066";		
		}
	//º¸È£ 2Á¾Àΰæ¿ì º»ÀκδãÀ² 15%°¡ ¾Æ´Ï¸é ºÓÀº»öÀ¸·Î Ç¥½ÃÇØÁØ´Ù.
	}else if(insukind == "22"){
		if(payownbrate == "15"){
			opt_suppkind.attribute("class") = "output_fix";
			cmb_suppkind.attribute("class") = "combo_default";
			opt_ownrate.attribute("class") = "output_fix";
		}else{
			opt_suppkind.attribute("color") = "#ff0066";
			cmb_suppkind.attribute("color") = "#ff0066";			
			opt_ownrate.attribute("color") = "#ff0066";		
		}
	//³ª¸ÓÁö´Â Á¤»ó »ö±ò·Î Ç¥½ÃÇØ ÁØ´Ù. 
	}else{
		opt_suppkind.attribute("class") = "output_fix";
		cmb_suppkind.attribute("class") = "combo_default";
		opt_ownrate.attribute("class") = "output_fix";
	}

	// ¸¶À̱׷¹ÀÌ¼Ç È¯ÀÚ´Â Á¶È¸¸¸ µÇ°Ô ÇÑ´Ù. - 20080819 ¹Úâ¿ø
	var mig = model.getValue("/root/main/item1/iteminfo/mig");
	var dschjudgprcsstat = model.getValue("/root/main/item1/iteminfo/dschjudgprcsstat");
	var indschacptstat = model.getValue("/root/main/item1/iteminfo/indschacptstat");
	var dschnotiyn = model.getValue("/root/main/item1/iteminfo/dschnotiyn");
	var dschdclrtyn = model.getValue("/root/main/item1/iteminfo/dschdclrtyn");
	
	// NST »óÅ ǥ½Ã Ãß°¡ ( 2015.11.16 LEJ)
	btn_nst.disabled = true;
	btn_nst.attribute("class") = "btn2_letter8";
	btn_nst.attribute("text") = "NST";
	
	var cnststat = model.getValue("/root/main/item18/cnstinfo/cnststat");
	var nstcnt = model.getValue("/root/main/item18/cnstinfo/nstcnt");
	if (cnststat != "-" && cnststat != ""){
		btn_nst.disabled = false;
		if (nstcnt >= "2" && nstcnt != ""){
			btn_nst.attribute("text") = "NST : " + cnststat + "(" + nstcnt + ")" ;
		} else {
			btn_nst.attribute("text") = "NST : " + cnststat;
		}
		if (cnststat == "ȸ½Å" || cnststat == "ȸ½ÅÈ®Á¤"){ 
			btn_nst.attribute("color") = "#ff0066";
		}
	}
	 
	// ½É»çÁß
	if (readonly == "Y") {
	      btn_save.disabled = true;
	      btn_recalc.disabled = true;
		  btn_sugicalc.disabled = true; 
		  btn_dclrtclose.disabled = true; 
	      btn_dschclose.disabled = true;
	      btn_totjudgclose.disabled = true;
	      btn_dschclosecancel.disabled = true;
	      btn_midregist.disabled = true;
	      btn_midregistyn.disabled = true;
	      //»ó¼¼È­¸é ÀúÀå¹öÆ° 󸮸¦ À§ÇØ ³Ö¾î ³õ´Â´Ù.   - 2007-11.29 ¹ÚµµÇü
	      model.setValue("root/hidden/item1/chksave","Y");
	}else if (indschacptstat  == "D") { // Åð¿øÀÌ ¿Ï·áµÇ¸é ¼¼ºÎ°è»ê³»¿ª ÀúÀåÀÌ ¾ÈµÇ°Ô 20080911
	      messageBox("Åð¿ø ó¸®µÈ ȯÀÚÀÔ´Ï´Ù. ¿äÀ²º¯°æ ¹× °è»ê³»¿ª ¼öÁ¤Àº", "E001");
	      btn_save.disabled = true;
	      btn_recalc.disabled = true;
		  btn_sugicalc.disabled = true; 
		  btn_dclrtclose.disabled = true; 
	      btn_dschclose.disabled = true;
	      btn_totjudgclose.disabled = true;
	      btn_dschclosecancel.disabled = true;
	      btn_midregist.disabled = true;
	      btn_midregistyn.disabled = true;
	      //»ó¼¼È­¸é ÀúÀå¹öÆ° 󸮸¦ À§ÇØ ³Ö¾î ³õ´Â´Ù.   - 2007-11.29 ¹ÚµµÇü
	      model.setValue("root/hidden/item1/chksave","Y");
	} else if (indschacptstat  == "T" && (dschjudgprcsstat == "C"  || dschjudgprcsstat == "E" || dschjudgprcsstat == "G" )  ) { // °¡Åð¿ø ÀÏ´ÜÃß°¡ °¡Åð¿øÀº Àç ÆÇ´ÜÇؼ­ ºí·ÎÅ· ·ÎÁ÷À» ¸¸µç´Ù. - 20081005 ¹Úâ¿ø
	      messageBox("°¡Åð¿ø 󸮰¡µÈ ¸¶°¨ ȯÀÚÀÔ´Ï´Ù. ¿äÀ²º¯°æ ¹× °è»ê³»¿ª ¼öÁ¤Àº", "E001");
	      btn_save.disabled = true;
	      btn_recalc.disabled = true;
		  btn_sugicalc.disabled = true;  
		  btn_dclrtclose.disabled = true;  
	      btn_dschclose.disabled = true;
	      btn_totjudgclose.disabled = true;
	      btn_dschclosecancel.disabled = false;
	      btn_midregist.disabled = true;
	      btn_midregistyn.disabled = true;
	      //»ó¼¼È­¸é ÀúÀå¹öÆ° 󸮸¦ À§ÇØ ³Ö¾î ³õ´Â´Ù.   - 2007-11.29 ¹ÚµµÇü
	      model.setValue("root/hidden/item1/chksave","Y");
    } else if (dschjudgprcsstat == "B" ) {
		if ( lastjudgendid != userid ) {
			messageBox(lastjudgendnm + "´ÔÀÌ Åð¿ø½É»ç ÁøÇàÁßÀÔ´Ï´Ù. ÀúÀåÀº", "E001");
			btn_save.disabled = true;
			btn_recalc.disabled = true;
			btn_sugicalc.disabled = true;  
			btn_dclrtclose.disabled = true;
			btn_dschclose.disabled = true;
			btn_totjudgclose.disabled = true;
			btn_dschclosecancel.disabled = true;
			btn_midregist.disabled = true;
			btn_midregistyn.disabled = true;
			//»ó¼¼È­¸é ÀúÀå¹öÆ° 󸮸¦ À§ÇØ ³Ö¾î ³õ´Â´Ù.   - 2007-11.29 ¹ÚµµÇü
			model.setValue("root/hidden/item1/chksave","Y");
		} else {
			btn_dschclosecancel.disabled = true;
			if (dschnotiyn == "Y") {				// Åð¿øÈ®Á¤ÀÎ °æ¿ì ¿¹°í ½É»ç ºñÈ°¼º
				btn_dclrtclose.disabled = true;
			} else if (dschdclrtyn == "Y" && dschnotiyn == "N") {  // Åð¿ø¿¹°íÀÎ °æ¿ì Åð¿ø¸¶°¨, ÅëÇÕ¸¶°¨ ºñÈ°¼º
				btn_dschclose.disabled = true;
				btn_totjudgclose.disabled = true;
			}
		}
	// ½É»ç¿Ï·á, ÅëÇսɻç¿Ï·á
	} else if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E" || dschjudgprcsstat == "G" ) {
		messageBox("Åð¿ø¸¶°¨À̳ª ÅëÇսɻ縶°¨ 󸮰¡µÈ ȯÀÚÀÔ´Ï´Ù. ¿äÀ²º¯°æ ¹× °è»ê³»¿ª ¼öÁ¤Àº", "E001");
		btn_save.disabled = true;
		btn_recalc.disabled = true;
		btn_sugicalc.disabled = true;  
		btn_dclrtclose.disabled = true;  
		btn_dschclose.disabled = true;
		btn_totjudgclose.disabled = true;
		btn_midregist.disabled = true;
		btn_midregistyn.disabled = true;
		btn_dschclosecancel.disabled = false;
		//»ó¼¼È­¸é ÀúÀå¹öÆ° 󸮸¦ À§ÇØ ³Ö¾î ³õ´Â´Ù.   - 2007-11.29 ¹ÚµµÇü
		model.setValue("root/hidden/item1/chksave","Y");
	} else if (dschjudgprcsstat == "A" && dschnotiyn == "N") {
		btn_dschclose.disabled = true;
		btn_totjudgclose.disabled = true;
		btn_dschclosecancel.disabled = true;
		if (dschdclrtyn == "N") {				// Åð¿ø¿¹°í ¾È µÈ °æ¿ì ¿¹°í½É»ç ºñÈ°¼º
			btn_dclrtclose.disabled = true;
		}
	} else if (dschjudgprcsstat == "A" && dschnotiyn == "Y") {
		btn_dschclosecancel.disabled = true;
		btn_dclrtclose.disabled = true;
	//} else if (orddeptcd == "2280000000"  && dschnotiyn == "Y" && sixtimyn == "Y" ) { // ÀÀ±Þ½ÇȯÀÚÀÇ °æ°í alert Ãß°¡ - 20081003 ¹Úâ¿ø
		// 20091019 JHP ¹øÈ£°¡ ÇϵåÄÚµùµÇ¾îÀ־ »èÁ¦ÇÔ ±âÁ¸("... ÀÀ±Þ¼ö³³ T.1813À¸·Î ¿¬¶ôÈÄ...") ¹øÈ£»èÁ¦ - À̹̼÷ ¿äû
	//	var msg = messageBox("¼ö³³ÀÌ °¡´ÉÇÑ »óÅÂÀÔ´Ï´Ù.(ÀÀ±Þ½ÇÀº ¹«½É»ç Åð¿ø °¡´ÉÇÔ),ó¹æ¼öÁ¤À» ÇϽ÷Á¸é ¹Ýµå½Ã ÀÀ±Þ¼ö³³À¸·Î ¿¬¶ôÈÄ Ã³¸®ÇϽñ⠹ٶø´Ï´Ù. ó¹æ °Ë»ö¸¸ ÇϽ÷Á¸é(¼öÁ¤ºÒ°¡)","S001");
	//       if (msg == 6) {
	//	    btn_save.disabled = true;
	//		btn_recalc.disabled = true;
	//		btn_sugicalc.disabled = true;  
	//		btn_dschclose.disabled = true;
	//		btn_totjudgclose.disabled = true;
	//		btn_midregist.disabled = true;
	//		btn_midregistyn.disabled = true;
	//		btn_dschclosecancel.disabled = false;
			//»ó¼¼È­¸é ÀúÀå¹öÆ° 󸮸¦ À§ÇØ ³Ö¾î ³õ´Â´Ù.   - 2007-11.29 ¹ÚµµÇü
	//		model.setValue("root/hidden/item1/chksave","Y");
	//       }
	 } 
	//if (indschacptstat  == "T" && (dschjudgprcsstat == "A" || dschjudgprcsstat == "B" || dschjudgprcsstat == "F") ) { // °¡Åð¿ø ¸Þ¼¼Áö Ãß°¡ - 20081005 ¹Úâ¿ø
	//	messageBox("°¡Åð¿ø ȯÀÚ","I009");
	//}
	
	// AS-IS µ¥ÀÌÅÍ°¡ ºñÁ¤»óÀûÀÎ ¾×ÆÃÀÌ µÇ¾úÀ»¶§ alert - 20081013 ¹Úâ¿ø - ÇѽÃÀû ·çƾ
	var abnormalactingyn = model.getValue("/root/main/item1/iteminfo/abnormalactingyn");
	var abnormalexip = model.getValue("/root/main/item1/iteminfo/abnormalexip");
	var abnormaliscl = model.getValue("/root/main/item1/iteminfo/abnormaliscl");
	var indate = model.getValue("/root/main/item1/iteminfo/indd1");
	var spcdrugyn = model.getValue("/root/main/item1/iteminfo/spcdrugyn") ;
	var dcuc = 	model.getValue("/root/main/item1/iteminfo/dcuc");
	var jinyn = model.getValue("/root/main/item1/iteminfo/jinyn");
	var erjinyn = model.getValue("/root/main/item1/iteminfo/erjinyn");
	
	if (abnormalactingyn == "Y" &&  indate < opendd) {
		messageBox("AS-IS ó¹æÀÌ ºñÁ¤»óÀûÀ¸·Î TO-BE ±â°£¿¡ ½ÃÇàµÈ ó¹æÀÌ ÀÖ½À´Ï´Ù.","I007");
	}
	// Ư¼öÁ¶Á¦·á ¹ß»ý ó¹æÀÌ Àִµ¥ ÁÖ»çÁ¦¹«±ÕÁ¶Á¦·á°¡ ¹ß»ýÇÏÁö ¾Ê¾ÒÀ» °æ¿ì ¸Þ¼¼Áö - 20081108 ¹Úâ¿ø
	// °è»ê³»¿ª¿¡ IJ0041 <> ast.adbmdrug - pcldrug ='D'
	//                  IJ0042 <> ast.adbmdrug - pcldrug in ('B','T')
	//                  IJ0043 <> ast.adbmdrug - pcldrug ='C'             °è»ê³»¿ª¿¡ Áֻ繫±ÕÁ¶Á¦·á °¹¼ö¿Í ó¹æ°¹¼ö°¡ Ʋ¸®¸é ¸Þ½ÃÁö ó¸®
	if (spcdrugyn == "Y" && dschnotiyn == "Y") {
		messageBox("ÁÖ»çÁ¦ ¹«±ÕÁ¶Á¦·á ¹ß»ý ¿À·ùÀÔ´Ï´Ù.","I007");
	}
	// ½Ç½Ãó¹æ°ú °è»ê³»¿ªÀÌ ¸ÂÁö ¾ÊÀ»°æ¿ì Alert - 20081110 ¹Úâ¿ø
	if ( (abnormaliscl == "Y" || abnormalexip == "Y") && dschnotiyn == "Y")
	{
		messageBox("½Ç½Ã³»¿ª°ú °è»ê³»¿ªÀÌ ÀÏÄ¡ÇÏÁö ¾Ê½À´Ï´Ù. Àç°è»ê ÈÄ.","I007");
	}
	// ¹Ì½ÃÇà ó¹æÀÌ ÀÖÀ» °æ¿ì alert - 20081013 ¹Úâ¿ø 
	if (dschnotiyn == "Y"  && fChkClose() == false) {
		messageBox("¹Ì ½ÃÇàµÈ ó¹æÀÌ ÀÖ½À´Ï´Ù.","I007");
	}
	
	if (dcuc == "G") {
		messageBox("±ä±ÞÁö¿ø ´ë»óÀÚ ÀÔ´Ï´Ù.","I007");
	}

	// µ¿ÀÏ°ú ³» 1ȸ ÀÌ»ó ÁøÂû·á(ÀÀ±Þ Àü¹®ÀÇÁøÂû·á Æ÷ÇÔ) ¹ß»ý ½Ã ¸Þ¼¼Áö (2016.01.14 LEJ)	 	
	if (jinyn == "Y") {
		messageBox("µ¿ÀÏ°ú ³» 1ȸ ÀÌ»ó ÁøÂû·á(ÀÀ±Þ Àü¹®ÀÇÁøÂû·á Æ÷ÇÔ)°¡ ¹ß»ýÇß½À´Ï´Ù.","I007");
	}
	 	
	// KTAS 4,5µî±Þ ȯÀÚ¿¡ ÀÀ±Þ Àü¹®ÀÇÁøÂû·á  ¹ß»ý ½Ã ¸Þ¼¼Áö (2016.01.14 LEJ)	 	
	if (erjinyn == "Y") {
		messageBox("KTAS 4,5µî±Þ ȯÀÚ¿¡ ÀÀ±Þ Àü¹®ÀÇÁøÂû·á°¡ ¹ß»ýÇß½À´Ï´Ù.","I007");
	}
	 	
	// ¸í´ÜÀ§, ÁÙ´ÜÀ§¿¡ µû¶ó ƯÁ¤ÄÚµå ÄÞº¸ ¸®½ºÆ® º¯°æ ¹× ƯÁ¤Äڵ忡 ÇØ´çÇÏ´Â »ó¼¼¼³¸í Àû¿ë
	var p0117list = instance1.selectSingleNode("/root/init/P0117list");
	for (var i=0; i<grd_clcjlist.rows; i++) {
		var unitflag = model.getValue("/root/main/list4/clcjlist["+ i + "]/unitflag");
		var spclcd = model.getValue("/root/main/list4/clcjlist["+ i + "]/spclcd");
		
		if (unitflag == "M") {
			if (p0117list != null) {
				var p0117 = p0117list.childNodes;
				for (var j = 1; j <= p0117.length; j++) {
					var cdid = model.getValue("/root/init/P0117list/P0117["+  j +"]/cdid");
					if (cdid == spclcd) {
						model.setValue("/root/main/list4/clcjlist["+ i +"]/detldesc", model.getValue("/root/init/P0117list/P0117["+  j +"]/detldesc"));
						j = p0117.length + 1;
					}
				}
			}	
			grd_clcjlist.cellComboNodeset(i,3) = "/root/init/P0117list/P0117[minval = 'M' and cdid != 'MX999']";		
		} else if (unitflag == "J") {
			if (p0117list != null) {
				var p0117 = p0117list.childNodes;
				for (var j = 1; j <= p0117.length; j++) {
					var cdid = model.getValue("/root/init/P0117list/P0117["+  j +"]/cdid");
					if (cdid == spclcd) {
						model.setValue("/root/main/list4/clcjlist["+ i +"]/detldesc", model.getValue("/root/init/P0117list/P0117["+  j +"]/detldesc"));
						j = p0117.length + 1;
					}
				}
			}
			grd_clcjlist.cellComboNodeset(i,3) = "/root/init/P0117list/P0117[minval = 'J']";

		}
	}
	// ÃÖÀûÈ­ ¹®Á¦·Î Ãß°¡ - 20081015 ¹Úâ¿ø
	grd_clcjlist.refresh();
	
	var orddeptcd = model.getValue("/root/main/item1/iteminfo/orddeptcd");
	var erorddeptcd = model.getValue("/root/main/item1/iteminfo/erorddeptcd");				
	
	// ÀÇ·á±Þ¿© Á¤½Å°úÁ¤¾×Àΰæ¿ì º¸Á¶À¯Çü ¸Þ½ÃÁö ó¸®
	if ((insukind == "21" || insukind == "22") 
	  && (suppkind != "14") 
	  && (orddeptcd == "2030000000" || erorddeptcd == "2030000000"))  {
		messageBox("ÀÇ·á±Þ¿© Á¤½Å°úÁ¤¾×ȯÀÚÀÔ´Ï´Ù. º¸Á¶À¯ÇüÀ» 14. º¸È£Á¤½Å°úÁ¤¾×À¸·Î º¯°æÇϼ¼¿ä.","I007");
	}
	model.refresh();
}

// ó¹æ »ö±ò Ç× ±¸ºÐ¿¡ µû¶ó Èò»ö-ȸ»ö ±¸ºÐµÇµµ·Ï ó¸®ÇÑ´Ù.
function fSetOrderColorByEdiitem() {
	var rowcnt =  grd_ordlist.rows;
	var ediitem2 = "";			
	var color = "#f4f4f4";	
	
	for (var i = 0; i < rowcnt; i++) {	// Grid ÇÊÅ͸µ ÀÌÈÄ  Grid »ó¿¡ Ç¥½ÃµÈ ó¹æ °³¼ö¸¸Å­ µ¹¸é¼­				
	//for (var i = 1; i < grd_ordlist.rows; i++) {	// Grid ÇÊÅ͸µ ÀÌÈÄ  Grid »ó¿¡ Ç¥½ÃµÈ ó¹æ °³¼ö¸¸Å­ µ¹¸é¼­
		//Color Ç¥½Ã ¹ü·Ê
		//1. ¹®Á¦Ã³¹æ : #fcd2c1
		//2. ¼±º°½É»ç : #ffe79d
		//3. ¼±º°½É»ç + ¹®Á¦Ã³¹æ : #7BE6B7
		//4. ¾ß°£, °øÈÞ°¡»ê : #ffff00(¹àÀº³ë¶û)

		var status = grd_ordlist.rowHidden(i);
		if (status == false) {
			var ediitem1 = grd_ordlist.valueMatrix(i, grd_ordlist.colRef("item1"));
			if (ediitem1.length > 0) {
				if (ediitem1 == ediitem2) {
					grd_ordlist.rowStyle(i,"data","background-color") = color;
				} else {
					ediitem2 = ediitem1;
					if (color == "#ffffff") {
						grd_ordlist.rowStyle(i,"data","background-color") = "#f4f4f4";
						color = "#f4f4f4";
					
					} else {
						grd_ordlist.rowStyle(i,"data","background-color") = "#ffffff";
						color = "#ffffff";
					}
				}
			}
		}
	}
}

// »ó´Ü¿¡ ȯÀÚÁ¤º¸ ±âÀÔÇϱâ
// ¼öÁ¤Ãß°¡ : 20091006 JHP »ó´ÜÁ¤º¸·Î ÆĶó¹ÌÅÍ °ª ³Ñ±æ¶§ ±âÁ¸¿£ param ¿¡ ù¹øÀç °ªÀÌ ±âÁؾøÀÌ ¹«Á¶°Ç I¿´´Âµ¥ .ÀÀ±Þ±âÁØÀ» È®ÀÎÇÏ¿© ÀÀ±ÞÀ϶§´Â E·Î ³ª¸ÓÁö´Â I·Î ¼ÂÆÃÇÑ´Ù. 
function fSetOutPatPamInfo() {
	 var pid       	= model.getValue("root/main/item1/iteminfo/pid");
	 var indd     	= model.getValue("root/main/item1/iteminfo/indd1");
	 var cretno    	= model.getValue("root/main/item1/iteminfo/cretno");
	 var instcd    	= model.getValue("root/main/item1/iteminfo/instcd");
		 var ordtype    	= model.getValue("root/main/item1/iteminfo/ordtype");
	 
	 // ¼öÁ¤Ãß°¡ Åð¿øȯÀÚÀÏ°æ¿ì »ó´ÜÁ¤º¸ ÆĶó¹ÌÅÍ¿¡ srchdd¸¦ Åð¿øÀÏÀÚ·Î ³Ö¾îÁÖ°í ¾Æ´Ï¸é ÇöÀçÀÏÀÚ¸¦ ³Ö¾îÁØ´Ù. 20090916, JHP,(Çö´ë±è¿µÇÐ ÂüÁ¶)
	 var indschacptstat = model.getValue("root/main/item1/iteminfo/indschacptstat");
	 var dschdd = model.getValue("root/main/item1/iteminfo/dschdd");
	 
	 if(indschacptstat == "D" || indschacptstat == "T"){
	 	var srchdd = dschdd;
	 }else{
	 	var srchdd = VAL_today;
	 }
	 
	 // param ù¹ø° ºÙ´Â °ªÀº ¿Ü·¡ : O, ÀÔ¿ø : I, Áö¿øºÎ¼­ : S, ¼ö¼ú : T, ÀÀ±Þ : E, ÀÇ·Ú : C 
	 //var param = "I" + "¢Ë" + pid + "¢Ë" + indd + "¢Ë" + cretno + "¢Ë" + instcd + "¢Ë" + srchdd; 
	 if(ordtype == "E"){
	 	var param = "E" + "¢Ë" + pid + "¢Ë" + indd + "¢Ë" + cretno + "¢Ë" + instcd + "¢Ë" + srchdd; 
	 }else{
	 	var param = "I" + "¢Ë" + pid + "¢Ë" + indd + "¢Ë" + cretno + "¢Ë" + instcd + "¢Ë" + srchdd; 
	 }
	 
	 setParameter("condparam", param);
	 setParameter("errflag", "Y");
	 modal("SPMMO08900", 1, 0, 0, "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");
	 var useyn = getParameter("SPMMO08900_rtn_useyn");
	 if(useyn == "Y") {
	 	setParameter("SPMMO08900_rtn_useyn", "");
	 }else{
	 }
}

function fGetOperStat() {
	submit("TRPIJ00314",false);
}

// ó¹æ³»¿ªÀ» °®°í ¿Â´Ù. 
function fGetIsclList(paramFlag){
	
	// ¼öÁ¤Ãß°¡ paramFlag¿¡µû¶ó¼­ Á¶È¸Á¶°Ç ³öµÐ´Ù. 20090728 JHP
	if(paramFlag == "IPHS"){
		// Àç¿ø½É»ç¸ÞÀÎÈ­¸é ¿ìÃø»ó´Ü À¯Çü¿¡¼­ ´õºíŬ¸¯ÇÞÀ»¶§...JHP 20090728
		// ´õºíŬ¸¯½Ã °ª ÁöÁ¤Çϱ⿡ µû·Î °ª¼ÂÆþÈÇÑ´Ù. ...JHP 20090728
	}else if(paramFlag == "Srch"){
		// ´ë»óÀÚÁ¶È¸¿¡¼­ Åð¿ø¸ðµå½Ã Á¶È¸Á¶°ÇÀÇ °ªÀÌ ÀÖÀ¸¸é ÀÌ°É·Î ¼ÂÆÃÇÑ´Ù. ...JHP 20090728

		// ¼öÁ¤Ãß°¡ JHP 20090427 Åð¿ø¸ðµåÁ¶È¸Á¶°Ç Ãß°¡.. ½Å±Ô ½ÃÀÛ
		var dschmodesrch 	= model.getValue("/root/send/dschmodesrch");                          // Åð¿ø¸ðµå Á¶È¸ Á¶°Ç
		var indschacptstat 	= model.getValue("/root/main/item1/iteminfo/indschacpstat");      // ÀÔÅð¿øÁøÇà»óÅÂ
		var lastjudgdt 		= model.getValue("/root/main/item1/iteminfo/lastjudgdt");            // ÃÖÁ¾½É»çÀϽÃ
		var lastmdlclamdd 	= model.getValue("/root/main/item1/iteminfo/lastmdlclamdd");     // ÃÖÁ¾Áß°£Ã»±¸ÀϽÃ
		var indd 			= model.getValue("/root/main/item1/iteminfo/indd1");		    // ÀÔ¿øÀÏ
		var lastjudgdt2 		= "";
		var lastmdlclamdd2 	= "";
		
		if (lastjudgdt != "" && lastjudgdt != "-") {
			// ¼öÁ¤, ÃÖÁ¾½É»çÀÏ ´ÙÀ½³¯ÀÌ ¾Æ´Ï¶ó ÇØ´çÀϺÎÅÍ¿©¼­ ÇÏ·ç ´õÇϴ°Š»­. 20090729 JHP(yyy)¿äû
			lastjudgdt2 = lastjudgdt.toDate("YYYYMMDD");
			//lastjudgdt2 = lastjudgdt2.getAddDate(1);
			lastjudgdt2 = lastjudgdt2.getDateFormat();
		}
		// lastmdlclamdd ¿¡ ÇϷ縦 ´õÇÑ´Ù.(Áß°£Ã»±¸ ÀÏÀÚ°¡ ÀÖÀ¸¸é)
		if (lastmdlclamdd != "" && lastmdlclamdd != "-" && lastmdlclamdd == null) {
			lastmdlclamdd2 = lastmdlclamdd.toDate("YYYYMMDD");
				lastmdlclamdd2 = lastmdlclamdd2.getAddDate(1);
				lastmdlclamdd2 = lastmdlclamdd2.getDateFormat();
		}
		
		if(dschmodesrch == "1"){
			if (lastmdlclamdd != "" && lastmdlclamdd != "-" && lastmdlclamdd == null) {
				if(lastmdlclamdd2 >= VAL_today){
					model.setValue("/root/send/ordfromdd",VAL_today);
				} else {
					model.setValue("/root/send/ordfromdd",lastmdlclamdd2);
				}
				model.setValue("/root/send/ordtodd",VAL_today);	
			} else {
				model.setValue("/root/send/ordfromdd", indd);
				model.setValue("/root/send/ordtodd", VAL_today);
			}

		}else if(dschmodesrch == "2"){
			if(lastjudgdt != "" && lastjudgdt != "-"){
				if(lastjudgdt2 >= VAL_today){
					model.setValue("/root/send/ordfromdd",VAL_today);
				} else {
					model.setValue("/root/send/ordfromdd",lastjudgdt2);
				}
				model.setValue("/root/send/ordtodd",VAL_today);
			}else{
				model.setValue("/root/send/ordfromdd", indd);
				model.setValue("/root/send/ordtodd", VAL_today);
			}
			
		}else{
			// ¾Æ¹«°Íµµ ¾Æ´Ò¶§´Â (Åð¿ø¸ðµåÁ¶°Ç¾Æ´Ï¸é...) ó¹æ±¸ºÐ ¾Æ¹«°Íµµ ¾Æ´Ñ°ÅÇÏ°í °°´Ù. 
			//model.setValue("/root/send/ordfromdd", fromdd);
			//model.setValue("/root/send/ordtodd", todd);
			
			var ordfromdd = model.getValue("/root/send/fromdd");
			var ordtodd = model.getValue("/root/send/todd");
			var maxhopedd = model.getValue("/root/main/item1/iteminfo/maxhopedd");
			var tmp = model.getValue("/root/main/item1/iteminfo/lastjudgdt");
			var lastjudgdt = tmp.substr(0,4) + tmp.substr(4,2) + tmp.substr(6,2);
			var indd = model.getValue("/root/main/item1/iteminfo/indd1");
			var dschdd = model.getValue("/root/main/item1/iteminfo/dschdd");
			var dschnotiyn = model.getValue("/root/main/item1/iteminfo/dschnotiyn");
			var indschacptstat = model.getValue("/root/main/item1/iteminfo/indschacptstat");
			var lastmdlclamdd = model.getValue("/root/main/item1/iteminfo/lastmdlclamdd");
			
			// ordfromdd´Â ±âº»ÀûÀ¸·Î ÀÔ¿øÀÏ·Î
			ordfromdd = indd;
			// ordtodd°¡ 99991231À̸é ÇöÀçÀÏ·Î set
			if (ordtodd == "99991231") {
				ordtodd = VAL_today;
			}
			
			// maxhopedd°¡ ÀÖ´Â °æ¿ì¿¡´Â ordtodd¸¦ maxhopedd·Î set
			if (maxhopedd != "") {
				ordtodd = maxhopedd
			}

			// ÃÖÁ¾½É»çÀÏÀÚ°¡ ÀÖ´Â °æ¿ì ÃÖÁ¾½É»çÀÏ·Î ºÎÅÍ ½ÃÀÛÀÏÀ» ¼³Á¤
			if (lastjudgdt != "" && lastjudgdt != "-") {
				ordfromdd = lastjudgdt;
			}
			
			// Åð¿øȯÀÚ Ã³¸®
			if (indschacptstat == "D") {
				ordfromdd = indd;
				ordtodd = dschdd;
			/*	if (lastmdlclamdd != "") {
					ordfromdd = lastmdlclamdd;
				} */			
			} else if (dschnotiyn == "Y") { // Åð¿øÈ®Á¤È¯ÀÚ´Â µðÆúÆ®·Î ÀÔ¿øÀϺÎÅÍ Áß°£Ã»±¸ ¹ß»ýÀÚ´Â Áß°£Ã»±¸ ÀÌÈÄ·Î
				ordfromdd = indd;
				if (lastmdlclamdd != "" && lastmdlclamdd != "-") {
					ordfromdd = lastmdlclamdd;
				}
			}
			
			// ½ÃÀÛÀÏÀÌ Á¾·áÀϺ¸´Ù Å«°æ¿ì Á¾·áÀÏÀ» ½ÃÀÛÀÏ°ú µ¿ÀÏÇÏ°Ô ¸ÂÃß¾î ÁØ´Ù.
			if (ordfromdd > ordtodd) {
				ordtodd = ordfromdd;
			}
			var opendd = model.getValue("/root/main/item1/iteminfo/opendd");
			if (ordfromdd < opendd) {
				ordfromdd = opendd;
			}

			model.setValue("/root/send/ordfromdd", ordfromdd);
			model.setValue("/root/send/ordtodd", ordtodd);
		}
		// ¼öÁ¤Ãß°¡ JHP 20090427 Åð¿ø¸ðµåÁ¶È¸Á¶°Ç Ãß°¡.. ½Å±Ô ³¡
	}else{
		// ±âŸ´Â °ªÀ» ³ÖÁö ¾Ê¾Æ¼­ ±âº»ÀûÀ¸·Î ¿ø·¡°ÍÀ» Ÿ°Ô ÇÑ´Ù. ...JHP 20090728
		
		// ³¯Â¥ Á¶È¸ Àü¸é ¼öÁ¤ÇÔ - 20081111 ¹Úâ¿ø
		/* [Àç¿øÁ¶È¸±â°£]

		1-1. Àç¿ø½É»ç (Àç¿øÅð¿ø½É»ç ºÒ¹®ÇÏ°í)
		default  ½É»çÀÏÀÚ~max hopdd(¾øÀ¸¸é ÇöÀçÀÏ)±îÁö Á¶È¸
		½É»çÁß¿¡ Á¶È¸±â°£À» Á¶Á¤½Ã »ó¼¼³»¿ª ´ÝÈù ÈÄ¿¡µµ ±× ȯÀÚ¸¦ ÀúÀåÇÏ°í ³ª°¡±â Àü±îÁö´Â ±× Á¶È¸±â°£À¸·Î Á¶È¸
		»ó¼¼¿¡¼­ ±â°£À» Á¶È¸ÇÏ¸é ¸ÞÀÎÈ­¸éµµ Á¶Á¤µÊ
		
		1-2. üũ¹Ú½º üũ½Ã(¸ÞÀÎÈ­¸é¿¡¼­)
		default  ÀÔ¿ø½ÃÀÛÀÏ~max hopdd
		Áß°£Ã»±¸½ÃÀÛÀÏ~¿À´ÃÀÏÀÚ(Áß°£Ã»±¸ÇÑ È¯ÀÚ-û±¸»ý¼º¿Ï·á)
		½É»çÁß¿¡ Á¶È¸±â°£À» Á¶Á¤½Ã »ó¼¼³»¿ª ´ÝÈù ÈÄ¿¡µµ ±× ȯÀÚ¸¦ ÀúÀåÇÏ°í ³ª°¡±â Àü±îÁö´Â ±× Á¶È¸±â°£À¸·Î Á¶È¸
		»ó¼¼¿¡¼­ ±â°£À» Á¶È¸ÇÏ¸é ¸ÞÀÎÈ­¸éµµ Á¶Á¤µÊ
		
		2. Åð¿ø ¿Ï·áµÈ ȯÀÚ Á¶È¸½Ã
		ÀÔ¿øÀÏ~Åð¿øÀÏ
		Áß°£Ã»±¸½ÃÀÛÀÏ~¿À´ÃÀÏÀÚ(Áß°£Ã»±¸ÇÑ È¯ÀÚ-û±¸»ý¼º¿Ï·á) */
		
		var ordfromdd = model.getValue("/root/send/fromdd");
		var ordtodd = model.getValue("/root/send/todd");
		var maxhopedd = model.getValue("/root/main/item1/iteminfo/maxhopedd");
		var tmp = model.getValue("/root/main/item1/iteminfo/lastjudgdt");
		var lastjudgdt = tmp.substr(0,4) + tmp.substr(4,2) + tmp.substr(6,2);
		var indd = model.getValue("/root/main/item1/iteminfo/indd1");
		var dschdd = model.getValue("/root/main/item1/iteminfo/dschdd");
		var dschnotiyn = model.getValue("/root/main/item1/iteminfo/dschnotiyn");
		var indschacptstat = model.getValue("/root/main/item1/iteminfo/indschacptstat");
		var lastmdlclamdd = model.getValue("/root/main/item1/iteminfo/lastmdlclamdd");
		
		// ordfromdd´Â ±âº»ÀûÀ¸·Î ÀÔ¿øÀÏ·Î
		ordfromdd = indd;
		// ordtodd°¡ 99991231À̸é ÇöÀçÀÏ·Î set
		if (ordtodd == "99991231") {
			ordtodd = VAL_today;
		}
		
		// maxhopedd°¡ ÀÖ´Â °æ¿ì¿¡´Â ordtodd¸¦ maxhopedd·Î set
		if (maxhopedd != "") {
			ordtodd = maxhopedd
		}

		// ÃÖÁ¾½É»çÀÏÀÚ°¡ ÀÖ´Â °æ¿ì ÃÖÁ¾½É»çÀÏ·Î ºÎÅÍ ½ÃÀÛÀÏÀ» ¼³Á¤
		if (lastjudgdt != "" && lastjudgdt != "-") {
			ordfromdd = lastjudgdt;
		}
		
		// Åð¿øȯÀÚ Ã³¸®
		if (indschacptstat == "D") {
			ordfromdd = indd;
			ordtodd = dschdd;
		/*	if (lastmdlclamdd != "") {
				ordfromdd = lastmdlclamdd;
			} */			
		} else if (dschnotiyn == "Y") { // Åð¿øÈ®Á¤È¯ÀÚ´Â µðÆúÆ®·Î ÀÔ¿øÀϺÎÅÍ Áß°£Ã»±¸ ¹ß»ýÀÚ´Â Áß°£Ã»±¸ ÀÌÈÄ·Î
			ordfromdd = indd;
			if (lastmdlclamdd != "" && lastmdlclamdd != "-") {
				ordfromdd = lastmdlclamdd;
			}
		}
		
		// ½ÃÀÛÀÏÀÌ Á¾·áÀϺ¸´Ù Å«°æ¿ì Á¾·áÀÏÀ» ½ÃÀÛÀÏ°ú µ¿ÀÏÇÏ°Ô ¸ÂÃß¾î ÁØ´Ù.
		if (ordfromdd > ordtodd) {
			ordtodd = ordfromdd;
		}
		var opendd = model.getValue("/root/main/item1/iteminfo/opendd");
		if (ordfromdd < opendd) {
			ordfromdd = opendd;
		}

		model.setValue("/root/send/ordfromdd", ordfromdd);
		model.setValue("/root/send/ordtodd", ordtodd);
	}


	model.setValue("/root/send/mig", model.getValue("/root/main/item1/iteminfo/mig"));

	model.refresh();
	//ó¹æÁ¶È¸ ¿É¼Ç¿¡ Ç׸ñ±¸ºÐ¿¡ ó¹æÀÌ ÀÖ´Â °Í¸¸ Bold·Î º¸¿©ÁØ´Ù. 
	fSetItemBold();
	
	// 20091126 ¼öÁ¤Ãß°¡ JHP ¿äû¹øÈ£ 8496, ÁÖ»çÁ¦ 4Ç×1¸ñ, ¸¶ÃëÁ¦ 5Ç× 1¸ñ¿¡ ´ëÇØ 1ȸ·®ÀÌ 20ÀÌ ³ÑÀ¸¸é ¸Þ¼¼Áö 󸮿äû ####################½ÃÀÛ
	fChkinjanstmsg();		
	
}

// ó¹æ³»¿ªÀ» °®°í ¿Â´Ù. 
function fGetIsclList_FromTo(){
	//model.resetInstanceNode("/root/send");
	var ordfromdd = model.getValue("/root/send/ordfromdd");
	var ordtodd = model.getValue("/root/send/ordtodd");
	
	
	//ó¹æÁ¶È¸ ½ÃÀÛÀÏÀÚ¿Í Á¾·áÀÏÀÚ°¡ ¾ø´Â °æ¿ì º¸Çè³»¿ª ½ÃÀÛ Á¾·áÀÏ·Î ¼ÂÆÃÇØ ÁØ´Ù. 				
	if(ordfromdd == ""){
		model.setValue("/root/send/ordfromdd", model.getValue("/root/send/fromdd"));
	}
	if(ordtodd == ""){
		model.setValue("/root/send/ordtodd", model.getValue("/root/send/todd"));
	}
	
	if(ipt_pid.currentText.length >0) {
		var row  = grd_ordlist.row;
		model.removeNodeset("/root/main/list2/iscllist");
		grd_ordlist.refresh();
		
		submit("TRPIJ00302");		
		//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î ´ëü
		//model.refreshpart("/root/main/list2/iscllist");
		grd_ordlist.row = row;
		grd_ordlist.topRow = row - 3;
		
		//ó¹æÁ¶È¸ ¿É¼Ç¿¡ Ç׸ñ±¸ºÐ¿¡ ó¹æÀÌ ÀÖ´Â °Í¸¸ Bold·Î º¸¿©ÁØ´Ù. 	
		fSetItemBold();
		
	} else {
		messageBox("ȯÀÚ¹øÈ£¸¦","C001");
		return;
	}
}

// Áø·áºñ °è»ê³»¿ªÀ» °®°í ¿Â´Ù. 
function fGetCalc(){
	if(ipt_pid.currentText.length >0)
	{
		model.resetInstanceNode("/root/main/item2/itemcalc");
		var totalsumflag = model.getValue("/root/send/totalsumflag");
		if(!totalsumflag){
			model.setValue("/root/send/totalsumflag","N");
		}

		submit("TRPIJ00303");
		if(!totalsumflag){
			model.setValue("/root/send/totalsumflag","");
		}
		
	}else
	{
		//messageBox("ȯÀÚ¹øÈ£¸¦","C001");
		return;
		
	}
}

//Áß°£Ã»±¸ µî·Ï¿©ºÎ, ½É»ç ¸¶°¨»óÅÂ, ¹®Á¦È¯ÀÚ¿©ºÎ, dump À¯¹« ¸¦ üũÇÏ¿© ¹öÆ°ÀÇ »ö»óÀ» ¼ÂÆÃÇØÁØ´Ù. 
function fSetItemInfoSetting(){
	//Áß°£Ã»±¸ µî·Ï ¿©ºÎ
	var midcflag = model.getValue("/root/main/item1/iteminfo/midcflag");
	//ºÐÇÒ Á¦¿Ü ´ë»óÀÚ ¿©ºÎ
	var midregistyn = model.getValue("/root/main/item1/iteminfo/midregistyn");
	
	if(midcflag == "Y"){
		btn_midregist.attribute("class") = "btn2_letter6";
		btn_midregist.attribute("color") = "#ff0066";	
		btn_midregist.disabled = false;
		btn_midregistyn.disabled = true;
		btn_midcomplete.disabled= false;
		btn_midcancel.disabled = false;
	} else {
		btn_midregist.attribute("class") = "btn2_letter6";
		btn_midregistyn.disabled = false;
		btn_midcomplete.disabled= true;
		btn_midcancel.disabled = true;
		// ºÐÇÒ Á¦¿Ü ´ë»óÀÚ ÀÎ °æ¿ì
		if (midregistyn == "Y") {
			btn_midregistyn.attribute("class") = "btn2_letter6";
			btn_midregistyn.attribute("color") = "#ff0066";	
			btn_midregist.disabled = true;
		} else {
			btn_midregistyn.attribute("class") = "btn2_letter6";
			//btn_midregistyn.attribute("class") = "btn2_letter6";
			btn_midregist.disabled = false;
		}
	}
	
	//Åð¿ø½É»ç »óÅÂ
	var dschjudgprcsstat = model.getValue("/root/main/item1/iteminfo/dschjudgprcsstat");
	if(dschjudgprcsstat == "C" ){ //Åð¿ø¸¶°¨
		btn_dschclose.attribute("class") = "btn5_letter6";
		btn_dschclose.attribute("color") = "#ff0066";	
		btn_totjudgclose.attribute("class") = "btn2_letter6";
		btn_midcancel.visible = true;
	}else if(dschjudgprcsstat == "E" ){ //ÅëÇսɻ縶°¨
		btn_totjudgclose.attribute("class") = "btn5_letter6";
		btn_totjudgclose.attribute("color") = "#ff0066";	
		btn_dschclose.attribute("class") = "btn2_letter6";
	}else{
		btn_dschclose.attribute("class") = "btn2_letter6";
		btn_totjudgclose.attribute("class") = "btn2_letter6";
		btn_midcancel.visible = false;
	}
	
	//¹®Á¦È¯ÀÚ ¿©ºÎ
	var probjudgflag = model.getValue("/root/main/item1/iteminfo/probjudgflag");
	if(probjudgflag == "G"){
		model.setValue("/root/hidden/item1/probpatgreen","Y");		
		model.setValue("/root/hidden/item1/probpatred","");
	}else if(probjudgflag == "R"){
		model.setValue("/root/hidden/item1/probpatred","Y");
		model.setValue("/root/hidden/item1/probpatgreen","");		
	}else{
		model.setValue("/root/hidden/item1/probpatgreen","");
		model.setValue("/root/hidden/item1/probpatred","");		
	}
	
	//dump À¯¹« : ¹öÆ° »¡°£»ö Ç¥±â
	var dumpexistyn = model.getValue("/root/main/item1/iteminfo/dumpexistyn");				
	if(dumpexistyn == "Y"){
		btn_dump.attribute("class") = "btn2_letter6";
		btn_dump.attribute("color") = "#ff0066";	
		btn_dump.disabled = false;
	}else{
		btn_dump.attribute("class") = "btn2_letter6";
	}
	
	var recalcyn = model.getValue("/root/main/item1/iteminfo/recalcyn");
	if(recalcyn == "Y"){
		btn_recalc.attribute("class") = "btn2_letter6";
		btn_recalc.attribute("color") = "#ff0066";	
		btn_recalc.disabled = false;
	}else{
		btn_recalc.attribute("class") = "btn2_letter6";
	}
	
}



//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//»óº´Ã³¸® °ü·Ã ÄÚµù ½ÃÀÛ																	    //
//////////////////////////////////////////////////////////////////////////////////////////////////////////////
			
// »óº´ Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öÆ° Ŭ¸¯½Ã Æ˾÷ ¸Þ´º "»óº´¼ø¼­ À§·Î"
function fDiagSeqUp() {
	
	var rowstatus = grd_diaglist.rowstatus(grd_diaglist.row);
	if (rowstatus == 4) {		// 4 : delete
		return;
	}
	var diagseq = parseInt(model.getValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/seqno"));	// ¼±ÅÃµÈ ÁÙÀÇ NO
	if (diagseq > 1) {	// ù¹ø° ÁÙÀÌ ¾Æ´Ñ °æ¿ì
		model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/seqno", --diagseq);
		if (rowstatus == 0 || rowstatus == 2) {
			grd_diaglist.rowstatus(grd_diaglist.row) = 2;	// 2 : update
		}
		// ¹Ù·Î À§ »óº´¼ø¼­¿Í Áߺ¹µÇ´Â °æ¿ì
		var nextrow = grd_diaglist.row - 1;
		var nextdiagseq = model.getValue("/root/main/list3/diaglist["+ nextrow +"]/seqno");
		if (diagseq == nextdiagseq) {
			model.setValue("/root/main/list3/diaglist["+ nextrow +"]/seqno", ++diagseq);
//			rowstatus = grd_diaglist.rowstatus(nextrow);
//			if (rowstatus == 0 || rowstatus == 2) {
//				grd_diaglist.rowstatus(nextrow) = 2;		// 2 : update
//			}
		}
		fSortDiagNo();
	}
}

// »óº´ Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öÆ° Ŭ¸¯½Ã Æ˾÷ ¸Þ´º "»óº´¼ø¼­ ¾Æ·¡·Î"
function fDiagSeqDown() {
	var rowstatus = grd_diaglist.rowstatus(grd_diaglist.row);
	if (rowstatus == 4) {		// 4 : delete
		return;
	}
	// »èÁ¦ »óÅ°¡ ¾Æ´Ñ ¸¶Áö¸· ÁÙÀ» ã´Â´Ù.
	var lastRow = grd_diaglist.rows - 1;
	for (var i = 1; i < grd_diaglist.rows; i++) {
		if (grd_diaglist.rowstatus(i) == 4) {	// delete
			lastRow = i - 1;
			i = grd_diaglist.rows;
		}
	}
	var diagseq = parseInt(model.getValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/seqno"));	// ¼±ÅÃµÈ ÁÙÀÇ NO
	if (diagseq < lastRow) {	// ¸¶Áö¸· ÁÙÀÌ ¾Æ´Ñ °æ¿ì
		model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/seqno", ++diagseq);
		if (rowstatus == 0 || rowstatus == 2) {
			grd_diaglist.rowstatus(grd_diaglist.row) = 2;	// 2 : update
		}
		// ¹Ù·Î ¾Æ·¡ »óº´¼ø¼­¿Í Áߺ¹µÇ´Â °æ¿ì
		var nextrow = grd_diaglist.row + 1;
		var nextdiagseq = model.getValue("/root/main/list3/diaglist["+ nextrow +"]/seqno");
		if (diagseq == nextdiagseq) {
			model.setValue("/root/main/list3/diaglist["+ nextrow +"]/seqno", --diagseq);
		}
		fSortDiagNo();
	}
}
// "»óº´¼ø¼­ À§·Î/¾Æ·¡·Î" ¼ø¼­ º¯°æ ÈÄ¿¡ »óº´ ¼ø¼­ NO¿¡ µû¶ó sorting ÀÛ¾÷
function fSortDiag() {
	var maxRow = parseInt(grd_diaglist.rows) - 1;	// rows´Â ŸÀÌƲºÎºÐ ºÎÅÍ °³¼ö¸¦ ¼¾´Ù
	grd_diaglist.sort(1, 1, maxRow, 1) = "asc";		// ŸÀÌƲÀ» Á¦¿ÜÇÑ data ºÎºÐÀÇ Ã¹ ÁÙÀÇ row = 1
	// model.refresh(); ÃÖÀûÈ­¹®Á¦·Î ´ëü 20080731 ¹Úâ¿ø
	model.refreshpart("/root/main/list3/diaglist");
	// Sort µÈ Grid »óÀÇ Data ¼ø¼­¿Í Instance Node »óÀÇ Data ¼ø¼­¸¦ µ¿ÀÏÇÏ°Ô ¸ÂÃçÁØ´Ù.
	grd_diaglist.gridToInstance();
}

// "»óº´¼ø¼­ À§·Î/¾Æ·¡·Î" ¼ø¼­ º¯°æ ÈÄ¿¡ »óº´ ¼ø¼­ NO¿¡ µû¶ó sorting ÀÛ¾÷
function fSortDiagNo2() {
			
	var delcnt = 0;

	for (var i = 1; i < grd_diaglist.rows; i++) {
		grd_diaglist.rowHidden(i) = false;		
	}
	
	var cldino = 1;								
	for (var i = 1; i < grd_diaglist.rows; i++) {									
		model.setValue("/root/main/list3/diaglist[" + i + "]/seqno", i);
		rowstatus = grd_diaglist.rowstatus(i);
	}
	var maxRow = parseInt(grd_diaglist.rows) - 1;	// rows´Â ŸÀÌƲºÎºÐ ºÎÅÍ °³¼ö¸¦ ¼¾´Ù
	grd_diaglist.sort(1, grd_diaglist.colRef("seqno"), maxRow , grd_diaglist.colRef("seqno")) = "asc";		// ŸÀÌƲÀ» Á¦¿ÜÇÑ data ºÎºÐÀÇ Ã¹ ÁÙÀÇ row = 1 / col = 3 : no

	if (delcnt > 0) {
		grd_diaglist.sort(1, grd_diaglist.colRef("seqno"), maxRow - delcnt, grd_diaglist.colRef("seqno")) = "asc";		// ŸÀÌƲÀ» Á¦¿ÜÇÑ data ºÎºÐÀÇ Ã¹ ÁÙÀÇ row = 1 / col = 3 : no
	}

	// Sort µÈ Grid »óÀÇ Data ¼ø¼­¿Í Instance Node »óÀÇ Data ¼ø¼­¸¦ µ¿ÀÏÇÏ°Ô ¸ÂÃçÁØ´Ù.
	grd_diaglist.gridToInstance();
	
	var rowstatus;
	for (var i = 1; i < grd_diaglist.rows; i++) {
		rowstatus = grd_diaglist.rowstatus(i);
		if (rowstatus > 3) {		// »èÁ¦»óÅÂ
			grd_diaglist.rowHidden(i) = true;
		} else {
			grd_diaglist.rowHidden(i) = false;
		}
	}		
}			

function fSortDiagNo() {
							
	var maxRow = parseInt(grd_diaglist.rows) - 1;	// rows´Â ŸÀÌƲºÎºÐ ºÎÅÍ °³¼ö¸¦ ¼¾´Ù
	grd_diaglist.sort(1, 1, maxRow, 1) = "asc";		// ŸÀÌƲÀ» Á¦¿ÜÇÑ data ºÎºÐÀÇ Ã¹ ÁÙÀÇ row = 1

	// model.refresh(); ÃÖÀûÈ­¹®Á¦·Î ´ëü 20080731 ¹Úâ¿ø
	model.refreshpart("/root/main/list3");

	
	// Sort µÈ Grid »óÀÇ Data ¼ø¼­¿Í Instance Node »óÀÇ Data ¼ø¼­¸¦ µ¿ÀÏÇÏ°Ô ¸ÂÃçÁØ´Ù.
	grd_diaglist.gridToInstance();
	
	//·çÇÎÀ» µ¹¸é¼­ ¼ø¹øÀ» ¸ÂÃçÁÖ°í, ¸ðµÎ insert¸ðµå·Î ¹Ù²ãÁØ´Ù.
	//»óº´Àº History¸¦ ³²±âÁö ¾Ê°í ±×³É ¸ðµÎ »èÁ¦ ÈÄ ´Ù½Ã insert·Î ó¸®ÇÑ´Ù.
	//»óº´ ¼ø¹øÀÌ key¶ó¼­ update·Î ÇÏ¸é ¹Ù²ï seqÀԷ½à ±âÁ¸°ÍÀÌ ¾ÆÁ÷ ¾È¹Ù²î¾úÀ¸¸é Dup¿¡·¯ ¹ß»ýÇÔÀ¸·Î.
	for(i =1; i<grd_diaglist.rows;i++){
		model.setValue("/root/main/list3/diaglist[" + i + "]/seqno", i);
		grd_diaglist.rowstatus(i) = 1;

	}
}	

function fDiagGridAddRow(addyn, selectyn) {

	var iInsertRow = 0;		
	if (grd_diaglist.rows == 1 || addyn == "Y") {
		iInsertRow = grd_diaglist.row;					
		grd_diaglist.addRow(false, false);
	} else {
		
		iInsertRow = grd_diaglist.row;
		grd_diaglist.insertRow(iInsertRow, "below", false,false);
	}
	
	var nowRow = 0;
	nowRow = grd_diaglist.row;		
					
	model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/seqno", grd_diaglist.row);
	// û±¸°ú, Áø·á°³½ÃÀÏÀº ÁÖ»óº´À» ±âÁØÀ¸·Î ºÎ¿©ÇÑ´Ù.
	var clamdeptcd = model.getValue("/root/main/list3/diaglist/orddeptcd");
	if (clamdeptcd == "") {	// ÁÖ»óº´ÀÇ Áø·á°ú°¡ ÀԷµÇÁö ¾ÊÀº °æ¿ì ÀÎÀû»çÇ×ÀÇ Ã»±¸°ú¸¦ ÀÔ·ÂÇÑ´Ù.
		clamdeptcd = model.getValue("/root/main/item1/iteminfo/orddeptcd");
	}
	model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/orddeptcd", clamdeptcd);
	
	var ordfromdd = model.getValue("/root/main/list3//diaglist/ordfromdd");
	if (ordfromdd) {
		model.setValue("/root/main/list3//diaglist["+ grd_diaglist.row +"]/ordfromdd", ordfromdd);
	} else {
		model.setValue("/root/main/list3//diaglist["+ grd_diaglist.row +"]/ordfromdd", model.getValue("/root/main/item1/iteminfo/indd"));
	}
	model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/toot", "-");
	
	// »óº´ÀÌ·ÂÁ¶È¸¿¡¼­ È£ÃâµÈ °æ¿ì°¡ ¾Æ´Ï¸é
	if (selectyn != "Y") {
		fSortDiagNo2(true);
	}
	
	// edit mode ¼³Á¤À§ÇÑ°ÍÀÓ Àý´ë Áö¿ìÁö ¸»°Í.
	grd_diaglist.refresh();				
			
	if (addyn != "Y") {
		grd_diaglist.row = nowRow;		
		grd_diaglist.col = grd_diaglist.colRef("diagcd");		
		grd_diaglist.dispatch("onentercell");
	}

}


// »óº´ Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öÆ° Ŭ¸¯½Ã Æ˾÷ ¸Þ´º "Çà Ãß°¡"
function fDiagGridInsertRow() {
	
	// 2008.03.06 ¹ÚÁö¿í Ãß°¡ (»óº´ÀÇ Áø·á°³½ÃÀÏÀº Áß°£Ã»±¸ÃÖÁ¾½ÃÀÛÀÏÀÚ, Áß°£Ã»±¸µî·ÏÀÌ ¾øÀ¸¸é ÀÔ¿øÀÏÀÚ ¼¼ÆÃ)
	model.removenode("/root/hidden/mdlclamrgst");
	model.makeNode("/root/hidden/mdlclamrgst");
	
	var indd = model.getValue("/root/main/item1/iteminfo/indd"); 
	var deptcd = model.getValue("/root/main/item1/iteminfo/orddeptcd");

	//¼Óµµ°³¼± plet2 »óº´¸®½ºÆ®¿¡¼­ ¸¶Áö¸· ³¯Â¥¸¦ °¡Á®¿Àµµ·Ï.	      				      
	//submit("TRPIJ00313");
	var fromdd = model.getXPathValue("/root/main/list3/diaglist[last()]/ordfromdd");
	if (fromdd == "") {
		var indd = model.getValue("/root/send/ordfromdd");
		fromdd = indd; 
	}
	
	// »èÁ¦ »óÅ°¡ ¾Æ´Ñ ¸¶Áö¸· ÁÙÀ» ã´Â´Ù.
	var diagrow = grd_diaglist.rows - grd_diaglist.fixedRows;	// »óº´ Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù.
	grd_diaglist.insertRow(diagrow++, true,false,false);
	model.setValue("/root/main/list3/diaglist[" + diagrow + "]/seqno", 		diagrow);
	model.setValue("/root/main/list3/diaglist[" + diagrow + "]/ordfromdd", 	fromdd);		// Áø·á°³½ÃÀÏ
	model.setValue("/root/main/list3/diaglist[" + diagrow + "]/orddeptcd",	deptcd);		// Áø·á°ú
	
	fSortDiagNo();	

	// ÇàÃß°¡ ½Ã ¸Ç ¹Ø¿¡ ÇàÀÌ º¸ÀÏ ¼ö ÀÖµå·Ï Ãß°¡ ( 2007.10.09 ±è°Ç±â )
	grd_diaglist.bottomRow = grd_diaglist.rows;
	
	// ÇàÃß°¡ ÈÄ »óº´ÄÚµå Ä÷³À¸·Î Æ÷Ä¿½º À̵¿ ( 2007.10.09 ±è°Ç±â )
	model.setFocus("grd_diaglist");
	
	// edit mode ¼³Á¤À§ÇÑ°ÍÀÓ Àý´ë Áö¿ìÁö ¸»°Í.
	grd_diaglist.refresh();	
	
	grd_diaglist.row = diagrow;
	grd_diaglist.col = grd_diaglist.colref("diagcd");
	//grd_diaglist.dispatch("onentercell");
	//grd_diaglist.editCell();

}
// »óº´ ´Ù¼¸ÁÙ Ãß°¡
function fDiagGridInsertRow5() { // 20080826 ¹Úâ¿ø Ãß°¡
	// 2008.03.06 ¹ÚÁö¿í Ãß°¡ (»óº´ÀÇ Áø·á°³½ÃÀÏÀº Áß°£Ã»±¸ÃÖÁ¾½ÃÀÛÀÏÀÚ, Áß°£Ã»±¸µî·ÏÀÌ ¾øÀ¸¸é ÀÔ¿øÀÏÀÚ ¼¼ÆÃ)
	model.removenode("/root/hidden/mdlclamrgst");
	model.makeNode("/root/hidden/mdlclamrgst");
	
	var indd = model.getValue("/root/main/item1/iteminfo/indd"); 
	var deptcd = model.getValue("/root/main/item1/iteminfo/orddeptcd");
	
	var fromdd = model.getXPathValue("/root/main/list3/diaglist[last()]/ordfromdd");
	if (fromdd == "") {
		var indd = model.getValue("/root/send/ordfromdd");
		fromdd = indd; 
	}
	
	for (var i = 1; i <= 5; i++) {
		var lastRow = grd_diaglist.rows - 1;
		var diagrow = lastRow;	// »óº´ Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù.
		grd_diaglist.insertRow(diagrow++, true,false,false);
		model.setValue("/root/main/list3/diaglist[" + diagrow + "]/seqno", 		diagrow);
		model.setValue("/root/main/list3/diaglist[" + diagrow + "]/ordfromdd", 	fromdd);		// Áø·á°³½ÃÀÏ
		model.setValue("/root/main/list3/diaglist[" + diagrow + "]/orddeptcd",	deptcd);		// Áø·á°ú
	}
	 fSortDiagNo();	
	// ÇàÃß°¡ ½Ã ¸Ç ¹Ø¿¡ ÇàÀÌ º¸ÀÏ ¼ö ÀÖµå·Ï Ãß°¡ ( 2007.10.09 ±è°Ç±â )
	grd_diaglist.topRow = grd_diaglist.rows - 6;
	
	// ÇàÃß°¡ ÈÄ »óº´ÄÚµå Ä÷³À¸·Î Æ÷Ä¿½º À̵¿ ( 2007.10.09 ±è°Ç±â )
	model.setFocus("grd_diaglist");
	grd_diaglist.row = diagrow - 5;
	grd_diaglist.col = grd_diaglist.colref("diagcd");
	grd_diaglist.dispatch("onentercell");
	grd_diaglist.editCell();

}
// »óº´ Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öÆ° Ŭ¸¯½Ã Æ˾÷ ¸Þ´º "Çà »èÁ¦"
function fDiagGridDeleteRow() {
	//»óº´Àº »èÁ¦½Ã ¹«Á¶°Ç »èÁ¦¸¦ ³¯·Á ¹ö¸°´Ù. 
	for( var i = 0; i < grd_diaglist.selectedRows; i++ ){
		var cRrow = grd_diaglist.selectedRow(i);
		grd_diaglist.rowstatus(cRrow) = 4;		// 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
	}
	var tmp = grd_diaglist.rows;
	for(var k = tmp; k >= 0;k--){
		if(grd_diaglist.rowstatus(k) == "4"){
			grd_diaglist.deleteRow(k, false);
		}
	}
	//model.refresh(); ÃÖÀûȸ ¶§¹®¿¡ 20080731 ¹Úâ¿ø
	model.refreshpart("/root/main/list3/diaglist");
	fSortDiagNo();
}

// »óº´ÄÚµå Á¶È¸ Æ˾÷
function fSearchDiageCode() {
	
	var row = grd_diaglist.row;
	var diagcd = model.getValue("/root/main/list3/diaglist["+ row + "]/diagcd");
	
	model.removeNodeset("/root/hidden/sppiz00400/rslt");
	// »óº´ Data°¡ 2007³â ÀÌÈÄ·Î ¼³Á¤µÇ¾î ÀÖÀ¸¹Ç·Î Àӽ÷ΠÇöÀç ³¯Â¥¸¦ ³Ñ±ä´Ù.
	//model.makeValue("/root/hidden/sppiz00400/cond/basedd", model.getValue("/root/main/item1/clbs/clamdd"));
	model.resetInstanceNode("/root/hidden/sppiz00400/cond");
	model.makeValue("/root/hidden/sppiz00400/cond/basedd", VAL_today);	// (dateHelper.js) ÇöÀ糯¥ ¹Ýȯ
	model.makeValue("/root/hidden/sppiz00400/cond/diagcd", diagcd);
	model.makeNode("/root/hidden/sppiz00400/cond/diagnm");
	model.makeValue("/root/hidden/sppiz00400/cond/selectedrdodiagkind","1");
						
	if(diagcd){

		submit("TRPIJ00308",false);		// ÀÔ·ÂµÈ »óº´ÄÚµå·Î emr.mrtmicd10 Å×À̺íÀ» Á¶È¸ÇÑ´Ù.
		
		var rsltList = instance1.selectSingleNode("/root/hidden/sppiz00400");
		if (rsltList != null && rsltList.childNodes.length == 1) {
			// Á¶È¸µÈ °á°ú°¡ 1°ÇÀ̸é
			fSetDiagCdNm();
		} else {
			// Á¶È¸µÈ °á°ú°¡ ¾ø°Å³ª ¿©·¯ °ÇÀ̸é
			// »óº´ÄÚµå Á¶È¸¸¦ À§ÇØ SPPIZ00400_»óº´ÄÚµåÁ¶È¸.xrw ¸¦ È£ÃâÇÑ´Ù.
			fSearchSPPIZ00400();
		}
	} else {
		// »óº´ÄÚµå ÀÔ·Â ¾øÀÌ »óº´¸í ¼±Åà ½Ã
		fSearchSPPIZ00400();
	}

}

// »óº´ÄÚµå Á¶È¸¸¦ À§ÇØ SPPIZ00400_»óº´ÄÚµåÁ¶È¸.xrw ¸¦ È£ÃâÇÑ´Ù.
function fSearchSPPIZ00400() {
	model.removeNodeset("/root/hidden/sppiz00400/rslt");
	model.makeNode("/root/hidden/sppiz00400/rslt/diagcd");
	model.makeNode("/root/hidden/sppiz00400/rslt/diaghngnm");
	model.makeNode("/root/hidden/sppiz00400/rslt/diagengnm");
	
	model.resetInstanceNode("/root/hidden/sppiz00400/cond");
	model.makeValue("/root/hidden/sppiz00400/cond/basedd", VAL_today);	// (dateHelper.js) ÇöÀ糯¥ ¹Ýȯ
	model.makeValue("/root/hidden/sppiz00400/cond/diagcd", model.getValue("/root/main/list3/diaglist["+ grd_diaglist.row + "]/diagcd"));
	model.makeNode("/root/hidden/sppiz00400/cond/diagnm");
	model.makeValue("/root/hidden/sppiz00400/cond/selectedrdodiagkind","3");		// »ç¿ëÀÚ°¡ Á÷Á¢°Ë»öÇÏ¿© ÀÔ·Â ÇÒ¼ö ÀÖµµ·Ï ÀÓÀÇÀÇ °ª(3)À» ³Ö¾îÁÜ
	modal("SPPIZ00400" ,"", "10", "10", "SPPIZ00400", "/root/hidden/sppiz00400/cond", "/root/init", "", "");	// SPPIZ00400_»óº´ÄÚµåÁ¶È¸.xrw
}	

// [SPPIZ00400_»óº´ÄÚµåÁ¶È¸.xrw ¿¡¼­ È£Ãâ] »óº´Á¶È¸ Æ˾÷¿¡¼­ »óº´À» ´õºíŬ¸¯ ÇßÀ»°æ¿ì »óº´ ±×¸®µå¿¡ ¹Ý¿µ
function fSetDiagCdNm() {
	var diagcd = model.getValue("/root/hidden/sppiz00400/rslt/diagcd");
	var diaghngnm = model.getValue("/root/hidden/sppiz00400/rslt/diaghngnm");
	var diagengnm = model.getValue("/root/hidden/sppiz00400/rslt/diagengnm");
	var spclcd = model.getValue("/root/hidden/sppiz00400/rslt/spclcd");
	var currRow = grd_diaglist.row;
	
	//20090810 JHP ¼öÁ¤Ãß°¡. »óº´ Á¶È¸Æ˾÷¿¡¼­  »óº´Á¶È¸ ÈÄ Àû¿ëÇÏ·Á°í ÇÒ¶§ ÀνºÅϽº Áõ°¡(ÇàÃß°¡)ÇÏ¿© Àû¿ë½ÃŲ´Ù. 
	if(grd_diaglist.row <= 0){
		fDiagGridInsertRow();
		grd_diaglist.endEditCell();
	}else{
		var chkdiagcd = model.getValue("/root/main/list3/diaglist["+ currRow + "]/diagcd");
		var chkdiagnm = model.getValue("/root/main/list3/diaglist["+ currRow + "]/diagnm");
		if((chkdiagcd != "" || chkdiagcd != " " || chkdiagcd != null) && 
		   (chkdiagnm == "" || chkdiagnm == " " || chkdiagnm == null)){
			;
		}else if((chkdiagcd != "" || chkdiagcd != " " || chkdiagcd != null) && 
			           (chkdiagnm != "" || chkdiagnm != " " || chkdiagnm != null)){
		   	;
		}else{
			fDiagGridInsertRow();
			grd_diaglist.endEditCell();
		}
	}
	
	if (diagcd) {
		grd_diaglist.endEditCell();
		model.setValue("/root/main/list3/diaglist["+ currRow + "]/diagcd", diagcd);
	}
	if (diaghngnm) {
		model.setValue("/root/main/list3/diaglist["+ currRow + "]/diagnm", diaghngnm);
	}
	if(diagengnm){
		model.setValue("/root/main/list3/diaglist["+ currRow + "]/diagengnm", diagengnm);
	}
	if(spclcd){
		model.setValue("/root/main/list3/diaglist["+ currRow + "]/vcode", spclcd);
	}

	var chk_key = model.getValue("/root/main/list3/diaglist["+ currRow + "]/pid");
	
	//½Å±Ô·Î ºÒ·¯¿Â ÀԷµǴ °æ¿ì´Â Insert½Ã key°ªÀÌ ¾øÀ¸¹Ç·Î ±âº» Á¤º¸¿¡¼­ Àоî´Ù ³Ö¾î ÁØ´Ù. 
	if(chk_key){
		return;
	}else{
		//Pid
		model.setValue("/root/main/list3/diaglist["+ currRow + "]/pid",model.getValue("/root/send/pid"));
		//Indd
		model.setValue("/root/main/list3/diaglist["+ currRow + "]/indd",model.getValue("/root/send/indd"));
		//Cretno
		model.setValue("/root/main/list3/diaglist["+ currRow + "]/cretno",model.getValue("/root/send/cretno"));
		//fromdd
		model.setValue("/root/main/list3/diaglist["+ currRow + "]/fromdd",model.getValue("/root/send/fromdd"));
		//mskind
		model.setValue("/root/main/list3/diaglist["+ currRow + "]/mskind",model.getValue("/root/send/mskind"));
		//drinptyn
		model.setValue("/root/main/list3/diaglist["+ currRow + "]/drinptyn","N");
		//addflag
		model.setValue("/root/main/list3/diaglist["+ currRow + "]/addflag","Y");
		if(grd_diaglist.row >1){
			//orddeptcd
			model.setValue("/root/main/list3/diaglist["+ currRow + "]/orddeptcd",model.getValue("/root/main/list3/diaglist[1]/orddeptcd"));
			//ordfromdd
			model.setValue("/root/main/list3/diaglist["+ currRow + "]/ordfromdd",model.getValue("/root/main/list3/diaglist[1]/ordfromdd"));
		}
		
		//ÀúÀåÈÄ ºóÇàÀ» Ãß°¡ÇØ ÁØ´Ù. 
		//20080811 ÀÚµ¿À¸·Î ÁÙÃß°¡ µÇ´Â ±â´É Á¦¿Ü
		fDiagGridInsertRow();
	}
		
	// model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î ´ëü 20080731 ¹Úâ¿ø
	model.refreshpart("/root/main/list3/diaglist");
}

function fChangeRate() {
	grp_changeownbrate.visible = true;
}

function fUpdDiag() {
	var chk = model.getValue("/root/main/item1/iteminfo/patnm");
	if(chk){
		//fGetIsclList
		fRefreshDiag();		// ƯÁ¤ ȯÀÚ¿¡ ´ëÇÑ Àü»óº´ ³»¿ªÀ» Á¶È¸ÇÑ´Ù.
		// 20080811 Á¦¿ÜÇϱâ·ÎÇÔ(»óº´ÁÙÃß°¡(ÀÚµ¿)
		//fDiagGridInsertRow();
	}
}

function fChangeRate1() {
	// 6½Ã°£ ¹Ì¸¸ ȯÀÚ´Â ÀÔ¿ø¿¡¸¸ ÇØ´çÇÏ´Â ¿äÀ²À» Àû¿ëÇÒ ¼ö ¾ø´Ù. - 20081105 ¹Úâ¿ø
	var suppkind = cmb_suppkindlist.value;
	var sixtimyn = model.getValue("/root/main/item1/iteminfo/sixtimyn");
	var suppkindcd = model.getValue("/root/main/item1/iteminfo/suppkindcd");
	
	//20090325 Â÷»óÀ§ 2Á¾Ãß°¡	- ¹Úâ¿ø
	if (sixtimyn == "Y" && (suppkind == "05" || suppkind == "08" || suppkind == "09" || suppkind == "31" || suppkind == "39" || suppkind == "41" || suppkind == "42" || suppkind == "43")) {
		messageBox("6½Ã°£ ¹Ì¸¸È¯ÀÚ´Â ÀÔ¿ø¿¡¸¸ Àû¿ëµÇ´Â º¸Á¶À¯ÇüÀ¸·Î º¯°æÀ»","E001");
		grp_changeownbrate.visible = false;
		return;
	}
	
	// 6¼¼¹Ì¸¸, ½Å»ý¾Æ´Â Á¶°Ç¿¡ ¸ÂÁö ¾ÊÀ¸¸é Block - 20090103 ¹Úâ¿ø
	if (suppkind == "08" || suppkind == "31" || suppkind == "41")
		var age = parseInt(model.getValue("/root/main/item1/iteminfo/age"));
		var indd =  model.getValue("/root/main/item1/iteminfo/indd1");
		var insukindcd = model.getValue("/root/main/item1/iteminfo/insukindcd");
		var inpath = model.getValue("/root/main/item1/iteminfo/inpath");
		var orddeptcd = model.getValue("/root/main/item1/iteminfo/orddeptcd");
		var rrgstno = model.getValue("/root/main/item1/iteminfo/rrgstno");
		var sixtimyn = model.getValue("/root/main/item1/iteminfo/sixtimyn");
		var babyyn ="N";
		var end6yn = "N";
		var brthdd = "20" + rrgstno.substr(0,6);
		var readonly = model.getValue("/root/send/readonly");
		
		// ½Å»ý¾Æ¸¦ ±¸º°ÁöÀ½
		if (rrgstno.substr(7,1) == "3" || rrgstno.substr(7,1) == "4" || rrgstno.substr(7,1) == "7" || rrgstno.substr(7,1) == "8") {
			var interval = getDateInterval(brthdd,indd);
			if (interval <  "28") {
				babyyn = "Y";
			}
		}
		// 6¼¼¹Ì¸¸ »ýÀÏ ¿©ºÎ¸¦ ÆÇ´ÜÇÔ
		if ((rrgstno.substr(7,1) == "3" || rrgstno.substr(7,1) == "4") && age <= 6) {
			if (age == 6) {
				if (brthdd >= VAL_today) {
					end6yn = "Y";
				}
			} else if (age == 6){
				if (brthdd < VAL_today) {
					end6yn = "N";
				}
			} else if(age < 6) {
				end6yn = "Y";
			} else if (age > 6) {
				end6yn ="N";
			} 
		}
		
		var reqdeptno = model.getValue("/root/hidden/list2/dept[deptcd='"+orddeptcd+"']reqdeptno");
		if (sixtimyn == "N" && babyyn == "Y" &&age == 0 && indd >= "20080101" && reqdeptno == "11" && (insukindcd == "11" || insukindcd == "21" || insukindcd == "22")) {
			if (suppkind != "31") {
				messageBox("½Å»ý¾Æ Á¶°Ç¿¡ ¸ÂÁö ¾Ê¾Æ º¯°æÀ»","E001");
				grp_changeownbrate.visible = false;
				return;
			}
		}
		
		if (sixtimyn == "N" && end6yn == "Y" && babyyn == "N" && age <= 6 && reqdeptno == "11" && (insukindcd == "11" || insukindcd == "21" || insukindcd == "22")) {
			if (suppkind != "08" && suppkind != "41") { // 20090325 Â÷»óÀ§ 2Á¾ Á¶°Ç Ãß°¡ - ¹Úâ¿ø
				if (suppkind != "31") {
				messageBox("6¼¼¹Ì¸¸ Á¶°Ç¿¡ ¸ÂÁö ¾Ê¾Æ º¯°æÀ»","E001");
				grp_changeownbrate.visible = false;
				return;
			}
		}
	}
	
	var msg = messageBox("¼±ÅÃÇϽŠ¿äÀ²À» Àû¿ë","S001");
	if(msg !=6){
		return;
	}else{
		Insuchange(suppkind);
	}
}
//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//»óº´Á¶È¸¹öÆ°¿¡ ´ëÇÑ Ã³¸® 																     //
//////////////////////////////////////////////////////////////////////////////////////////////////////////////	

// ¼ö°¡ Á¶È¸
function fSetSrchCalcScorCdPop(){
	model.setValue("/root/hidden/smpic00100/cond/calcscorcd", grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("snglcalcscorcd")));
	model.setValue("/root/hidden/smpic00100/cond/judgflag", "Y");
	modal("SMPIC00100", 1,150, 150, "SMPIC00100", "/root/hidden/smpic00100/cond", "/root/temp/item6", "", "");
}

// º¸ÇèÀÎÁ¤±âÁØ°ü¸® È­¸é È£Ãâ 20091105 ¼öÁ¤Ãß°¡ JHP ¿äû¹øÈ£ : 5874
function fSetSrchInsuRcogBaseMngt(){
	var calcscorcd = grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("snglcalcscorcd"));
	model.setValue("root/hidden/sppiz01600/cond/calcscorcd", calcscorcd);
	// SPPIZ01600_º¸ÇèÀÎÁ¤±âÁØÁ¶È¸ Æ˾÷ ¿¬°á (¼±ÅÃµÈ rowÀÇ Ã³¹æÄڵ带 ³Ñ°ÜÁØ´Ù.)
	modal("SPPIZ01600", 1,150, 150, "SPPIZ01600", "/root/hidden/sppiz01600/cond/calcscorcd", "/root/send/item3/calcscorcd", "", "");
}
// º¸ÇèÀÎÁ¤±âÁØ°ü¸® È­¸é È£Ãâ 20091105 ¼öÁ¤Ãß°¡ JHP ¿äû¹øÈ£ : 5874 È£ÃâÇÔ¼ö. -  ¹Ì»ç¿ë
function getOpenInsuRcogBaseMngtChk(){
	var temp = getChildWindow("ddd");
	var nodecnt = 0;
	var xPathFunction = "count(/root/main/h_limi/limi)";
	while (nodecnt == 0)
	{
		nodecnt =  temp.model.getXPathValue(xPathFunction); 
		if (nodecnt >= 500){
			temp.messageBox("ÇØ´çÄÚµå ÀÎÁ¤±âÁØÀ» È®ÀÎÇÕ´Ï´Ù.","I002");
			temp.model.setValue("/root/main/right/h_limt/limt/limt_calcscorcd" ,grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("snglcalcscorcd")));
			temp.ipt_calcscorcd.dispatch("onkeypress");
			temp.model.refresh();
	  		break;
		}
	} 
}

// ¾àÇ°Æí¶÷ È£Ãâ - 20080930 ¹Úâ¿ø
function fOpenDrugDic() {
	open("SMADB01900","","","","bbb","","","","");
	var temp = getChildWindow("bbb");
	// ÇÊÅ͸µ ÇÒ °æ¿ì row°ªÀ» Á¦´ë·Î ¸ø °¡Á®¿Í¼­ valueMatrix·Î º¯°æÇÔ. 2012.02.16 LEJ
	temp.model.setValue("/root/hidden/receivedata/srchdrugcd", grd_ordlist.valueMatrix(grd_ordlist.row,grd_ordlist.colRef("snglcalcscorcd")));
}

// ÀǾàÇ°Á¤º¸ È£Ãâ - 20080930 ¹Úâ¿ø
function fOpenDruginfo() {
	open("SMADB00100","","","","ccc","","","","");
	var temp = getChildWindow("ccc");
	temp.model.setValue("/root/send/srchinfo/srchcd", grd_ordlist.valueMatrix(grd_ordlist.row,grd_ordlist.colRef("snglcalcscorcd")));
}
// ȯÀÚ´ÜÀ§ ¸Þ½ÃÁö Àü¼Û
function fSendMsgPat() {
	model.makeValue("/root/temp/opentab", "pmsg");
	zmifOpenMessagePopup("/root/temp");						// root/temp/opentab ¿¡ receivemsg (¹ÞÀº¸Þ¼¼ÁöÇÔ) °ªÀ» ÁÖ°í ¿ÀÇÂÇÑ´Ù.
}

// ó¹æ´ÜÀ§ ¸Þ½ÃÁö Àü¼Û
function fSendMsgOrder() {
	model.makeValue("/root/temp/opentab", "pmsg");
	zmifOpenMessagePopup("/root/temp");						// root/temp/opentab ¿¡ pmsg (ȯÀÚ¸Þ¼¼ÁöÀÛ¼ºÃ¢) °ªÀ» ÁÖ°í ¿ÀÇÂÇÑ´Ù.
}
	
// ó¹æ»óº´À» ²ø°í ¿Â´Ù. 
function fRefreshDiag() {
	if(model.getValue("/root/main/item1/iteminfo/patnm")){
		// ½É»ç´ë»óÀÚÀÇ µî·Ï¹øÈ£¸¦ Á¶°ÇÀ¸·Î ÇÏ¿© Àüü »óº´ÀÌ·ÂÀ» Á¶È¸ÇÑ´Ù.

		var cnt = grd_diaglist.rows;
		submit("TRPIJ00306");
		// model.refresh(); ÃÖÀûÈ­¹®Á¦·Î ÁÖ¼®Ã³¸® - 20081015 ¹Úâ¿ø

		for(var i = 1; i < grd_diaglist.rows; i++) {
			var chkflag = model.getValue("/root/main/list3/diaglist["+ i + "]/chkflag");
			
			if(chkflag == "2"){
				grd_diaglist.rowstatus(i) = 1;	
			}
			
		}
	}
}

// ƯÁ¤ ȯÀÚ¿¡ ´ëÇÑ Ã»±¸»óº´À» Á¶È¸ÇÑ´Ù.
function fGetClamDiagHistList() {
	if(model.getValue("/root/main/item1/iteminfo/patnm")){
		// ½É»ç´ë»óÀÚÀÇ µî·Ï¹øÈ£¸¦ Á¶°ÇÀ¸·Î ÇÏ¿© Àüü û±¸ »óº´ÀÌ·ÂÀ» Á¶È¸ÇÑ´Ù.
		model.setValue("/root/hidden/smpiz00100/cond/pid", model.getValue("/root/main/item1/iteminfo/pid")); 
		model.setValue("/root/hidden/smpiz00100/cond/ordfromdd", model.getValue("/root/main/item1/iteminfo/indd")); 
		model.setValue("/root/hidden/smpiz00100/cond/ordtodd", model.getValue("/root/main/item1/iteminfo/dschdd")); 
		model.setValue("/root/hidden/smpiz00100/cond/srchflag", "pam");	// °Ë»ö±¸ºÐ Radio : û±¸
		modal("SMPIZ00100" ,"", "10", "10", "SMPIZ00100", "/root/hidden/smpiz00100/cond", "/root/init", "", "");	// SMPIZ00100_¿Ü·¡ÀÔ¿ø»óº´ÀÌ·ÂÁ¶È¸.xrw
		// model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î  20080731 ¹Úâ¿ø
		
		var rsltNode = instance1.selectSingleNode("/root/hidden/smpiz00100/rslt");
		var originpid = model.getValue("/root/main/item1/iteminfo/pid");
		
		if (rsltNode != null) {
			for (var i = 1; i <= rsltNode.childNodes.length; i++) {
				
				var diagcd = model.getValue("/root/hidden/smpiz00100/rslt/diag["+ i +"]/diagcd");
				var isSame = false;
				for (var j = grd_diaglist.fixedRows; j < grd_diaglist.rows; j++) {
					if (diagcd == model.getValue("/root/main/list3/diaglist["+ j +"]/diagcd")) {
						// µ¿ÀÏÇÑ »óº´ÀÌ Á¸ÀçÇÏ´Â °æ¿ì
						isSame = true;
						j = grd_diaglist.rows;
					}
				}
				// µ¿ÀÏÇÑ »óº´ÀÌ ¾ø´Â °æ¿ì
				if (isSame == false) {
					grd_diaglist.addRow(false,true);
					var pid = model.getValue("/root/main/item1/iteminfo/pid");
					var indd = model.getValue("/root/main/item1/iteminfo/indd1");
					var cretno = model.getValue("/root/main/item1/iteminfo/cretno");
					var fromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
					var mskind = model.getValue("/root/main/item1/iteminfo/mskind");
				
					var ruleoutyn = model.getValue("/root/hidden/smpiz00100/rslt/diag["+ i +"]/diagkindcd");
					if(ruleoutyn == "C"){
						model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/ruleoutyn", "false");
					}else{
						model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/ruleoutyn", "true");
					}
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/pid", pid);
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/indd", indd);
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/cretno", cretno);
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/fromdd", fromdd);
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/mskind", mskind);
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/addflag", "Y");
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/drinptyn", "N");
					
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/seqno", grd_diaglist.row);
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/diagcd", model.getValue("/root/hidden/smpiz00100/rslt/diag["+ i +"]/diagcd"));
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/diagnm", model.getValue("/root/hidden/smpiz00100/rslt/diag["+ i +"]/diaghngnm"));
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/diagengnm", model.getValue("/root/hidden/smpiz00100/rslt/diag["+ i +"]/diagengnm"));
					// û±¸°ú, Áø·á°³½ÃÀÏÀº ÁÖ»óº´À» ±âÁØÀ¸·Î ºÎ¿©ÇÑ´Ù.
					var clamdeptcd = model.getValue("/root/main/list3/diaglist/orddeptcd");
					if (clamdeptcd == "") {	// ÁÖ»óº´ÀÇ Áø·á°ú°¡ ÀԷµÇÁö ¾ÊÀº °æ¿ì ÀÎÀû»çÇ×ÀÇ Áø·á°ú¸¦ ÀÔ·ÂÇÑ´Ù.
						clamdeptcd = model.getValue("/root/main/item1/iteminfo/orddeptcd");
					}
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/orddeptcd", clamdeptcd);
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/ordfromdd", model.getValue("/root/main/list3/diaglist/ordfromdd"));
					model.setValue("/root/main/list3/diaglist["+ grd_diaglist.row +"]/toot", "-");
				}
			}
			fSortDiagNo(true);
		}
		
	}
}

//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//»óº´Ã³¸® °ü·Ã ÄÚµù ³¡ 																	     //
//////////////////////////////////////////////////////////////////////////////////////////////////////////////	
			
//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//óÀå Filter °ü·Ã ÄÚµù  																	     //
//////////////////////////////////////////////////////////////////////////////////////////////////////////////	
			
			
// ó¹æ Á¶È¸ºÎ - ÀçÇà/±Þ¿©/Ç׸ñ±¸ºÐ Radio ¼±Åÿ¡ µû¶ó ó¹æ ³»¿ªÀ» º¸¿©ÁØ´Ù.
function fGetSelectedOrderData() {
	
	var matractflag = model.getValue("/root/hidden/list1/isclcond/matractflag");
	var calcpayflag = model.getValue("/root/hidden/list1/isclcond/calcpayflag");
	var snglcalcscorcls = model.getValue("/root/hidden/list1/isclcond/snglcalcscorcls");
	var cpflag	= model.getValue("/root/hidden/list1/isclcond/cpflag");
	var edicd = model.getValue("/root/hidden/list1/isclcond/edicd");
	var snglcalcscorcd  = model.getValue("/root/hidden/list1/isclcond/snglcalcscorcd");
	var actingflag = model.getValue("/root/hidden/list1/isclcond/actingflag");
	var calcamtflag = model.getValue("/root/hidden/list1/isclcond/calcamtflag");

	var tmp = "/root/main/list2/iscllist["
	var chk = "0";
	//Àç·áÇàÀ§ ±¸ºÐ
	if(matractflag){
		tmp = tmp + matractflag;
		chk = "1";
	}
	
	//±Þ¿©±¸ºÐ
	if(calcpayflag){
		if(chk == "1"){
			tmp = tmp + " and " +  calcpayflag;	
		}else{
			tmp = tmp + calcpayflag;	
			chk = "1";
		}
	}
	
	//Ç׸ñ±¸ºÐ
	if(snglcalcscorcls)	{
		if(chk == "1"){
			tmp = tmp + " and (" +  snglcalcscorcls + ")";	
		}else{
			tmp = tmp + "(" + snglcalcscorcls + ")";	
			chk = "1";
		}
	}
	
	// ½ÃÇ౸ºÐ ¿©ºÎ
	if(actingflag)	{
		if(chk == "1"){
			tmp = tmp + " and " +  actingflag;	
		}else{
			tmp = tmp + actingflag;	
			chk = "1";
		}
	}
	
	//CP¿©ºÎ
	if(cpflag)	{
		if(chk == "1"){
			tmp = tmp + " and " +  cpflag;	
		}else{
			tmp = tmp + cpflag;	
			chk = "1";
		}
	}
	
	//¼ö°¡ÄÚµå
	if(snglcalcscorcd)	{
		if(chk == "1"){
			tmp = tmp + " and  " +  snglcalcscorcd;	
		}else{
			tmp = tmp + snglcalcscorcd;	
			chk = "1";
		}
	}
	
	//Ç׸ñ±¸ºÐ
	if(edicd)	{
		if(chk == "1"){
			tmp = tmp + " and " +  edicd;	
		}else{
			tmp = tmp + edicd;	
			chk = "1";
		}
	}
	//zero ¼ö°¡ Á¦¿Ü±¸ºÐ
	if(calcamtflag)	{
		if(chk == "1"){
			tmp = tmp + " and " +  calcamtflag;	
		}else{
			tmp = tmp + calcamtflag;	
			chk = "1";
		}
	}
	
	if(chk == "0")
	{
		tmp = "/root/main/list2/iscllist";
	}else{
		tmp = tmp + "]";
	}
	
	grd_ordlist.attribute("nodeset") = tmp ;
	grd_ordlist.rebuild();
	grd_ordlist.resizeCells();
	//grd_ordlist.gridToInstance();				
	grd_ordlist.row = 0; // ±×¸®µåÀÇ Ã¹ÁÙºÎÅÍ Ç¥½ÃµÇµµ·Ï Æ÷Ä¿½º¸¦ 0À¸·Î ¼³Á¤ÇÑ´Ù.
	
	// 2008. 01. 27 ¹ÚÁö¿í Ãß°¡ (ó¹æ »ö±ò Ç× ±¸ºÐ¿¡ µû¶ó Èò»ö-ȸ»ö ±¸ºÐµÇµµ·Ï ó¸®)
	//fSetOrderColorByEdiitem();

	//Ç׸ñº°¼Ò°è
	fSetItemSubTotal();
	
	// ó¹æ GridÀÇ ³»¿ëÀÌ º¯°æµÈ °æ¿ì, ¼±º°½É»ç ó¹æ »ö±ò ±¸ºÐÀ» ´Ù½Ã ó¸®ÇÑ´Ù.
	fSetColorSpclJudgOrder();
	
	//fSetOrdSpclTxt();
	// model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î ´ëü 20080731 ¹Úâ¿ø
	model.refreshpart("/root/main/list2/iscllist");
}


// ó¹æÁ¶È¸ºÎ, ó¹æ Grid¿ë GroupÀÇ ÄÁÆ®·Ñ Å©±â¸¦ ¼³Á¤ÇÑ´Ù.
function fSetOrderControlSize() {
				
	if(grp_calc.attribute("top") == "305"){
		//±âÁ¸À§Ä¡¿¡ +200ÇÑ À§Ä¡, ó¹æ±×¸®µå´Â »çÀÌÁî +200
		grp_calc.attribute("top") = "105";
		grp_calc.attribute("height") = "640";
		grd_ordlist.attribute("height") = "518";
		cap_paylimamt.attribute("top") = "595";
		opt_paylimamt.attribute("top") = "620";
		swt_spclmemo.visible = "false";
		grd_diaglist.visible = "false";
	}else{
		grp_calc.attribute("top") = "305";
		grp_calc.attribute("height") = "440";
		grd_ordlist.attribute("height") = "318";
		
		cap_paylimamt.attribute("top") = "395";
		opt_paylimamt.attribute("top") = "420";
		swt_spclmemo.visible = "true";
		
		grd_diaglist.visible = "true";
	}
}
//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//óÀå Filter °ü·Ã ÄÚµù  ³¡																	     //
//////////////////////////////////////////////////////////////////////////////////////////////////////////////	


//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//ƯÁ¤³»¿ª °ü·Ã ÄÚµù  																	     //
//////////////////////////////////////////////////////////////////////////////////////////////////////////////	


// ƯÁ¤ ȯÀÚ¿¡ ´ëÇØ ±×µ¿¾È ÀÛ¼ºµÈ ½É»çÀÚ¸Þ¸ð, û±¸¸Þ¸ð ³»¿ªÀ» Á¶È¸ÇÑ´Ù.
function fGetMemoHistList() {
	if(model.getValue("/root/main/item1/iteminfo/patnm")){
		model.removeNodeset("/root/hidden/sppiz00300/rslt");
		model.makevalue("/root/hidden/sppiz00300/cond/pid", model.getValue("/root/main/item1/iteminfo/pid"));
		model.makevalue("/root/hidden/sppiz00300/cond/orddeptcd", model.getValue("/root/main/item1/iteminfo/orddeptcd"));
		model.makevalue("/root/hidden/sppiz00300/cond/ioflag", "I");
		model.makevalue("/root/hidden/sppiz00300/cond/refterm", "2");
		model.makevalue("/root/hidden/sppiz00300/cond/anofildinclyn", "Y");
		model.makevalue("/root/hidden/sppiz00300/cond/fromdd", "");
		model.makevalue("/root/hidden/sppiz00300/cond/todd", "");
		
		modal("SPPIZ00300" ,"", "10", "10", "SPPIZ00300", "/root/hidden/sppiz00300/cond", "/root/init", "", "");	// SPPIZ00300_¸Þ¸ðÀÌ·ÂÁ¶È¸.xrw
		
		var SelectMemo = instance1.selectSingleNode("/root/hidden/sppiz00300/rslt");
		if (SelectMemo != null) {
			var choimemo = model.getValue("/root/hidden/sppiz00300/rslt/choimemo").getTrim();	// (stringHelper.js) ¹®ÀÚ¿­ ¾ÕµÚ¿¡ ÀÖ´Â °ø¹é Á¦°Å
			var choiedicd = model.getValue("/root/hidden/sppiz00300/rslt/edicd");

			if (choimemo) {
				model.setValue("/root/hidden/sppiz00300/rslt/choimemo", choimemo);
				var destRef = model.getValue("/root/hidden/sppiz00300/rslt/destRef");
				if (destRef == "judgmemo") {	// ½É»ç¸Þ¸ð·Î Àü´Þ
					var judgmemo = model.getValue("root/main/item1/iteminfo/judgrmk");
					if (judgmemo) {		// ±âÁ¸ ½É»ç¸Þ¸ð°¡ °ø¹éÀÌ ¾Æ´Ñ °æ¿ì ¼±ÅÃµÈ ¸Þ¸ð¸¦ ½É»çÈ­¸é ¸Þ¸ð µÚ¿¡ µ¡ºÙÀδÙ.
						model.setValue("root/main/item1/iteminfo/judgrmk", judgmemo +" \n"+ choimemo);
					} else {
						if (choiedicd) {		// ó¹æº° ¸Þ¸ð¸¦ Àü´ÞÇÏ´Â °æ¿ìÀÓ
							// µ¿ÀÏÇÑ EDI Äڵ尡 ÀÖÀ» °æ¿ì¸¸ Ãß°¡
							var rowcnt =  getNodesetCount("/root/main/list2/iscllist"); // ÇÊÅÍ
							rowcnt = eval(rowcnt) + 1;								
							//for (var j = 1; j < grd_ordlist.rows; j++) {
							for (var j = 1; j < rowcnt; j++) {
								var clodedicd = model.getValue("/root/main/list2/iscllist["+ j +"]/edicd");
								if (choiedicd == clodedicd) {
									model.setValue("/root/main/item1/iteminfo/judgrmk", choimemo);
									j = grd_ordlist.rows;
								}
							}
						} else {
							model.setValue("root/main/item1/iteminfo/judgrmk", choimemo);
						}
					}
					model.toggle("case_judgrmemo");	// ÇØ´ç tab À¸·Î Åä±Û½ÃŲ´Ù.
				}
				else if (destRef == "edimemo") {	// û±¸¸Þ¸ð·Î Àü´Þ
					var edimemo = model.getValue("/root/main/item1/iteminfo/edirmk");
					if (edimemo) {				// ±âÁ¸ û±¸¸Þ¸ð°¡ °ø¹éÀÌ ¾Æ´Ñ °æ¿ì ¼±ÅÃµÈ ¸Þ¸ð¸¦ ½É»çÈ­¸é ¸Þ¸ð µÚ¿¡ µ¡ºÙÀδÙ.
						model.setValue("/root/main/item1/iteminfo/edirmk", edimemo +" \n"+ choimemo);
					} else {
						if (choiedicd) {		// ó¹æº° ¸Þ¸ð¸¦ Àü´ÞÇÏ´Â °æ¿ìÀÓ
							// µ¿ÀÏÇÑ EDI Äڵ尡 ÀÖÀ» °æ¿ì * Ç¥½Ã
							var rowcnt =  getNodesetCount("/root/main/list2/iscllist"); // ÇÊÅÍ
							rowcnt = eval(rowcnt) + 1;									
							//for (var j = 1; j < grd_ordlist.rows; j++) {
							for (var j = 1; j < rowcnt; j++) {
								var clodedicd = model.getValue("/root/main/list2/iscllist["+ j +"]/edicd");
								if (choiedicd == clodedicd) {
									model.setValue("/root/main/item1/iteminfo/edirmk", choimemo);
									//j = grd_ordlist.rows;
									j = rowcnt;
								}
							}
						} else {
							model.setValue("root/main/item1/iteminfo/edirmk", choimemo);
						}
					}
					model.toggle("case_ediclammemo");	// ÇØ´ç tab À¸·Î Åä±Û½ÃŲ´Ù.
				}
				else if (destRef == "prcpmemo") {	// ó¹æº° ÁÖ¼®·Î Àü´Þ
					
					// µ¿ÀÏÇÑ EDI Äڵ尡 ÀÖÀ» °æ¿ì * Ç¥½Ã
					var rowcnt =  getNodesetCount("/root/main/list2/iscllist");		// ÇÊÅÍ
					rowcnt = eval(rowcnt) + 1;
					for (var j = 1; j < rowcnt; j++) {
					//for (var j = 1; j < grd_ordlist.rows; j++) {
						var iscledicd = model.getValue("/root/main/list2/iscllist["+ j +"]/edicd");
						if (choiedicd == iscledicd) {
							model.setValue("/root/main/list2/iscllist["+ j +"]/text", "*");
						}
					}

					for (var i=1; i<grd_clcjlist.rows; i++) {
						
						var edicd = model.getValue("/root/main/list4/clcjlist["+i+"]/edicd");
						var spclspec = model.getValue("/root/main/list4/clcjlist["+i+"]/spclspec");
						
						if (choiedicd == edicd) {
							var ans = messageBox("µî·ÏµÈ ¸Þ¸ð°¡ ÀÖ½À´Ï´Ù. ±âÁ¸ ³»¿ª¿¡ Ãß°¡ÇÒ °æ¿ì ¿¹(Yes)\n »õ·Î¿î ³»¿ªÀ¸·Î º¯°æÇϽ÷Á¸é ¾Æ´Ï¿À(No) ¼±ÅÃÇÏ¿© Áֽʽÿä", "S003");	///¼öÁ¤»çÇ×ÀÌ ÀÖ½À´Ï´Ù. ÀúÀåÇϽ÷Á¸é ¿¹(Yes)\nº¯°æÇϽ÷Á¸é ¾Æ´Ï¿À(No)
							if (ans == 6) {	// 6: yes
								
								// 'JX999'  Äڵ带 Ãß°¡ÇÑ´Ù.
								fSpclGridInsertRow();			// ƯÁ¤³»¿ª Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öÆ° Ŭ¸¯½Ã Æ˾÷ ¸Þ´º "Çà Ãß°¡"
								var clsprow = grd_ordlist.row;
								
								model.setValue("/root/main/list4/clcjlist["+ clsprow +"]/unitflag", "J");
								model.setValue("/root/main/list4/clcjlist["+ clsprow +"]/edicd", choiedicd);
								model.setValue("/root/main/list4/clcjlist["+ clsprow +"]/spclcd", "JX999");
								model.setValue("/root/main/list4/clcjlist["+ clsprow +"]/spclcdnm", "JX999 ±âŸ³»¿ª");
								model.setValue("/root/main/list4/clcjlist["+ clsprow +"]/spclspec", spclspec + "\n"+ choimemo);
								model.setValue("/root/main/list4/clcjlist["+ clsprow +"]/remfact", "X(700)");
								
								return;
							}
							else if (ans == 7) {	// 7:no
								model.setValue("/root/main/list4/clcjlist["+ i +"]/spclspec", choimemo);								
								return ;
							}
							else if (ans == 2) {	// 2:cancel							
								return ;
							}
						}
					}
					
					// ½Å±Ô·Î ƯÁ¤ ³»¿ªÀ» Ãß°¡ÇÏ´Â °æ¿ì
					var rowcnt =  getNodesetCount("/root/main/list2/iscllist");		// ÇÊÅÍ
					rowcnt = eval(rowcnt) + 1;
					for (var j = 1; j < rowcnt; j++) {
					//for (var j = 1; j < grd_ordlist.rows; j++) {
						var iscledicd = model.getValue("/root/main/list2/iscllist["+ j +"]/edicd");
						if (choiedicd == iscledicd) {
							// 'JX999'  Äڵ带 Ãß°¡ÇÑ´Ù.
							fSpclGridInsertRow();			// ƯÁ¤³»¿ª Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öÆ° Ŭ¸¯½Ã Æ˾÷ ¸Þ´º "Çà Ãß°¡"
							var clsprow = grd_clsphist.row;
							
							model.setValue("/root/main/list4/clcjlist["+ clsprow +"]/unitflag", "J");
							model.setValue("/root/main/list4/clcjlist["+ clsprow +"]/edicd", choiedicd);
							model.setValue("/root/main/list4/clcjlist["+ clsprow +"]/spclcd", "JX999");
							model.setValue("/root/main/list4/clcjlist["+ clsprow +"]/spclcdnm", "JX999 ±âŸ³»¿ª");
							model.setValue("/root/main/list4/clcjlist["+ clsprow +"]/spclspec", spclspec + "\n"+ choimemo);
							model.setValue("/root/main/list4/clcjlist["+ clsprow +"]/remfact", "X(700)");
							
							return;
						}
					}						
				}
				
				model.refresh();
			}
		}

	}
}

// ƯÁ¤³»¿ª Áß MT015, MT016 ³»¿ªÀ» Á¶È¸ÇÏ¿© "¼Ò¸íÀÚ·á" Btn (÷ºÎ¹° ÀÚ·á°ü¸®) Popup È­¸é¿¡ Ç¥½ÃÇÑ´Ù.
function fGetAttachedDataList() {
	if(model.getValue("/root/main/item1/iteminfo/patnm")){
		//model.removeNodeset("/root/hidden/sppiz00200/cond/clsp");
		model.setValue("/root/hidden/sppiz00200/cond/clsp/rowstat","");
		model.setValue("/root/hidden/sppiz00200/cond/clsp/unitflag","");
		model.setValue("/root/hidden/sppiz00200/cond/clsp/spclcd","");
		model.setValue("/root/hidden/sppiz00200/cond/clsp/spclspec", "");
		model.setValue("/root/hidden/sppiz00200/cond/clsp/initedilnno", "");
		model.setValue("/root/hidden/sppiz00200/cond/clsp/calcscorcd", "");
		model.setValue("/root/hidden/sppiz00200/cond/clsp/seqno", "");
		model.setValue("/root/hidden/sppiz00200/cond/clsp/spclformat","");
		
		// ƯÁ¤³»¿ª Grid¿¡¼­ "Çà »èÁ¦"ÇÑ °æ¿ì MT015 / MT016 ÀڷḦ Ç¥½ÃÇÏÁö ¾Êµµ·Ï ÇÏ´Â ±â´É ÇÊ¿äÇÔ
		// (ÀÛ¼ºÇÒ °Í!!!!!!!!!!!!!!!!!!!!!!!)

		for (var i = 1; i < grd_clcjlist.rows; i++) {
			var tmp =  model.getValue("/root/main/list4/clcjlist["+ i +"]/spclcd");
			if(tmp == "MT015" || tmp == "MT016"){
				model.setValue("/root/hidden/sppiz00200/cond/clsp/rowstat","-");
				model.setValue("/root/hidden/sppiz00200/cond/clsp/unitflag","M");
				model.setValue("/root/hidden/sppiz00200/cond/clsp/spclcd", model.getValue("/root/main/list4/clcjlist["+ i +"]/spclcd"));
				model.setValue("/root/hidden/sppiz00200/cond/clsp/spclspec", model.getValue("/root/main/list4/clcjlist["+ i +"]/spclspec"));
				model.setValue("/root/hidden/sppiz00200/cond/clsp/initedilnno", grd_clcjlist.row);
				model.setValue("/root/hidden/sppiz00200/cond/clsp/calcscorcd", model.getValue("/root/main/list4/clcjlist["+ i +"]/edicd"));
				model.setValue("/root/hidden/sppiz00200/cond/clsp/seqno", "1");
				model.setValue("/root/hidden/sppiz00200/cond/clsp/spclformat", model.getValue("/root/main/list4/clcjlist["+ i +"]/remfact"));
			}
		}
		
		modal("SPPIZ00200" ,"", "10", "10", "SPPIZ00200");	// SPPIZ00200_÷ºÎ¹°ÀÚ·á°ü¸®.xrw
		fDisplayAttachedDataList()
		fCheckSpclSpecData();
	}
}

// "¼Ò¸íÀÚ·á" Btn (÷ºÎ¹° ÀÚ·á°ü¸®) Popup È­¸é¿¡¼­ ƯÁ¤³»¿ª Áß MT015, MT016 Á¤º¸°¡ ÀÔ·ÂµÈ È¯ÀÚÀÎÁö¸¦ È®ÀÎÇÑ´Ù.
// ƯÁ¤³»¿ª MT004°¡ ÀÔ·ÂµÈ È¯ÀÚÀÎÁö üũÇÑ´Ù. 
function fDisplayAttachedDataList() {
	var isAttachedDataList = false;
	var cSrcNode = instance1.selectSingleNode("/root/hidden/sppiz00200/rslt/clsp");
	if (cSrcNode == null) {	// ƯÁ¤³»¿ªÀÌ ¾ø´Â °æ¿ìÀÓ
		return;
	}
	if (model.getValue("/root/hidden/sppiz00200/rslt/clsp/unitflag") == "") {	// "Ãë¼Ò" ¼±Åýÿ¡ ¹öÆ° »öÀÌ º¯°æµÇÁö ¾Êµµ·Ï
		return;
	}
	var cSrcChildNodeList = cSrcNode.childNodes;
	for (var i = 1; i <= cSrcChildNodeList.length; i++) {
		var spclcd = model.getValue("/root/hidden/sppiz00200/rslt/clsp["+i+"]/spclcd");
		if (spclcd == "MT015" || spclcd == "MT016") {
			var rowstat = model.getValue("/root/hidden/sppiz00200/rslt/clsp["+i+"]/rowstat")
			if (rowstat != 'D') {
				var spclspec = model.getValue("/root/hidden/sppiz00200/rslt/clsp["+i+"]/spclspec");
				if (spclspec) {
					isAttachedDataList = true;
				}
				// ƯÁ¤³»¿ª Grid ¿¡¼­ ÇØ´ç ³»¿ëÀ» »ðÀÔ ¶Ç´Â ¼öÁ¤ÇÑ´Ù.
				if (rowstat == "I") {	// »ðÀÔ
					fSpclGridInsertRow();
					model.setValue("/root/main/list4/clcjlist[" + grd_clcjlist.row + "]/spclcd", spclcd);
					model.setValue("/root/main/list4/clcjlist[" + grd_clcjlist.row + "]/spclspec", spclspec);
					if (spclcd == "MT015") {
						model.setValue("/root/main/list4/clcjlist[" + grd_clcjlist.row + "]/remfact", "X(2)");
					} else {
						model.setValue("/root/main/list4/clcjlist[" + grd_clcjlist.row + "]/remfact", "X(200)");
					}
				} else if (rowstat == "U") {		// ¼öÁ¤
					for (var j = 1; j < grd_clcjlist.rows; j++) {
						var gridspclcd = model.getValue("/root/main/list4/clcjlist["+ j +"]/spclcd");
						var gridspclspec = model.getValue("/root/main/list4/clcjlist["+ j +"]/spclspec");
						var gridrowstatus = grd_clcjlist.rowstatus(j);
						if (gridspclcd == spclcd) {
							model.setValue("/root/main/list4/clcjlist[" + j + "]/spclspec", spclspec);
							if (gridrowstatus == 1 || gridrowstatus == 3) {	// 1 : insert, 3 : insert & new
							} else {
								grd_clcjlist.rowstatus(j) = 2;			// 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
							}
						}
					}
				}
			} else {	// »èÁ¦
				// ƯÁ¤³»¿ª Grid ¿¡¼­ ÇØ´ç ³»¿ëÀ» »èÁ¦ÇÑ´Ù.
				for (var j = 1; j < grd_clcjlist.rows; j++) {
					var gridspclcd = model.getValue("/root/main/list4/clcjlist["+ j +"]/spclcd");
					var gridspclspec = model.getValue("/root/main/list4/clcjlist["+ j +"]/spclspec");
					var gridrowstatus = grd_clcjlist.rowstatus(j);
					if (gridspclcd == spclcd) {
						if (gridrowstatus == 1 || gridrowstatus == 3) {	// 1 : insert, 3 : insert & new
							grd_clcjlist.deleteRow(j, false);			// ÇØ´ç ¶óÀÎÀ» Grid¿¡¼­ »èÁ¦ÇÑ´Ù.
						} else {								// 0 : new, 2 : update
							grd_clcjlist.rowstatus(j) = 4;			// 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
						}
					}
				}
			}
		}			
	}
	if (isAttachedDataList) {
		btn_attData.attribute("class") = "btn5_letter4";
		btn_attData.attribute("color") = "#cc3333";
	} else {
		btn_attData.attribute("class") = "btn2_letter4"; 
	}
}

// DB¿¡¼­ Á¶È¸ÇÑ Æ¯Á¤³»¿ª Áß MT015, MT016 Á¤º¸°¡ ÀÔ·ÂµÈ È¯ÀÚÀÎÁö¸¦ È®ÀÎÇÑ´Ù.
// ƯÁ¤³»¿ª MT004°¡ ÀÔ·ÂµÈ È¯ÀÚÀÎÁö üũÇÑ´Ù. 
function fCheckSpclSpecData() {
	var cSrcNode = instance1.selectSingleNode("/root/main/list4/clcjlist");
	if (cSrcNode == null) {	// ƯÁ¤³»¿ªÀÌ ¾ø´Â °æ¿ìÀÓ
		return;
	}
	//var cSrcChildNodeList = cSrcNode.childNodes;
//	for (var i = 1; i <= cSrcChildNodeList.length; i++) {
	var spclcdMT015 = model.getValue("/root/main/list4/clcjlist[spclcd='MT015' or spclcd='MT016']/spclcd");
	var spclcdMT004 = model.getValue("/root/main/list4/clcjlist[spclcd='MT004']/spclcd");
		if (spclcdMT015.length > 0) {
			btn_attData.attribute("class") = "btn5_letter4";
			btn_attData.attribute("color") = "#ff0066";
		} else {
			btn_attData.attribute("class") = "btn2_letter4";
		}
		
		if(spclcdMT004 == "MT004") {
			btn_mt004.attribute("class") = "btn5_letter4";
			btn_mt004.attribute("color") = "#ff0066";
		} else {
			btn_mt004.attribute("class") = "btn2_letter4";
		}
//	}
	
}

//ÁÙ´ÜÀ§ Ãß°¡
function fSpclGridInsertRow() {
	// ƯÁ¤³»¿ª Grid »ó¿¡¼­ Á÷Á¢ ÇàÀ» Ãß°¡ÇÏ´Â °æ¿ì : ¸í¼¼¼­´ÜÀ§ ƯÁ¤³»¿ª¸¸À» Ãß°¡ÇÒ ¼ö ÀÖ´Ù.
	// ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÇ °æ¿ì, ó¹æ Grid¿¡¼­ 'T' Ä÷³À» ´õºíŬ¸¯ÇÏ¿© ƯÁ¤³»¿ª »ó¼¼°ü¸® PopupÀ» ÅëÇØ ÀÔ·ÂÇÑ´Ù.
	
	var clcjrow = 0;
	
	if(grd_clcjlist.rows > 1){
		clcjrow = grd_clcjlist.rows - 1;	// ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù.
		
		var chkdata = model.getValue("/root/main/list4/clcjlist[" + clcjrow + "]/spclcd");
		
		if(chkdata == ""){
			return;
		}
	}

	grd_clcjlist.insertRow(clcjrow++, true,false,false);
	grd_clcjlist.cellComboNodeset(clcjrow,3) = "/root/init/P0117list/P0117[minval = 'M' and cdid != 'MX999']";
	
	model.setValue("/root/main/list4/clcjlist[" + (grd_clcjlist.rows - 1) + "]/pid", model.getValue("/root/send/pid"));
	model.setValue("/root/main/list4/clcjlist[" + (grd_clcjlist.rows - 1) + "]/indd", model.getValue("/root/send/indd"));
	model.setValue("/root/main/list4/clcjlist[" + (grd_clcjlist.rows - 1) + "]/cretno", model.getValue("/root/send/cretno") );
	model.setValue("/root/main/list4/clcjlist[" + (grd_clcjlist.rows - 1) + "]/fromdd", model.getValue("/root/send/fromdd"));
	model.setValue("/root/main/list4/clcjlist[" + (grd_clcjlist.rows - 1) + "]/mskind", model.getValue("/root/send/mskind"));
	model.setValue("/root/main/list4/clcjlist[" + (grd_clcjlist.rows - 1) + "]/unitflag", "M");
	model.setValue("/root/main/list4/clcjlist[" + (grd_clcjlist.rows - 1) + "]/spclmemoflag","E" );
	model.setValue("/root/main/list4/clcjlist[" + (grd_clcjlist.rows - 1) + "]/status", "3");
					
	grd_clcjlist.row = grd_clcjlist.rows;
	grd_clcjlist.rowstatus(grd_clcjlist.row) = 1;	
	// grd_clcjlist.gridToInstance(); ÃÖÀûÈ­¹®Á¦·Î ÁÖ¼®Ã³¸® - 20081015 ¹Úâ¿ø
}

// ƯÁ¤³»¿ª Grid ¸¶¿ì½º ¿À¸¥ÂÊ ¹öÆ° Ŭ¸¯½Ã Æ˾÷ ¸Þ´º "Çà »èÁ¦"
function fSpclGridDeleteRow() {
	var rowstatus = grd_clcjlist.rowstatus(grd_clcjlist.row);
	for( var i = grd_clcjlist.selectedRows; i >= 0 ; i-- ){
		var cRrow = grd_clcjlist.selectedRow(i);
		if (rowstatus == 4) {		// 4 : delete
			return;
		}
		else if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
			grd_clcjlist.deleteRow(cRrow, false);		// ÇØ´ç ¶óÀÎÀ» Grid¿¡¼­ »èÁ¦ÇÑ´Ù.
		} else {							// 0 : new, 2 : update
			model.setValue("/root/main/list4/clcjlist[" + grd_clcjlist.row + "]/status", 4);
			grd_clcjlist.rowstatus(cRrow) = 4;		// 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
		}
	}
	
	fCheckSpclSpecData();
	//ƯÁ¤³»¿ªÀÌ Àִ ó¹æ¿¡ 'T'Çʵ忡 *Ç¥¸¦ ÇØÁØ´Ù. 
	//fSetOrdSpclTxt();
	//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î ´ëü 20080731 ¹Úâ¿ø
	model.refreshpart("/root/main/list2/iscllist");
	model.refreshpart("/root/main/list4/clcjlist");
}

// ƯÁ¤³»¿ª Grid ¿¡¼­ ¼±ÅÃÇÑ ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀ» Á¶È¸ÇÏ°í, ¸í¼¼¼­´ÜÀ§ ƯÁ¤³»¿ªÀ» ¼öÁ¤/ÀÔ·ÂÇÑ´Ù.
function fSetDocRefLnSpclSpec(){
	model.removenode("/root/hidden/sppij00500/rslt");		// SPPIJ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸® ¿¡¼­ ¼±ÅÃµÈ °á°ú°¡ copyNodeµÇ´Â °æ·ÎÀÓ
	model.removenode("/root/hidden/sppij00500/cond/list");
	
	model.resetInstanceNode("/root/hidden/sppij00500/cond");
	
	var row = grd_clcjlist.row;
	var rows = grd_clcjlist.rows;

	var edicd = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("edicd"));
	var oldspclcd = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("spclcd"));
	var oldspclcdnm = "";
	var oldspclspec = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("spclspec"));
	var oldremfact = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("remfact"));
	var olddetldesc = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("detldesc"));
	//ÁÙ´ÜÀ§ ¸í´ÜÀ§ ƯÁ¤³»¿ª ±¸ºÐ. 
	var unitflag = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("unitflag"));
	var calcscorcd = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("calcscorcd"));
	
	// pid,inddÃß°¡ °á°úÁ¶È¸ Æ˾÷È£ÃâÀ» À§ÇÏ¿© - 20080922 ¹Úâ¿ø
	var pid = model.getValue("/root/main/item1/iteminfo/pid");
	var indd = model.getValue("/root/main/item1/iteminfo/indd1");
	
	
	var rowcnt = 1;
	var setrow  =0 ;
	
	if(unitflag == "J"){
		if (edicd ) {
			for (var i=1; i<rows; i++) {
				
				var grdedicd = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("edicd"));
				
				if ( edicd ==  grdedicd) {
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/pid", pid);
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/indd", indd);
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/flag", "U");
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/edicd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("edicd")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclcd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclcdnm", "");
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclspec", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/detldesc", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("detldesc")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/remfact", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("remfact")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/unitflag", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/rownum", i);
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/oldspclcd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/oldspclspec", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/calcscorcd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("calcscorcd")));
					
					if (row == i) {
						setrow = i;
					}
					rowcnt = rowcnt+1;
				}
			}
			
			model.setValue("/root/hidden/sppij00500/cond/pid", pid);	
			model.setValue("/root/hidden/sppij00500/cond/indd", indd);	
			model.setValue("/root/hidden/sppij00500/cond/flag", "U");				
			model.setValue("/root/hidden/sppij00500/cond/edicd", edicd);
			model.setValue("/root/hidden/sppij00500/cond/spclcd", oldspclcd);
			model.setValue("/root/hidden/sppij00500/cond/spclcdnm", oldspclcdnm);
			model.setValue("/root/hidden/sppij00500/cond/detldesc", olddetldesc);
			model.setValue("/root/hidden/sppij00500/cond/spclspec", oldspclspec);
			model.setValue("/root/hidden/sppij00500/cond/remfact", oldremfact);
			model.setValue("/root/hidden/sppij00500/cond/rownum", setrow);
			model.setValue("/root/hidden/sppij00500/cond/unitflag", "J");
			model.setValue("/root/hidden/sppij00500/cond/calcscorcd", calcscorcd);
			
							
			//var unitflag = model.getValue("/root/main/list4/clcjlist["+ row +"]/unitflag");
			
			var unitflag = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("unitflag"))
			
			// »èÁ¦»óÅÂÀÎ °æ¿ì ó¹æGrid¿¡¼­ ÀÔ·Â,¼öÁ¤Àº °¡´ÉÇÏÁö¸¸ ƯÁ¤³»¿ªGrid¿¡¼­´Â ÆíÁýÇÒ ¼ö ¾ø´Ù.
			var rowstatus = grd_clcjlist.rowstatus(row);
			if (rowstatus == 4) {	// 4 : delete
				messageBox("»èÁ¦µÈ ƯÁ¤³»¿ªÀº ¼öÁ¤ÇÒ ¼ö", "I004");	///»èÁ¦µÈ ƯÁ¤³»¿ªÀº ¼öÁ¤ÇÒ ¼ö ¾ø½À´Ï´Ù.
				return;
			}
			modal("SPPIJ00500" ,"", "10", "10", "SPPIJ00500", "/root/hidden/sppij00500", "/root/hidden/clcj", "", "");	// SPPIJ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®.xrw

			var rsltcnt = getNodesetCount("/root/hidden/sppij00500/rslt/list");
			
			// ó¸® °Ç¼ö 
			if (rsltcnt > 0) {
				
				for(var i=rsltcnt; i>0; i--) {	
					
					var flag = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/flag");
					var rownum = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/rownum");
					var edicd = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/edicd");
					var newspclcd = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/spclcd");
					var newspclcdnm  = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/spclcdnm");
					var newspclspec = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/spclspec");
					var newremfact  = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/remfact");
					var newdetldesc  = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/detldesc");

					oldspclcd = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/oldspclcd");
					oldspclspec = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/oldspclspec");
												
					// ƯÁ¤ÄÚµå Ãß°¡ÀÎ °æ¿ì
					if (flag == "I") {
				
						var clsprow = grd_clcjlist.rows - 1;	// ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù. 
						grd_clcjlist.insertRow(clsprow++, true,false,false);
						
						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("unitflag")) = unitflag;
						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclcd")) = newspclcd;
						//grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclspec")) = newspclspec;
						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("remfact")) = newremfact;
						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("detldesc")) = newdetldesc;
						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("edicd")) = edicd;
						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("status")) = "3";

					// ƯÁ¤ÄÚµå  º¯°æÀÎ °æ¿ì	
					} else if (flag == "U") {
					
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("unitflag")) = unitflag;
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcd")) = newspclcd;
						//grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclspec")) = newspclspec;
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("remfact")) = newremfact;
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("detldesc")) = newdetldesc;
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("edicd")) = edicd;
						
						if ( grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) != "3") {
							grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "0";
						}

						model.refresh();
						// ƯÁ¤ÄÚµå, ƯÁ¤³»¿ªÀÌ º¯°æµÇ¾ú°Å³ª »èÁ¦µÈ ƯÁ¤Äڵ带 Á¶È¸ÇÏ¿© "È®ÀÎ"À» ¼±ÅÃÇÑ °æ¿ì
						if (oldspclcd != newspclcd || oldspclspec != newspclspec || grd_clcjlist.rowstatus(row) == 4) {
							var rowstatus = grd_clcjlist.rowstatus(rownum);
							if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
							} else {
								grd_clcjlist.rowstatus(rownum) = 2;		// 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
								grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "2";
							}
						}
							
						// ó¹æGrid¿¡¼­µµ ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÇ 'T' Ä÷³ÀÇ "*" ¸¦ Ç¥½ÃÇÑ´Ù.
						var rowcnt =  getNodesetCount("/root/main/list2/iscllist");		// ÇÊÅÍ
						rowcnt = eval(rowcnt) + 1;
						for (var j = 1; j < rowcnt; j++) {
						//for (var j = 1; j < grd_ordlist.rows; j++) {
							var clcjedicd = model.getValue("/root/main/list2/iscllist["+ j +"]/edicd");
							if (edicd == clcjedicd) {
								if(newspclcd == "JX999"){
									model.setValue("/root/main/list2/iscllist["+ j +"]/text", "#");
								}else{
									model.setValue("/root/main/list2/iscllist["+ j +"]/text", "*");
								}
								
								//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î ´ëü 20080731 ¹Úâ¿ø
								model.refreshpart("/root/main/list2/iscllist");
							}
						}
						model.setValue("/root/hidden/item1/message", "ƯÁ¤ÄÚµå - "+ newspclcd +" / ƯÁ¤³»¿ª : "+ newspclspec +" / ±âÀçÇü½Ä : "+ newremfact);
																					
					// ƯÁ¤ÄÚµå »èÁ¦ÀÎ °æ¿ì	
					} else if (flag == "D" && rownum != "" ) {
						
						// ƯÁ¤³»¿ª Grid¿¡¼­ »èÁ¦
						if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
							grd_clcjlist.deleteRow(rownum, false);		// ÇØ´ç ¶óÀÎÀ» Grid¿¡¼­ »èÁ¦ÇÑ´Ù.
						} else {							// 0 : new, 2 : update
							grd_clcjlist.rowstatus(rownum) = 4;		// 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
						}
							
						// ó¹æGrid¿¡¼­µµ ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÇ »èÁ¦ 󸮸¦ ÇÑ´Ù.
						// ÁÙ¹øÈ£°¡ ºÎ¿©µÈ ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ »èÁ¦µÈ °æ¿ì, ó¹æGridÀÇ 'T' Ä÷³ÀÇ "*" ¸¦ »èÁ¦ÇÑ´Ù.
						//var clcjedicd = model.getValue("/root/main/list4/clcjlist["+ rownum +"]/edicd"); 	//root/main/list4/clcjlist/edicd
						var clcjedicd = grd_clcjlist.valueMatrix( rownum,grd_clcjlist.colRef("edicd"));
						
						if (clcjedicd) {
							var isSameLn = false;
							for (var j = 1; j < grd_clcjlist.rows; j++) {
								if (grd_clcjlist.rowstatus(j) != 4) {
										isSameLn = true;		// °°Àº ÁÙ¹øÈ£¿¡ ¿©·¯°³ÀÇ Æ¯Á¤³»¿ªÀÌ ÀÖ´Â °æ¿ìÀÓ
									}
								}
							}
							if (isSameLn == false) {		// µ¿ÀÏÇÑ ÁÙ¹øÈ£ÀÇ Æ¯Á¤³»¿ªÀÌ ¾ø´Â °æ¿ì
								var rowcnt =  getNodesetCount("/root/main/list2/iscllist");		// ÇÊÅÍ
								rowcnt = eval(rowcnt) + 1;										
								for (var j = 1; j < rowcnt; j++) {
								//for (var j = 1; j < grd_ordlist.rows; j++) {
									var iscldicd = model.getValue("/root/main/list2/iscllist["+ j +"]/edicd");
									if (clcjedicd == iscldicd) {
										model.resetInstanceNode("/root/main/list2/iscllist["+ j +"]/text");
										//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î ´ëü 20080731 ¹Úâ¿ø
										model.refreshpart("/root/main/list2/iscllist");
									}
								}
							}
						} // ƯÁ¤ÄÚµå ºñ±³ if
					} // end for

					var rdounitflag = model.getValue("/root/send/unitflag");

					if (rdounitflag == "-") {
						for (var i=1; i<grd_clcjlist.rows; i++) {
							var delstatus = grd_clcjlist.rowStatus(i);
							var delspclspec = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec"));
							if (delstatus == 1 || delstatus == 3) { 	// 0 : new, 3 : insert & new
								if (delspclspec == "") {
									grd_clcjlist.deleteItem(i);
								}
							}
						}
						
						// ÀÔ·ÂÇà Ãß°¡
						fSpclGridInsertRow();
						
					} else if (rdounitflag == "M") {							
						grd_clcjlist.attribute("nodeset") = "/root/main/list4/clcjlist[unitflag = 'M']";
						grd_clcjlist.rebuild();
						
					} else if (rdounitflag == "J") {						
						grd_clcjlist.attribute("nodeset") = "/root/main/list4/clcjlist[unitflag = 'J']";
						grd_clcjlist.rebuild();
					}

					for (var i=1; i<grd_clcjlist.rows; i++) {
						var unitflag =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));
						var status =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("status"));
				
						if (status != "") {
							grd_clcjlist.rowStatus(i) = status;
						}
						
						if (unitflag == "M") {
							grd_clcjlist.cellComboNodeset(i,3) = "/root/init/P0117list/P0117[minval = 'M'and cdid != 'MX999']";	
						} else if (unitflag == "J") {
							grd_clcjlist.cellComboNodeset(i,3) = "/root/init/P0117list/P0117[minval = 'J' ]";
						}
															
					}							
				} // ó¸® °Ç¼ö
			} else {
				messageBox("EDIÄڵ尡 ¾ø´Â °æ¿ì ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ", "I004");	///EDIÄڵ尡 ¾ø´Â °æ¿ì  ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ¾ø½À´Ï´Ù.
			}
	//¸í´ÜÀ§ ƯÁ¤³»¿ªÀ¸¸£ Ŭ¸¯ÇÑ°æ¿ì(unitflag =="M") ¶Ç´Â ºóÄ­À» Ŭ¸¯ÇÑ°æ¿ì´Â ¸í´ÜÀ§ ƯÁ¤³»¿ªÀ¸·Î ±¸ºÐÇÑ´Ù. 2007.09.23 ¹ÚµµÇü
	}else{
		model.removenode("/root/hidden/sppij00500/rslt");		// SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸® ¿¡¼­ ¼±ÅÃµÈ °á°ú°¡ copyNodeµÇ´Â °æ·ÎÀÓ
		model.resetInstanceNode("/root/hidden/sppij00500/cond");
		
		
		var edicd = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("edicd"));
		var spclcd = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("spclcd"));
		var spclcdnm = "";
		var spclspec = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("spclspec"));
		var remfact = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("remfact"));
		var detldesc = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("detldesc"));
		//ÁÙ´ÜÀ§ ¸í´ÜÀ§ ƯÁ¤³»¿ª ±¸ºÐ. 
		var unitflag = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("unitflag"));	
		var calcscorcd = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("calcscorcd"));
		
		model.setValue("/root/hidden/sppij00500/cond/pid", pid);
		model.setValue("/root/hidden/sppij00500/cond/indd", indd);
		model.setValue("/root/hidden/sppij00500/cond/edicd", edicd);
		model.setValue("/root/hidden/sppij00500/cond/spclcd", spclcd);
		model.setValue("/root/hidden/sppij00500/cond/spclcdnm", spclcdnm);
		model.setValue("/root/hidden/sppij00500/cond/remfact", remfact);
		model.setValue("/root/hidden/sppij00500/cond/spclspec", spclspec);
		model.makevalue("/root/hidden/sppij00500/cond/unitflag", "M");	
		model.makevalue("/root/hidden/sppij00500/cond/calcscorcd", calcscorcd);	

		// ¸í´ÜÀ§µµ ±âÁ¸ ÀÔ·ÂµÈ ³»¿ª±îÁö ´Ù º¸³½´Ù. 2008.01.04 ¹ÚÁö¿í
		var rowcnt = 1;
		for (var i=1; i<grd_clcjlist.rows; i++) {
				
			var unitflag = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));
			var spclcd = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd"));
			
			if (unitflag == "M" && grd_clcjlist.rowstatus(i) != 4 && spclcd != "") {
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/pid", pid);
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/indd", indd);
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/flag", "U");
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/edicd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("edicd")));
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclcd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd")));
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclcdnm", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcdnm")));
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclspec", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec")));
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/detldesc", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("detldesc")));
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/remfact", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("remfact")));
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/unitflag", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag")));
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/rownum", i);
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/oldspclcd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd")));
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/oldspclspec", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec")));
				model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/calcscorcd", calcscorcd);
				
				if (row == i) {
					setrow = i;
				}
				rowcnt = rowcnt+1;
			}
		}
											
		modal("SPPIJ00500" ,"", "10", "10", "SPPIJ00500", "/root/hidden/sppij00500", "/root/hidden/clcj", "", "");
		
		var rsltcnt = getNodesetCount("/root/hidden/sppij00500/rslt/list");
			
		// ó¸® °Ç¼ö 
		if (rsltcnt > 0) {				

			for(var i=rsltcnt; i>0; i--) {	
					
				var flag = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/flag");
				var rownum = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/rownum");
				var edicd = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/edicd");
				var newspclcd = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/spclcd");
				var newspclcdnm  = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/spclcdnm");
				var newspclspec = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/spclspec");
				var newremfact  = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/remfact");
				var newdetldesc  = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/detldesc");
											
				// ƯÁ¤ÄÚµå Ãß°¡ÀÎ °æ¿ì
				if (flag == "I") {
			
					var clsprow = grd_clcjlist.rows - 1;	// ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù. 
					grd_clcjlist.insertRow(clsprow++, true,false,false);
					
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("unitflag")) = unitflag;
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclcd")) = newspclcd;
					//grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclspec")) = newspclspec;
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("remfact")) = newremfact;
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("detldesc")) = newdetldesc;
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("edicd")) = edicd;
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("status")) = "3";
					
					// pid, indd, cretno, fromdd, mskind, spclmemoflag, seqno ¼¼ÆÃ
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("pid")) = model.getValue("/root/send/pid");
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("indd")) = model.getValue("/root/send/indd");
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("cretno")) = model.getValue("/root/send/cretno");
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("fromdd")) = model.getValue("/root/send/fromdd");
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("mskind")) = model.getValue("/root/send/mskind");
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclmemoflag")) = "E";
					
				// ƯÁ¤ÄÚµå  º¯°æÀÎ °æ¿ì	
				} else if (flag == "U") {
				
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("unitflag")) = unitflag;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcd")) = newspclcd;
					//grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclspec")) = newspclspec;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("remfact")) = newremfact;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("detldesc")) = newdetldesc;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("edicd")) = edicd;
					
					if ( grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) != "3") {
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "0";
					}
					
					model.setValue("/root/hidden/item1/message", "ƯÁ¤ÄÚµå - "+ newspclcd +" / ƯÁ¤³»¿ª : "+ newspclspec +" / ±âÀçÇü½Ä : "+ newremfact);
																				
				// ƯÁ¤ÄÚµå »èÁ¦ÀÎ °æ¿ì	
				} else if (flag == "D" && rownum != "" ) {
					
					// ƯÁ¤³»¿ª Grid¿¡¼­ »èÁ¦
					if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
						grd_clcjlist.deleteRow(rownum, false);		// ÇØ´ç ¶óÀÎÀ» Grid¿¡¼­ »èÁ¦ÇÑ´Ù.
					} else {							// 0 : new, 2 : update
						grd_clcjlist.rowstatus(rownum) = 4;		// 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "4";
					}
				} 
			}
			// ±×¸®µå Á¤·Ä & ÇÑÁÙÃß°¡
			//fSortSpclNo();
			//fSaveClcjList();
		} // 󸮰Ǽö
	}								
}

// ó¹æ Çà »èÁ¦ or »èÁ¦Ãë¼Ò ÈÄ¿¡ ƯÁ¤³»¿ª sorting ÀÛ¾÷
function fSortSpclNo() {
	// ºó ÁÙÀ» »èÁ¦ÇÑ´Ù.
	for (var i = 1; i < grd_clcjlist.rows; i++) {
		var rowstatus = grd_clcjlist.rowstatus(i);
		var spclcd = model.getValue("/root/main/list4/clcjlist["+ i +"]/spclcd");
		if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
			if (spclcd == "") {
				// ÁÙÀ» »èÁ¦ÇÑ´Ù.
				grd_clcjlist.deleteRow(i, false);
				i--;
			}
		}
	}
	
	// JS010(ƯÁ¤ÄÚµå:¾ß°£°¡»ê)ÀÇ hhmmÀÌ ¾ß°£(18~09½Ã)°¡ ¾Æ´Ï¸é ƯÁ¤³»¿ª Grid¿¡ »¡°£»öÀ¸·Î Ç¥½Ã 	
	for(var i = 1; i < grd_clcjlist.rows; i++) {
		grd_clcjlist.rowStyle(i, "data", "color") = "#000000";				
		var spclcd = model.getValue("/root/main/list4/clcjlist["+ i + "]/spclcd");
		var spclspec = model.getValue("/root/main/list4/clcjlist["+ i + "]/spclspec");
		if (spclcd == "JS010") {	
			var js010chk = false;
			if (spclspec.length >= 12) {				
				var ccyymmddhhmm = spclspec.substr(0, 12);
				if (isValidDateTime(ccyymmddhhmm, "YYYYMMDDhhmm")) {	// (dateHelper.js) À¯È¿ÇÑ ³¯Â¥, ½Ã°£ ÀÎÁö Á¡°Ë
					var hhmm = parseInt(spclspec.substr(8, 4), 10);	// '09' ¿Í °°Àº Çü½ÄÀ¸·Î ÀÔ·ÂÇÑ °æ¿ì -> 9·Î ó¸®
					if (hhmm >= 1800 || hhmm < 900) {
						js010chk = true;
					}
				}
			}
			if (js010chk == false) {
				grd_clcjlist.rowStyle(i, "data", "color") = "#ff3333";		// ff3333=ºÓÀº»ö
			}	
		}						
	}
								
	grd_clcjlist.colsort(grd_clcjlist.colRef("unitflag")) = "desc";
	grd_clcjlist.colsort(grd_clcjlist.colRef("edicd")) = "asc";
	grd_clcjlist.colsort(grd_clcjlist.colRef("spclcd")) = "asc";
	grd_clcjlist.colsort(grd_clcjlist.colRef("status")) = "desc";
	var maxRow = parseInt(grd_clcjlist.rows) - 1;		// rows´Â ŸÀÌƲºÎºÐ ºÎÅÍ °³¼ö¸¦ ¼¾´Ù.
	var maxCol = parseInt(grd_clcjlist.cols) - 1;
	grd_clcjlist.sort(grd_clcjlist.fixedRows, grd_clcjlist.fixedCols, maxRow, maxCol) = "usersort";
	// Sort µÈ Grid »óÀÇ Data ¼ø¼­¿Í Instance Node »óÀÇ Data ¼ø¼­¸¦ µ¿ÀÏÇÏ°Ô ¸ÂÃçÁØ´Ù.
	grd_clcjlist.gridToInstance();
	
	// ºóÁÙ Ãß°¡
	fSpclGridInsertRow();
}

function fSetLnUnitSpclcjec() {		// 'T' ÇÊµå ´õºíŬ¸¯½Ã È£ÃâÇÑ´Ù.

	var rdounitflag = model.getValue("/root/send/unitflag");
	// pid,inddÃß°¡ °á°úÁ¶È¸ Æ˾÷È£ÃâÀ» À§ÇÏ¿© - 20080922 ¹Úâ¿ø
	var pid = model.getValue("/root/main/item1/iteminfo/pid");
	var indd = model.getValue("/root/main/item1/iteminfo/indd1");
	
	if (rdounitflag == "M") {
		// ÁÙ´ÜÀ§·Î ¼ÂÆÃÇÏ°í ó¸®
		rdo_unitflag.value = "J";
		
		grd_clcjlist.attribute("nodeset") = "/root/main/list4/clcjlist[unitflag = 'J']";
		grd_clcjlist.rebuild();

		// ´ÜÀ§¿¡ ÇÊÅÍ¿¡ µû¶ó ÇØ´ç ÇàÀִ ƯÁ¤ÄÚµå ÄÞº¸ Àç¼³Á¤
		for (var i=1; i<grd_clcjlist.rows; i++) {
			var unitflag =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));
			var status =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("status"));
				
			if (status != "") {
				grd_clcjlist.rowStatus(i) = status;
			}

			if (unitflag == "M") {
				grd_clcjlist.cellComboNodeset(i,3) = "/root/init/P0117list/P0117[minval = 'M'' and cdid != 'MX999']";	
			} else if (unitflag == "J") {
				grd_clcjlist.cellComboNodeset(i,3) = "/root/init/P0117list/P0117[minval = 'J']";
			}				
		}
	}
	
	var row = grd_ordlist.row;
	var rows = grd_clcjlist.rows;
	
	model.removenode("/root/hidden/sppij00500/rslt");		// SPPIJ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸® ¿¡¼­ ¼±ÅÃµÈ °á°ú°¡ copyNodeµÇ´Â °æ·ÎÀÓ
	model.removenode("/root/hidden/sppij00500/cond");

	// ó¹æ Grid¿¡¼­ ÁÙ¹øÈ£°¡ ºÎ¿©µÈ °æ¿ì
	//var edicd = model.getValue("/root/main/list2/iscllist["+ row +"]/edicd");
	var edicd = grd_ordlist.valueMatrix(row, grd_ordlist.colref("edicd"));
	var calcscorcd = grd_ordlist.valueMatrix(row, grd_ordlist.colref("snglcalcscorcd")); // ¼öÁ¤Ãß°¡ JHP ƯÁ¤³»¿ª¿¡ ¼ö°¡ÄÚµå Ãß°¡Çϱâ. 20090423
	var rowcnt = 1;
	var setrow = 0;

	if (edicd) {
		if (rows == 1) {
			model.makevalue("/root/hidden/sppij00500/cond/calcscorcd", calcscorcd); // ¼öÁ¤Ãß°¡ JHP ƯÁ¤³»¿ª¿¡ ¼ö°¡ÄÚµå Ãß°¡Çϱâ. 20090423
			model.makevalue("/root/hidden/sppij00500/cond/edicd", edicd);
			model.makevalue("/root/hidden/sppij00500/cond/pid", pid);
			model.makevalue("/root/hidden/sppij00500/cond/pid", indd);
			model.makevalue("/root/hidden/sppij00500/cond/unitflag","J");	
			model.makevalue("/root/hidden/sppij00500/cond/flag", "I");
			model.makevalue("/root/hidden/sppij00500/cond/spclcd", "JX999");
			model.makevalue("/root/hidden/sppij00500/cond/spclcdnm", "");
			model.makevalue("/root/hidden/sppij00500/cond/detldesc", "");
			model.makevalue("/root/hidden/sppij00500/cond/spclspec", "");
			model.makevalue("/root/hidden/sppij00500/cond/remfact","");
			model.makevalue("/root/hidden/sppij00500/cond/rownum", "");
			
		} else {
		
			for (var i=1; i<rows; i++) {
				
				var clcjcalcscorcd = grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("calcscorcd"));
				var clcjedicd = grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("edicd"));
				var spclcd = grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclcd"));
				
				if ( edicd == clcjedicd) {

					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/flag", "U");
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/calcscorcd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("calcscorcd"))); // ¼öÁ¤Ãß°¡ JHP ƯÁ¤³»¿ª¿¡ ¼ö°¡ÄÚµå Ãß°¡Çϱâ. 20090423
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/edicd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("edicd")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/detldesc", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("detldesc")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclcd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclcd")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclcdnm", "");
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/spclspec", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclspec")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/remfact", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("remfact")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/rownum", i);
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/unitflag","J")
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/oldspclcd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclcd")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/oldspclspec", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclspec")));
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/pid", pid);
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/indd", indd);
					model.makevalue("/root/hidden/sppij00500/cond/list["+ rowcnt +"]/calcscorcd", "");
					
					rowcnt = rowcnt+1;
					
					// ƯÁ¤³»¿ª »ó¼¼ È­¸é¿¡ º¸¿©Á٠ƯÁ¤³»¿ª ¼±ÅÃ
					setrow = i;
						
				}

				model.makevalue("/root/hidden/sppij00500/cond/calcscorcd", calcscorcd);				
				model.makevalue("/root/hidden/sppij00500/cond/edicd", edicd);
				model.makevalue("/root/hidden/sppij00500/cond/unitflag","J");	
				
				if ( setrow != 0 ) {
					model.makevalue("/root/hidden/sppij00500/cond/pid", pid);
					model.makevalue("/root/hidden/sppij00500/cond/indd", indd);
					model.makevalue("/root/hidden/sppij00500/cond/flag", "U");
					model.makevalue("/root/hidden/sppij00500/cond/spclcd", grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("spclcd")));
					model.makevalue("/root/hidden/sppij00500/cond/spclcdnm", "");
					model.makevalue("/root/hidden/sppij00500/cond/detldesc", grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("detldesc")));
					model.makevalue("/root/hidden/sppij00500/cond/spclspec", grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("spclspec")));
					model.makevalue("/root/hidden/sppij00500/cond/remfact", grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("remfact")));
					model.makevalue("/root/hidden/sppij00500/cond/rownum", setrow);
					model.makevalue("/root/hidden/sppij00500/cond/calcscorcd", "");
													
				} else {
					model.makevalue("/root/hidden/sppij00500/cond/pid", pid);
					model.makevalue("/root/hidden/sppij00500/cond/indd", indd);
					model.makevalue("/root/hidden/sppij00500/cond/flag", "I");
					model.makevalue("/root/hidden/sppij00500/cond/spclcd", "JX999");
					model.makevalue("/root/hidden/sppij00500/cond/spclcdnm", "");
					model.makevalue("/root/hidden/sppij00500/cond/detldesc", "");
					model.makevalue("/root/hidden/sppij00500/cond/spclspec", "");
					model.makevalue("/root/hidden/sppij00500/cond/remfact","");
					model.makevalue("/root/hidden/sppij00500/cond/rownum", "");
					model.makevalue("/root/hidden/sppij00500/cond/calcscorcd", "");
				}
												
			}
		}

		model.removenode("/root/hidden/sppij00500/rslt");
		modal("SPPIJ00500" ,"", "10", "10", "SPPIJ00500", "/root/hidden/sppij00500", "/root/hidden/clcj", "", "");	// SPPIJ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸®.xrw

		var rsltcnt = getNodesetCount("/root/hidden/sppij00500/rslt/list");
		
		// ó¸® °Ç¼ö 
		if (rsltcnt > 0) {
			
			for(var i=rsltcnt; i>0; i--) {	
			
				var flag = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/flag");
				var rownum = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/rownum");
				var calcscorcd = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/calcscorcd");
				var edicd = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/edicd");
				var newspclcd = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/spclcd");
				var newspclcdnm = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/spclcdnm");
				var newspclspec = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/spclspec");
				var newremfact  = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/remfact ");
				var newdetldesc = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/detldesc");
				var oldspclcd = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/oldspclcd");
				var oldspclspec = model.getValue("/root/hidden/sppij00500/rslt/list["+ i +"]/oldspclspec");
		
				// ƯÁ¤ÄÚµå Ãß°¡ÀÎ °æ¿ì
				if (flag == "I") {

					var clcjrow = grd_clcjlist.rows - 1;	// ƯÁ¤³»¿ª Grid °¡Àå ¸¶Áö¸· ÁÙ¿¡ Ãß°¡ÇÑ´Ù. 
					grd_clcjlist.insertRow(clcjrow++, true,false,false);
					
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("pid")) =  model.getValue("/root/send/pid");
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("indd")) =  model.getValue("/root/send/indd");
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("cretno")) =  model.getValue("/root/send/cretno");
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("fromdd")) =  model.getValue("/root/send/fromdd");
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("mskind")) =  model.getValue("/root/send/mskind");
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("unitflag")) = "J";
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("calcscorcd"))  = calcscorcd;
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("edicd")) = edicd;
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclcd")) = newspclcd;
					//grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclspec")) = newspclspec;
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("remfact")) = newremfact;
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("detldesc")) = newdetldesc;
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclmemoflag")) = "E";
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("status")) = "3";
					
					// ó¹æGrid¿¡¼­µµ ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÇ 'T' Ä÷³ÀÇ "*" ¸¦ Ç¥½ÃÇÑ´Ù.
					var rowcnt =  getNodesetCount("/root/main/list2/iscllist");		// ÇÊÅÍ
					rowcnt = eval(rowcnt) + 1;	
					for (var j = 1; j < rowcnt; j++) {
					//for (var j = 1; j < grd_ordlist.rows; j++) {
						var clcjedicd = model.getValue("/root/main/list2/iscllist["+ j +"]/edicd");
						if (edicd == clcjedicd) {
							model.setValue("/root/main/list2/iscllist["+ j +"]/text", "*");
							//model.refresh();  ÃÖÀûÈ­ ¹®Á¦·Î 20080731 ¹Úâ¿ø
						}
					}
					
				// ƯÁ¤ÄÚµå  º¯°æÀÎ °æ¿ì	
				} else if (flag == "U") {
					
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcd")) = newspclcd;
					//grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclspec")) = newspclspec;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("remfact")) = newremfact;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("detldesc")) = newdetldesc;

					if ( grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) != "3") {
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "0";
					}
					
					model.refresh();
					// ƯÁ¤ÄÚµå, ƯÁ¤³»¿ªÀÌ º¯°æµÇ¾ú°Å³ª »èÁ¦µÈ ƯÁ¤Äڵ带 Á¶È¸ÇÏ¿© "È®ÀÎ"À» ¼±ÅÃÇÑ °æ¿ì
					if (oldspclcd != newspclcd || oldspclspec != newspclspec || grd_clcjlist.rowstatus(row) == 4) {
						var rowstatus = grd_clcjlist.rowstatus(rownum);
						if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
						} else {
							grd_clcjlist.rowstatus(rownum) = 2;		// 2 : update »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
							grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "2";
						}
					}
						
					// ó¹æGrid¿¡¼­µµ ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÇ 'T' Ä÷³ÀÇ "*" ¸¦ Ç¥½ÃÇÑ´Ù.
					var rowcnt =  getNodesetCount("/root/main/list2/iscllist");		// ÇÊÅÍ
					rowcnt = eval(rowcnt) + 1;
					for (var j = 1; j < rowcnt; j++) {
					//for (var j = 1; j < grd_ordlist.rows; j++) {
						var clcjedicd = model.getValue("/root/main/list2/iscllist["+ j +"]/edicd");
						if (edicd == clcjedicd) {
							model.setValue("/root/main/list2/iscllist["+ j +"]/text", "*");
							//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î 20080731 ¹Úâ¿ø
						}
					}
					model.setValue("/root/hidden/item1/message", "ƯÁ¤ÄÚµå - "+ newspclcd +" / ƯÁ¤³»¿ª : "+ newspclspec +" / ±âÀçÇü½Ä : "+ newremfact);
																				
				// ƯÁ¤ÄÚµå »èÁ¦ÀÎ °æ¿ì	
				} else if (flag == "D" && rownum != "" ) {
					
					var cnt = 0;
					
					for (var j = 1; j < grd_clcjlist.rows; j++) {
						var clcjedicd = model.getValue("/root/main/list4/clcjlist["+ j +"]/edicd");
						if (edicd == clcjedicd) {
							if (grd_clcjlist.rowstatus(j) != 4) {
								cnt++;
							}
						}
					}
					
					if (cnt > 0) {
					} else {
						grd_ordlist.valueMatrix(row, grd_ordlist.colref("text")) = "";
						//model.resetInstanceNode("/root/main/list2/iscllist["+ row +"]/text");
					}
					
					// ƯÁ¤³»¿ª Grid¿¡¼­ »èÁ¦
					var rowstatus = grd_clcjlist.rowstatus(rownum);
					if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
						grd_clcjlist.deleteRow(rownum, false);		// ÇØ´ç ¶óÀÎÀ» Grid¿¡¼­ »èÁ¦ÇÑ´Ù.
					} else {							// 0 : new, 2 : update
						grd_clcjlist.rowstatus(rownum) = 4;		// 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
					}
					grd_clcjlist.row = rownum;
						
					var rowcnt =  getNodesetCount("/root/main/list2/iscllist");		// ÇÊÅÍ
					rowcnt = eval(rowcnt) + 1;
					for (var j = 1; j < rowcnt; j++) {
					//for (var j = 1; j < grd_ordlist.rows; j++) {
						var clcjedicd = model.getValue("/root/main/list2/iscllist["+ j +"]/edicd");
						if (edicd == clcjedicd) {
							model.setValue("/root/main/list2/iscllist["+ j +"]/text", "");
							//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î 20080731 ¹Úâ¿ø
						}
					}
		
				} // ƯÁ¤ ÄÚµå »óÅ µû¸¥ if end
			} // for end

			var rdounitflag = model.getValue("/root/send/unitflag");

			if (rdounitflag == "-") {
				for (var i=1; i<grd_clcjlist.rows; i++) {
					var delstatus = grd_clcjlist.rowStatus(i);
					var delspclspec = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec"));
					if (delstatus == 1 || delstatus == 3) { 	// 0 : new, 3 : insert & new
						if (delspclspec == "") {
							grd_clcjlist.deleteItem(i);
						}
					}
				}
				
				// ÀÔ·ÂÇà Ãß°¡
				fSpclGridInsertRow();
				
			} else if (rdounitflag == "M") {							
				grd_clcjlist.attribute("nodeset") = "/root/main/list4/clcjlist[unitflag = 'M']";
				grd_clcjlist.rebuild();
			} else if (rdounitflag == "J") {						
				grd_clcjlist.attribute("nodeset") = "/root/main/list4/clcjlist[unitflag = 'J']";
				grd_clcjlist.rebuild();
			}

			for (var i=1; i<grd_clcjlist.rows; i++) {
				var unitflag =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));
				var status =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("status"));
		
				if (status != "") {
					grd_clcjlist.rowStatus(i) = status;
				}
				
				if (unitflag == "M") {
					grd_clcjlist.cellComboNodeset(i,3) = "/root/init/P0117list/P0117[minval = 'M' and cdid != 'MX999']";	
				} else if (unitflag == "J") {
					grd_clcjlist.cellComboNodeset(i,3) = "/root/init/P0117list/P0117[minval = 'J']";
				}
													
			}	

		} // ó¸® °Ç¼ö  if end
		
		//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î ´ëü 20080731 ¹Úâ¿ø
		model.refreshpart("/root/main/list2/iscllist");
		model.refreshpart("/root/main/list4/clcjlist");
		
	} else {
		messageBox("EDIÄڵ尡 ¾ø´Â °æ¿ì ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ", "I004");	///EDIÄڵ尡 ¾ø´Â °æ¿ì ÇØ´ç ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÌ ¾ø½À´Ï´Ù.
	}
}
			
function fGetStageTNM(){
	model.removenode("/root/hidden/smpij02000/rslt");		// SMPIZ02000_ȯÀÚº°¾Ïº´±âºÐ·ùÁ¶È¸ ¿¡¼­ ¼±ÅÃµÈ °á°ú°¡ copyNodeµÇ´Â °æ·ÎÀÓ
	model.resetInstanceNode("/root/hidden/smpij02000/cond");
			
	model.setValue("/root/hidden/smpij02000/cond/pid", model.getValue("/root/main/item1/iteminfo/pid"));
	model.setValue("/root/hidden/smpij02000/cond/insuflag", "");
	
	modal("SMPIJ02000" ,"", "10", "10", "SMPIJ02000", "/root/hidden/smpij02000/cond", "/root/send/list01", "", "");
}


//½É»çÀÚ ¸Þ¸ð Æ˾÷ °»½Å
function fSetJudgMemoRefresh(){
	model.refresh();
	var memo = model.getValue("/root/hidden/sppiz00700/rslt/memo");
	var tmp = model.getValue("/root/main/item1/iteminfo/judgrmk");
	if(tmp){
		tmp = tmp + " ";
	}
	model.setValue("/root/main/item1/iteminfo/judgrmk",tmp + memo);
	//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î ´ëü 20080731 ¹Úâ¿ø
	model.refresh();
}

//EDI ¸Þ¸ð Æ˾÷ °»½Å
function fSetEdiMemoRefresh(){
	var memo = model.getValue("/root/hidden/sppiz00700/rslt/memo");
	var tmp = model.getValue("/root/main/item1/iteminfo/edirmk");
	if(tmp){
		tmp = tmp + " ";
	}
	model.setValue("/root/main/item1/iteminfo/edirmk",tmp + memo);
	//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î ´ëü 20080731 ¹Úâ¿ø
	model.refresh();
}

//È®ÀÎÄÚµå(JT001) ÁÙ´ÜÀ§ ƯÁ¤³»¿ª ÀÔ·Â
function fCnfmCdInsert(){
	var trgtManWindow = getChildWindow("SPPIJ00500");
	//var edicd =  model.getValue("/root/main/list2/iscllist[" + grd_ordlist.row + "]/edicd");
	var edicd =  grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colref("edicd"));
	
	var selectededicd  = "";
	var row = 0;
	model.removenode("/root/hidden/sppij00500/rslt");		// SPPIZ00500_ƯÁ¤³»¿ª»ó¼¼°ü¸® ¿¡¼­ ¼±ÅÃµÈ °á°ú°¡ copyNodeµÇ´Â °æ·ÎÀÓ
	model.resetInstanceNode("/root/hidden/sppij00500/cond");
	
	if(edicd){
		for (var i = 1; i < grd_clcjlist.rows; i++) {
			if(edicd == model.getValue("/root/main/list4/clcjlist["+ i +"]/edicd")){
				model.setValue("/root/hidden/sppij00500/cond/edicd", model.getValue("/root/main/list4/clcjlist["+ i +"]/edicd"));
				model.setValue("/root/hidden/sppij00500/cond/spclcd", model.getValue("/root/main/list4/clcjlist["+ i +"]/spclcd"));
				model.setValue("/root/hidden/sppij00500/cond/remfact", model.getValue("/root/main/list4/clcjlist["+ i +"]/remfact"));
				model.setValue("/root/hidden/sppij00500/cond/spclspec", model.getValue("/root/main/list4/clcjlist["+ i +"]/spclspec"));
				model.setValue("/root/hidden/sppij00500/cond/row", i);
				selectededicd = edicd;
				row = i;
			}
		}
		//ÀÌ¹Ì µî·ÏµÈ È®ÀÎÄڵ尡 Àִ°æ¿ì
		if(selectededicd){
			model.setValue("/root/hidden/sppij00500/cond/unitflag", "J");		
			
			var chk = model.getValue("/root/hidden/sppij00500/cond/spclcd");
			if(chk == "JT001"){
				model.removeNodeset("root/hidden/sppiz01100/rslt");
				model.makeValue("/root/hidden/sppiz01100/cond/code", model.getValue("/root/hidden/sppij00500/cond/spclspec"));
				model.makeValue("/root/hidden/sppiz01100/edicd", edicd);
				modal("SPPIZ01100" ,"", "10", "10", "SPPIZ01100", "/root/hidden/sppiz01100", "/root/init/sppiz01100", "", "");		// SPPIZ01100_È®ÀÎÄÚµåÁ¶È¸
				if (instance1.selectSingleNode("root/hidden/sppiz01100/rslt")) {
					model.setValue("/root/main/list4/clcjlist["+ row +"]/spclspec", model.getValue("root/hidden/sppiz01100/rslt/code"));
					//Combo ÁÙ´ÜÀ§ ÄÚµå·Î ¼ÂÆÃ
					grd_clcjlist.cellComboNodeset(row,3) = "/root/init/P0117list/P0117[minval = 'J']";
					grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colref("cnfmcd")) = model.getValue("root/hidden/sppiz01100/rslt/code");

					model.refresh();
					fSpclGridInsertRow() ;
				}
			}
		//µî·ÏµÈ È®ÀÎÄڵ尡 ¾øÀ¸¸é ½Å±Ô·Î ¹ß»ý½ÃÄÑÁØ´Ù. 
		}else{
			
			model.removeNodeset("root/hidden/sppiz01100/rslt");
			model.makeValue("/root/hidden/sppiz01100/cond/code", "");
			modal("SPPIZ01100" ,"", "10", "10", "SPPIZ01100", "/root/hidden/sppiz01100", "/root/init/sppiz01100", "", "");		// SPPIZ01100_È®ÀÎÄÚµåÁ¶È¸
			
			if (instance1.selectSingleNode("root/hidden/sppiz01100/rslt")) {
					fSpclGridInsertRow() ;
					
					var row = grd_clcjlist.rows - 1;
					//Combo ÁÙ´ÜÀ§ ÄÚµå·Î ¼ÂÆÃ
					grd_clcjlist.cellComboNodeset(row,3) = "/root/init/P0117list/P0117[minval = 'J']";
					
					model.setValue("/root/main/list4/clcjlist["+ row +"]/edicd", edicd);
					model.setValue("/root/main/list4/clcjlist["+ row +"]/spclcd", "JT001");
					model.setValue("/root/main/list4/clcjlist[" + row + "]/unitflag","J");
					model.setValue("/root/main/list4/clcjlist[" + row + "]/spclmemoflag","E" );
					model.setValue("/root/main/list4/clcjlist[" + row + "]/remfact", "X(5)");
					model.setValue("/root/main/list4/clcjlist[" + row + "]/spclspec", model.getValue("root/hidden/sppiz01100/rslt/code"));
					
					grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colref("cnfmcd")) = model.getValue("root/hidden/sppiz01100/rslt/code");
					//model.setValue("/root/main/list2/iscllist[" + grd_ordlist.row + "]/cnfmcd",model.getValue("root/hidden/sppiz01100/rslt/code"));
					fSpclGridInsertRow() ;
			}
		}
		//ƯÁ¤³»¿ªÀÌ Àִ ó¹æ¿¡ 'T'Çʵ忡 *Ç¥¸¦ ÇØÁØ´Ù. 
		//fSetOrdSpclTxt();
	}
	
}
///////////////////////////////////////////////////////////////////////////
//ƯÁ¤³»¿ª °ü·Ã ÄÚµù Á¾·á										    //
///////////////////////////////////////////////////////////////////////////

///////////////////////////////////////////////////////////////////////////
// Á¶ÇÕ±âÈ£(ipt_cmpyno)¸¦ ÀÔ·ÂÇϸé ÇØ´ç Á¶ÇÕ¸íĪÀ» Á¶È¸ÇÑ´Ù.
function fGetCmpyNm() {
	/*var rrgstno = model.getValue("/root/main/item1/iteminfo/rrgstno");
	rrgstno = rrgstno.replace("-","");
	
	//º¸ÇèÁõ¹øÈ£ Á¶È¸(º¸ÇèÀÚ°ÝÁ¶È¸)
	var parm = rrgstno + "¢Ë" + //ÁֹιøÈ£
	    	        model.getValue("/root/main/item1/iteminfo/patnm") + "¢Ë" + //À̸§
	    	        model.getValue("/root/main/item1/iteminfo/indd") + "¢Ë";//Áø·áÀÏÀÚ
	         					
	setParameter("SPPMC03700_PARM",parm);
	setParameter("SPPMC03700_RTN","");
	
	modal("SPPMC03700", "1","400", "400", "SPPMC03700", "", "", "", ""); */
	
	
}

//º¸Á¶À¯ÇüÀÌ ¹Ù²î´Â°æ¿ì 
function fSetPatSuppRate() {
	// º¸Á¶À¯ÇüID°ú ¿äÀ²%·Î combo ÀÇ value 
	// º¸Á¶À¯ÇüNM°ú ¿äÀ²%·Î combo ÀÇ label
	//cmb_suppkind.choices.itemset.attribute("nodeset") = "/root/main/item4/insu[suppkind = '"+ cmb_suppkind.value +"']";
	var suppkindcd = model.getValue("/root/main/item4/insu/suppkind");
	var payownbrate = model.getValue("/root/main/item4/insu/ownbrate");
	model.setValue("/root/main/item1/iteminfo/suppkindcd", suppkindcd);
	model.setValue("/root/main/item1/iteminfo/ownrate", payownbrate);
	
	if(payownbrate == "20"){
		opt_suppkind.attribute("class") = "output_fix";
	}else{
		opt_suppkind.attribute("color") = "#ff0066";			
	}
	//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î ´ëü 20080731 ¹Úâ¿ø
	model.refreshpart("/root/main/item1/iteminfo");
}

///////////////////////////////////////////////////////////////////////////
//ó¹æ °ü·Ã ÄÚµù ½ÃÀÛ										    //
///////////////////////////////////////////////////////////////////////////

//ó¹æÁ¶È¸ ¿É¼Ç¿¡ Ç׸ñ±¸ºÐ¿¡ ó¹æÀÌ ÀÖ´Â °Í¸¸ Bold·Î º¸¿©ÁØ´Ù. 
//ÀÌ°Ç Ã³À½¿¡ ·ÎµåÇßÀ»¶§ Çѹø¸¸ µµ´Â°ÍÀÌ¶ó¼­ µû·Î ºÐ¸®ÇÏ¿© ¸¸µë. 2007.09.09 ¹ÚµµÇü
// ÃÖÀûÈ­ ¹®Á¦·Î else if¸¦ »ç¿ëÇÏ¿© ¼öÁ¤ - 20081017 ¹Úâ¿ø
function fSetItemBold(){
	rdo_ordfilflag.item(0).attribute("font-weight") = "bold"; // "Àüü" Ç׸ñÀº default ·Î ±½°Ô Ç¥½ÃÇÑ´Ù.
	//¿ì¼± ÃʱâÈ­¸¦ ÇÑ´Ù. 
	rdo_ordfilflag.item(1).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(2).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(3).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(4).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(5).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(6).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(7).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(8).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(9).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(10).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(11).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(12).attribute("font-weight") = "normal"; 
							
	// ó¹æ Á¶È¸ºÎ Ç׸ñ±¸ºÐ Radio¿¡¼­ ÇØ´ç ó¹æÀÌ ÀÖ´Â itemÀ» ±½°Ô Ç¥½ÃÇÑ´Ù.
	var item1 = model.getValue("/root/main/list2/iscllist[item1='01']/item1"); //Ç׸ñ±¸ºÐ ¿¡ Boldó¸®Çϱâ À§ÇÑ Ã¼Å©
	var item2 = model.getValue("/root/main/list2/iscllist[item1='02']/item1");
	var item3 = model.getValue("/root/main/list2/iscllist[item1='03']/item1");
	var item4 = model.getValue("/root/main/list2/iscllist[item1='04']/item1");
	var item5 = model.getValue("/root/main/list2/iscllist[item1='05']/item1");
	var item6 = model.getValue("/root/main/list2/iscllist[item1='06']/item1");
	var item7 = model.getValue("/root/main/list2/iscllist[item1='07']/item1");
	var item8 = model.getValue("/root/main/list2/iscllist[item1='08']/item1");
	var item9 = model.getValue("/root/main/list2/iscllist[item1='09']/item1");
	var item10 = model.getValue("/root/main/list2/iscllist[item1='10']/item1");
	var itemSS = model.getValue("/root/main/list2/iscllist[item1='SS']/item1");
	var itemAA = model.getValue("/root/main/list2/iscllist[item1='AA']/item1");
	var itemBB = model.getValue("/root/main/list2/iscllist[item1='BB']/item1");
	
	if (item1 == "01") {
		rdo_ordfilflag.item(1).attribute("font-weight") = "bold"; 
	}
	if (item2 == "02") {
		rdo_ordfilflag.item(2).attribute("font-weight") = "bold"; 
	}
	if (item3 == "03") {
		rdo_ordfilflag.item(3).attribute("font-weight") = "bold"; 
	}
	if (item4 == "04") {
		rdo_ordfilflag.item(4).attribute("font-weight") = "bold"; 
	}
	if (item5 == "05") {
		rdo_ordfilflag.item(5).attribute("font-weight") = "bold"; 
	}
	if (item6 == "06") {
		rdo_ordfilflag.item(6).attribute("font-weight") = "bold"; 
	}
	if (item7 == "07") {
		rdo_ordfilflag.item(7).attribute("font-weight") = "bold"; 
	}
	if (item8 == "08") {
		rdo_ordfilflag.item(8).attribute("font-weight") = "bold"; 
	}
	if (item9 == "09") {
		rdo_ordfilflag.item(9).attribute("font-weight") = "bold"; 
	}
	if (item10 == "10") {
		rdo_ordfilflag.item(10).attribute("font-weight") = "bold"; 
	}
	if (itemSS == "SS") {
		rdo_ordfilflag.item(11).attribute("font-weight") = "bold"; 
	}
	if (itemAA == "AA" || itemBB == "BB" ) {
		rdo_ordfilflag.item(12).attribute("font-weight") = "bold"; 
	}	
}

// 20091126 ¼öÁ¤Ãß°¡ JHP ¿äû¹øÈ£ 8496, ÁÖ»çÁ¦ 4Ç×1¸ñ, ¸¶ÃëÁ¦ 5Ç× 1¸ñ¿¡ ´ëÇØ 1ȸ·®ÀÌ 20ÀÌ ³ÑÀ¸¸é ¸Þ¼¼Áö 󸮿äû ####################½ÃÀÛ
function fChkinjanstmsg(){
	var visualcalcscorcd = "-";
	// SNGLEARNCLS - > 05, 04, 09 (ó¹æºÐ·ù¿¡¼­ ÁÖ»çÁ¦/³»ºÐºñ´ë»ç/ Insulin&Antidiabetics Á¦¿Ü) ±¸ÇöÇؾßÇÔ.
	// 20091130 JHP snglearncls°ª È®ÀÎÇÏ¿© 050409°ªÀ϶§´Â ¸Þ¼¼Áö ó¸® Á¦¿ÜÇÑ´Ù. 
	// ó¹æfor ·ÎÁ÷ ¼öÁ¤ ¼Óµµ°³¼± plet2 
	var nodelist  = model.instances(0).selectNodes("/root/main/list2/iscllist[item1='04' and item2='01' and calcqty>= 20 and snglearncls!='050409']/snglcalcscorcd");
	if (nodelist.length > 0) {
		var i=0;
		while(nodelist.nextNode()){
			visualcalcscorcd = visualcalcscorcd + ', ' + nodelist.item(i).value;
			++i;
		}
	}
	
	if(visualcalcscorcd != "-"){
		messageBox("1ȸ·® 20ÀÌ»óÀÎ ÁÖ»çÁ¦°¡ Á¸ÀçÇÕ´Ï´Ù.(Àν¶¸°Á¦¿Ü) \n\n(" + visualcalcscorcd + ")\n\n","I007");
	}
}

// Ç׸ñº°¼Ò°è
function fSetItemSubTotal() {
	grd_ordlist.rebuildStyle();
	grd_ordlist.rebuild();
	
	// ****************************************************************************************************************
	// Ç׸ñº° ¼Ò°è subtotal   ±è»óÁø 20101122								
	// ****************************************************************************************************************
	// #ffff0|		¹àÀº³ë¶û
	// #d9e3fe 	¿¶ÀºÆĶû
	// #eeddff	¿¶Àºº¸¶ó
	// #b9fcf8	¹àÀºÇÏ´Ã
	// #cefcfa	¿¶ÀºÇÏ´Ã
	var grdobj = document.controls.item("grd_ordlist");
	if (model.getValue(chk_showsubtotal.attribute("ref")) == "Y") {
		var col_hngnm = grdobj.colRef("hngnm");
		var col_item1 = grdobj.colRef("item1");
		var subtot_style = "background-color:#cefcfa; color:#0000ff;font-weight:bold;"
		var subtot_fromat = "format:(-)#,###; roundmode:round; roundposition:0"
		grdobj.subtotalposition= "below";					
		grdobj.subtotal("sum", col_item1, grdobj.colRef("hospaddamt"),subtot_fromat, subtot_style, col_hngnm, col_hngnm, true);
		grdobj.subtotal("sum", col_item1, grdobj.colRef("specamt"),subtot_fromat, subtot_style, col_hngnm, col_hngnm, true);				
		grdobj.subtotal("sum", col_item1, grdobj.colRef("totordamt"),subtot_fromat, subtot_style, col_hngnm, col_hngnm, true);
		grdobj.subtotal("sum", col_item1, grdobj.colRef("calcamt"),subtot_fromat, subtot_style, col_hngnm, col_hngnm, true);

		var srchnm = "";
		var fild1 = "0";
		var rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_item1, true, true);
		while( rowno > 0){
			var fild1 = "0";
			fild1 = grd_ordlist.valueMatrix(rowno, col_hngnm);
			if(fild1 == "01"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "ÁøÂû·á ¼Ò°è";
			}else if(fild1== "02"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "ÀÔ¿ø·á ¼Ò°è";
			}else if(fild1 == "03"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "Åõ¾à·á ¼Ò°è";
			}else if(fild1 == "04"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "ÁÖ»ç·á ¼Ò°è";
			}else if(fild1 == "05"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "¸¶Ãë·á ¼Ò°è";
			}else if(fild1 == "06"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "ÀÌÇÐ·á ¼Ò°è";
			}else if(fild1 == "07"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "Á¤½Å·á ¼Ò°è";
			}else if(fild1 == "08"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "¼ö¼ú·á ¼Ò°è";
			}else if(fild1 == "09"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "°Ë»ç·á ¼Ò°è";
			}else if(fild1 == "10"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "¹æ»ç¼± ¼Ò°è";
			}else if(fild1 == "SS"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "Ư¼ö ¼Ò°è";
			} 
			rowno = grdobj.findRow(srchnm, rowno + 1,col_item1,true,true);
		}
	}
}
	
			
//¹ü·Ê »ö±òÀ» Ç¥½ÃÇÑ´Ù.
function fSetColorSpclJudgOrder() {
	//ÀÏ´Ü ¼öÁ¤º¯°æ : 20090915 : JHP ÇÊÅͱâ´ÉÀ¸·Î ¼û±è±â´ÉÀÌ Á¦¾î°¡ µÇ¾î¼­ for¹®À» µ¹¸±¶§ iÀÇ Á¦¾î°¡ ¾î·Æ´Ù ÇÏ¿© datagridÀÇ rows·Î for¹®À» µ¹¸®´Â°É·Î º¯°æÇÑ´Ù. 										
	if (model.getValue(chk_showitemcoloryn.attribute("ref")) == "Y") {
		fSetOrderColorByEdiitem();
	}
	//Color Ç¥½Ã ¹ü·Ê
	//1. ¹®Á¦Ã³¹æ : #fcd2c1
	//2. ¼±º°½É»ç : #ffe79d
	//3. ¼±º°½É»ç + ¹®Á¦Ã³¹æ : #7BE6B7
	//4. ¾ß°£, °øÈÞ°¡»ê : #ffff00(¹àÀº³ë¶û)
	//¼±º°½É»ç, ¹®Á¦Ã³¹æ üũ (±â¿ÕÁõ, CPº¸´Ù ¿ì¼±½Ã ÇÑ´Ù. -½É»çÀÚ°¡ ±â¿ÕÁõ ,CP¿©ºÎ¸¦ È®ÀÎÇÏ°í ¹®Á¦Ã³¹æÀ» ÇÑ°æ¿ì ÀÓÀ¸·Î)	
	var grdobj = document.controls.item("grd_ordlist");
	var col_hngnm = grdobj.colRef("hngnm");
	
	var col_probordyn = grdobj.colRef("probordyn");
	var srchnm = "Y";
	var spcljudgyn = "";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_probordyn, true, true);
	while( rowno > 0){
		grd_ordlist.rowStyle(rowno,"data","background-color") = "#fcd2c1";
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_probordyn, true, true);
	}
	
	var col_spcljudgyn = grdobj.colRef("spcljudgyn");
	var probordyn = "";
	var rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_spcljudgyn, true, true);
	while( rowno > 0){
		grd_ordlist.rowStyle(rowno,"data","background-color") = "#ffe79d";
		probordyn = grdobj.valueMatrix(rowno, col_probordyn);
		if (probordyn == "Y"){ //µÑ´Ù üũµÈ°æ¿ì
			grd_ordlist.rowStyle(rowno,"data","background-color") = "#7BE6B7";
		} 
		rowno =  grdobj.findRow(srchnm,rowno + 1 ,col_spcljudgyn, true, true);
	}

	// ¾ß°£°¡»ê(»êÁ¤ÀÇ¹Ì µÎ¹ø° "1'), °øÈÞ°¡»ê(»êÁ¤ÀÇ¹Ì µÎ¹ø°ÀÚ¸® "5")
	var col_estmmeancd = grdobj.colRef("estmmeancd");
	var col_pay100 = grdobj.colRef("pay100");
	srchnm = "1";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_estmmeancd, false, false);
	while( rowno > 0){
		if ( grdobj.valueMatrix(rowno,col_estmmeancd).substr(1, 1) == srchnm ){
			grdobj.cellStyle("background-color", rowno, col_estmmeancd, rowno, col_pay100) = "#ffff00";
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_estmmeancd, false, false);
	}
	// ¾ß°£°¡»ê(»êÁ¤ÀÇ¹Ì µÎ¹ø° "1'), °øÈÞ°¡»ê(»êÁ¤ÀÇ¹Ì µÎ¹ø°ÀÚ¸® "5")

	srchnm = "5";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_estmmeancd, false, false);
	while( rowno > 0){
		if ( grdobj.valueMatrix(rowno,col_estmmeancd).substr(1, 1) == srchnm ){
			grdobj.cellStyle("background-color", rowno, col_estmmeancd, rowno, col_pay100) = "#ffff00";
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_estmmeancd, false, false);
	}
	
	//ÀÀ±Þ°¡»ê ( '2','3','P','Q' ) 
	var erindt = model.getValue("/root/main/item1/iteminfo/erindt");
	var eroutdt = model.getValue("/root/main/item1/iteminfo/eroutdt");
	var outdate = eroutdt.toDate("YYYYMMDDhhmm").getDateFormat("YYYYMMDDhhmm");
	var in24date = erindt.toDate("YYYYMMDDhhmm").getAddDate(24,"h").getDateFormat("YYYYMMDDhhmm");
	var basedate = "";
	var execddtm = "";
	
	if (outdate < in24date ) {
		basedate = outdate;
	} else {
		basedate = in24date;
	}
	
	srchnm = "2";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_estmmeancd, false, false);
	while( rowno > 0){
		if ( grdobj.valueMatrix(rowno,col_estmmeancd).substr(1, 1) == srchnm ){
			execddtm =grdobj.valueMatrix(rowno,grdobj.colRef("execddtm")).toDate("YYYYMMDDhhmm").getDateFormat("YYYYMMDDhhmm") ;
			if (execddtm > basedate) {
				grdobj.cellStyle("background-color", rowno, col_estmmeancd, rowno, col_pay100) = "#ffff00";
			}
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_estmmeancd, false, false);
	}
	
	srchnm = "3";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_estmmeancd, false, false);
	while( rowno > 0){
		if ( grdobj.valueMatrix(rowno,col_estmmeancd).substr(1, 1) == srchnm ){
			execddtm =grdobj.valueMatrix(rowno,grdobj.colRef("execddtm")).toDate("YYYYMMDDhhmm").getDateFormat("YYYYMMDDhhmm") ;
			if (execddtm > basedate) {
				grdobj.cellStyle("background-color", rowno, col_estmmeancd, rowno, col_pay100) = "#ffff00";
			}
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_estmmeancd, false, false);
	}
	
	srchnm = "P";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_estmmeancd, false, false);
	while( rowno > 0){
		if ( grdobj.valueMatrix(rowno,col_estmmeancd).substr(1, 1) == srchnm ){
			execddtm =grdobj.valueMatrix(rowno,grdobj.colRef("execddtm")).toDate("YYYYMMDDhhmm").getDateFormat("YYYYMMDDhhmm") ;
			if (execddtm > basedate) {
				grdobj.cellStyle("background-color", rowno, col_estmmeancd, rowno, col_pay100) = "#ffff00";
			}
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_estmmeancd, false, false);
	}
	
	srchnm = "Q";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_estmmeancd, false, false);
	while( rowno > 0){
		if ( grdobj.valueMatrix(rowno,col_estmmeancd).substr(1, 1) == srchnm ){
			execddtm =grdobj.valueMatrix(rowno,grdobj.colRef("execddtm")).toDate("YYYYMMDDhhmm").getDateFormat("YYYYMMDDhhmm") ;
			if (execddtm > basedate) {
				grdobj.cellStyle("background-color", rowno, col_estmmeancd, rowno, col_pay100) = "#ffff00";
			}
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_estmmeancd, false, false);
	}

	//DRG ¼ö¼ú±¸ºÐ
	var col_drgopyn = grdobj.colRef("drgopyn");
	srchnm = "Y";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_drgopyn, true, true);
	while( rowno > 0){
		grdobj.cellStyle("background-color", rowno, col_pay100, rowno, col_pay100) = "#fec34d";
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_drgopyn, true, true);
	}
	
	// ±Þ¿©±¸ºÐ º»Àκδã, ÀÏ¹Ý  »ö±ò±¸ºÐ
	var col_calcpayflag = grdobj.colRef("calcpayflag");
	srchnm = "1";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_calcpayflag, true, true);
	while( rowno > 0){
		grdobj.cellStyle("background-color", rowno, col_calcpayflag, rowno, col_calcpayflag) = "#00ff00";
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_calcpayflag, true, true);
	}
	srchnm = "2";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_calcpayflag, true, true);
	while( rowno > 0){
		var pynpy = grdobj.valueMatrix(rowno,grdobj.colRef("pynpy"));
		if (pynpy != 0) {
			grdobj.cellStyle("background-color", rowno, col_calcpayflag, rowno, col_calcpayflag) = "#ccccff";
		} else {
			grdobj.cellStyle("background-color", rowno, col_calcpayflag, rowno, col_calcpayflag) = "#ff99cc";
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_calcpayflag, true, true);
	}

	// ¿Ü·¡ Çʼö½É»ç Ç°¸ñ Ç¥±â
	var col_bfjudgyn = grdobj.colRef("bfjudgyn");
	srchnm = "Y";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_bfjudgyn, true, true);
	while( rowno > 0){
		grdobj.cellStyle("background-color", rowno, col_hngnm, rowno, col_hngnm) = "#f7a08b";
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_bfjudgyn, true, true);
	}

	// ÀÀ±Þ¼ö°¡ Ç¥±â : º°Ç¥1 (2015.12.30.LEJ)
	var col_pordarcptyn = grdobj.colRef("pordarcptyn");
	srchnm = "1";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_pordarcptyn, true, true);
	while( rowno > 0){
		grdobj.cellStyle("background-color", rowno, col_pordarcptyn, rowno, col_pordarcptyn) = "#66CCFF";
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_pordarcptyn, true, true);
	}

	// ÀÀ±Þ¼ö°¡ Ç¥±â : º°Ç¥2 (2015.12.30.LEJ)
	var col_pordarcptyn = grdobj.colRef("pordarcptyn");
	srchnm = "2";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_pordarcptyn, true, true);
	while( rowno > 0){
		grdobj.cellStyle("background-color", rowno, col_pordarcptyn, rowno, col_pordarcptyn) = "#FF66FF";
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_pordarcptyn, true, true);
	}

	// ÀÀ±Þ¼ö°¡ Ç¥±â : º°Ç¥3 (2015.12.30.LEJ)
	var col_pordarcptyn = grdobj.colRef("pordarcptyn");
	srchnm = "3";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_pordarcptyn, true, true);
	while( rowno > 0){
		grdobj.cellStyle("background-color", rowno, col_pordarcptyn, rowno, col_pordarcptyn) = "#339933";
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_pordarcptyn, true, true);
	}

	var spclcnt = grd_clcjlist.rows;
	var col_edicd = grdobj.colRef("edicd");
	var spclcd = "";
	var spclspec = "";
	var spcledicd = "";
	var spclunitflag = "";
	for (var i = 0; i < spclcnt; i++) {
		spclcd = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd"));
		spclspec = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec"));
		spcledicd = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("edicd"));
		spclunitflag = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));
		
		if (spclunitflag == 'J') {  // ÁÙ´ÜÀ§ ƯÁ¤³»¿ªÀÎ °æ¿ì¸¸ Àû¿ëÇÑ´Ù. (2015.03.30 LEJ)
			rowno = grdobj.findRow(spcledicd,grdobj.fixedrows ,col_edicd, true, true);
			while( rowno > 0){
				if(spclcd == "JT001"){						
					grdobj.valueMatrix(rowno,grdobj.colRef("cnfmcd")) =  spclspec;
				}else{
					grdobj.valueMatrix(rowno,grdobj.colRef("text")) =  "*";
				}
				rowno = grdobj.findRow(spcledicd,rowno + 1 ,col_edicd, true, true);
			}
		}
	}
}

//ƯÁ¤³»¿ªÀÌ Àִ ó¹æ¿¡ 'T'Çʵ忡 *Ç¥¸¦ ÇØÁØ´Ù. 
function fSetOrdSpclTxt(){
	var cSrcNode = instance1.selectSingleNode("/root/main/list2/iscllist");
	if (cSrcNode == null) {	// ƯÁ¤³»¿ªÀÌ ¾ø´Â °æ¿ìÀÓ
		return;
	}
			
	var rowcnt =  getNodesetCount("/root/main/list2/iscllist");
	rowcnt = eval(rowcnt) + 1;
	
	// grd_clcjlist.findRow ·Î º¯°æ(ÃÖÀûÈ­¹®Á¦) - 20081017 ¹Úâ¿ø
	for (var i = 1; i < rowcnt ; i++) {	// Grid ÇÊÅ͸µ ÀÌÈÄ  Grid »ó¿¡ Ç¥½ÃµÈ ó¹æ °³¼ö¸¸Å­ µ¹¸é¼­				
		var edicd = model.getValue("/root/main/list2/iscllist[" + i + "]/edicd");
		var spcl = grd_clcjlist.rows;
		model.setValue("/root/main/list2/iscllist[" + i + "]/text", "");
		if(spcl > 0){
			
			if (edicd != "") {
				var row = grd_clcjlist.findRow(edicd, 0, grd_clcjlist.colRef("edicd"), false, true);
				
				if ( row > 0 ) {

					var spclcd = model.getValue("/root/main/list4/clcjlist[" + row + "]/spclcd");
					var spclspec = model.getValue("/root/main/list4/clcjlist[" + row + "]/spclspec");
					var spcledicd = model.getValue("/root/main/list4/clcjlist[" + row + "]/spcledicd");
					
					if(edicd == spcledicd){
						if(spclcd == "JT001"){						
							model.setValue("/root/main/list2/iscllist[" + i + "]/cnfmcd", spclspec);
						}else{
							model.setValue("/root/main/list2/iscllist[" + i + "]/text", "*");
						}
					}				
				}						
			}
		}
	}				
	grd_ordlist.refresh();
}

// ó¹æ Ä¡½Ä ÀÔ·Â
function fOrderToothInput() {
	var row = grd_ordlist.mouseRow;
	model.setValue("/root/hidden/sppiz00600/cond/pid", model.getValue("/root/main/item1/clbs/pid"));
	model.setValue("/root/hidden/sppiz00600/cond/toot", model.getValue("/root/main/list2/clod[" + row + "]/toot"));
	model.removenode("/root/hidden/sppiz00600/rslt");	// SPPIZ00600_»óº´¹×ó¹æº°Ä¡½Ä ¿¡¼­ ¼±ÅÃµÈ °á°ú°¡ copyNodeµÇ´Â °æ·ÎÀÓ
	modal("SPPIZ00600" ,"", "10", "10", "SPPIZ00600", "/root/hidden/sppiz00600/cond", "/root/hidden/cond", "", "");	// SPPIZ00600_»óº´¹×ó¹æº°Ä¡½Ä.xrw
	var tootSelect = instance1.selectSingleNode("/root/hidden/sppiz00600/rslt");
	if (tootSelect != null) {	// Ãë¼Ò¸¦ ´©¸¥ °æ¿ì¸¦ Á¦¿Ü½ÃÅ´
		var toot = model.getValue("/root/hidden/sppiz00600/rslt/toot");
		model.setValue("/root/main/list3/diaglist[" + row + "]/toothYN", model.getValue("/root/hidden/sppiz00600/rslt/toothYN"));
		model.setValue("/root/main/list3/diaglist[" + row + "]/toot", toot);
		model.refresh();
		if (model.getValue("/root/hidden/sppiz00600/cond/toot") != toot) {	// Ä¡½Ä¹øÈ£°¡ º¯°æµÈ °æ¿ì
			var diagstatus = grd_diaglist.rowstatus(row);
			if (diagstatus == 0 || diagstatus == 2) {		// 0 : new, 2 : update
				grd_diaglist.rowstatus(row) = 2;		// 2 : update
			}	
		}
	}
}

///////////////////////////////////////////////////////////////////////////
//ó¹æ °ü·Ã ÄÚµù ³¡										    //
///////////////////////////////////////////////////////////////////////////


///////////////////////////////////////////////////////////////////////////
//ÀúÀå·ÎÁ÷ °ü·Ã ÄÚµù ½ÃÀÛ										    //
///////////////////////////////////////////////////////////////////////////
//ÀúÀå·ÎÁ÷
function fSaveMain(flag){
	
	// 1. ±âº»ÀûÀÎ ´©¶ôÁ¤º¸¸¦ È®ÀÎÇÑ´Ù.
	if (fCheckSave()){
	} else {
		return false;
	}
	
	fSaveAll();
	
	//fGetItemInfo();
	//º¸Çè, ±Þ¿©È¯ÀÚÀΰæ¿ì´Â ÁßÁõ¿©ºÎ¸¦ üũÇÑ´Ù. 
	var chkInsukind = model.getValue("/root/main/item1/iteminfo/insukindcd");
	if(chkInsukind == "11" || chkInsukind == "21" || chkInsukind == "22"){
		if (flag != "P") {
		//1. ÁßÁõ, »êÁ¤Æ¯·Ê º¯°æ ¿©ºÎ üũ
		fUpdtCheckEssc(flag);
		}
	}
	return true;
}

function fSaveAll(){
	
	model.setValue("/root/send/item1/iteminfo",getNodeListCSV(instance1.selectNodes("/root/main/item1/iteminfo")));
	
	//»óº´Àº Àüü »èÁ¦ ³¯¸®°í ´Ù½Ã insert½ÃŲ´Ù. 
	//ºóµ¥ÀÌÅ͸¦ »èÁ¦ÇÑ´Ù.
	var rowcnt  = grd_diaglist.rows;
	for (var i = rowcnt; i > 0; i--) {	// Grid ÇÊÅ͸µ ÀÌÈÄ  Grid »ó¿¡ Ç¥½ÃµÈ ó¹æ °³¼ö¸¸Å­ µ¹¸é¼­
		var diagcd = model.getValue("/root/main/list3/diaglist[" + i + "]/diagcd");
		if(diagcd == ""){
			grd_diaglist.deleteRow(i, false);					
		}else{
			grd_diaglist.rowstatus(i) = 3;
		}
	}
	var updtdiag = getGridUpdateData(grd_diaglist);

	if(updtdiag) {
		model.setValue("/root/send/diaglist",grd_diaglist.getUpdateData());
	}

	
	if (btn_save.disabled == false) {
		//ºóµ¥ÀÌÅ͸¦ »èÁ¦ÇÑ´Ù.  				
		for (var i = 1; i < grd_clcjlist.rows; i++) {	// Grid ÇÊÅ͸µ ÀÌÈÄ  Grid »ó¿¡ Ç¥½ÃµÈ ƯÁ¤³»¿ª °³¼ö¸¸Å­ µ¹¸é¼­
			var spclcd = model.getValue("/root/main/list4/clcjlist[" + i + "]/spclcd");
			
			if(spclcd == ""){
				var rowstatus = grd_clcjlist.rowstatus(i);
				if (rowstatus == 4) {		// 4 : delete
					return;
				}
				else if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
					grd_clcjlist.deleteRow(i, false);		// ÇØ´ç ¶óÀÎÀ» Grid¿¡¼­ »èÁ¦ÇÑ´Ù.
				} else {							// 0 : new, 2 : update
					grd_clcjlist.rowstatus(i) = 4;		// 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
				}
			}
			
		}

		
		var updtclcj = getGridUpdateData(grd_clcjlist);
		if(updtclcj) {
			model.setValue("/root/send/clcjlist",grd_clcjlist.getUpdateData());
			//if ( submit("TXPIJ00303") ) {
				//»èÁ¦¿´´ø ƯÁ¤³»¿ªÀº ±×¸®µå¿¡¼­ Áö¿ö ¹ö¸°´Ù. 
				
				for (var d = grd_clcjlist.rows; d > 0 ; d--) {
					var delstatus = grd_clcjlist.rowstatus(d);
					if(delstatus ==  4){
						grd_clcjlist.deleteRow(d, false);		// ÇØ´ç ¶óÀÎÀ» Grid¿¡¼­ »èÁ¦ÇÑ´Ù.
					}
				}
				grd_clcjlist.clearStatus();
		//	}
		}
		
		//ÀúÀåÈÄ ºóÇàÀ» Ãß°¡ÇØ ÁØ´Ù. 
		fSpclGridInsertRow() ;
	}
	
	//ƯÁ¤³»¿ª ó¸® 
	var judgrmk = model.getValue("/root/main/item1/iteminfo/judgrmk");
	var edirmk = model.getValue("/root/main/item1/iteminfo/edirmk");
	var tstrmk = model.getValue("/root/main/item1/iteminfo/tstrmk");
	var dumprmk = model.getValue("/root/main/item1/iteminfo/dumprmk");
//	var tmpedirmk = strTrim(edirmk);
	model.removenode("/root/main/list5");	
	
	if(judgrmk){
		fSetJudgEDIMemo(judgrmk, "Y");
	}
	
	if(edirmk){
		fSetJudgEDIMemo(edirmk, "N");
	}
	
	if(tstrmk){
		fSetJudgEDIMemo(tstrmk, "T");
	}
	if(dumprmk){
		fSetJudgEDIMemo(dumprmk, "D");
	}
	model.setValue("/root/send/spclspec",getNodeListCSV(instance1.selectNodes("/root/main/list5/judgrmk")));
	
	submit("TXPIJ00309",false);
	
}
//ÀúÀåÀü µ¥ÀÌÅÍ À¯È¿¼ºÀ» Á¡°ËÇÑ´Ù. 
function fCheckSave(){
	
	var bfmonth6 = VAL_today.toDate().getAddDate(-180,'D');
	var brthdd = model.getValue("/root/main/item1/iteminfo/brthdd").toDate();
	var snglcalcscorcls0210 = model.getValue("/root/main/list2/iscllist[snglcalcscorcls='0210' and calcpayflag='0' and snglcalcscorcd != 'Z9000' and snglcalcscorcd != 'Z9000-1' and snglcalcscorcd != 'Q9140001' and snglcalcscorcd != 'Q9140002']/snglcalcscorcls");
	var snglcalcscorcls0211 = model.getValue("/root/main/list2/iscllist[snglcalcscorcls='0211' and calcpayflag='0' and snglcalcscorcd != 'Z9000' and snglcalcscorcd != 'Z9000-1' and snglcalcscorcd != 'Q9140001' and snglcalcscorcd != 'Q9140002']/snglcalcscorcls");
	
	if ((bfmonth6 <= brthdd ) &&  (snglcalcscorcls0210 !=  "" || snglcalcscorcls0211 !=  "") ) {
		if (messageBox("6°³¿ù ¹Ì¸¸ ¼Ò¾ÆȯÀÚ¿¡°Ô ½ÄÀÌ Ã»±¸µÇ¾ú½À´Ï´Ù. È®Àιٶø´Ï´Ù. ÀúÀå","S001") == 6) {
			return true;
		} else {
			return false;
		}
	} else {
		return true;
	}
}

//»óº´¸®½ºÆ®¸¦ ÀúÀåÇÑ´Ù. 
function fSaveDiagList(){
	//»óº´Àº Àüü »èÁ¦ ³¯¸®°í ´Ù½Ã insert½ÃŲ´Ù. 
	//ºóµ¥ÀÌÅ͸¦ »èÁ¦ÇÑ´Ù.
	var rowcnt  = grd_diaglist.rows;
	for (var i = rowcnt; i > 0; i--) {	// Grid ÇÊÅ͸µ ÀÌÈÄ  Grid »ó¿¡ Ç¥½ÃµÈ ó¹æ °³¼ö¸¸Å­ µ¹¸é¼­
		var diagcd = model.getValue("/root/main/list3/diaglist[" + i + "]/diagcd");
		if(diagcd == ""){
			grd_diaglist.deleteRow(i, false);					
		}else{
			grd_diaglist.rowstatus(i) = 3;
		}
	}
	var updtdiag = getGridUpdateData(grd_diaglist);

	if(updtdiag) {
		model.setValue("/root/send/diaglist",grd_diaglist.getUpdateData());
		if ( submit("TXPIJ00302",false) ) {
		}
	}
	
	model.refreshpart("/root/main/list3/diaglist");
}

//ƯÁ¤³»¿ªÀ» ÀúÀå ÇÑ´Ù.
function fSaveClcjList(){
	if (btn_save.disabled == false) {
		//ºóµ¥ÀÌÅ͸¦ »èÁ¦ÇÑ´Ù.  				
		for (var i = 1; i < grd_clcjlist.rows; i++) {	// Grid ÇÊÅ͸µ ÀÌÈÄ  Grid »ó¿¡ Ç¥½ÃµÈ ƯÁ¤³»¿ª °³¼ö¸¸Å­ µ¹¸é¼­
			var spclcd = model.getValue("/root/main/list4/clcjlist[" + i + "]/spclcd");
			
			if(spclcd == ""){
				var rowstatus = grd_clcjlist.rowstatus(i);
				if (rowstatus == 4) {		// 4 : delete
					return;
				}
				else if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
					grd_clcjlist.deleteRow(i, false);		// ÇØ´ç ¶óÀÎÀ» Grid¿¡¼­ »èÁ¦ÇÑ´Ù.
				} else {							// 0 : new, 2 : update
					grd_clcjlist.rowstatus(i) = 4;		// 4 : delete »óÅ·Πstat¸¦ º¯°æÇÑ´Ù.
				}
			}
			
		}

		
		var updtclcj = getGridUpdateData(grd_clcjlist);
		if(updtclcj) {
			model.setValue("/root/send/clcjlist",grd_clcjlist.getUpdateData());
			if ( submit("TXPIJ00303",false) ) {
				//»èÁ¦¿´´ø ƯÁ¤³»¿ªÀº ±×¸®µå¿¡¼­ Áö¿ö ¹ö¸°´Ù. 
				
				for (var d = grd_clcjlist.rows; d > 0 ; d--) {
					var delstatus = grd_clcjlist.rowstatus(d);
					if(delstatus ==  4){
						grd_clcjlist.deleteRow(d, false);		// ÇØ´ç ¶óÀÎÀ» Grid¿¡¼­ »èÁ¦ÇÑ´Ù.
					}
				}
				grd_clcjlist.clearStatus();
			}
		}
		
		//ÀúÀåÈÄ ºóÇàÀ» Ãß°¡ÇØ ÁØ´Ù. 
		fSpclGridInsertRow() ;
	}
}



//ÀÎÀû»çÇ× ÀúÀå
function fSaveItemInfo(){
	submit("TXPIJ00301",false);
}

function strTrim(str){
    return str.replace(/(^\s*)|(\s*$)/g, "");
}
//½É»çÁ¦ ¸Þ¸ð¸¦ ÀúÀåÇÑ´Ù. 
function fSaveJudgrmk(){
	//ƯÁ¤³»¿ª ó¸® 
	var judgrmk = model.getValue("/root/main/item1/iteminfo/judgrmk");
	var edirmk = model.getValue("/root/main/item1/iteminfo/edirmk");
	var tstrmk = model.getValue("/root/main/item1/iteminfo/tstrmk");
//	var tmpedirmk = strTrim(edirmk);
	model.removenode("/root/main/list5");	
	
	if(judgrmk){
		fSetJudgEDIMemo(judgrmk, "Y");
	}
	
	//if(edirmk){
		fSetJudgEDIMemo(edirmk, "N");
	//}
	
	if(tstrmk){
		fSetJudgEDIMemo(tstrmk, "T");
	}

	model.setValue("/root/main/item1/iteminfo/judgrmk_orign",judgrmk);
	model.setValue("/root/main/item1/iteminfo/edirmk_orign",edirmk);
	model.setValue("/root/main/item1/iteminfo/tstrmk_orign",tstrmk);
	
	
	submit("TXPIJ00304",false);
	
}


//¿ø¹« °è»ê¼­¸¦ ÀÛ¼ºÇÑ´Ù. 
function  fSaveCalcAmt(flag){
	
	var cnt = 1;
	var pid = model.getValue("/root/send/pid");
	var indd = model.getValue("/root/send/indd");
	var futureinsuyn = model.getValue("/root/main/item1/iteminfo/futureinsuyn");
	
	model.resetInstanceNode("/root/send/insulist");
	var instcd = model.getValue("/root/main/item1/iteminfo/instcd");
	
	model.makeNode("/root/send/insu");
	copyNodeType("/root/send/insu","/root/main/list1","replace");
	
	var nodecnt = getNodesetCount("/root/send/insu/insulist");
	
	// ¹è¿­ »ý¼º
	var insuArray = new Array(nodecnt);
	for (var i = 0; i<nodecnt; i++) {
		insuArray[i] = new Array(grd_insuhistory.colref("indd"));
	}

	var row = 1;
	
	for (var i = 0; i<nodecnt; i++) {

		insuArray[i][0] = model.getValue("/root/send/insu/insulist["+ row + "]/insukind");
		insuArray[i][1] = model.getValue("/root/send/insu/insulist["+ row + "]/suppkind");
		insuArray[i][2] = model.getValue("/root/send/insu/insulist["+ row + "]/mskind");
		insuArray[i][3] = model.getValue("/root/send/insu/insulist["+ row + "]/fromdd");
		insuArray[i][4] = model.getValue("/root/send/insu/insulist["+ row + "]/todd");
		insuArray[i][5] = model.getValue("/root/send/insu/insulist["+ row + "]/cretno");
		insuArray[i][6] = model.getValue("/root/send/insu/insulist["+ row + "]/seqno");
		insuArray[i][7] = model.getValue("/root/send/insu/insulist["+ row + "]/pid");
		insuArray[i][8] = model.getValue("/root/send/insu/insulist["+ row + "]/indd");
		insuArray[i][9] = model.getValue("/root/send/insu/insulist["+ row + "]/dschnotidt");
		insuArray[i][10] = flag;
		//ÇÒÀΰèÁ¤ Ãß°¡
		insuArray[i][11] = model.getValue("/root/send/insu/insulist["+ row + "]/disccd");
		insuArray[i][12] = model.getValue("/root/send/insu/insulist["+ row + "]/todd");
		insuArray[i][13] = model.getValue("/root/send/insu/insulist["+ row + "]/ownbmaxgradeflag");   // º»Àκδã»óÇÑ ±¸ºÐ Ãß°¡ 20140320 LEJ
//		insuArray[i][13] = model.getValue("/root/send/insu/insulist["+ row + "]/maxynm"); // ÃÖÁ¾À¯Çü ³¯Â¥ 󸮸¦ À§Çؼ­ 20080924 ¹Úâ¿ø
//		insuArray[i][14] = model.getValue("/root/send/insu/insulist["+ row + "]/maxyns"); // ÃÖÁ¾À¯Çü ³¯Â¥ 󸮸¦ À§Çؼ­ 20080924 ¹Úâ¿ø
		row++;
	}
	
	// Á¾·áÀÏ ±âÁØÀ¸·Î sort	
	for (var i = 0; i<nodecnt; i++) {

		for (var j = i+1; j<nodecnt; j++) {

			var oldtodd  = eval(insuArray[i][4]);
			var newtodd = eval(insuArray[j][4]);
			
			if (oldtodd > newtodd) {
				
				var tempinsukind = insuArray[j][0];
				var tempsuppkind = insuArray[j][1];
				var tempmskind = insuArray[j][2];
				var tempfromdd = insuArray[j][3];
				var temptodd = insuArray[j][4];
				var tempcretno = insuArray[j][5];
				var tempseqno = insuArray[j][6];
				var temppid = insuArray[j][7];
				var tempindd = insuArray[j][8];
				var tempdschnotidt = insuArray[j][9];
				var tempflag = insuArray[j][10];
				var tempdisccd = insuArray[j][11];
				var temporgtodd = insuArray[i][12];
				var tempownbmaxgradeflag = insuArray[i][13];
				
				insuArray[j][0] = insuArray[i][0];
				insuArray[j][1] = insuArray[i][1];
				insuArray[j][2] = insuArray[i][2]; 
				insuArray[j][3] = insuArray[i][3];
				insuArray[j][4] = insuArray[i][4]; 
				insuArray[j][5] = insuArray[i][5]; 
				insuArray[j][6] = insuArray[i][6]; 
				insuArray[j][7] = insuArray[i][7]; 
				insuArray[j][8] = insuArray[i][8]; 
				insuArray[j][9] = insuArray[i][9]; 
				insuArray[j][10]= insuArray[i][10];
				insuArray[j][11]= insuArray[i][11];
				insuArray[j][12]= insuArray[i][12];
				insuArray[j][13]= insuArray[i][13];
				
				insuArray[i][0] = tempinsukind;       
				insuArray[i][1] = tempsuppkind;       
				insuArray[i][2] = tempmskind;         
				insuArray[i][3] = tempfromdd;         
				insuArray[i][4] = temptodd;           
				insuArray[i][5] = tempcretno;         
				insuArray[i][6] = tempseqno;          
				insuArray[i][7] = temppid;            
				insuArray[i][8] = tempindd;           
				insuArray[i][9] = tempdschnotidt;
				insuArray[i][10]= tempflag;       
				insuArray[i][11]= tempdisccd;
				insuArray[i][12]= temporgtodd;      
				insuArray[i][13]= tempownbmaxgradeflag;      
											
			}
		}	
	}	
	
	// ¹è¿­¿¡ ÀÖ´Â µ¥ÀÌŸ¸¦ node·Î ´Ù½Ã copy
	model.removenode("/root/send/insu");
	
	row = 1;
	
	var mskind = model.getValue("/root/send/mskind");
	
	for (var i = 0; i<nodecnt; i++) {
		
		var mskind_calc = insuArray[i][2];
		
		if(mskind == mskind_calc){
			model.makevalue("/root/send/insu/insulist["+ row + "]/insukind", insuArray[i][0]);
			model.makevalue("/root/send/insu/insulist["+ row + "]/suppkind", insuArray[i][1]);
			model.makevalue("/root/send/insu/insulist["+ row + "]/mskind", insuArray[i][2]);
			model.makevalue("/root/send/insu/insulist["+ row + "]/fromdd", insuArray[i][3]);
			
			// ¸¶Áö¸· µ¥ÀÌŸÀÇ Á¾·áÀÏÀÚ°¡ '99991231'ÀÏ °æ¿ì Åð¿ø Å뺸ÀϽ÷Πº¯°æ
			// Á¾·áÀÏÀÚ¸¸ üũ - 20080924 
			if (insuArray[i][4] == "99991231"  || insuArray[i][4] == "") {
				model.makevalue("/root/send/insu/insulist["+ row + "]/todd", insuArray[i][9]);	
				model.makevalue("/root/send/insu/insulist["+ row + "]/orgtodd", "99991231");
			} else {
				// ¹Ì·¡À¯ÇüÀÌ Àִ°æ¿ì ó¸®ÇÑ´Ù. ¹Ì·¡À¯ÇüÀÌ Àִ°æ¿ì ¸¶Áö¸· µ¥ÀÌÅÍ´Â Á¾·áÀÏÀÌ 99991231ÀÌ ¾Æ´Ô
				// ¹Ì·¡À¯ÇüÀÌ ÀÖ´Â °æ¿ì Á¾·áÀÏÀ» Åð¿øÅ뺸ÀÏ·Î ¸ÂÃçÁÖ°í orgtodd´Â 99991231·Î set ÇÑ´Ù.
				if (futureinsuyn == "Y" && row == nodecnt) {
					model.makevalue("/root/send/insu/insulist["+ row + "]/todd", insuArray[i][9]);	
					model.makevalue("/root/send/insu/insulist["+ row + "]/orgtodd", "99991231");	
				}
				model.makevalue("/root/send/insu/insulist["+ row + "]/todd", insuArray[i][4]);	
				model.makevalue("/root/send/insu/insulist["+ row + "]/orgtodd", insuArray[i][12]);					
			}
			model.makevalue("/root/send/insu/insulist["+ row + "]/cretno", insuArray[i][5]);
			model.makevalue("/root/send/insu/insulist["+ row + "]/seqno", insuArray[i][6]);
			model.makevalue("/root/send/insu/insulist["+ row + "]/pid", insuArray[i][7]);
			model.makevalue("/root/send/insu/insulist["+ row + "]/indd", insuArray[i][8]);
			model.makevalue("/root/send/insu/insulist["+ row + "]/dschnotidt", insuArray[i][9]);
			model.makevalue("/root/send/insu/insulist["+ row + "]/instcd", instcd);
			model.makevalue("/root/send/insu/insulist["+ row + "]/flag", insuArray[i][10]);
			model.makevalue("/root/send/insu/insulist["+ row + "]/disccd", insuArray[i][11]);
			model.makevalue("/root/send/insu/insulist["+ row + "]/ownbmaxgradeflag", insuArray[i][13]);
						
			row++;
		}
	}
	
	if (submit("TXPIJ00306", false)) {
		return 1;
	} else {
		return 0;
	}
}

// ½É»çÀÚ¸Þ¸ð, EDIû±¸¸Þ¸ð¸¦ ƯÁ¤³»¿ª Çü½Ä¿¡ ¸ÂÃç ¼³Á¤ÇÑ´Ù.
function fSetJudgEDIMemo(spclmemo, usermemoyn) {
	var item5Path = "";
	var item5Node = "";
	
	if (usermemoyn == "Y") {
		item5Path = "/root/main/list5/judgrmk[";
		item5Node = "U";
	} else if(usermemoyn == "N"){
		item5Path = "/root/main/list5/judgrmk[";
		item5Node = "E";
	} else if(usermemoyn == "D"){
		item5Path = "/root/main/list5/judgrmk[";
		item5Node = "D";
	}  else{
		item5Path = "/root/main/list5/judgrmk[";
		item5Node = "T";
	}
	
	
	var iSpclCdCnt = 0;
	var spclcnt = instance1.selectSingleNode("/root/main/list5");
	if(spclcnt != null){ 
		var spcllist = spclcnt.childNodes;
		iSpclCdCnt = spcllist.length ; // DB¿¡ ÀúÀåµÉ MX999 ÄÚµå °³¼ö
	}
	
	var iSpclCdTotLength = getStringLength(spclmemo);		// (stringHelper.js) ¹®ÀÚ¿­ÀÇ ±æÀ̸¦ ±¸ÇÑ´Ù.
	
	// ¼öÁ¤Ãß°¡ JHP 20090811 ½É»ç¸Þ¸ð 4000byteÃÊ°ú½Ã alert¸Þ¼¼Áö ¶ç¿ì¸é¼­ ¾ÈµÇ°Ô²û... ÀÏ´Ü... clobÀ¸·Î ¾ÈµÇ±â¶§¹®¿¡....
	if (iSpclCdTotLength > 4000){
		messageBox("½É»ç/EDI¸Þ¸ð³»¿ëÀÌ ³Ê¹«±æ¾î ÀúÀåÀ» ","E001");
		return false;
	}
	
	var indd = model.getValue("/root/main/item1/iteminfo/indd1");
	
	if (iSpclCdTotLength > 1333) {	// »õ·Î ÀÔ·ÂµÈ Æ¯Á¤Äڵ尡 700byte¸¦ ³Ñ´Â´Ù.
		// ¿µ¹®(700ÀÚ), ÇѱÛ(350ÀÚ) ±æÀÌ·Î Àß¶ó¼­ n°³ÀÇ Æ¯Á¤Äڵ带 ¸¸µç´Ù.
		var iLen = 0;			// ƯÁ¤³»¿ª ±æÀÌ°¡ 700 byte°¡ µÇ¾ú´ÂÁö °è»ê
		var iStartInx = 0;		// ƯÁ¤³»¿ª ½ÃÀÛ index
		var iCharCnt = 0;		// ¸î±ÛÀÚ·Î ±¸¼ºµÇ´ÂÁö °è»ê
							
		for (var i=0; i < spclmemo.length; i++) {
			var sBit = spclmemo.charAt(i);
			iCharCnt++;
			if (escape(sBit).length > 4) {
				iLen = iLen + 2;
			} else {
				iLen = iLen + 1;
			}
			if (iLen == 1333 || iLen > 1333) {		// ¿µ¹®(700ÀÚ), ÇѱÛ(350ÀÚ)
				iSpclCdCnt++;

				//model.makeValue(item5Path + iSpclCdCnt + "]/" + item5Node + "usermemoyn", usermemoyn);
				if (iLen == 350) {		// 700byte·Î ±æÀÌ°¡ ³¡³­ °æ¿ì
					model.makeValue(item5Path + iSpclCdCnt + "]/spclspec", spclmemo.substr(iStartInx, iCharCnt));
					model.makeValue(item5Path + iSpclCdCnt + "]/spclmemoflag", item5Node);
					model.makeValue(item5Path + iSpclCdCnt + "]/m", "i");
					model.makeValue(item5Path + iSpclCdCnt + "]/unitflag", "M");
					model.makeValue(item5Path + iSpclCdCnt + "]/spclcd", "MX999");
					model.makeValue(item5Path + iSpclCdCnt + "]/seqno", iSpclCdCnt);
					model.makeValue(item5Path + iSpclCdCnt + "]/pid", model.getValue("/root/main/item1/iteminfo/pid"));
					model.makeValue(item5Path + iSpclCdCnt + "]/indd",indd);
					model.makeValue(item5Path + iSpclCdCnt + "]/mskind", model.getValue("/root/main/item1/iteminfo/mskind"));
					model.makeValue(item5Path + iSpclCdCnt + "]/cretno", model.getValue("/root/main/item1/iteminfo/cretno"));
					model.makeValue(item5Path + iSpclCdCnt + "]/fromdd", model.getValue("/root/main/item1/iteminfo/fromdd"));
					model.makeValue(item5Path + iSpclCdCnt + "]/instcd", "");
					model.makeValue(item5Path + iSpclCdCnt + "]/lastupdtrid", "");
					
					iStartInx += iCharCnt;
				}
				else if (iLen > 350) {	// ¿µ¹®(700ÀÚ), ÇѱÛ(350ÀÚ)¸¦ ³Ñ´Â °æ¿ì
					model.makeValue(item5Path + iSpclCdCnt + "]/spclspec", spclmemo.substr(iStartInx,  iCharCnt - 1));
					model.makeValue(item5Path + iSpclCdCnt + "]/spclmemoflag", item5Node);
					model.makeValue(item5Path + iSpclCdCnt + "]/m", "i");
					model.makeValue(item5Path + iSpclCdCnt + "]/unitflag", "M");
					model.makeValue(item5Path + iSpclCdCnt + "]/spclcd", "MX999");
					model.makeValue(item5Path + iSpclCdCnt + "]/seqno", iSpclCdCnt);
					model.makeValue(item5Path + iSpclCdCnt + "]/pid", model.getValue("/root/main/item1/iteminfo/pid"));
					model.makeValue(item5Path + iSpclCdCnt + "]/indd", indd);
					model.makeValue(item5Path + iSpclCdCnt + "]/mskind", model.getValue("/root/main/item1/iteminfo/mskind"));
					model.makeValue(item5Path + iSpclCdCnt + "]/cretno", model.getValue("/root/main/item1/iteminfo/cretno"));
					model.makeValue(item5Path + iSpclCdCnt + "]/fromdd", model.getValue("/root/main/item1/iteminfo/fromdd"));
					model.makeValue(item5Path + iSpclCdCnt + "]/instcd", "");
					model.makeValue(item5Path + iSpclCdCnt + "]/lastupdtrid", "");
					
					iStartInx += (iCharCnt - 1);
				}
				
				iCharCnt = 0;
				iLen = 0;
				if (parseInt(iSpclCdTotLength / 1333) ==  iSpclCdCnt) {
					i = spclmemo.length;
					if ((iSpclCdTotLength % 1333) != 0) {		// 700Byte ¾¿ ÀÚ¸£°í ³²Àº ±æÀÌ°¡ ÀÖ´Â °æ¿ì
						iSpclCdCnt++;
						//model.makeValue(item5Path + iSpclCdCnt + "]/" + item5Node + "usermemoyn", usermemoyn);
						model.makeValue(item5Path + iSpclCdCnt + "]/spclspec", spclmemo.substring(iStartInx,  spclmemo.length));
						model.makeValue(item5Path + iSpclCdCnt + "]/spclmemoflag", item5Node);
						model.makeValue(item5Path + iSpclCdCnt + "]/m", "i");
						model.makeValue(item5Path + iSpclCdCnt + "]/unitflag", "M");
						model.makeValue(item5Path + iSpclCdCnt + "]/spclcd", "MX999");
						model.makeValue(item5Path + iSpclCdCnt + "]/seqno", iSpclCdCnt);
						model.makeValue(item5Path + iSpclCdCnt + "]/pid", model.getValue("/root/main/item1/iteminfo/pid"));
						model.makeValue(item5Path + iSpclCdCnt + "]/indd", indd);
						model.makeValue(item5Path + iSpclCdCnt + "]/mskind", model.getValue("/root/main/item1/iteminfo/mskind"));
						model.makeValue(item5Path + iSpclCdCnt + "]/cretno", model.getValue("/root/main/item1/iteminfo/cretno"));
						model.makeValue(item5Path + iSpclCdCnt + "]/fromdd", model.getValue("/root/main/item1/iteminfo/fromdd"));
						model.makeValue(item5Path + iSpclCdCnt + "]/instcd", "");
						model.makeValue(item5Path + iSpclCdCnt + "]/lastupdtrid", "");
					
					} 
				} 
			}
		}			
	} else {	// »õ·Î ÀÔ·ÂµÈ Æ¯Á¤ÄÚµå´Â 700byte¸¦ ³ÑÁö ¾Ê´Â´Ù.
		//if (iSpclCdTotLength > 0) {	// »õ·Î Ãß°¡µÈ ³»¿ëÀÌ ÀÖ´Ù.
		iSpclCdCnt++;
		//model.makeValue(item5Path + iSpclCdCnt + "]/" + item5Node + "usermemoyn", usermemoyn);
		model.makeValue(item5Path + iSpclCdCnt + "]/spclspec", spclmemo);
		model.makeValue(item5Path + iSpclCdCnt + "]/spclmemoflag", item5Node);
		model.makeValue(item5Path + iSpclCdCnt + "]/m", "i");
		model.makeValue(item5Path + iSpclCdCnt + "]/unitflag", "M");
		model.makeValue(item5Path + iSpclCdCnt + "]/spclcd", "MX999");
		model.makeValue(item5Path + iSpclCdCnt + "]/seqno", "1");
		model.makeValue(item5Path + iSpclCdCnt + "]/pid", model.getValue("/root/main/item1/iteminfo/pid"));
		model.makeValue(item5Path + iSpclCdCnt + "]/indd", indd);
		model.makeValue(item5Path + iSpclCdCnt + "]/mskind", model.getValue("/root/main/item1/iteminfo/mskind"));
		model.makeValue(item5Path + iSpclCdCnt + "]/cretno", model.getValue("/root/main/item1/iteminfo/cretno"));
		model.makeValue(item5Path + iSpclCdCnt + "]/fromdd", model.getValue("/root/main/item1/iteminfo/fromdd"));
		model.makeValue(item5Path + iSpclCdCnt + "]/instcd", "");
		model.makeValue(item5Path + iSpclCdCnt + "]/lastupdtrid", "");
					
		//}
	}
}			

// ¹Ì·¡À¯Çü Á¤¸® ¹× Åð¿ø½Ã ÇöȲÀ¸·Î HISTORY À¯ÁöÇϸ鼭 inpt,iphsº¯°æ
		
//½É»ç ¿Ï·á ó¸® 
function  fJudgEnd(){
	model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat","C");
	var indd = model.getValue("/root/main/item1/iteminfo/indd1");
	
	model.makevalue("/root/main/item1/iteminfo/indd1", indd);
	if(submit("TXPIJ00301",false)) { //½É»ç¿Ï·áÀü ÀúÀåÀÌ Á¦´ë·Î 󸮵ÇÁö ¾Ê¾ÒÀ» °æ¿ì³×´Â E70À» ¹ß»ý½ÃÅ°Áö ¾Ê°Ô ÇÑ´Ù. 20080908 ¹Úâ¿ø
		fSaveCalcAmt("I");
		fSetItemInfoSetting();
		return 1;
	}else {
		model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat","B");
		fSetItemInfoSetting();
		return 0;			
	}
}

//ÅëÇÕ½É»ç ¿Ï·á ó¸®
function  fJudgAllEnd(){
	model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat","E");
	
	var indd = model.getValue("/root/main/item1/iteminfo/indd1");
	
	model.makevalue("/root/main/item1/iteminfo/indd1", indd);
	if(submit("TXPIJ00301",false)) { //½É»ç¿Ï·áÀü ÀúÀåÀÌ Á¦´ë·Î 󸮵ÇÁö ¾Ê¾ÒÀ» °æ¿ì³×´Â E70À» ¹ß»ý½ÃÅ°Áö ¾Ê°Ô ÇÑ´Ù. 20080908 ¹Úâ¿ø
		fSaveCalcAmt("I");
		fSetItemInfoSetting();
		return 1;
	} else {
		model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat","B");
		fSetItemInfoSetting();
		return 0;
	}
}

//Åð¿ø¸¶°¨ Ãë¼Ò ó¸®
function  fJudgEndCancel(){
	model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat","A");
	
	if (submit("TXPIJ00301",false)) {
		submit("TXPIJ03203",false);
		fSetItemInfoSetting();
		return 1;
	} else {
		model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat","B");
		fSetItemInfoSetting();
		return 0;
	}
}

//¿¹°í½É»ç ¿Ï·á ó¸®
function  fJudgDclrtEnd(){
	model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat","G");
	
	var indd = model.getValue("/root/main/item1/iteminfo/indd1");
	
	model.makevalue("/root/main/item1/iteminfo/indd1", indd);
	if(submit("TXPIJ00301",false)) { //½É»ç¿Ï·áÀü ÀúÀåÀÌ Á¦´ë·Î 󸮵ÇÁö ¾Ê¾ÒÀ» °æ¿ì³×´Â E70À» ¹ß»ý½ÃÅ°Áö ¾Ê°Ô ÇÑ´Ù. 20080908 ¹Úâ¿ø
		fSaveCalcAmt("I");
		fSetItemInfoSetting();
		return 1;
	} else {
		model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat","B");
		fSetItemInfoSetting();
		return 0;
	}
}

///////////////////////////////////////////////////////////////////////////
//ÀúÀå·ÎÁ÷ °ü·Ã ÄÚµù Á¾·á										    //
///////////////////////////////////////////////////////////////////////////

///////////////////////////////////////////////////////////////////////////
//üũ·ÎÁ÷ °ü·Ã ÄÚµù Á¾·á
//1. ÁßÁõ, »êÁ¤Æ¯·Ê ¿©ºÎ üũ
//2. ºÐ¸¸¿©ºÎ üũ
//3. ¼ö¼ú¿©ºÎ üũ
///////////////////////////////////////////////////////////////////////////

//1. ÁßÁõ, »êÁ¤Æ¯·Ê ¿©ºÎ üũ
// ±âÁ¸·ÎÁ÷ÀÌ º¸Çè ¾ÏȯÀÚÀÇ °æ¿ì ÀÔ¿øÀÏ ±âÁØÀ¸·Î¸¸ Àû¿ëµÇ°Ô µÇ¾îÀÖ¾î ¼öÁ¤ÇÔ - 20081105 ¹Úâ¿ø
function fCheckEssc(){
	var chk = model.getValue("/root/main/item1/iteminfo/patnm");
	var pid = model.getValue("/root/main/item1/iteminfo/pid");
	var indd = model.getValue("/root/main/item1/iteminfo/indd1");
	var mskind = model.getValue("/root/main/item1/iteminfo/mskind");
	var insukind = model.getValue("/root/main/item1/iteminfo/insukindcd");
	var suppkind = model.getValue("/root/main/item1/iteminfo/suppkindcd");
	var cretno = model.getValue("/root/main/item1/iteminfo/cretno");
	var fromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
	var insuflag = "";
	// »õ·Î¿î±âÁØÀû¿ëÀ» À§ÇØ ¿©±â¼­ºÎÅÍ º¯¼öÃß°¡ - 20081105 ¹Úâ¿ø
	var dschdd = model.getValue("/root/main/item1/iteminfo/dschdd");
	
	btn_esscdiag.visible = false;
	
	// Èñ±Í³­Ä¡ »êÁ¤Æ¯·Ê ó¸®  - 20090622 ¹Úâ¿ø, 7¿ù1ÀϺÎÅÍ Àû¿ë, HȯÀÚ´Â Á¦¿Ü¿Ü¾î¾ßÇÔ
	var rareesscyn = model.getValue("/root/main/item12/rareessc/rareesscyn");
	
	if (insukind == "11" && suppkind != "32" && rareesscyn == "Y" && suppkind != "01" && fromdd >= "20090701") {
		// 20090930 JHP Èñ±Í³­Ä¡ µî·Ï¿©ºÎ È®ÀÎÀ§ÇØ Ãß°¡ÇÔ.   -- ½ÃÀÛ
		var anohosprgstflag 	= model.getValue("/root/main/item13/rooa/anohosprgstflag");
		var rareobstno 		= model.getValue("/root/main/item13/rooa/rareobstno");
		var rareobstfromdd 	= model.getValue("/root/main/item13/rooa/rareobstfromdd");
		var rareobsttodd 	= model.getValue("/root/main/item13/rooa/rareobsttodd");
		var signyn 		= model.getValue("/root/main/item13/rooa/signyn");	
		
		//20091109 JHP Èñ±Í³­Ä¡ ¸Þ¼¼Áö´Â »óº´¿¡ R/O »óº´ÀÏ °æ¿ì´Â ¸Þ¼¼Áö Á¦¿ÜÇÔ.
		var ruleoutyn = model.getValue("/root/main/list3/diaglist[1]/ruleoutyn");
		if(ruleoutyn == 'true'){
			// ÁÖ»óº´ R/OÀ϶§¿¡´Â Èñ±Í³­Ä¡ ¸Þ¼¼Áö ó¸® ¾ÈÇÔ.
		}else{
			if (fromdd >= "20091001") { // 10¿ù1ÀÏ ÀÌÈÄ¿¡´Â µî·Ï¹øÈ£°¡ ¹Ýµå½Ã ÀÖ¾î¾ßÇÑ´Ù. - Ãß°¡ÄÚµùÇÊ¿ä
				// Ÿº´¿øµî·Ï ¿©ºÎ , Y:Ÿº´¿ø,N:¿ì¸®º´¿ø
				if(anohosprgstflag == "Y"){
					// Èñ±Í³­Ä¡ ¹øÈ£¿©ºÎ
					if(rareobstno == null || rareobstno == '-'){
						messageBox("## Èñ±Í³­Ä¡Á¤º¸ ## : Ÿº´¿øµî·ÏÀ̳ª Èñ±Í³­Ä¡¹øÈ£°¡ ","I004");
					} else {
						btn_esscdiag.visible = true;
						btn_esscdiag.attribute("class") = "btn5_letter4";
						btn_esscdiag.attribute("color") = "#ff0066";
						return;
					}
				} else if(anohosprgstflag == "N"){
					// Èñ±Í³­Ä¡ ¹øÈ£¿©ºÎ
					if(rareobstno == null || rareobstno == '-'){
						if(signyn  == "Y"){
							btn_esscdiag.visible = true;
							btn_esscdiag.attribute("class") = "btn5_letter4";
							btn_esscdiag.attribute("color") = "#ff0066";
							return;
						} else {
							messageBox("## Èñ±Í³­Ä¡Á¤º¸ ## : Àç¿øº´¿øµî·ÏÀ̳ª µî·Ï¹øÈ£ ¹× ¼­¸íÁ¤º¸°¡ ","I004");
						}
					} else{
						btn_esscdiag.visible = true;
						btn_esscdiag.attribute("class") = "btn5_letter4";
						btn_esscdiag.attribute("color") = "#ff0066";
						return;
					}
				} else {
					// Èñ±Í³­Ä¡ data(mmohrooa)¿¡ Á¤º¸¾øÀ½.
					messageBox("## Èñ±Í³­Ä¡Á¤º¸ ## : µî·Ï¹øÈ£ ¹× ¼­¸íÁ¤º¸°¡ ","I004");
				}
			} else {
				btn_esscdiag.visible = true;
				btn_esscdiag.attribute("class") = "btn5_letter4";
				btn_esscdiag.attribute("color") = "#ff0066";
				return;
			}
		}
	}
	
        if  (insukind > "22" || suppkind == "01" ) {
        	return;
        }

	if(chk){
			var isEsscV193 = false;
			var isEsscV191 = false;
			var isEsscVisible = true;

			var cEsscCnt = getNodesetCount("/root/main/chkessc");
			if (cEsscCnt == 0 && rareesscyn != "Y" ) {	// ƯÁ¤³»¿ªÀÌ ¾ø´Â °æ¿ìÀÓ
				return;
			} else {
				var chkspclcd = model.getValue("/root/main/chkessc/chkessc[vcode='V191' or vcode='V192']/vcode");
				var spclcd = model.getValue("/root/main/chkessc/chkessc[vcode='V193']/vcode");
				if (chkspclcd.length > 0) {
					isEsscV191 = true;
					//ÀÌ¹Ì Ã¼Å©µÈ°ÇÀÌ V193Àΰæ¿ì V193À¸·Î ó¸® ÇÑ´Ù. 
					var chk = model.getValue("/root/hidden/item1/vcode");
					if(chk == "V193"){
						model.setValue("/root/hidden/item1/vcode","V193");
					}else{
						model.setValue("/root/hidden/item1/vcode",chkspclcd);
					}
				}
				if(spclcd == "V193" && suppkind != "32") { // Â÷»óÀ§´Â ÁßÁõµî·Ï¹öÆ°ÀÌ È°¼ºÈ­µÇÁö ¾Ê°ÔÇÑ´Ù. 20090227 ¹Úâ¿ø
					model.setValue("/root/hidden/item1/vcode",spclcd);
					var suppkindcd = model.getValue("/root/main/item1/iteminfo/suppkindcd");
					
					isEsscV193 = true;
					// V193Àΰæ¿ì ÀÌ¹Ì Àû¿ëÇÏ¸é ³¡À̱⶧¹®¿¡ ÀϺηΠº¸¿©ÁöÁö ¾Êµµ·Ï Çß¾úÁö¸¸
					// »ç¿ëÀÚ ¿ä±¸»çÇ×À¸·Î ±×³É ¹öÆ° »ì¾Æ ÀÖ°Ô ÇÑ´Ù. 2007.12.07 ¹ÚµµÇü
					//if (suppkindcd == "06") {
					//	isEsscVisible = false;
					//}
				}
			}
				
			// µ¥ÀÌŸ º¯°æ ÈÄ ÁßÁõ Áúȯ üũ º¯°æ À¯¹« È®ÀÎÀ» À§ÇÑ flag °ª Ãß°¡ : 2007.10.08 ±è°Ç±â => fUpdtCheckEssc()¿¡¼­ »ç¿ë
			model.setValue("/root/hidden/updtchkessc/esscV193",isEsscV193);
			model.setValue("/root/hidden/updtchkessc/esscV191",isEsscV191);

			if (isEsscV191) {
				if (isEsscVisible) {
					btn_esscdiag.visible = true;
				} else {
					btn_esscdiag.visible = false;
				}
				
				btn_esscdiag.attribute("class") = "btn5_letter4";
				btn_esscdiag.attribute("color") = "#ff0066";
			} else {
				btn_esscdiag.attribute("class") = "btn2_letter4";
				btn_esscdiag.visible = false;
				if (isEsscV193) {
					if (isEsscVisible) {
						btn_esscdiag.visible = true;
					} else {
						btn_esscdiag.visible = false;
					}
					btn_esscdiag.attribute("class") = "btn5_letter4";
					btn_esscdiag.attribute("color") = "#ff0066";
				} else {
					btn_esscdiag.attribute("class") = "btn2_letter4";
					btn_esscdiag.visible = false;
				}
			}
	}
}

//2. ºÐ¸¸¿©ºÎ üũ
function fCheckBorn(){
	var cBorn = instance1.selectSingleNode("/root/main/item1/iteminfo");
	if (cBorn == null) {	// Ãâ»êÁ¤º¸°¡ ¾ø´Â°æ¿ìÀÓ.
		btn_babymother.attribute("class") = "btn5_letter4";
		btn_babymother.visible = false;
		return;
	}else{
		var cBornbaby = model.getValue("/root/main/item1/iteminfo/bornbaby");
		if(cBornbaby == "Y"){
			btn_babymother.visible = true;
			btn_babymother.attribute("class") = "btn5_letter4";
			btn_babymother.attribute("color") = "#ff0066";
		}else{
			btn_babymother.attribute("class") = "btn5_letter4";
			btn_babymother.visible = false;
		}
		
	}
}

//3. ¼ö¼ú¿©ºÎüũ
function fCheckOper(){
	var cOper = instance1.selectSingleNode("/root/main/item1/iteminfo");
	if (cOper == null) {	// Ãâ»êÁ¤º¸°¡ ¾ø´Â°æ¿ìÀÓ.
		btn_operdiag.attribute("class") = "btn5_letter4";
		btn_operdiag.visible = false;
		return;
	}else{
		var cOperDiag = model.getValue("/root/main/item1/iteminfo/opflag");
		if(cOperDiag == "Y"){
			btn_operdiag.visible = true;
			btn_operdiag.attribute("class") = "btn5_letter4";
			btn_operdiag.attribute("color") = "#ff0066";
			
			// ¼ö¼ú½É»ç»óÅ¿¡ µû¸¥ ĸ¼Çº¯°æ
			//¹Ì½É
			var cnt1 = model.getValue("/root/main/item10/operstat/cnt1");
			//º¸·ù
			var cnt2 = model.getValue("/root/main/item10/operstat/cnt2");
			//¿Ï·á
			var cnt3 = model.getValue("/root/main/item10/operstat/cnt3");
			// ¼ö¼úÀÌ Ãß°¡µÇ¾úÀ»¶§ - ¼ö¼ú½É»çÅ×ÀÌºí¿¡ µ¥ÀÌÅÍ°¡ µé¾î°¡Áö ¾ÊÀº °æ¿ì´Â ¹Ì½ÉÀÌ Æ÷ÇԵǾî ÀÖ¾î ¹Ì½ÉÀÌ´Ù. - 20071014 ¹Úâ¿ø
			var nonpijhoper = model.getValue("/root/main/item10/operstat/nonpijhoper");
			
			if (cnt1 > "0" || nonpijhoper == "Y") {
				btn_operdiag.attribute("text")= "¼ö¼ú(¹Ì)";
				return;
			}
		       if (cnt1 < "1" && cnt2 > "0") {
		       	       btn_operdiag.attribute("text")= "¼ö¼ú(º¸)";
		       }
		       if (cnt1 < "1" && cnt2 < "1" && cnt3 > "0") {
		       		btn_operdiag.attribute("text")= "¼ö¼ú(¿Ï)";
		       }
		       if (cnt1 < "1" && cnt2 < "1" && cnt3 < "1") {
		       		btn_operdiag.attribute("text")= "¼ö¼ú(¹Ì)";
		       }
		
			
		}else{
			btn_operdiag.attribute("class") = "btn5_letter4";
			btn_operdiag.visible = false;
		}
	}
}	

//4. Åð¿ø¸Þ¸ð üũ
function fCheckDschMemo(){
	var cDschMemo = instance1.selectSingleNode("/root/main/item1/iteminfo");
	if (cDschMemo == null) {	
		btn_dschmemo.attribute("class") = "btn5_letter4";
		btn_dschmemo.visible = false;
		return;
	}else{
		var cDschMemo = model.getValue("/root/main/item1/iteminfo/dschnotiyn");
		if(cDschMemo == "Y"){
			btn_dschmemo.visible = true;
			btn_dschmemo.attribute("class") = "btn5_letter4";
			btn_dschmemo.attribute("color") = "#ff0066";
		}else{
			btn_dschmemo.attribute("class") = "btn5_letter4";
			btn_dschmemo.visible = false;
		}
	}
}

// 5.°ø¿©¼öÇýÀÚ ¿©ºÎ üũ
function fCheckDnorPat(){
	var cDnorPat = instance1.selectSingleNode("/root/main/item8/patdnorinfo");
	if (cDnorPat == null) {
		btn_patdnor.attribute("class") = "btn5_letter3";
		btn_patdnor.visible = false;
		return;
	}else{
		var cDnorPID = model.getValue("/root/main/item8/patdnorflag");
		var cPatDnorFlag = model.getValue("/root/main/item8/patdnorinfo/patdnorflag");
		//if(cDschMemo == "D"){
		if(cPatDnorFlag == "D"){
			btn_patdnor.visible = true;
			btn_patdnor.attribute("text")= "¼öÇýÀÚ"
			btn_patdnor.attribute("class") = "btn5_letter3";
			btn_patdnor.attribute("color") = "#ff0066";
		//}else if (cDschMemo == "P"){
		}else if (cPatDnorFlag == "P"){
			btn_patdnor.visible = true;
			btn_patdnor.attribute("text")= "°ø¿©ÀÚ"
			btn_patdnor.attribute("class") = "btn5_letter3";
			btn_patdnor.attribute("color") = "#ff0066";
		}else{
			btn_dschmemo.attribute("class") = "btn5_letter4";
			btn_dschmemo.visible = false;
		}
	}
}

// 20091019 JHP Áø·á»óº´ ½É»ç»óº´ üũ·ÎÁ÷ Ãß°¡  (** 10/9 º¸ÇèÆÀÀå Á¤·ÊȸÀÇ °áÁ¤»çÇ×ÀÓ)
// Àç¿ø½É»ç½Ã ȤÀº Åð¿ø½É»ç½Ã Áø·á ÁÖ»óº´°ú ½É»ç ÁÖ»óº´ÀÌ »óÀÌ ÇÑ °æ¿ì 
// [Áø·á ÁÖ»óº´°ú ½É»ç ÁÖ»óº´ÀÌ ´Ù¸¨´Ï´Ù.È®ÀÎÇϽðí Áø·á¿¡ ¼öÁ¤¿äû ÇϽʽÿä 
// ( Åð¿ø½Ã ¿Ü·¡ FU°Ë»çÀÇ ¿äÀ²¿¡ ¿À·ù°¡ ÀÖÀ» ¼ö ÀÖ½À´Ï´Ù)]   ¶ó´Â ¾Ë·µÀ» ÁÖµµ·Ï ÇÔ.
// 1. Àû¿ë´ë»ó : º¸ÇèÀ¯Çü 11, 21, 22 
// ´Ü º¸Á¶À¯Çü 00Á¤»ó, 01Àü¾×º»Àκδã, ÀÔ¿ø¿¡¸¸ Á¸ÀçÇÏ´Â º¸Á¶À¯Çü  Á¦¿Ü
// 2. Á¶È¸½Ã ICD10 »öÀÎ ºÐ·ù »ó »óÀ§ ±¸ºÐ (¿µ¹® 1ÀÚ¸®¿Í ¼ýÀÚ 2ÀÚ¸®)À¸·Î ºñ±³ Çϵµ·Ï ÇÔ 
// -> Áø·á D619 »óº´°ú ½É»ç D618Àº ¾Ë·µ Æ˾÷ ¾È¶ßµµ·Ï ÇÔ.
//for¹® ¼Óµµ°³¼± plet2
function fCheckEmrDiagPamDiag(){
	var insukind = model.getValue("/root/main/item14/emrdiagpamdiag/insukind");
	var suppkind = model.getValue("/root/main/item14/emrdiagpamdiag/suppkind");
	var notsuppkind = model.getValue("/root/main/item14/emrdiagpamdiag/notsuppkind");
	var emrmaindiag = model.getValue("/root/main/item14/emrdiagpamdiag/emrmaindiag");
	var pammaindiag = model.getValue("/root/main/item14/emrdiagpamdiag/pammaindiag");
	var notsuppkindchk = model.getXPathValue("contains(/root/main/item14/emrdiagpamdiag/notsuppkind,'"+suppkind+"')");

	var fstemrdiag2 = emrmaindiag.substring(0, 3);
	var fstpamdiag2 = pammaindiag.substring(0, 3);
	
	var fstemrdiag3 = emrmaindiag.substring(0, 4);
	var fstpamdiag3 = pammaindiag.substring(0, 4);
	
	
	// ÀÔ¿øÁ¦¿Ü º¸Á¶À¯Çü ¹è¿­°ú º¸Á¶À¯Çü üũ
	var suppchk = "N";
	if(notsuppkindchk == true){
		suppchk = "Y";
	}
	
	// 1. º¸ÇèÀ¯Çü 11, 21, 22 ÀÌ¸é ¾Ë·µ
	if(insukind == "11" || insukind == "21" || insukind == "22"){
		// 00, 01, suppchk(ÀÔ¿øÁ¦¿Üº¸Á¶À¯Çü)ÀÌ ¾Æ´Ï¸é ¾Ë·µ
		if(suppkind == "00" || suppkind =="01" || suppchk == "Y"){
		}else{
			// µÑ´Ù null ÀÌ ¾Æ´Ï¸é ¾Ë·µ(¿ø·¡´Â NULLÀε¥ ±ÛÀÚ¼ö·Î Àß¶ó¼­ NULÀÓ)
			if(fstemrdiag2 == 'NUL' || fstpamdiag2 == 'NUL'){
			}else{
				// Áø·á»óº´ ½É»ç»óº´ ´Ù¸£¸é ¾Ë·µ
				if(fstemrdiag2 != fstpamdiag2){
					messageBox("[Áø·á ÁÖ»óº´(" + fstemrdiag2 +"-)°ú ½É»ç ÁÖ»óº´(" + fstpamdiag2 + "-)ÀÌ ´Ù¸¨´Ï´Ù. È®ÀÎÇϽðí Áø·á¿¡ ¼öÁ¤¿äû ÇϽʽÿä.\n( Åð¿ø½Ã ¿Ü·¡ FU°Ë»çÀÇ ¿äÀ²¿¡ ¿À·ù°¡ ÀÖÀ» ¼ö ÀÖ½À´Ï´Ù)]\n","I007");
				}
			}
		}
	}
}

function fItemRareMsg(){
	var srchrslt = "";
	var itemmsg = model.getValue("/root/main/item1/iteminfo/itemmsg");
	var raremsg = model.getValue("/root/main/item1/iteminfo/raremsg");
	var serdiagfromdd = model.getValue("/root/main/item1/iteminfo/serdiagfromdd"); //ÁßÁõ½ÃÀÛÀÏÀÚ
	var serdiagtodd = model.getValue("/root/main/item1/iteminfo/serdiagtodd"); //ÁßÁõÁ¾·áÀÏÀÚ
	var rareobstfromdd = model.getValue("/root/main/item1/iteminfo/rareobstfromdd"); //Èñ±Í½ÃÀÛÀÏÀÚ
	var rareobsttodd = model.getValue("/root/main/item1/iteminfo/rareobsttodd"); //Èñ±ÍÁ¾·áÀÏÀÚ
	var dschnotidt = model.getValue("/root/main/item1/iteminfo/dschnotidt"); //Åð¿øÀÏÀÚ
	dschnotidt = (dschnotidt.length > 0  ? dschnotidt.substring(0 , 8) : "");
	var suppkind = model.getValue("/root/main/item1/iteminfo/suppkindcd");
	var rooamsgcnt = getNodesetCount("/root/main/rarecancermsglist/rarecancermsg[cd!='00']/nm");
	var sdoamsgcnt = getNodesetCount("/root/main/rarecancermsglist/rarecancermsg[cd='00']/nm");
	var rooamsg = model.getXPathValue("/root/main/rarecancermsglist/rarecancermsg[cd!='00']/nm");
	var sdoamsg = model.getXPathValue("/root/main/rarecancermsglist/rarecancermsg[cd='00']/nm");
	var rooamsgtooth = model.getXPathValue("/root/main/rarecancermsglist/rarecancermsg[cd!='00' and cd!='01']/nm");
	var rooamsgcd = model.getXPathValue("/root/main/rarecancermsglist/rarecancermsg[cd!='00']/cd");
	var sdoamsgcd = model.getXPathValue("/root/main/rarecancermsglist/rarecancermsg[cd='00']/cd");
	var rooamsgtoothcd = model.getXPathValue("/root/main/rarecancermsglist/rarecancermsg[cd!='00' and cd!='01']/cd");
	cmb_itemraremsg.visible = false;
	//µÎ¹øÈ£ ¸ðµÎ Á¸Àç½Ã.
	if ((rooamsgcnt > 0) && (sdoamsgcnt > 0)) {
		opt_patientinfo.attribute("background-color") = "transparent";
		//Èñ±ÍÁ¾·áÀÏÀÚ°¡ Åð¿øÀÏÀÚ,ÀÔ¿øÀÏÀÚº¸´Ù ºü¸¦½Ã »ö»óº¯°æ
		//ÁßÁõÁ¾·áÀÏÀÚ°¡ Åð¿øÀÏÀÚ,ÀÔ¿øÀÏÀÚº¸´Ù ºü¸¦½Ã »ö»óº¯°æ
		if (
				((dschnotidt != "" && (dschnotidt > serdiagtodd )) || (dschnotidt == "" && (VAL_today > serdiagtodd )) )||
				((dschnotidt != "" && (dschnotidt >  rareobsttodd   )) || (dschnotidt == "" && (VAL_today>  rareobsttodd   )))
		) {
			cmb_itemraremsg.attribute("background-color") = "#ff9900";
		} else {
			cmb_itemraremsg.attribute("background-color") = "transparent";
		}
		
		cmb_itemraremsg.visible = true;
		opt_patientinfo.visible =  false;
		roundrect1.visible = false;
		// µî·Ï¾Ï º¸Á¶À¯ÇüÀÏ°æ¿ì(06.µî·Ï¾Ï, 11.°¡Á¤°£È£µî·Ï¾Ï, 32.Â÷»óÀ§1Á¾, 40.Â÷»óÀ§2Á¾µî·Ï¾Ï
//		if (suppkind == "06" || suppkind == "11" || suppkind == "32" || suppkind == "40") {
//			model.setValue(cmb_itemraremsg.attribute("ref"), sdoamsg);
//		} else if (suppkind == "87" || suppkind == "88" || suppkind == "89") {
//			model.setValue(cmb_itemraremsg.attribute("ref"), rooamsgtoothcd);
//		} else {
//			model.setValue(cmb_itemraremsg.attribute("ref"), rooamsgcd);
//		}
		cmb_itemraremsg.select(0);
	} else if (rooamsgcnt > 0) {
		//Èñ±ÍÁ¾·áÀÏÀÚ°¡ Åð¿øÀÏÀÚ,ÀÔ¿øÀÏÀÚº¸´Ù ºü¸¦½Ã »ö»óº¯°æ
		if ((dschnotidt != "" && (dschnotidt > rareobsttodd   )) || (dschnotidt == "" && (VAL_today > rareobsttodd   ))) {
			if (rooamsgcnt  == 1) {
				opt_patientinfo.attribute("background-color") = "#ff9900";
			} else {
				cmb_itemraremsg.attribute("background-color") = "#ff9900";
			}
		} else {
			opt_patientinfo.attribute("background-color") = "transparent";
			cmb_itemraremsg.attribute("background-color") = "transparent";
		}
		
		if (suppkind == "87" || suppkind == "88" || suppkind == "89") {
			if (rooamsgcnt == 1) {
				srchrslt += rooamsgtooth; // Èñ±Íµî·Ï¹øÈ£
				model.setValue(opt_patientinfo.attribute("ref"), rooamsgtooth);
				opt_patientinfo.visible =  true;
				roundrect1.visible = true;
			} else {
				cmb_itemraremsg.visible = true;
				opt_patientinfo.visible =  false;
				roundrect1.visible = false;
				model.setValue(cmb_itemraremsg.attribute("ref"), rooamsgtoothcd);
			}

		} else {
			if (rooamsgcnt == 1) {
				srchrslt += rooamsg; // Èñ±Íµî·Ï¹øÈ£
				model.setValue(opt_patientinfo.attribute("ref"), rooamsg);
				opt_patientinfo.visible =  true;
				roundrect1.visible = true;
			} else {
				cmb_itemraremsg.visible = true;
				opt_patientinfo.visible =  false;
				roundrect1.visible = false;
				//model.setValue(cmb_itemraremsg.attribute("ref"), rooamsgcd);
				cmb_itemraremsg.select(0);
			}
		}
	} else if (sdoamsgcnt > 0) {
		//ÁßÁõÁ¾·áÀÏÀÚ°¡ Åð¿øÀÏÀÚ,ÀÔ¿øÀÏÀÚº¸´Ù ºü¸¦½Ã »ö»óº¯°æ

		if ((dschnotidt != "" && (dschnotidt > serdiagtodd )) || (dschnotidt == "" && (VAL_today > serdiagtodd))) {
			opt_patientinfo.attribute("background-color") = "#ff9900";
		} else {
			opt_patientinfo.attribute("background-color") = "transparent";
		}
		cmb_itemraremsg.attribute("background-color") = "transparent";
		
		if (sdoamsgcnt == 1) {
			srchrslt += sdoamsg; // ÁßÁõµî·ÏÁ¤º¸
			model.setValue(opt_patientinfo.attribute("ref"), sdoamsg);
			opt_patientinfo.visible =  true;
			roundrect1.visible = true;
		} else {
			cmb_itemraremsg.visible = true;
			opt_patientinfo.visible =  false;
			roundrect1.visible = false;
			//model.setValue(cmb_itemraremsg.attribute("ref"), sdoamsgcd);
			cmb_itemraremsg.select(0);
		}
	} else {
		opt_patientinfo.attribute("background-color") = "transparent";
		cmb_itemraremsg.attribute("background-color") = "transparent";
		opt_patientinfo.visible =  true;
		roundrect1.visible = true;
		cmb_itemraremsg.visible = false;
	}

	opt_patientinfo.refresh();
	cmb_itemraremsg.refresh();
}
		 
//Link ¿¬°á Æ˾÷
function fLinkPopMenu(trgtWindow, cond, send){

	var trgtManWindow = getChildWindow(trgtWindow);

	if (trgtManWindow == null) {
		open(trgtWindow ,"", "10", "10",trgtWindow, cond, send);
		
	} else {
		activateChild(trgtWindow);
		model.refresh();
	}
}

// ÅëÇսɻ縶°¨
function fDschallEnd() {
	fDschjudgEndType("A");
}

// Åð¿ø¸¶°¨
function fDschjudgEnd() {
	fDschjudgEndType("");
}

// ¿¹°í½É»ç : 2014.06.09 LEJ
function fDschdclrtEnd() {
	fDschjudgEndType("G");
}

function fDschjudgEndType(dschjudgendtype) {
	var chk = model.getValue("/root/main/item1/iteminfo/patnm");
	if(chk){
		// Åð¿ø¸¶°¨½Ã °£È£È®Á¤ÀÌ Ãë¼ÒµÇ¾ú´ÂÁö ½Ç½ÃÇÑ È®ÀÎ ÈÄ ÁøÇàÇÑ´Ù.
		// ŸÀÎÀÌ °£È£ È®Á¤À» Ãë¼ÒÇÒ¶§ ¸¶°¨µÇ´Â »óȲÀÌ ¹ß»ýµÇÁö ¾Ê±â À§ÇÔ 
		// °£È£ È®Á¤ÀÌ Ãë¼ÒµÈ °æ¿ì¿¡´Â ´ë»óÀÚ Á¶È¸ È£¸éÀ» refresh ÇÏ°í 
		// ¸ÞÀÎÈ­¸éÀÇ ½É»ç»óŸ¦ 'A' ¹Ì½É»óÅ·ΠÇÏ°í °£È£ Åð¿øÅ뺸 ¿©ºÎµµ 'N'À¸·Î ¼¼ÆÃÇÑ´Ù.- 20080927 ¹Úâ¿ø
		model.makeValue("/root/send/checkyn","Y");
		if (!submit("TRPIJ00315", false)) {
			messageBox("½Ç½Ã°£ ȯÀÚ»óÅ üũ¿¡ ½ÇÆÐ Çß½À´Ï´Ù.±âº»µ¥ÀÌÅÍ ÀÌ»óÀ̳ª ½Ã½ºÅÛ ¿À·ùÀÔ´Ï´Ù.°ü¸®ÀÚ ¹®ÀÇ ÈÄ", "C003");
			return;
		}
		
		model.makeValue("/root/send/checkyn","N");
		// Åð¿ø¸¶°¨½Ã Åð¿øÈ®Á¤ÀϽà ÀÌÈÄ Ã³¹æÀÌ ÀÖÀ¸¸é alert - 20081112 ¹Úâ¿ø
		var maxexectm = model.getValue("/root/main/item11/endcnclstat/maxexectm").substr(0,8);
		var dschnotidt = model.getValue("/root/main/item1/iteminfo/dschnotidt").substr(0,8);
		var dschnotiyn = model.getValue("/root/main/item11/endcnclstat/dschnotiyn");
		var ipscendyn = model.getValue("/root/main/item11/endcnclstat/ipscendyn");
		var dumpexistyn = model.getValue("/root/main/item11/endcnclstat/dumpexistyn");
		var dupexecdd = model.getValue("/root/main/item11/endcnclstat/dupexecdd");
		var dumpclamkeyexistyn = model.getValue("/root/main/item11/endcnclstat/dumpclamkeyexistyn");
		var paygrntyn = model.getValue("/root/main/item11/endcnclstat/paygrntyn");
		var dschdclrtyn = model.getValue("/root/main/item11/endcnclstat/dschdclrtyn");
		var dschjudgprcsstatyn = model.getValue("/root/main/item11/endcnclstat/dschjudgprcsstatyn");
		
		
		if (dschnotiyn != 'N' && maxexectm > dschnotidt) {
			var msg = messageBox("Åð¿øÈ®Á¤ÀÌÈÄ" + maxexectm + "ÀÏÀÚ ½Ç½Ãó¹æÀÌ ÀÖ½À´Ï´Ù. °è¼Ó ", "S001");
			if (msg != "6") {
				return;
			}
		}
		
		if (dschjudgendtype != 'G' && dschnotiyn == 'N') {
			messageBox("°£È£ Åð¿øÈ®Á¤ÀÌ Ãë¼ÒµÈ »óÅ ÀÔ´Ï´Ù. ¸¶°¨ ", "E001");
			// ¹«Á¶°Ç ´ë»óÀÚ Á¶È¸ È­¸éÀ» refresh 
			var trgtManWindow = getChildWindow("SMPIJ00200");
			trgtManWindow.javascript.fGetInBfJudgTrgtManList();
			trgtManWindow.javascript.fCountPat();
			trgtManWindow.model.refresh();
			
			// ¸ÞÀÎÈ­¸éÀÇ ½É»ç»óŸ¦ ¹Ì½ÉÀ¸·Î Åð¿øÅ뺸¿©ºÎ¸¦ 'N'À¸·Î
			model.setValue("/root/main/item1/iteminfo/dschnotiyn", "N");
			model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat", "A");
			model.refresh();
			return;
		} else if (dschjudgendtype == 'G' && dschdclrtyn == 'N') {
			messageBox("ÀÇ»ç Åð¿ø¿¹°í°¡ Ãë¼ÒµÈ »óÅ ÀÔ´Ï´Ù. ¸¶°¨ ", "E001");
			// ¹«Á¶°Ç ´ë»óÀÚ Á¶È¸ È­¸éÀ» refresh 
			var trgtManWindow = getChildWindow("SMPIJ00200");
			trgtManWindow.javascript.fGetInBfJudgTrgtManList();
			trgtManWindow.javascript.fCountPat();
			trgtManWindow.model.refresh();
			
			// ¸ÞÀÎÈ­¸éÀÇ ½É»ç»óŸ¦ ¹Ì½ÉÀ¸·Î Åð¿øÅ뺸¿©ºÎ¸¦ 'N'À¸·Î
			model.setValue("/root/main/item1/iteminfo/dschnotiyn", "N");
			model.setValue("/root/main/item1/iteminfo/dschdclrtyn", "N");
			model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat", "A");
			model.refresh();
			return;
		}
		
		// 20091007 JHP º´½Ç·á°è»ê(PAM.FN_PI_GETADMAMTCALCYN) ¹× ó¹æ°è»ê(PAM.FN_PI_GETCALCMISSYN) ¸Â´ÂÁö È®ÀÎ 
		// 20091113 JHP ºÎÀ¯ÇüÀº ¹«Á¶°Ç Y·Î ³Ñ¾î¿ÀÁö¸¸ ºÎÀ¯ÇüÅë¿¡ °è»ê³»¿ªÀÌ ¾øÀ»°æ¿ì¿¡´Â °ªÀÚü°¡ ¾ø±â¶§¹®¿¡ ¸Þ¼¼Áö°¡¶á´Ù..ÇÏ¿© ºÎÀ¯ÇüÀÏ °æ¿ì´Â ¸Þ¼¼Áö Á¦¿Ü½ÃŲ´Ù.
		
		var admamtcalcyn 	= model.getValue("/root/main/item11/endcnclstat/admamtcalcyn");
		//var calcmissyn 	= model.getValue("/root/main/item11/endcnclstat/calcmissyn"); -- ÀÏ´Ü Ã³¹æÀº ÃßÈÄ ¹Ý¿µ - 20091013 ¹Úâ¿ø
		
		var chkmskind = model.getValue("/root/main/item1/iteminfo/mskind");
		var brateflag = model.getValue("/root/main/item1/iteminfo/brateflag");

		// ÀÔ¿ø¿äÀ²ÀÏ °æ¿ì¸¸ º´½Ç·á üũÇÑ´Ù.
		if (brateflag == "I") {
			if (admamtcalcyn != "Y") {
				if(chkmskind != "S"){
					messageBox("°è»êµÇÁö ¾ÊÀº º´½Ç·á°¡ Á¸ÀçÇÕ´Ï´Ù. \nÈ®ÀÎÈÄ Àç°è»ê(Àü¼ö°è»ê)","I008");
					return;
				}
			}
		}
		
		// 2011.04.28 syjung ¼Ò±Þ°è»ê¿Ï·á ¿©ºÎ. NÀÌ¸é ¼Ò±Þ°è»êÇÒ µ¥ÀÌÅÍ°¡ ³²¾Æ ÀÖÀ¸¹Ç·Î Åð¿ø¸¶°¨ ÇÒ ¼ö ¾øÀ½.
		if (ipscendyn == "N") {
			messageBox("¿Ï·áµÇÁö ¾ÊÀº ¼Ò±Þ°è»ê ³»¿ªÀÌ Á¸ÀçÇÕ´Ï´Ù. Àç°è»ê","I008");
			return;
		}
		
		// 2011.06.14 syjung ¿Ü·¡¿¡¼­ ´ýÇÁµÇÁö ¾ÊÀº ó¹æ Á¸Àç ¿©ºÎ. Y¸é ´ýÇÁµÇÁö ¾ÊÀº ó¹æÀÌ ÀÖÀ¸¹Ç·Î Åð¿ø¸¶°¨ ÇÒ ¼ö ¾øÀ½.
		if (dumpexistyn == "Y") {
			messageBox("ÀÔ¿ø ´çÀÏ ¿Ü·¡¿¡¼­ ´ýÇÁµÇÁö ¾ÊÀº ó¹æÀÌ Á¸ÀçÇÕ´Ï´Ù. Àç¿ø½É»ç È­¸é¿¡¼­ [¢ºDump] ³»¿ªÀ» ","I007");
			return;
		}
		
		if (dumpclamkeyexistyn == "Y") {
			if(messageBox("¿Ü·¡ ÀÚ·á ¼öÁýÀÌ µÈ Àç¿ø ³» ½Ç½Ãó¹æÀÌ ÀÖ½À´Ï´Ù. ¿Ü·¡ »çÈÄ ÀڷḦ »ý¼º »èÁ¦ÇÑ ÈÄ Dumpó¸® ÇϽʽÿÀ.", "Q003") == 6) {
				modal("SPPIJ03500");
				if (model.getValue("/root/main/item1/iteminfo/dumprmk") == "" ) {
					messageBox("»çÀ¯¸¦", "C001");
					return;
				}
			} else {
				return;
			}
		}
		
		if (dupexecdd != "") {
			dupexecdd = dupexecdd.toDate().getDateFormat("YYYY/MM/DD")
			messageBox(dupexecdd + "Áߺ¹°è»ê ³»¿ªÀÌ Á¸ÀçÇÕ´Ï´Ù. " + dupexecdd + "ÀÏ Àç°è»ê","I008");
			return;
		}
		
		//±âÀçÁ¡°Ë ÁßÁõ, »êÁ¤Æ¯·Ê ¿©ºÎ üũ
		if (fGetDiagSpclcdCheck() == false) {
			return false;
		} 
		
		// ÁÖºÎÀ¯ÇüÀÌ ÇÔ²² Àִ ȯÀÚ¿¡ ´ëÇؼ­´Â Åð¿ø¸¶°¨½Ã ¾Ë·µÀ» ¶ç¿öÁØ´Ù.
		var msyn = model.getValue("/root/main/item1/iteminfo/msyn");
		
		if (msyn == "Y") {
			messageBox("´Ù¸¥ º¸Çè À¯ÇüÁ¤º¸°¡ Á¸ÀçÇÏ¿À´Ï ÇØ´ç°Ç Åð¿ø¸¶°¨¿©ºÎµµ È®ÀÎÇÏ¿© ÁÖ¼¼¿ä. ÇØ´ç°Ç ¹Ì¸¶°¨ ½Ã Åð¿ø¼ö³³ ÇÒ ¼ö","I004");
		}
		
		var cOperDiag = model.getValue("/root/main/item1/iteminfo/opflag");
		
		// ¼ö¼ú½É»ç ¹Ì¿Ï·á½Ã ÀÀ±Þ,chemo,dsc´Â ¾Ë·µ¸¸ Á¤±ÔÅð¿øÀº blcok - 20090114 ¹Úâ¿ø
		var ordtype = model.getValue("/root/main/item1/iteminfo/ordtype");
		var insukind = model.getValue("/root/main/item1/iteminfo/insukindcd");

		// ¿¬µµº° ºÐ¸® ¾È µÈ ÀÌ·Â Áß º»Àκδ㠻óÇÑ¾× ÃÊ°ú ȯÀÚ ¸Þ¼¼Áö ¹ß»ý ( 2016.03.11 LEJ )
		var insukind = model.getValue("/root/main/item1/iteminfo/insukind");
		var cfe = model.getValue("/root/main/item1/iteminfo/cfe");
		var ownlimmitamt = model.getValue("/root/main/item1/iteminfo/ownlimmitamt");      // º»Àκδ㠻óÇÑ ±¸ºÐ¿¡ µû¸¥ »óÇѱâÁØ¾×  
		var fromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
		var todd = model.getValue("/root/main/item1/iteminfo/todd");
		var curyear = VAL_today.substr(0,4);
		var fromyear = fromdd.substr(0,4);
		var toyear = todd.substr(0,4);
		if ( todd == "99991231" ) {
			if ( dschnotidt == "99991231" || dschnotidt == "" ) {
				toyear = curyear ;
			}
			else {
				toyear = dschnotidt.substr(0,4) ;
			}
		}
		if ( insukind == "11" && fromyear != toyear && cfe != 'F' ) {
			if(parseInt(model.getValue("/root/main/item2/itemcalc/ownbpayamt")) > ownlimmitamt) {
				var msg =  messageBox("¿¬µµº° ºÐ¸® µÇÁö ¾ÊÀº º»Àκδã»óÇÑÁ¦ ȯÀÚÀÔ´Ï´Ù. \n°è¼Ó","S001");
				if(msg != 6) {
					return;
				}
			}
		}
		
		if(dschnotiyn == "Y" || (dschjudgendtype == 'G' && dschdclrtyn == 'Y')){
			// ¼ö¼ú½É»ç°¡ ¿Ï·áµÇÁö ¾Ê¾Ò½À´Ï´Ù.  - 20080821 ¹Úâ¿ø
			if ( ordtype != "I" && ((btn_operdiag.attribute("text")== "¼ö¼ú(¹Ì)") ||(btn_operdiag.attribute("text")== "¼ö¼ú(º¸)")) && (cOperDiag == "Y" || cOperDiag == "YY" || cOperDiag == "YN") ) {
				var msg = messageBox("¼ö¼ú½É»ç°¡ ¿Ï·áµÇÁö ¾Ê¾Ò½À´Ï´Ù. °è¼Ó","S001");
				if(msg != 6) {
					return;
				}
			}
			if ( ordtype == "I" && ((btn_operdiag.attribute("text")== "¼ö¼ú(¹Ì)") ||(btn_operdiag.attribute("text")== "¼ö¼ú(º¸)")) && (cOperDiag == "Y" || cOperDiag == "YY" || cOperDiag == "YN") ) {
				messageBox("¼ö¼ú½É»ç°¡ ¿Ï·áµÇÁö ¾Ê¾Ò½À´Ï´Ù. ¸¶°¨","E001");
				return;
			}
			// ¼Ò±Þ³»¿ªÀÌ Á¸ÀçÇÕ´Ï´Ù. ó¸®ÈÄ ¸¶°¨ÇØÁÖ¼¼¿ä.
			// 10¿ù3ÀÏ ÀÌÀü ¼Ò±Þ°ÇÀº Á¶°Ç¿¡¼­ Á¦¿ÜÇÑ´Ù. - 20081004 ¹Úâ¿ø
			if (model.getValue("/root/main/item11/recal[1]/recalcdd") != "") {
				messageBox("¼Ò±Þ³»¿ªÀÌ Á¸ÀçÇÕ´Ï´Ù. ¸¶°¨","E001");
				return;
			}
		
			//¾à ¹Ýȯ È®ÀÎÀ¯¹« ¹× â È£Ãâ.
			if (fCheckReturnPrcpExist() == false) {
				return;
			}
			
			if (insukind == "31"){
				if (paygrntyn != "Y") {
					messageBox("ÀÚµ¿Â÷º¸Çè Áö±Þº¸Áõ¹øÈ£ ´©¶ôÀÔ´Ï´Ù.","I007");
					return;
				}
			}
			
			if ((dschjudgendtype != 'G' && fChkClose() == true) || dschjudgendtype == 'G') {
				// ¿¹°í½É»ç ȯÀÚ°¡ ¹Ì½ÃÇàó¹æÀÌ ÀÖ´Â °æ¿ì ¸¶°¨ Á¦¾î´Â ÇÏÁö ¾Ê´Â´Ù!
				if (dschjudgendtype == 'G' && fChkClose() == false) {
					var msg = messageBox("¿¹°í½É»ç ȯÀÚ ¹Ì½ÃÇà ó¹æ ³»¿ªÀÌ ÀÖ½À´Ï´Ù. ¸¶°¨","S001");
					if(msg != 6) {
						return;
					}	
				}
				if (fSaveMain("C") == true) {
					//maxexectm ¾ø´Ù´Â°Ç isclÀÌ Á¸Àç ÇÏÁö ¾Ê´Â °ÍÀÓ.
					
					var dschantichk = model.getValue("/root/hidden/result/getdschcalccheck/dschantichk");
					if (dschantichk == "Y") {
						var msg = messageBox("¼ö¼ú ¿¹¹æÀû Ç×»ýÁ¦ Æò°¡ ´ë»óÀÚÀÔ´Ï´Ù.\nÇ×»ýÁ¦ Åð¿ø¾à »ç¿ë ¿©ºÎ¸¦ ÀçÈ®ÀÎÇϽñ⠹ٶø´Ï´Ù. \n°è¼Ó","S001");
						if(msg != 6) {
							return;
						}
					}
					
					if (maxexectm == "") {
						if ( messageBox("À¯Çü¿¡ °è»êµÈ ó¹æ ³»¿ªÀÌ Çϳªµµ ¾ø½À´Ï´Ù. ¸¶°¨","Q004") != 6 ) {
							return false;
						}
					}

					// ÀÔ¿ø °è»ê ÀÚ·á °ËÁõ(2012.11.30 LeeEunJung)
					var check0 = model.getValue("/root/hidden/result/getdschcalccheck/check0");
					var check1 = model.getValue("/root/hidden/result/getdschcalccheck/check1");
					var check2 = model.getValue("/root/hidden/result/getdschcalccheck/check2");
					var check3 = model.getValue("/root/hidden/result/getdschcalccheck/check3");
					var check4 = model.getValue("/root/hidden/result/getdschcalccheck/check4");
					var check5 = model.getValue("/root/hidden/result/getdschcalccheck/check5");
					
					if (check0 =="Y"||check1 =="Y"||check2 =="Y"||check3 =="Y"||check4 =="Y"||check5 =="Y") {
						messageBox("°è»êÀÚ·á °ËÁõ ½Ã ¿À·ù°¡ üũµÇ¾ú½À´Ï´Ù. Àüü Àç°è»ê ÈÄ ¹®Á¦ ÇØ°áÀÌ ¾È µÇ¸é Àü»ê½Ç·Î ¹®ÀÇ","I008");
						return false;
					}

					// °Ç°­º¸Çè Á¤»ó 16ÀÏ ÀÌ»ó Àç¿øȯÀÚ¿¡ ´ëÇØ Àå±âÀç¿ø ºÒ°¡ÇÇ ÁÖ»óº´ Á¸ÀçÇÏ´Â °æ¿ì ¾Ë¸²  					
					var longtermchk = model.getValue("/root/hidden/result/getdschcalccheck/longtermchk");
					if (longtermchk == "Y") {
						var msg = messageBox("Àå±âÀç¿ø ºÒ°¡ÇÇ ÁÖ»óº´ÀÌ ÀÖ´Â 16ÀÏ ÀÌ»ó ÀÔ¿ø·á ¹ß»ý ȯÀÚ ÀÔ´Ï´Ù.\nº¸Á¶ À¯ÇüÀ» È®ÀÎÇϽñ⠹ٶø´Ï´Ù. \n°è¼Ó","S001");
						if(msg != 6) {
							return;
						}
					}
					
					//ÀÀ±Þ½Ç °ü¸®·á ¿©ºÎ üũ
					var nog3reasnyn = model.getValue("/root/hidden/result/getdschcalccheck/nog3reasnyn");
					if (nog3reasnyn == "Y") {
						messageBox("ÀÀ±Þ ÀÇ·á°ü¸®·á ¹Ì¹ß»ý  ȯÀÚÀÔ´Ï´Ù.","I007");
						return false;
					}

					if (fGetDrgOpenPopup("O") == false) {
						return false;
					}

					if (dschjudgendtype == "G" && dschjudgprcsstatyn > 0){
						messageBox("ÀÔ¿øÀÌ·Â ³» ¹Ì½É»óÅ°¡ ÀÖ½À´Ï´Ù.","I007");
						return false;
					}
					
					if (dschjudgendtype == "A") {
						if (fJudgAllEnd()){
							// 2. È­¸é Ŭ¸®¾î (°øÅë)
							fJudgEndClear();
							
							messageBox("ÅëÇսɻ縶°¨ 󸮰¡","I002");
						} else {
							messageBox("¸¶°¨ 󸮰¡ µÇÁö","E007");
						}
					} else if (dschjudgendtype == "G") {     // ¿¹°í½É»ç Ãß°¡ (2014.06.19 LEJ)
						if (fJudgDclrtEnd()){
							// 2. È­¸é Ŭ¸®¾î (°øÅë)
							fJudgEndClear();
							
							messageBox("¿¹°í½É»ç¸¶°¨ 󸮰¡","I002");
						} else {
							messageBox("¸¶°¨ 󸮰¡ µÇÁö","E007");
						}
					} else {
						if (fJudgEnd()){
							// 2. È­¸é Ŭ¸®¾î (°øÅë)
							fJudgEndClear();
							messageBox("Åð¿ø¸¶°¨ 󸮰¡","I002");
						} else {
							messageBox("¸¶°¨ 󸮰¡ µÇÁö","E007");
						}
					}
					
				}
			} else {
				messageBox("¹Ì½ÃÇà ó¹æ ³»¿ªÀÌ ÀÖ½À´Ï´Ù. ¸¶°¨","E001");			
			}								
		}
		else {
			messageBox("À¯Çü¿¡ °è»êµÈ ó¹æ ³»¿ªÀÌ Çϳªµµ ¾ø½À´Ï´Ù. ¸¶°¨","E001");
			return;
		}
	}
}

function fJudgEndClear() {
	// 2. È­¸é Ŭ¸®¾î (°øÅë)
	delPatientInfos();
	fSetRdoReset();
	btn_judgrmk.selected = true;
	
	model.setValue("/root/send/totalsumflag", "Y");
	model.setValue("/root/send/unitflag", "-");
	//»ó¼¼È­¸é ÀúÀå¹öÆ° 󸮸¦ À§ÇØ ³Ö¾î ³õ´Â´Ù.   - 2007-11.29 ¹ÚµµÇü
	model.setValue("root/hidden/item1/chksave","N");
	
	btn_esscdiag.attribute("class") = "btn2_letter4"; 
	btn_babymother.attribute("class") = "btn2_letter4"; 
	btn_operdiag.attribute("class") = "btn2_letter4"; 
	btn_mt004.attribute("class") = "btn2_letter4"; 
	btn_attData.attribute("class") = "btn2_letter4"; 
	btn_operdiag.attribute("class") = "btn2_letter4";
	btn_patdnor.attribute("class") = "btn_letter3";
									
	btn_esscdiag.visible = true;
	btn_babymother.visible = true;
	btn_operdiag.visible = true;
	btn_mt004.visible = true;
	btn_attData.visible = true;
	btn_operdiag.visible = true;
	btn_patdnor.visible= true;
	btn_save.disabled = false;
	
	btn_recalc.disabled = false;
	btn_sugicalc.disabled = false;  
	btn_dschclose.disabled = false;
	btn_totjudgclose.disabled = false;
	btn_dschclosecancel.disabled = false;
	btn_midcomplete.disabled = false;
	btn_midcancel.disabled = false;
	btn_midregist.disabled = false;
	btn_midregistyn.disabled = false;

	group9.visible = false;
	
	btn_dschclose.attribute("class") = "btn2_letter6";
	btn_totjudgclose.attribute("class") = "btn2_letter6";
	btn_dschclosecancel.attribute("class") = "btn2_letter6";
	btn_midregist.attribute("class") = "btn2_letter6";
	btn_midregistyn.attribute("class") = "btn2_letter6";
	
	model.resetInstanceNode("/root/main/item1/iteminfo");
	model.resetInstanceNode("/root/main/item2/itemcalc");
	model.resetInstanceNode("/root/main/item2/incd");
	model.resetInstanceNode("/root/main/item4/insu");
	model.resetInstanceNode("/root/send");
	
	model.removenode("/root/main/list1");
	model.makeNode("/root/main/list1");
	
	model.removenode("/root/main/list2");
	model.makeNode("/root/main/list2");
	
	model.removenode("/root/main/list3");
	model.makeNode("/root/main/list3");
	
	model.removenode("/root/main/list4");
	model.makeNode("/root/main/list4");
	
	model.refresh();
	// ¹«Á¶°Ç ´ë»óÀÚ Á¶È¸ È­¸éÀ» refresh - 20080926 ¹Úâ¿ø
	var trgtManWindow = getChildWindow("SMPIJ00200");
	trgtManWindow.javascript.fGetInBfJudgTrgtManList();
	trgtManWindow.javascript.fCountPat();
	trgtManWindow.model.refresh();
}

// Ä¡½Ä Æ˾÷¿ë µ¥ÀÌŸ »ý¼º
function fSetToothPop(row, flag) {

	model.removenode("/root/hidden/sppiz00600/cond/list");
	model.makeNode("/root/hidden/sppiz00600/cond/list");
	// »óº´
	var cntdiag = getNodesetCount("/root/main/list3/diaglist");
	// ó¹æ
	var cntiscl = getNodesetCount("/root/main/list2/iscllist");

	var cd = "";
	var cdnm = "";
	var orddd = "";
	var toot = "";
	var rowcnt = 1;
	
	for (i=1; i<=cntdiag; i++) {
		
		cd = model.getValue("/root/main/list3/diaglist["+  i + "]/diagcd");
		cdnm = model.getValue("/root/main/list3/diaglist["+  i + "]/diagnm");
		orddd = model.getValue("/root/main/list3/diaglist["+  i + "]/ordfromdd");
		toot = model.getValue("/root/main/list3/diaglist["+  i + "]/toot");
		estmcls = model.getValue("/root/main/list2/iscllist["+  i + "]/estmcls");  //20100318 Á¤½Â¿ì ÀÇÁ¤ºÎ ¿À·ù·Î Ãß°¡
		
		if (cd != "") {
			if ((toot != "-" && toot != "")  || estmcls == "U") {

				var milktoothstr = "ABCDE000";
				var subTootStr = "";
				
				for (var inx = 0; inx < 32; inx++) {
					var tootnum = toot.substr(inx,1);
					if (tootnum == "*") {		// ¼±ÅÃµÈ ¿µ±¸Ä¡ÀÇ °æ¿ì 1~8 »çÀÌ ¼ýÀڷΠǥ½ÃÇÑ´Ù.
						if (inx < 8) {
							subTootStr += (8 - inx);
						}
						else if (inx > 7 && inx < 16) {
							subTootStr += (inx - 7);
						}
						else if (inx > 15 && inx < 24) {
							subTootStr += (24 - inx);
						} else {
							subTootStr += (inx - 23);
						}
					} else if (tootnum == "#") {		// ¼±ÅÃµÈ À¯Ä¡ÀÇ °æ¿ì A~E »çÀÌ ¾ËÆĺªÀ¸·Î Ç¥½ÃÇÑ´Ù.
						if (inx < 8) {
							subTootStr += milktoothstr.charAt(7 - inx);
						}
						else if (inx > 7 && inx < 16) {
							subTootStr += milktoothstr.charAt(inx - 8);
						}
						else if (inx > 15 && inx < 24) {
							subTootStr += milktoothstr.charAt(23 - inx);
						} else {
							subTootStr += milktoothstr.charAt(inx - 24);
						}
					} else {	// if (tootnum == "0") ¼±ÅõÇÁö ¾ÊÀº °æ¿ì °ø¹éÀ¸·Î ó¸®ÇÑ´Ù.
						subTootStr += " ";
					}
				}
				
				//Ä¡½Ä Ç¥±â¸¦ ¼³Á¤ÇÑ´Ù.
				if (row == i && flag == "1" ) {
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos", "true");
				} else {
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos", "false");
				}
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/flag", "»óº´");
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cd", cd);
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cdnm", cdnm);
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightupper", subTootStr.substr(0, 8));
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftupper", subTootStr.substr(8, 8));
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightlower", subTootStr.substr(16, 8));
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftlower", subTootStr.substr(24, 8));
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/orddd", orddd);	
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/toot", toot);
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/row", i);
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/pid", "");
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/indd", "");
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cretno", "");
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/instcd", "");
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/execdd", "");
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/calcseqno", "");
				model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/calcscorseqno", "");
				
				rowcnt = rowcnt+1;
				
			} else {
				if (row == i && flag == "1"  ) {
					
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos", "true");				
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/flag", "»óº´");
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cd", cd);
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cdnm", cdnm);
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightupper", "");
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftupper", "");
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightlower", "");
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftlower", "");
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/orddd", orddd);	
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/toot", "");
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/row", i);
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/pid", "");
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/indd", "");
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cretno", "");
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/instcd", "");
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/execdd", "");
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/calcseqno", "");
					model.makevalue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/calcscorseqno", "");
												
					rowcnt = rowcnt+1;	
				}
			}
		} // if cd != ""
	} // for end
	
	for (i=1; i<=cntiscl; i++) {
		cd = model.getValue("/root/main/list2/iscllist["+  i + "]/snglcalcscorcd");
		cdnm = model.getValue("/root/main/list2/iscllist["+  i + "]/hngnm");
		orddd = model.getValue("/root/main/list2/iscllist["+  i + "]/ordfromdd");
		toot = model.getValue("/root/main/list2/iscllist["+  i + "]/tootfact");
		estmcls = model.getValue("/root/main/list2/iscllist["+  i + "]/estmcls");
		
		if ((toot != "-" && toot != "") || estmcls == "U") {
			var milktoothstr = "ABCDE000";
			var subTootStr = "";
			var tmpStr  = "";
			
			for (var inx = 0; inx < 32; inx++) {
				var tootnum = toot.substr(inx,1);
				if (tootnum == "*") {		// ¼±ÅÃµÈ ¿µ±¸Ä¡ÀÇ °æ¿ì 1~8 »çÀÌ ¼ýÀڷΠǥ½ÃÇÑ´Ù.
					if (inx < 8) {
						subTootStr += (8 - inx);
					}
					else if (inx > 7 && inx < 16) {
						subTootStr += (inx - 7);
					}
					else if (inx > 15 && inx < 24) {
						subTootStr += (24 - inx);
					} else {
						subTootStr += (inx - 23);
					}
				} else if (tootnum == "#") {		// ¼±ÅÃµÈ À¯Ä¡ÀÇ °æ¿ì A~E »çÀÌ ¾ËÆĺªÀ¸·Î Ç¥½ÃÇÑ´Ù.
					if (inx < 8) {
						subTootStr += milktoothstr.charAt(7 - inx);
					}
					else if (inx > 7 && inx < 16) {
						subTootStr += milktoothstr.charAt(inx - 8);
					}
					else if (inx > 15 && inx < 24) {
						subTootStr += milktoothstr.charAt(23 - inx);
					} else {
						subTootStr += milktoothstr.charAt(inx - 24);
					}
				} else {	// if (tootnum == "0") ¼±ÅõÇÁö ¾ÊÀº °æ¿ì °ø¹éÀ¸·Î ó¸®ÇÑ´Ù.
					subTootStr += " ";
				}
			}
			
			//Ä¡½Ä Ç¥±â¸¦ ¼³Á¤ÇÑ´Ù.
			if (row == i && flag == "2" ) {
				model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos", "true");
			} else {
				model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos", "false");
			}
			model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/flag", "ó¹æ");
			model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cd", cd);
			model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cdnm", cdnm);
			model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightupper", subTootStr.substr(0, 8));
			model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftupper", subTootStr.substr(8, 8));
			model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightlower", subTootStr.substr(16, 8));
			model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftlower", subTootStr.substr(24, 8));
			model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/orddd", orddd);
			model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/toot", toot);
			model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/row", i);
			rowcnt = rowcnt+1;
		} else {
			if (row == i && flag == "2" ) {
				model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/chos", "true");
				model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/flag", "ó¹æ");
				model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cd", cd);
				model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/cdnm", cdnm);
				model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightupper", "");
				model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftupper", "");
				model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/rightlower", "");
				model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/leftlower", "");
				model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/orddd", orddd);	
				model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/toot", "");
				model.makeValue("/root/hidden/sppiz00600/cond/list/toothapplist[" + rowcnt + "]/row", i);
				rowcnt = rowcnt+1;
			}
		}
	}
}

// Ä¡½Ä Æ˾ ¹ÞÀº µ¥ÀÌŸ
function fGetToothPop() {
	
	var tootSelectcnt = getNodesetCount("/root/hidden/sppiz00600/rslt/list");
	
	var flag = "";
	var row = "";
	var toot = "";
	
	tootSelectcnt = eval(tootSelectcnt) + 1;
	
	for (var i=1; i<tootSelectcnt; i++) {
		
		flag = model.getValue("/root/hidden/sppiz00600/rslt/list["+  i +"]/flag");
		row = model.getValue("/root/hidden/sppiz00600/rslt/list["+  i +"]/row");
		
		var rlsttoot = model.getValue("/root/hidden/sppiz00600/rslt/list["+  i +"]/toot");
		var rlsttoot1 = model.getValue("/root/hidden/sppiz00600/rslt/list["+  i +"]/toot1");
		
		
		if (rlsttoot == "") {
			rlsttoot = "-";
		}
		if (rlsttoot1 == "") {
			rlsttoot1 = "-";
		}
		
		if (flag == "1") {
			toot = model.getValue("/root/main/list3/diaglist["+ row +"]/toot");
			model.setValue("/root/main/list3/diaglist["+ row +"]/toot", rlsttoot);
			model.setValue("/root/main/list3/diaglist["+ row +"]/toot1", rlsttoot1);
			if (rlsttoot != toot) {	// Ä¡½Ä¹øÈ£°¡ º¯°æµÈ °æ¿ì
				var diagstatus = grd_diaglist.rowstatus(row);
				if (diagstatus == 0 || diagstatus == 2) {	// 0 : new, 2 : update
					grd_diaglist.rowstatus(row) = 2;		// 2 : update
				}
			}
		}
	}
}

//1. ÁßÁõ, »êÁ¤Æ¯·Ê º¯°æ ¿©ºÎ üũ
function fUpdtCheckEssc(flag){

	var pid = model.getValue("/root/main/item1/iteminfo/pid");
	var indd = model.getValue("/root/main/item1/iteminfo/indd1");

	var mskind = model.getValue("/root/main/item1/iteminfo/mskind");
	var insukind = model.getValue("/root/main/item1/iteminfo/insukindcd");
	var suppkind = model.getValue("/root/main/item1/iteminfo/suppkindcd");
	var cretno = model.getValue("/root/main/item1/iteminfo/cretno");
	var fromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
	var dschdd = model.getValue("/root/main/item1/iteminfo/dschdd");
	var insuflag = "";
	
	var isEsscdiag = btn_esscdiag.visible;
	var isEsscdiagUpdt = false;

	var isUpdtEsscV193 = model.getValue("/root/hidden/updtchkessc/esscV193");
	var isUpdtEsscV191 = model.getValue("/root/hidden/updtchkessc/esscV191");
	var rareesscyn = model.getValue("/root/hidden/result/rareessc/rareesscyn");
	
	model.setValue("/root/hidden/item1/vcode","");
	// Èñ±Í³­Ä¡ »êÁ¤Æ¯·Ê Ãß°¡ - 20100224 ¹Úâ¿ø
	if(suppkind == "05" || suppkind == "06" || suppkind == "39" || suppkind == "40" || suppkind == "50" || suppkind == "31" || (insukind == "22" && suppkind == "08")){ // 20090325 Â÷»óÀ§2Á¾ Ãß°¡ - ¹Úâ¿ø 20100318 Á¤½Â¿ì ½Å»ý¾Æ / º¸È£2Á¾ 6¼¼¹Ì¸¸ Ãß°¡
		return;
	}
	if(pid){
		var isEsscV193 = false;
		var isEsscV191 = false;
		
		var isEsscVisible = true;
		
		var cEsscCnt = getNodesetCount("/root/hidden/result/chkessc");
		if (cEsscCnt == 0 && rareesscyn != "Y" ) {	// ƯÁ¤³»¿ªÀÌ ¾ø´Â °æ¿ìÀÓ
			return;
		} else {
			var chkspclcd = model.getValue("/root/hidden/result/chkessc[vcode='V191' or vcode='V192']/vcode");
			var spclcd = model.getValue("/root/hidden/result/chkessc[vcode='V193']/vcode");
			if (chkspclcd.length > 0) {
				isEsscV191 = true;
				//ÀÌ¹Ì Ã¼Å©µÈ°ÇÀÌ V193Àΰæ¿ì V193À¸·Î ó¸® ÇÑ´Ù. 
				var chk = model.getValue("/root/hidden/item1/vcode");
				if(chk == "V193"){
					model.setValue("/root/hidden/item1/vcode","V193");
				}else{
					model.setValue("/root/hidden/item1/vcode",chkspclcd);
				}
			}
			if(spclcd == "V193" && suppkind != "32") { // Â÷»óÀ§´Â ÁßÁõµî·Ï¹öÆ°ÀÌ È°¼ºÈ­µÇÁö ¾Ê°ÔÇÑ´Ù. 20090227 ¹Úâ¿ø
				model.setValue("/root/hidden/item1/vcode",spclcd);
				var suppkindcd = model.getValue("/root/main/item1/iteminfo/suppkindcd");
				
				isEsscV193 = true;
				// V193Àΰæ¿ì ÀÌ¹Ì Àû¿ëÇÏ¸é ³¡À̱⶧¹®¿¡ ÀϺηΠº¸¿©ÁöÁö ¾Êµµ·Ï Çß¾úÁö¸¸
				// »ç¿ëÀÚ ¿ä±¸»çÇ×À¸·Î ±×³É ¹öÆ° »ì¾Æ ÀÖ°Ô ÇÑ´Ù. 2007.12.07 ¹ÚµµÇü
				//if (suppkindcd == "06") {
				//	isEsscVisible = false;
				//}
			}
		}

		btn_esscdiag.visible = false;
		
		if (isEsscV191) {
			if (isEsscVisible) {
				if (isEsscdiag) {
					if (isUpdtEsscV191 == "True") {
						isEsscdiagUpdt = false;
					} else {
						isEsscdiagUpdt = true;
					}
				} else {
					isEsscdiagUpdt = true;
				}
				btn_esscdiag.visible = true;
			} else {
				btn_esscdiag.visible = false;
				isEsscdiagUpdt = false;
			}
			btn_esscdiag.attribute("class") = "btn5_letter4";
			btn_esscdiag.attribute("color") = "#ff0066";
			
		} else {
			if (isEsscV193) {
				if (isEsscVisible) {
					if (isEsscdiag) {
						if (isUpdtEsscV193 == "True") {
							isEsscdiagUpdt = false;
						} else {
							isEsscdiagUpdt = true;
						}
					} else {
						isEsscdiagUpdt = true;
					} 
					btn_esscdiag.visible = true;
				} else {
					btn_esscdiag.visible = false;
					isEsscdiagUpdt = false;
				}
				btn_esscdiag.attribute("class") = "btn5_letter4";
				btn_esscdiag.attribute("color") = "#ff0066";						
			} else {
				isEsscdiagUpdt = false;
				btn_esscdiag.attribute("class") = "btn2_letter4";
				btn_esscdiag.visible = false;								
			}
		} 

		//if (isEsscdiagUpdt) {

			var trgtManWindow = getChildWindow("SPPIJ01900");
			var vcode = model.getValue("/root/hidden/item1/vcode");
			
			model.setValue("/root/hidden/sppij01900/cond/pid",model.getValue("root/main/item1/iteminfo/pid"));
			model.setValue("/root/hidden/sppij01900/cond/indd",model.getValue("root/main/item1/iteminfo/indd1"));
			model.setValue("/root/hidden/sppij01900/cond/mskind",model.getValue("root/main/item1/iteminfo/mskind"));
			model.setValue("/root/hidden/sppij01900/cond/brateflag",model.getValue("root/main/item1/iteminfo/brateflag"));
			model.setValue("/root/hidden/sppij01900/cond/brthdd",model.getValue("root/main/item1/iteminfo/brthdd"));
			model.setValue("/root/hidden/sppij01900/cond/vcode",vcode);
			
			// Èñ±Í³­Ä¡ »êÁ¤Æ¯·Ê ·ÎÁ÷ Ãß°¡ - 20100224 ¹Úâ¿ø
			var fromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
			
			var insukind = model.getValue("/root/main/item1/iteminfo/insukindcd");
	        var suppkind = model.getValue("/root/main/item1/iteminfo/suppkindcd");
			
			
			if (insukind == "11" && suppkind != "31" && suppkind != "32" && suppkind != "01" && fromdd >= "20090701" && rareesscyn == "Y") {
				// 20090930 JHP Èñ±Í³­Ä¡ µî·Ï¿©ºÎ È®ÀÎÀ§ÇØ Ãß°¡ÇÔ.   -- ½ÃÀÛ
				var anohosprgstflag 	= model.getValue("/root/main/item13/rooa/anohosprgstflag");
				var rareobstno 		= model.getValue("/root/main/item13/rooa/rareobstno");
				var rareobstfromdd 	= model.getValue("/root/main/item13/rooa/rareobstfromdd");
				var rareobsttodd 	= model.getValue("/root/main/item13/rooa/rareobsttodd");
				var signyn 		= model.getValue("/root/main/item13/rooa/signyn");	
				
				//20091109 JHP Èñ±Í³­Ä¡ ¸Þ¼¼Áö´Â »óº´¿¡ R/O »óº´ÀÏ °æ¿ì´Â ¸Þ¼¼Áö Á¦¿ÜÇÔ.
				var ruleoutyn = model.getValue("/root/main/list3/diaglist[1]/ruleoutyn");
				if(ruleoutyn == 'true'){
					// ÁÖ»óº´ R/OÀ϶§¿¡´Â Èñ±Í³­Ä¡ ¸Þ¼¼Áö ó¸® ¾ÈÇÔ.
				}else{
					if (fromdd >= "20091001") { // 10¿ù1ÀÏ ÀÌÈÄ¿¡´Â µî·Ï¹øÈ£°¡ ¹Ýµå½Ã ÀÖ¾î¾ßÇÑ´Ù. - Ãß°¡ÄÚµùÇÊ¿ä
						// Ÿº´¿øµî·Ï ¿©ºÎ , Y:Ÿº´¿ø,N:¿ì¸®º´¿ø
						if(anohosprgstflag == "Y"){
							// Èñ±Í³­Ä¡ ¹øÈ£¿©ºÎ
							if(rareobstno == null || rareobstno == '-'){
								messageBox("## Èñ±Í³­Ä¡Á¤º¸ ## : Ÿº´¿øµî·ÏÀ̳ª Èñ±Í³­Ä¡¹øÈ£°¡ ","I004");
							} else {
								btn_esscdiag.visible = true;
								btn_esscdiag.attribute("class") = "btn5_letter4";
								btn_esscdiag.attribute("color") = "#ff0066";
								
							}
						} else if(anohosprgstflag == "N"){
							// Èñ±Í³­Ä¡ ¹øÈ£¿©ºÎ
							if(rareobstno == null || rareobstno == '-'){
								if(signyn  == "Y"){
									btn_esscdiag.visible = true;
									btn_esscdiag.attribute("class") = "btn5_letter4";
									btn_esscdiag.attribute("color") = "#ff0066";
									
								} else {
									messageBox("## Èñ±Í³­Ä¡Á¤º¸ ## : Àç¿øº´¿øµî·ÏÀ̳ª µî·Ï¹øÈ£ ¹× ¼­¸íÁ¤º¸°¡ ","I004");
								}
							} else{
								btn_esscdiag.visible = true;
								btn_esscdiag.attribute("class") = "btn5_letter4";
								btn_esscdiag.attribute("color") = "#ff0066";
								
							}
						} else {
							// Èñ±Í³­Ä¡ data(mmohrooa)¿¡ Á¤º¸¾øÀ½.
							messageBox("## Èñ±Í³­Ä¡Á¤º¸ ## : µî·Ï¹øÈ£ ¹× ¼­¸íÁ¤º¸°¡ ","I004");
						}
					} else {
						btn_esscdiag.visible = true;
						btn_esscdiag.attribute("class") = "btn5_letter4";
						btn_esscdiag.attribute("color") = "#ff0066";
					}
				}
			} 
			// 20100224 ¹Úâ¿ø Èñ±Í³­Ä¡ »êÁ¤Æ¯·ÊÃß°¡
			var anohosprgstflag 	= model.getValue("/root/main/item13/rooa/anohosprgstflag");
			var rareobstno 		= model.getValue("/root/main/item13/rooa/rareobstno");
			var rareobstfromdd 	= model.getValue("/root/main/item13/rooa/rareobstfromdd");
			var rareobsttodd 	= model.getValue("/root/main/item13/rooa/rareobsttodd");
			var signyn 		= model.getValue("/root/main/item13/rooa/signyn");	
			var fromdd 		= model.getValue("/root/main/item1/iteminfo/indd1");
			
			if (insukind == "11" && suppkind != "32" && rareesscyn == "Y" && suppkind != "01" && suppkind != "50" && suppkind != "46" && fromdd >= "20090701" 
			   &&   ((anohosprgstflag == "N" && signyn == "Y") ||   (anohosprgstflag == "Y"  && rareobstfromdd <= fromdd && rareobsttodd >= fromdd)))  {
				fesscdiag();
			}else if(vcode == "V193" && suppkind != "32" && suppkind != "06" && suppkind != "40" && suppkind != "31" && suppkind != "69" && !(insukind == "22" && suppkind == "08")   ){ // Â÷»óÀ§ 1Á¾À϶§´Â µî·Ï¾Ï ¸Þ¼¼Áö°¡ ¾È³ª¿À°Ô 20090227 ¹Úâ¿ø 20100318 Á¤½Â¿ì ½Å»ý¾ÆÀ¯Çü/±Þ¿©2Á¾ 6¼¼¹Ì¸¸ À϶§ µî·Ï¾Ï ¸Þ¼¼Áö ³ª¿ÀÁö ¾Êµµ·Ï
				var msg = messageBox("µî·Ï¾ÏȯÀÚÀÔ´Ï´Ù. ÁßÁõ¿äÀ² Àû¿ë","S001");
				if(msg !=6){
					return;
				}else{
					Insuchange("06");
				}
				
			}else if(vcode == "V191" || vcode == "V192"){
				if (flag == "S") {
					var msg = messageBox("ÁßÁõ¼ö¼ú ȯÀÚÀÔ´Ï´Ù. ÁßÁõ¿äÀ² Àû¿ë","S001");
					if(msg !=6){
						return;
					}else{
						if (trgtManWindow == null) {
								open("SPPIJ01900" ,"", "10", "10", "SPPIJ01900","/root/hidden/sppij01900/cond", "/root/send/cond");
						} else {
							activateChild("SPPIJ01900");
							model.refresh();
						}
					}
				}
			} else {
				if (flag == "S") {
					//messageBox("ÀúÀåÀÌ","I002");
				}
				//ÁßÁõó¹æ¿©ºÎ üũ
				fChkEsscEDI();
			}					
	}
}

// º¯°æµÈ Åð¿øÈ®Á¤¿©ºÎ, ½É»ç»óÅ flag¸¦ ´ë»óÀÚÁ¶È¸È­¸é¿¡ º¸¿©ÁØ´Ù. (2008.01.28 ¹ÚÁö¿í Ãß°¡)
function fSetChildStat() {
	
	model.refresh();
	
	// ´ë»óÀÚÁ¶È¸È­¸é¿¡ ½É»ç»óŸ¦ ¾÷µ¥ÀÌÆ® º¸¿©ÁÖµµ·Ï ÇÑ´Ù. (2008. 01. 28 ¹ÚÁö¿í Ãß°¡, ½É»ç»óÅÂ¿Í Åð¿øÈ®Á¤¿©ºÎ, ÃÖÁ¾½É»çÀÚ, ½É»çÀÏÀÚ º¯°æ)
	var trgtManWindow = getChildWindow("SMPIJ00200");	// SMPIJ00600_ÀÔ¿øÀç¿ø½É»ç´ë»óÀÚÁ¶È¸.xrw
	if (trgtManWindow != null) {
		var dschjudgprcsstat 	= model.getValue("/root/main/item1/iteminfo/dschjudgprcsstat");				// ½É»ç»óÅÂ
		var dschnotiyn 			= model.getValue("/root/main/item1/iteminfo/dschnotiyn");					// Åð¿øÈ®Á¤¿©ºÎ
		var selectedRow = trgtManWindow.model.getValue("/root/hidden/selectedRow");
		var row = parseInt(selectedRow);
		
		if (row > 0) {
			trgtManWindow.model.setValue( "/root/main/list1/gridinpt[" + row + "]/dschjudgprcsstat", dschjudgprcsstat);
			trgtManWindow.model.setValue( "/root/main/list1/gridinpt[" + row + "]/dschnotiyn", dschnotiyn);
			trgtManWindow.model.setValue( "/root/main/list1/gridinpt[" + row + "]/lastjudgendid", VAL_usernm);
			trgtManWindow.model.setValue( "/root/main/list1/gridinpt[" + row + "]/lastjudgdt", VAL_today);
		}
	}
	// ³¡
}


// ÁßÁõó¹æüũ·ÎÁ÷ Ãß°¡   - 2007.11.27
// ÁßÁõó¹æ¸¸ ÀÖ°í »óº´ÀÌ ¾ø´Â°æ¿ì Alert¸Þ¼¼Áö¸¦ ¶ç¿î´Ù. 
// Á¶°Ç : ÁßÁõó¹æ Á¸Àç + ÁßÁõ¹öÆ° ¾øÀ½ + ÁßÁõ¿äÀ² ¾Æ´Ô
function fChkEsscEDI(){
	var chkBtn = btn_esscdiag.visible;
	var chkSuppkind = model.getValue("/root/main/item1/iteminfo/suppkindcd");
	var chkInsukind = model.getValue("/root/main/item1/iteminfo/insukindcd");
	
	if(chkBtn == "True" || chkSuppkind == "05" || chkSuppkind == "39"){ // 20090325 Â÷»óÀ§ 2Á¾ Ãß°¡ - ¹Úâ¿ø
		return;
	}
	if(chkInsukind != "11" && chkInsukind != "21" && chkInsukind != "22" ){
		return;	
	}
						
	var cEssc = instance1.selectSingleNode("/root/hidden/result/chkesscedi");
	if (cEssc == null) {	// ƯÁ¤³»¿ªÀÌ ¾ø´Â °æ¿ìÀÓ
		return;
	}else{
	modal("SPPIJ02100" ,"", "10", "10", "SPPIJ02100", "/root/hidden/result/chkesscedi", "/root/main/list1", "", "");
	}
}

// ¸¶°¨ °¡´É ¿©ºÎ üũ(ÀÓ½ÃÀû »ç¿ë)
function fChkClose() {
	var flag  = true;
	// ó¹æ³»¿ª¿¡ ÀÖ´Â ¹Ì½ÃÇà °ÇÀÌ ÀÖ´ÂÁö üũ 
	//ÀÌ°æ¹Î ¼Óµµ °³¼± for -> xpath
	var chkN = model.getValue("/root/main/list2/iscllist[execprcpstatcd='N']/execprcpstatcd");
	var chkO = model.getValue("/root/main/list2/iscllist[execprcpstatcd='O']/execprcpstatcd");
	if(chkN == "N" || chkO == "O"){
		flag = false;
	}

	return flag;
}

// grid ŸÀÌƲ Ä÷³ Á¤º¸
function getOrderInfoOfCol(grdid){
	
   	var refdata  = "";  // ref
   	var sizedata = "";  // size

  	var grdobj = document.controls.item(grdid);
   	var totcol   = grdobj.cols;
   	
   	for(var i = 0; i < totcol; i++){
      		var refval = grdobj.colAttribute(i, "ref");
      		refdata += refval + "^";
      
      		var sizeval = grdobj.colWidth(i);
      		sizedata += sizeval + "^";
   	}
   	
	refdata  = refdata.substring(0 , refdata.length-1);
	sizedata = sizedata.substring(0, sizedata.length-1);
	
	var scrnid =  model.getValue("/root/hidden/listval/uuee[compsnm='"+grdid+"']/scrnid");
	var compscnts =  model.getValue("/root/hidden/listval/uuee[compsnm='"+grdid+"']/compscnts");

	if (scrnid == "") {
		model.setValue("/root/send/listval/uuee/flag","I");
	} else {
		model.setValue("/root/send/listval/uuee/flag","U");
	}
	model.setValue("/root/send/listval/uuee/scrnid","SMPIJ00300");
	model.setValue("/root/send/listval/uuee/compsnm",grdid.toString());
	model.setValue("/root/send/listval/uuee/compscnts",refdata);
	model.setValue("/root/send/listval/uuee/compsrefcnts","-");
	model.setValue("/root/send/listval/uuee/compssizecnts",sizedata);
	   
	if ( submit("TXPIJ00402") ) {
		messageBox("»ç¿ëÀÚ È¯°æ ÀúÀåÀÌ","I002");
	}
}

// grid ŸÀÌƲ Ä÷³ Á¤º¸
function getOrderInfoOfRdo(rdoid){
	
   	var refdata  = "";  // ref
   	var sizedata = "";  // size

	var scrnid =  model.getValue("/root/hidden/listval/uuee[compsnm='"+rdoid+"']/scrnid");
	var compscnts =  model.getValue("/root/hidden/listval/uuee[compsnm='"+rdoid+"']/compscnts");
	var calcamtflag = model.getValue("/root/hidden/list1/isclcond/calcamtflag")
	if (scrnid == "") {
		model.setValue("/root/send/listval/uuee/flag","I");
	} else {
		model.setValue("/root/send/listval/uuee/flag","U");
	}
	model.setValue("/root/send/listval/uuee/scrnid","SMPIJ00300");
	model.setValue("/root/send/listval/uuee/compsnm",rdoid);
	model.setValue("/root/send/listval/uuee/compscnts",(calcamtflag.length == 0 ? "-" : calcamtflag));
	model.setValue("/root/send/listval/uuee/compsrefcnts", "-");
	model.setValue("/root/send/listval/uuee/compssizecnts","-");
	   
	if ( submit("TXPIJ00402") ) {
		//messageBox("»ç¿ëÀÚ È¯°æ ÀúÀåÀÌ","I002");
	}
}

function getOrderInfoOfChk(chkid){
	
	var scrnid =  model.getValue("/root/hidden/listval/uuee[compsnm='"+chkid+"']/scrnid");
	var compscnts =  model.getValue("/root/hidden/listval/uuee[compsnm='"+chkid+"']/compscnts");
	var chkval = model.getValue("/root/hidden/list1/isclcond/" + chkid.replace("chk_",""));
	
	if (scrnid == "") {
		model.setValue("/root/send/listval/uuee/flag","I");
	} else {
		model.setValue("/root/send/listval/uuee/flag","U");
	}
	
	model.setValue("/root/send/listval/uuee/scrnid","SMPIJ00300");
	model.setValue("/root/send/listval/uuee/compsnm",chkid);
	model.setValue("/root/send/listval/uuee/compscnts",(chkval.length == 0 ? "N" : chkval));
	model.setValue("/root/send/listval/uuee/compsrefcnts", "-");
	model.setValue("/root/send/listval/uuee/compssizecnts","-");
	   
	if ( submit("TXPIJ00402") ) {
		//messageBox("»ç¿ëÀÚ È¯°æ ÀúÀåÀÌ","I002");
	}
}

// »ç¿ëÀÚº° grid ŸÀÌƲ Ä÷³ ¼³Á¤
function setOrderInfoOfCol(grdid, refdata, sizedata){
	
   	var grdobj  = document.controls.item(grdid);
   	var refarr  = refdata.split("^");
   	var sizearr = sizedata.split("^");
   
   	for(var i = 0; i < refarr.length; i++){
      		var colcnt = grdobj.colref("" + refarr[i] + "");
      		grdobj.colMove(i, colcnt, "before",false);

      		var size = sizearr[i];
      		grdobj.colWidth(i) = eval(size);
  	}
 	grdobj.refresh();
 	var caption = "";
  	for( var i = 1; i < grdobj.cols ; i++ ){
		if (caption == "") {
			caption = grdobj.textMatrix(0,i);								
		} else {
			caption += "^" + grdobj.textMatrix(0,i);
		}							
	}
 	grdobj.caption = caption;
}

// Áß°£Ã»±¸µî·Ï È­¸é¿¡¼­ Á¶È¸µÈ ȯÀÚ°¡ Áß°£ û±¸ µî·ÏÀÌ µÈ °æ¿ì.
function fSetMidregist(midcflag) {
	
	btn_midregist.disabled = false;
	
	if(midcflag == "Y"){
		btn_midregist.attribute("class") = "btn2_letter6";
		btn_midregist.attribute("color") = "#ff0066";
		btn_midregistyn.disabled = true;
		btn_midcomplete.disabled = false;
		btn_midcancel.disabled = false;
		
	} else {
		btn_midregist.attribute("class") = "btn2_letter6";
		btn_midregistyn.attribute("class") = "btn2_letter6";
		btn_midregistyn.disabled = false;
		btn_midcomplete.disabled = true;
		btn_midcancel.disabled = true;
	}
}

//À¯ÇüÀû¿ë ¿Ï·áÈÄ ¼Ò±Þó¸® ÇÑ´Ù. - 20080730 ¼ö°¡°è»êÀ» ³¯Â¥º°·Î loop. - ¹Úâ¿ø
function fReCalc() {
	// ÀÔ¿øÀÏ ºÎÅÍ ÇöÀç±îÁö °è»êÇÑ´Ù(ÀÏÀÏ´ÜÀ§·Î loop)			
	var fromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
	var todd = model.getValue("/root/main/item1/iteminfo/todd");
	if (todd == "99991231") {
		todd = VAL_today;
	}
	var period = getDateInterval(fromdd, todd);
	// fromddºÎÅÍ currentdate±îÁö loop
	for (i=1; i<= (period+1); i++) {
		model.setValue("/root/send/calcbasedd" ,  fromdd); 

		var rslt =  submit("TXPIJ00205",false);
	
	if (rslt == false ) { 
	 	return false;
	}
	
	// fromdd¸¦ Áõ°¡½ÃŲ´Ù(ÇϷ羿)
	fromdd = fromdd.toDate("YYYYMMDD");
	fromdd = fromdd.getAddDate(1);
	fromdd = fromdd.getDateFormat();

	}
}

// SPPIZ00700_½É»çCommentÁ¶È¸.xrw È£Ãâ(½É»çÀÚ¸Þ¸ð,EDI¸Þ¸ð)
function fGetJudgEdiComment(memoflag, memocls) {
	model.resetInstanceNode("/root/hidden/sppiz00700/rslt");
	model.resetInstanceNode("/root/hidden/sppiz00700/cond");
	model.setValue("/root/hidden/sppiz00700/cond/memoflag", memoflag);
	model.setValue("/root/hidden/sppiz00700/cond/memocls",  memocls);
	
	
	modal("SPPIZ00700" ,"", "10", "10", "SPPIZ00700", "/root/hidden/sppiz00700", "/root/send/sppiz00700", "", "");
}

// ¼öÁ¤Ãß°¡ 20090813 ¿Ü·¡¿äÀ²È¯ÀÚ ÀÏ°æ¿ì º¸Çè, º¸Á¶À¯Çü Á¤º¸°¡ ¸Â´ÂÁö È®ÀÎÇÏ¿© alertó¸®ÇÔ. 
function fOutRateInsuSuppflag(){
	//¼Óµµ°³¼± ÅëÇÕ plet2
	//submit("TRPIJ00316");
	if(model.getValue("/root/main/outrateinsusuppflag/info/yn") == "N"){
		messageBox("6½Ã°£ ¹Ì¸¸À¸·Î ¿Ü·¡¿äÀ² Åð¿ø°ÇÀÔ´Ï´Ù. \nȯÀÚ¿¡°Ô ÇØ´çÇÏ´Â º¸Á¶À¯ÇüÀ» ¼±ÅÃÇÏ¿© º¯°æÇϽðí Àç°è»ê ÇÑÈÄ ½É»ç","I008");
	}
}

//Æò°¡¸Þ¸ð °ü·Ã Æ˾÷â¼¼ÆÃ
function fSetTstMemoRefresh(){
	
	var memo = model.getValue("/root/hidden/sppiz00700/rslt/memo");
	var tmp = model.getValue("/root/main/item1/iteminfo/edirmk");
	
	if(tmp){
		tmp = tmp + " ";
	}
	model.setValue("/root/main/item1/iteminfo/tstrmk",tmp + memo);
	//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î ´ëü 20080731 ¹Úâ¿ø
	model.refresh();
}

function fSetRdoReset(){
	var rdo_name = model.getValue("/root/hidden/listval/uuee[compsnm='rdo_zerofilter']/compsnm");
	var rdo_val = model.getValue("/root/hidden/listval/uuee[compsnm='rdo_zerofilter']/compscnts");
	if (rdo_name.length > 0) {
		if (rdo_val == "calcamt!='0' or matractflag='0'"){
			model.setValue(rdo_zerofilter.attribute("ref"), "0");
			model.setValue("/root/hidden/list1/isclcond/calcamtflag",rdo_val );
		} else if (rdo_val == "calcamt='0'") {
			model.setValue(rdo_zerofilter.attribute("ref"), "1");
			model.setValue("/root/hidden/list1/isclcond/calcamtflag",rdo_val );
		} else {
			model.setValue(rdo_zerofilter.attribute("ref"), "-");
			model.setValue("/root/hidden/list1/isclcond/calcamtflag","");
		}
		
	} else {
		model.setValue(rdo_zerofilter.attribute("ref"), "0");
		model.setValue("/root/hidden/list1/isclcond/calcamtflag","calcamt!='0' or matractflag='0'");
	}
	
	var chk_name = model.getValue("/root/hidden/listval/uuee[compsnm='chk_showsubtotal']/compsnm");
	var chk_val = model.getValue("/root/hidden/listval/uuee[compsnm='chk_showsubtotal']/compscnts");
	
	if (chk_name.length > 0) {
		if (chk_val == "Y"){
			model.setValue("/root/hidden/list1/isclcond/showsubtotal", chk_val);
		} else {
			model.setValue("/root/hidden/list1/isclcond/showsubtotal", "");
		}
	} else {
		model.setValue("/root/hidden/list1/isclcond/showsubtotal", "");
	}
	
	chk_name = model.getValue("/root/hidden/listval/uuee[compsnm='chk_showitemcoloryn']/compsnm");
	chk_val = model.getValue("/root/hidden/listval/uuee[compsnm='chk_showitemcoloryn']/compscnts");
	
	if (chk_name.length > 0) {
		if (chk_val == "Y"){
			model.setValue("/root/hidden/list1/isclcond/showitemcoloryn", chk_val);
		} else {
			model.setValue("/root/hidden/list1/isclcond/showitemcoloryn", "");
		}
	} else {
		model.setValue("/root/hidden/list1/isclcond/showitemcoloryn", "");
	}
	
	model.setValue(rdo_actmatflag.attribute("ref"), "-");
	model.setValue(rdo_actingflag.attribute("ref"), "all");
	model.setValue(rdo_insuflag.attribute("ref"), "-");
	model.setValue(rdo_ordfilflag.attribute("ref"), "-");
	model.setValue(rdo_cpflag.attribute("ref"), "-");
	
	model.setValue("/root/hidden/list1/isclcond/matractflag","");
	model.setValue("/root/hidden/list1/isclcond/calcpayflag","");
	model.setValue("/root/hidden/list1/isclcond/snglcalcscorcls","");
	model.setValue("/root/hidden/list1/isclcond/cpflag","");
	model.setValue("/root/hidden/list1/isclcond/edicd","");
	model.setValue("/root/hidden/list1/isclcond/snglcalcscorcd","");
	model.setValue("/root/hidden/list1/isclcond/actingflag","");
}

function openSMMMR06900() {
	var chk = model.getValue("/root/main/item1/iteminfo/patnm");
	
	if(chk){
		var trgtManWindow = getChildWindow("SMMMR06900");
	
		if (trgtManWindow == null) {
			modal("SMMMR06900");
			//modal("SMMMR06901" ,"", "10", "10", "SPPIJ02501", "/root/hidden/sppij02501/cond", "/root/send", "", "");
		}else{
			activateChild("SMMMR06900");
		}
		
	
	}
}

function fGetDrgOpenPopup(flag){
	//DRG ¼³Á¤..½ÃÀÛ
	var opchkyn =  model.getValue("/root/main/item11/drginfo/opchkyn");
	var drgmchkyn = model.getValue("/root/main/item11/drginfo/drgmchkyn");
	var fromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
	var indaycnt = parseInt(model.getValue("/root/main/list1/insulist[fromdd='"+fromdd+"']/indaycnt"));
	var dschjudgprcsstat = model.getValue("/root/main/item1/iteminfo/dschjudgprcsstat");
	var cnt = getNodesetCount("/root/main/list2/iscllist[drgacptflag='C']/drgacptflag");
	var snglcalcscorcd = model.getValue("/root/main/list2/iscllist[drgacptflag='C']/snglcalcscorcd");
	
	/* DRG Ãß°¡ÀÎÁ¤ ¼ö¼ú·áÀÇ »êÁ¤Àǹ̸¦ üũÇÒ ÇÊ¿ä°¡ ¾ø´Ù!! Ãß°¡ÀÎÁ¤±Ý¾× »ý¼º ½Ã Á¦¿ÜÇÏ°í ¹ß»ýÇϹǷÎ!! (2015.06.24 LEJ) 
	if (cnt > 0 && dschjudgprcsstat != "C") {
		var estmcd000 = getNodesetCount("/root/main/list2/iscllist[drgacptflag='C' and estmcd='000']/drgacptflag");
		var estmcd004 = getNodesetCount("/root/main/list2/iscllist[drgacptflag='C' and estmcd='004']/drgacptflag");
		var estmcd = getNodesetCount("/root/main/list2/iscllist[drgacptflag='C' and estmcd='']/drgacptflag");
		if (estmcd000 > 0 || estmcd004 > 0 || estmcd > 0) {
		} else {
			messageBox("["+snglcalcscorcd+"] DRG Ãß°¡ ÀÎÁ¤ ¼ö¼ú·áÀÔ´Ï´Ù. »êÁ¤Àǹ̸¦","I007");
			return false;
		}
	}
	*/
	
	if (opchkyn=="Y" && indaycnt <= 30) {
		
		// DRG ´ë»óÀÚ Áß Ç÷¿ìº´ ƯÁ¤±âÈ£: V009, HIV ƯÁ¤±âÈ£: V103 Á¸Àç ½Ã DRG Á¦¿Ü ´ë»óÀÚ ¸Þ¼¼Áö
		var drgexceptyn = model.getValue("/root/main/item11/endcnclstat/drgexceptyn");
		if (drgexceptyn == "Y") {
			if ( messageBox("DRG Á¦¿Ü »óº´(Ç÷¿ìº´ ¶Ç´Â HIV)ÀÌ Á¸ÀçÇÏ´Â DRG ´ë»óÀÚ ÀÔ´Ï´Ù. ¸¶°¨","Q004") != 6 ) {
				return false;
			}
		}

		if (flag == "O") { openSMMMR06900(); }
		
		var vpid = model.getValue("/root/main/item1/iteminfo/pid");
		var indd = model.getValue("/root/main/item1/iteminfo/indd1");
		var ordfromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
		var cretno = model.getValue("/root/main/item1/iteminfo/cretno");
	
		setParameter("pid", vpid);
		setParameter("indd", indd);
		setParameter("ordfromdd", ordfromdd);
		setParameter("cretno", cretno);
		setParameter("drgmstat", flag);
		
		modal("SPPIJ03200" ,"", "10", "10", "SPPIJ03200", "/root/hidden/sppij03200/cond", "/root/send/data/drginfo", "", "");
		
		if (model.getValue("/root/main/item11/drginfo/rslt") != "true") {
			return false;
		}
	}
	//DRG¿Ï·á
}

function fGetKDrgOpenPopup(flag){
	var vpid = model.getValue("/root/main/item1/iteminfo/pid");
	var indd = model.getValue("/root/main/item1/iteminfo/indd1");
	var ordfromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
	var cretno = model.getValue("/root/main/item1/iteminfo/cretno");

	setParameter("pid", vpid);
	setParameter("indd", indd);
	setParameter("ordfromdd", ordfromdd);
	setParameter("cretno", cretno);
	setParameter("drgmstat", flag);
	
	open("SPPIJ04000" ,"", "10", "10", "SPPIJ04000", "/root/hidden/sppij03200/cond", "/root/send/data/drginfo", "", "");
}

/*
½É»ç¿Ï·áÀü»óº´Æ¯Á¤³»¿ªÃ¼Å© 2013.07.10 plet2
16¼¼¹Ì¸¸, 35¼¼ ÀÌ»ó ÃÊ»ê »ê¸ð Çʼö Áø´Ü üũ
ƯÁ¤ ºÐ¸¸Áø´Ü¿¡ Çʼö ºÎÁø´Ü À¯¹« üũ
ÀÓ½ÅÁÖ¼öº° üÁß°ú Áø´Ü üũ
*/
function fGetDiagSpclcdCheck(){
	var diagnode = "/root/main/list3/diaglist";
	var spclnode = "/root/main/list4/clcjlist";
	var isclnode =  "/root/main/list2/iscllist";
	var chk_diagcd =  model.getValue(diagnode+"[seqno='1']/diagcd"); //ÁÖ»óº´ÄÚµå
	var chk_O3420 =  model.getValue(diagnode+"[diagcd='O3420']/diagcd");
	var chk_prgweekcnt = model.getValue("/root/main/clcjnbwt/clcjnbwtlist/prgweekcnt"); //ÀÓ½ÅÁÖ¼ö
	var chk_weig =  model.getValue("/root/main/clcjnbwt/clcjnbwtlist/weig"); //½Å»ý¾ÆüÁß
	var chk_O365 =model.getValue(diagnode+"[diagcd='O365' or diagcd='O366' ]/diagcd"); //ÀÓ½ÅÁÖ¼ö»óº´ÄÚµå
	var chk_poaflag = getNodesetCount(diagnode+"[diagcd!='' and poaflag='']/diagcd"); //poaflag
	//16¼¼¹Ì¸¸, 35¼¼ ÀÌ»ó ÃÊ»ê »ê¸ð Çʼö Áø´Ü üũ
	var chk_R=  model.getValue(isclnode+"[snglcalcscorcd='R4351' " +
												"or snglcalcscorcd='R3131' " +
												"or snglcalcscorcd='R3141' " +
												"or snglcalcscorcd='R4361' " +
												"or snglcalcscorcd='R4519' " +
												"or snglcalcscorcd='R4517' " +
												"]/snglcalcscorcd"); // ÃÊ»ê »óº´Ã¼Å©
	var patage = parseInt(model.getValue("/root/main/item1/iteminfo/age"));
	var result = true;

	if (chk_R.length > 0 && (patage >= 35 || patage < 16) ) {
		if(messageBox("¾î¸° ÃÊÀӺΠ¶Ç´Â °í·ÉÃÊÀӺΠȯÀÚÀÔ´Ï´Ù.", "Q003") == 6) {
			result = true;
		} else {
			result = false;
		}
	}
	
	//ƯÁ¤ ºÐ¸¸Áø´Ü¿¡ Çʼö ºÎÁø´Ü À¯¹« üũ
	//O820ÀÌ ÁÖ»óº´ÀΠȯÀÚ°¡ O3420 »óº´ÀÌ ¾øÀ» °æ¿ì üũ
	if (chk_diagcd == 'O820' && chk_O3420.length == 0 ) {
		if(messageBox("¹Ýº¹Á¦¿ÕÀý°³ ȯÀÚÀÔ´Ï´Ù.", "Q003") == 6) {
			result = true;
		} else {
			var ans = messageBox("O3420 »óº´À» ÀÔ·Â" , "S001");
			if (ans==6){
				model.setFocus("grd_diaglist");
				//fDiagGridInsertRow();
				grd_diaglist.bottomRow = grd_diaglist.rows;
				model.refresh();
				
				var maxseq = model.getXPathValue("max("+diagnode+"[*]/seqno)");
				model.setValue(diagnode+"[seqno='"+maxseq+"']/diagcd","O3420");
				model.setValue(diagnode+"[seqno='"+maxseq+"']/diagnm","ÀÌÀüÀÇ Á¦¿ÕÀý°³·Î ÀÎÇÑ ÈäÅÍÀÇ »ê¸ð °ü¸®");
			}

			result = false;
		}
	}
	
	//ÀÓ½ÅÁÖ¼öº° üÁß°ú Áø´Ü üũ
	//½Å»ý¾Æ üÁß°ü·Ã »óº´´©¶ôÀÔ´Ï´Ù (O365 or O366)
	if (chk_prgweekcnt.length > 0 && chk_weig.length > 0) {
		var nwbabyweight = parseInt(chk_weig);
		var minweight = parseInt(model.getValue("/root/main/nbwt/nbwtlist[prgntweek='"+chk_prgweekcnt+"']/minweight"));
		var maxweight = parseInt(model.getValue("/root/main/nbwt/nbwtlist[prgntweek='"+chk_prgweekcnt+"']/maxweight"));
		
		if (chk_O365.length == 0 && (nwbabyweight <= minweight || nwbabyweight >= maxweight ) ) {
			if(messageBox("½Å»ý¾Æ üÁß°ü·Ã »óº´´©¶ô ȯÀÚÀÔ´Ï´Ù.", "Q003") == 6) {
				result = true;
			} else {
				result = false;
			}
		}
	}
	
	var opchkyn =  model.getValue("/root/main/item11/drginfo/opchkyn");
	var fromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
	var indaycnt = parseInt(model.getValue("/root/main/list1/insulist[fromdd='"+fromdd+"']/indaycnt"));

	if (opchkyn=="Y" && indaycnt <= 30) {
		if (chk_poaflag > 0) {
			messageBox("»óº´ÀÇ POAÁ¤º¸´Â", "I003");
			return false;		
			
/*  »çÈÄ¿¡ ¿¡·¯¹ß»ýÀ¸·Î ¸ðµç»óº´ POAÁ¤º¸ ¾øÀ¸¸é ÁøÇàµÇÁö¾Êµµ·Ï ¼öÁ¤. 2014.01.17 plet2		
 *			if(messageBox("»óº´¿¡ POAÁ¤º¸°¡ ¾ø½À´Ï´Ù.", "Q003") == 6) {
				result = true;
			} else {
				result = false;
			}*/
		}
	}
}

//2013.07.18 ÀÌ°æ¹Î ¿äÀ²º¯°æ °øÅëÈ£ÃâÇÔ¼ö Á¤¸®
function Insuchange(suppkind) {
	var pid = model.getValue("/root/main/item1/iteminfo/pid");
	var indd = model.getValue("/root/main/item1/iteminfo/indd1");
	var cretno = model.getValue("/root/main/item1/iteminfo/cretno");
	var mskind = model.getValue("/root/main/item1/iteminfo/mskind");
	var fromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
	var seqno = model.getValue("/root/main/item1/iteminfo/seqno");
	if (seqno == "") {
		seqno = "1"
	}
	var todd = model.getValue("/root/main/item1/iteminfo/todd");
	var insukind = model.getValue("/root/send/insukind");
	var instcd = model.getValue("/root/main/item1/iteminfo/instcd");
	var indschacptstat = model.getValue("/root/main/item1/iteminfo/indschacptstat");
		
	model.setValue("/root/hidden/item2/insuchange/iphs_status","B");
	model.setValue("/root/hidden/item2/insuchange/iphs_pid",pid);
	model.setValue("/root/hidden/item2/insuchange/iphs_indd",indd);
	model.setValue("/root/hidden/item2/insuchange/iphs_cretno",cretno);
	model.setValue("/root/hidden/item2/insuchange/iphs_mskind",mskind);
	model.setValue("/root/hidden/item2/insuchange/iphs_fromdd",fromdd);
	model.setValue("/root/hidden/item2/insuchange/iphs_seqno",seqno);
	model.setValue("/root/hidden/item2/insuchange/iphs_todd",todd);
	model.setValue("/root/hidden/item2/insuchange/iphs_insukind",insukind);
	model.setValue("/root/hidden/item2/insuchange/iphs_suppkind",suppkind);	
	model.setValue("/root/hidden/item2/insuchange/iphs_instcd",instcd);	
	model.setValue("/root/hidden/item2/insuchange/iphs_indschacptstat",indschacptstat);	
	
	model.removenode("/root/hidden/insuchange/rslt");

	var receiptyn = model.getValue("/root/main/item1/iteminfo/receiptyn");
	if (receiptyn != "") {
		messageBox("Åð¿ø(°¡Åð¿ø) ¼ö³³ÀÌ µÇ¾úÀ¸¹Ç·Î À¯Çüº¯°æÀ»","E001");
		return false;
	}
	
	if(submit("TXPIJ00305", false)){
		if(messageBox("À¯Çüº¯°æÀÌ ¿Ï·á µÇ¾ú½À´Ï´Ù. º¯°æµÈ ³»¿ªÀÇ ¼Ò±Þ󸮸¦", "Q004") == 6){
			// ·Îµùâ ¿­±â
			 var sWindowMsg = "¼ö°¡°è»êÁßÀÔ´Ï´Ù...";
			callLoadingWindow(sWindowMsg);
			fReCalc() ;
			// ·Îµù⠴ݱâ
			removeLoadingWindow();
			messageBox("¼Ò±Þ°è»êÀÌ","I001");
		}
	}
	model.refresh();
	grp_changeownbrate.visible = false;
	fGetItemInfo();
}

/**
 * @desc   : Åð¿ø¿¹°íÀÏÀÚ ÀÌÈÄÀÇ Ã³¹æ Á¸Àç À¯¹« È®ÀÎ(submit)
 * @param  : 
 * @return : true, false
 * @authur : ÀÌ°æ¹Î 2013. 8. 5
 */
function fCheckReturnPrcpExist(){
	var bRtn = true;
	
	var pid       = model.getValue("/root/main/item1/iteminfo/pid")
	var indd      = model.getValue("/root/main/item1/iteminfo/indd1")
	var cretno    = model.getValue("/root/main/item1/iteminfo/cretno")
	
	model.makeValue("/root/dschreturnprcp/reqdata/pid",       pid);
	model.makeValue("/root/dschreturnprcp/reqdata/indd",      indd);
	model.makeValue("/root/dschreturnprcp/reqdata/cretno",    cretno);
	
	model.resetInstanceNode("/root/checkreturnprcp/rtndata/cnt");	
	if(submit("TRMMO00404")){
	    var nCnt = model.getValue("/root/checkreturnprcp/rtndata/cnt");
	    
	    if(nCnt > 0) {
			setParameter("SPMMO50400_pid",         pid);
			setParameter("SPMMO50400_indd",        indd);
			setParameter("SPMMO50400_cretno",      cretno);
			modal("SPMMO50400");
			bRtn = false;
	    }
    }
	
    return bRtn;
}
//Áß°£Ã»±¸µî·Ï
function fmidregist() {
	var chk = model.getValue("/root/main/item1/iteminfo/patnm");
	var indd = model.getValue("/root/main/item1/iteminfo/indd");
	
	if(chk){						
		if(ipt_pid.currentText.length >1){
			if(indd.length>1){	
				//var trgtManWindow = getChildWindow("SMPIJ01100");
				var trgtManWindow = getChildWindow("SMPIJ02300");
								
				var patunitsrch1 = model.getValue("/root/main/item1/iteminfo/pid").getTrim();	// (stringHelper.js) ¹®ÀÚ¿­ ¾ÕµÚ¿¡ ÀÖ´Â °ø¹é Á¦°Å

				// 2008.01.23 ¹ÚÁö¿í ¼öÁ¤ (Áß°£Ã»±¸µî·ÏÈ­¸é¿¡ ³Ñ°ÜÁÖ´Â µ¥ÀÌÅÍ Ãß°¡ - pid, indd)
				model.removenode("/root/hidden/midclam");
				model.makeValue("/root/hidden/midclam/pid", patunitsrch1);
				model.makeValue("/root/hidden/midclam/indd", model.getValue("/root/main/item1/iteminfo/indd"));
					
				if (trgtManWindow == null) {
					open("SMPIJ02300" ,"", "10", "10", "SMPIJ02300", "/root/hidden/midclam", "/root/hidden/midclam");
				} else {
					activateChild("SMPIJ02300");
					trgtManWindow.javascript.fGetMidClamList();
				}
				model.refresh();
			}
		}
	}
}
//ºÐÇÒÁ¦¿Üµî·Ï
function fmidregistyn() {
	var chk = model.getValue("/root/main/item1/iteminfo/patnm");
	
	if(chk){
		var midregistyn = model.getValue("/root/main/item1/iteminfo/midregistyn");
		if (midregistyn == "Y") {
			if (submit("TXPIJ00307", false)) {
				btn_midregist.attribute("class") = "btn2_letter6";
				btn_midregist.disabled = false;
				btn_midregistyn.attribute("class") = "btn2_letter6";
				//btn_midregistyn.attribute("color") = "#ff0066";
				model.setValue("/root/main/item1/iteminfo/midregistyn", "N");
				messageBox("ºÐÇÒÁ¦¿Ü µî·Ï Ãë¼Ò°¡","I002");
			}
		} else {
			if (submit("TXPIJ00307"), false) {
				btn_midregist.attribute("class") = "btn2_letter6";
				btn_midregist.disabled = true;
				btn_midregistyn.attribute("class") = "btn2_letter6";
				btn_midregistyn.attribute("color") = "#ff0066";
				model.setValue("/root/main/item1/iteminfo/midregistyn", "Y");
				
				messageBox("ºÐÇÒÁ¦¿Ü µî·ÏÀÌ","I002");
			}
		}
	}
}

//¾Ö±â/¾ö¸¶
function fbabymother() {
	var chk = model.getValue("/root/main/item1/iteminfo/patnm");

	if(chk){
		var readonly = model.getValue("/root/send/readonly");
		// 6½Ã°£ ¹Ì¸¸ ȯÀÚÀÏ °æ¿ì Block - 20081005 ¹Úâ¿ø
		var sixtimyn = model.getValue("/root/main/item1/iteminfo/sixtimyn");
		// openÀÏ°ü·Ã Àû¿ë - 20090302 - ÇϵåÄÚµù Á¦°Å,È®»êº´¿ø µ¥ÀÌÅÍ ¹Ìµî·Ï ¶§¹®¿¡ ¿¹¿Üó¸®ÇÔ 
		var opendd = model.getValue("/root/main/item1/iteminfo/opendd");
		// ÀÌ·Â ±×¸®µå³»¿¡¼­ º¸Á¶À¯ÇüÀÌ 09(ÀÚ¿¬ºÐ¸¸) ÀÖ´Â °æ¿ì ÀÌ¹Ì ¸éÁ¦±â°£ÀÌ Àû¿ëµÈ °æ¿ì
		// ºÐ¸¸½Å»ý¾Æ°ü¸® È­¸é¿¡¼­ ¸éÁ¦±â°£Àû¿ë ¹öÆ° ºñÈ°¼ºÈ­ (2008.01.29 ¹ÚÁö¿í Ãß°¡)
		var fromdd = "";
		var todd = "";
		var seqno = model.getValue("/root/main/item1/iteminfo/seqno");
		var indd = model.getValue("/root/main/item1/iteminfo/indd1");
		var dschnotidt = model.getValue("/root/main/item1/iteminfo/dschnotidt");
		var dschnotiyn = model.getValue("/root/main/item1/iteminfo/dschnotiyn");
		var cfe =  model.getValue("/root/main/item1/iteminfo/cfe");

		for (var i = 1; i < grd_insuhistory.rows; i++) {
			var suppkind = model.getValue("/root/main/list1/insulist["+i+"]/suppkind");
			if (suppkind == "09" || suppkind == "42") {
				fromdd	= model.getValue("/root/main/list1/insulist["+i+"]/fromdd");
				todd		= model.getValue("/root/main/list1/insulist["+i+"]/dschnotidt");
				seqno 	= model.getValue("/root/main/list1/insulist["+i+"]/seqno");
			} 
		}
		
		model.setValue("/root/hidden/sppiz01200/cond/pid",model.getValue("/root/main/item1/iteminfo/pid"));
		model.setValue("/root/hidden/sppiz01200/cond/indd",indd);
		model.setValue("/root/hidden/sppiz01200/cond/cretno",model.getValue("/root/main/item1/iteminfo/cretno"));
		model.setValue("/root/hidden/sppiz01200/cond/mskind",model.getValue("/root/main/item1/iteminfo/mskind"));
		model.setValue("/root/hidden/sppiz01200/cond/brateflag",model.getValue("/root/main/item1/iteminfo/brateflag"));
		model.setValue("/root/hidden/sppiz01200/cond/brthdd",model.getValue("/root/main/item1/iteminfo/brthdd"));
		model.setValue("/root/hidden/sppiz01200/cond/dschnotidt",dschnotidt);
		model.setValue("/root/hidden/sppiz01200/cond/dschnotiyn",dschnotiyn);
		model.setValue("/root/hidden/sppiz01200/cond/calcbasedd", '-');
		model.setValue("/root/hidden/sppiz01200/cond/seqno", seqno);
		model.setValue("/root/hidden/sppiz01200/cond/cfe", cfe);
		
		// ½É»ç¸¶°¨À̳ª Åð¿øÇÑ È¯ÀÚ´Â ¸éÁ¦ÀÏÀÚÀû¿ëÀ̳ª ÇØÁ¦¸¦ ½Ãų ¼ö ¾ø´Ù. - 20080924 ¹Úâ¿ø
		// ±âÁ¸¿¡´Â ½É»ç¸¶°¨À̳ª Åð¿ø¿©ºÎ¸¦ ÀνºÅϽº¿¡¼­ °¡Á®¿À´ø °ÍÀ» ½Ç½Ã°£ üũ·Î º¯°æ - 20080927 ¹Úâ¿ø
		if (!submit("TRPIJ00315", false)) {
			messageBox("½Ç½Ã°£ ȯÀÚ»óÅ üũ¿¡ ½ÇÆÐ Çß½À´Ï´Ù. ½Ã½ºÅÛ ¿À·ùÀÔ´Ï´Ù.°ü¸®ÀÚ ¹®ÀÇ ÈÄ", "C003");
			return;
		}
		var indschacptstat = model.getValue("/root/main/item1/iteminfo/indschacptstat");
		var dschjudgprcsstat = model.getValue("/root/main/item1/iteminfo/dschjudgprcsstat");

		// Áß°£Ã»±¸ ¿©ºÎ¸¦ ÆÇ´ÜÇؼ­ ºí·ÎÅ· - 20081017 ¹Úâ¿ø
		var lastmdlclamdd = model.getValue("/root/main/item1/iteminfo/lastmdlclamdd");
		var fromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
		if (lastmdlclamdd > fromdd && lastmdlclamdd > opendd  && lastmdlclamdd != "" ) {
			model.setValue("/root/hidden/sppiz01200/cond/saveyn","Y");
		}
		if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E" || indschacptstat == "D"  || readonly == "Y") {
			model.setValue("/root/hidden/sppiz01200/cond/saveyn","Y");
		} else {
			model.setValue("/root/hidden/sppiz01200/cond/saveyn","N");
		}
		
		// fromdd ¿Í todd ¿¡ °ªÀÌ ÀÖÀ¸¸é ¸éÁ¦±â°£ Àû¿ëµÈ ȯÀÚÀÓÀ» ¾Ë·ÁÁÖ´Â flag ¼¼ÆÃ
		if (fromdd != "" && todd != "") {
			model.setValue("/root/hidden/sppiz01200/cond/disyn","Y");
		} else {
			model.setValue("/root/hidden/sppiz01200/cond/disyn","N");
		}
		
		if (sixtimyn == "Y") {
			messageBox("6½Ã°£ ¹Ì¸¸ »óÅ ÀÔ´Ï´Ù. ÀÚ¿¬ºÐ¸¸ ¿äÀ²À» ¼³Á¤(ÀúÀå) ","E001");
		}
		
		model.setValue("/root/hidden/sppiz01200/cond/fromdd",fromdd);
		model.setValue("/root/hidden/sppiz01200/cond/todd",todd);

        var trgtManWindow = getChildWindow("SPPIZ01200");

		if (trgtManWindow == null) {
			open("SPPIZ01200" ,"", "10", "10", "SPPIZ01200","/root/hidden/sppiz01200/cond", "/root/hidden/sppiz01200/cond");
		} else {
			activateChild("SPPIZ01200");
			model.refresh();
		}
	}
}

//¼ö¼ú(À¯)
function foperdiag() {
	var chk = model.getValue("/root/main/item1/iteminfo/patnm");
	if(chk){
        var trgtManWindow = getChildWindow("SPPIZ01300");
		var indd = model.getValue("/root/main/item1/iteminfo/indd1");
		
		model.setValue("/root/hidden/sppiz01300/cond/pid",model.getValue("root/main/item1/iteminfo/pid"));
		model.setValue("/root/hidden/sppiz01300/cond/indd",indd);
		model.setValue("/root/hidden/sppiz01300/cond/cretno",model.getValue("root/main/item1/iteminfo/cretno"));

		if (trgtManWindow == null) {
			open("SPPIZ01300" ,"", "10", "10", "SPPIZ01300","/root/hidden/sppiz01300/cond", "/root/send/data1");
		} else {
			activateChild("SPPIZ01300");
			model.refresh();
		}
	}
}

//Áß°£¸¶°¨Ãë¼Ò
function fmidcancel() {
	//20091126 JHP ¼öÁ¤Ãß°¡ 
	var chk = model.getValue("/root/main/item1/iteminfo/patnm");
	var indd = model.getValue("/root/main/item1/iteminfo/indd");
	var ans = 0;
	if(chk){						
		if(ipt_pid.currentText.length >1){
			if(indd.length>1){	
				
				var trgtManWindow = getChildWindow("SMPID10100");
								
				var patunitsrch1 = model.getValue("/root/main/item1/iteminfo/pid").getTrim();	// (stringHelper.js) ¹®ÀÚ¿­ ¾ÕµÚ¿¡ ÀÖ´Â °ø¹é Á¦°Å

				// 2008.01.23 ¹ÚÁö¿í ¼öÁ¤ (Áß°£Ã»±¸µî·ÏÈ­¸é¿¡ ³Ñ°ÜÁÖ´Â µ¥ÀÌÅÍ Ãß°¡ - pid, indd)
				model.removenode("/root/hidden/midclam");
				model.makeValue("/root/hidden/midclam/pid", patunitsrch1);
				model.makeValue("/root/hidden/midclam/indd", model.getValue("/root/main/item1/iteminfo/indd"));
					
				if (trgtManWindow == null) {
					ans = messageBox("½É»ç Ãë¼Ò ÇÒ °æ¿ì", "S001");
					if (ans == 6) {
						
						model.makeValue("/root/send/checkyn","Y");
						if (!submit("TRPIJ00315", false)) {
							messageBox("½Ç½Ã°£ ȯÀÚ»óÅ üũ¿¡ ½ÇÆÐ Çß½À´Ï´Ù. ½Ã½ºÅÛ ¿À·ùÀÔ´Ï´Ù.°ü¸®ÀÚ ¹®ÀÇ ÈÄ", "C003");
							return;
						}
						
						if (fGetDrgOpenPopup("O") == false) {
								return false;
						}
						
						model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat","A");
						if (submit("TXPIJ00301", false)) {
						}
					} 
				} else {
					ans = messageBox("½É»ç Ãë¼Ò ÇÒ °æ¿ì", "S001");
					if (ans == 6) {
						
						model.makeValue("/root/send/checkyn","Y");
						if (!submit("TRPIJ00315", false)) {
							messageBox("½Ç½Ã°£ ȯÀÚ»óÅ üũ¿¡ ½ÇÆÐ Çß½À´Ï´Ù. ½Ã½ºÅÛ ¿À·ùÀÔ´Ï´Ù.°ü¸®ÀÚ ¹®ÀÇ ÈÄ", "C003");
							return;
						}
						
						if (fGetDrgOpenPopup("O") == false) {
								return false;
						}
						
						model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat","A");
						submit("TXPIJ00301",false);
					}
				}
				model.refresh();
			}
		}
	}
}

//ƯÁ¤³»¿ª
function fspclData() {
	var chk = model.getValue("/root/main/item1/iteminfo/patnm");
	if(chk){		
		var rrgstno = model.getValue("/root/main/item1/iteminfo/rrgstno");
		rrgstno = rrgstno.replace("-","");
		model.setValue("/root/send/rrgstno",rrgstno);
		model.setValue("/root/send/dschdd",model.getValue("/root/main/item1/iteminfo/dschdd"));
		var fromdd = model.getValue("/root/send/fromdd");
		// v191, v192, v193 °ªÀ» ³Ö±â À§ÇÑ vcode
		model.setValue("root/send/vcode", model.getValue("/root/hidden/item1/vcode"));
		if (submit("TRPIJ00310")) {
			copyNodeType("/root/main/list4","/root/hidden/list4","after");
			//grd_clcjlist.dispatch("xforms-value-changed");
			//model.refresh(); ÃÖÀûÈ­ ¹®Á¦·Î ´ëü 20080731 ¹Úâ¿ø
			model.refreshpart("/root/main/list4");	
			
			for(var i = 1; i < grd_clcjlist.rows; i++) {
				var spclcd = model.getValue("/root/main/list4/clcjlist["+ i + "]/spclcd");
				model.setValue("/root/main/list4/clcjlist["+ i + "]/fromdd", fromdd);
				if (spclcd == "" ) {
					grd_clcjlist.deleteRow(i, false);
				}
			}	
											
			for(var i = 1; i < grd_clcjlist.rows; i++) {
				var status = model.getValue("/root/main/list4/clcjlist["+ i + "]/status");
				if(status == "3"){
					grd_clcjlist.rowstatus(i) = 1;
				}
			}
			
			// ±×¸®µå Á¤·Ä + ºóÁÙ Ãß°¡
			fSortSpclNo();
			// ÇàÃß°¡
//			fSpclGridInsertRow();
		}
	}
}

//ÁßÁõÁúȯ
function fesscdiag() {
	var chk = model.getValue("/root/main/item1/iteminfo/patnm");
	var readonly = model.getValue("/root/send/readonly");
	// open ÀÏ Àû¿ë - 20090302 ¹Úâ¿ø - È®»êµÉ¶§¸¶´Ù ¼öÁ¤ÇؾßÇÔ - È®»êº´¿øÀº ¿ÀÇÂÀÏ ±âÁØÀÚ·á°¡ ¾øÀ¸¹Ç·Î...
	var opendd = model.getValue("/root/main/item1/iteminfo/opendd"); 
	
/*	if (opendd != "20081003") {
		opendd = "20081003";
	} */
	if(chk){
		var trgtManWindow = getChildWindow("SPPIJ01900");
		var vcode = model.getValue("/root/hidden/item1/vcode");
		var indd = model.getValue("root/main/item1/iteminfo/indd1");
		// 6½Ã°£¹Ì¸¸ º¯°æ ºí·ÎÅ·À» À§ÇØ º¯¼ö Ãß°¡ - 20081105 ¹Úâ¿ø
		var sixtimyn = model.getValue("/root/main/item1/iteminfo/sixtimyn");
		
		// ½É»ç¸¶°¨À̳ª Åð¿øÇÑ È¯ÀÚ´Â ¿äÀ²À» º¯°æ ½Ãų ¼ö ¾ø´Ù. - 20080924 ¹Úâ¿ø
		// µî·Ï¾Ï ºÒ°¡ ¾Ë·µÈÄ Á¾·á, ÁßÁõ¼ö¼úÀº Á¶È¸¸¸ µÇ°Ô - ±â°£Àû¿ë,Àû¿ë, À¯Çüº¹¿ø ¾ÈµÇ°Ô
		// ±âÁ¸¿¡´Â ½É»ç¸¶°¨À̳ª Åð¿ø¿©ºÎ¸¦ ÀνºÅϽº¿¡¼­ °¡Á®¿À´ø °ÍÀ» ½Ç½Ã°£ üũ·Î º¯°æ - 20080927 ¹Úâ¿ø
		if (!submit("TRPIJ00315", false)) {
			messageBox("½Ç½Ã°£ ȯÀÚ»óÅ üũ¿¡ ½ÇÆÐ Çß½À´Ï´Ù. ½Ã½ºÅÛ ¿À·ùÀÔ´Ï´Ù.°ü¸®ÀÚ ¹®ÀÇ ÈÄ", "C003");
			return;
		}
		
		var indschacptstat = model.getValue("/root/main/item11/endcnclstat/indschacptstat");
		var dschjudgprcsstat = model.getValue("/root/main/item11/endcnclstat/dschjudgprcsstat");
		
		model.setValue("/root/hidden/sppij01900/cond/pid",model.getValue("root/main/item1/iteminfo/pid"));
		model.setValue("/root/hidden/sppij01900/cond/indd",indd);
		model.setValue("/root/hidden/sppij01900/cond/cretno",model.getValue("root/main/item1/iteminfo/cretno"));
		model.setValue("/root/hidden/sppij01900/cond/mskind",model.getValue("root/main/item1/iteminfo/mskind"));
		model.setValue("/root/hidden/sppij01900/cond/brateflag",model.getValue("root/main/item1/iteminfo/brateflag"));
		model.setValue("/root/hidden/sppij01900/cond/brthdd",model.getValue("root/main/item1/iteminfo/brthdd"));
		model.setValue("/root/hidden/sppij01900/cond/vcode",vcode);
		model.setValue("/root/hidden/sppij01900/cond/ownbrate",model.getValue("/root/main/item1/iteminfo/normalownbrate"));
		model.setValue("/root/hidden/sppij01900/cond/cfe",model.getValue("root/main/item1/iteminfo/cfe"));
		// ½É»ç¸¶°¨À̳ª Åð¿øÇÑ È¯ÀÚ´Â ÁßÁõ¼ö¼ú±â°£»êÁ¤°ü¸®¿¡¼­ Á¶ÀÛÀ» ÇÒ ¼ö ¾ø´Ù - 20080924 ¹Úâ¿ø
		// Áß°£Ã»±¸ ¿©ºÎ¸¦ ÆÇ´ÜÇؼ­ ºí·ÎÅ· - 20081017 ¹Úâ¿ø
		var lastmdlclamdd = model.getValue("/root/main/item1/iteminfo/lastmdlclamdd");
		var fromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
		if (lastmdlclamdd > fromdd && lastmdlclamdd > opendd  && lastmdlclamdd != "" ) {
			model.setValue("/root/hidden/sppij01900/cond/saveyn","Y");
		}
		
		if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E" || indschacptstat == "D" || readonly == "Y" ) {
			model.setValue("/root/hidden/sppij01900/cond/saveyn","Y");
		} else {
			model.setValue("/root/hidden/sppij01900/cond/saveyn","N");
		}
		
		// Èñ±Í³­Ä¡¼º»êÁ¤Æ¯·Ê - 20090621 ¹Úâ¿ø
		var rareessc = model.getValue("/root/main/item12/rareessc/rareesscyn");
		if (rareessc == "Y") {
			var chksuppkind = model.getValue("/root/main/item1/iteminfo/suppkindcd");
			
			if (chksuppkind == "50") {
				if (lastmdlclamdd > fromdd && lastmdlclamdd > opendd  && lastmdlclamdd != ""  ) {
					messageBox("Áß°£Ã»±¸ µî·ÏÀÌ µÇ¾îÀÖ½À´Ï´Ù. ¿äÀ²À» º¯°æ","E001");
					return;
				}else if (readonly == "Y") {
					messageBox("ÀбâÀü¿ë ¸ðµåÀÔ´Ï´Ù. Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·Ê ¿äÀ²À» Àû¿ëÇϰųª Ãë¼Ò","E001");
					return;
				}else if (indschacptstat == "D") {
					messageBox("ÀÌ¹Ì Åð¿øÇÑ È¯ÀÚÀÔ´Ï´Ù. Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·Ê  ¿äÀ²À» Àû¿ëÇϰųª Ãë¼Ò","E001");
					return;
				}else if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
					messageBox("ÀÌ¹Ì ¸¶°¨µÈ ȯÀÚÀÔ´Ï´Ù. Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·Ê ¿äÀ²À» Àû¿ëÇϰųª Ãë¼Ò","E001");
					return;
				}
				var msg = messageBox("ÀÌ¹Ì Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·Ê Àû¿ëÀÌ µÈ ȯÀÚÀÔ´Ï´Ù. ±âÁ¸¿¡ Àû¿ëµÈ À¯ÇüÀ» Ãë¼Ò","S001");
				if(msg != 6) {
					return;
				}else{
					if (fSaveMain("P") == true) {
						var cfe = model.getValue("/root/main/item1/iteminfo/cfe");
						var suppkind = "00";
						
						if (cfe == "E" || cfe == "F") {
							suppkind = "33";	//Â÷»óÀ§2Á¾Á¤»óÀ¸·Î ¼ÂÆÃ
						} 
						
						Insuchange(suppkind);
					}
				}
			} else if (chksuppkind != "50") {
				if (readonly == "Y") {
					messageBox("ÀбâÀü¿ë ¸ðµåÀÔ´Ï´Ù. Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·Ê ¿äÀ²À» Àû¿ëÇϰųª Ãë¼Ò","E001");
					return;
				}
				if (indschacptstat == "D") {
					messageBox("ÀÌ¹Ì Åð¿øÇÑ È¯ÀÚÀÔ´Ï´Ù. Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·Ê ¿äÀ²À» Àû¿ëÇϰųª Ãë¼Ò","E001");
					return;
				}
				if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
					messageBox("ÀÌ¹Ì ¸¶°¨µÈ ȯÀÚÀÔ´Ï´Ù. Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·Ê ¿äÀ²À» Àû¿ëÇϰųª Ãë¼Ò","E001");
					return;
				}
				var msg = messageBox("Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·Ê ȯÀÚÀÔ´Ï´Ù. ÁßÁõ¿äÀ² Àû¿ë","S001");
				if(msg !=6){
					return;
				}else{
					if (fSaveMain("P") == true) {
						var cfe = model.getValue("/root/main/item1/iteminfo/cfe");
						var suppkind = "50";
						
						if (cfe == "E" || cfe == "F") {
							suppkind = "46";	// Â÷»óÀ§2Á¾Èñ±Í³­Ä¡¼º »êÁ¤Æ¯·Ê·Î ¼ÂÆÃ
						} 
						
						Insuchange(suppkind);
					}	
				}
			}
		}
		
		if(vcode == "V193"){
			var chksuppkind = model.getValue("/root/main/item1/iteminfo/suppkindcd");
			var chkinsukind =  model.getValue("/root/main/item1/iteminfo/insukindcd");
			
			// Áß°£Ã»±¸ ¿©ºÎ¸¦ ÆÇ´ÜÇؼ­ ºí·ÎÅ· - 20081017 ¹Úâ¿ø
			// Â÷»óÀ§ 2Á¾ ·ÎÁ÷ Ãß°¡ - 20090325 ¹Úâ¿ø
			if(chksuppkind == "06"  || chksuppkind == "40"){
				if (lastmdlclamdd > fromdd && lastmdlclamdd > opendd  && lastmdlclamdd != ""  ) {
					messageBox("Áß°£Ã»±¸ µî·ÏÀÌ µÇ¾îÀÖ½À´Ï´Ù. ¿äÀ²À» º¯°æ","E001");
					return;
				}else if (readonly == "Y") {
					messageBox("ÀбâÀü¿ë ¸ðµåÀÔ´Ï´Ù. µî·Ï¾Ï ¿äÀ²À» Àû¿ëÇϰųª Ãë¼Ò","E001");
					return;
				}else if (indschacptstat == "D") {
					messageBox("ÀÌ¹Ì Åð¿øÇÑ È¯ÀÚÀÔ´Ï´Ù. µî·Ï¾Ï ¿äÀ²À» Àû¿ëÇϰųª Ãë¼Ò","E001");
					return;
				}else if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
					messageBox("ÀÌ¹Ì ¸¶°¨µÈ ȯÀÚÀÔ´Ï´Ù. µî·Ï¾Ï ¿äÀ²À» Àû¿ëÇϰųª Ãë¼Ò","E001");
					return;
				}
				var msg = messageBox("ÀÌ¹Ì µî·Ï¾Ï Àû¿ëÀÌ µÈ ȯÀÚÀÔ´Ï´Ù. ±âÁ¸¿¡ Àû¿ëµÈ À¯ÇüÀ» Ãë¼Ò","S001");
				if(msg != 6) {
					return;
				}else{
					if (fSaveMain("P") == true) {
						var cfe = model.getValue("/root/main/item1/iteminfo/cfe");
						var suppkind = "00";
						
						if (cfe == "E" || cfe == "F") {
							suppkind = "33";	//Â÷»óÀ§2Á¾Á¤»óÀ¸·Î ¼ÂÆÃ
						} 
						
						Insuchange(suppkind);
					}
				}
			}
			else if(chksuppkind != "06" && chksuppkind != "40" && chksuppkind != "31"  && !(chkinsukind == "22" && chksuppkind == "08") ) { // 20090325 Â÷»óÀ§Àû¿ë - ¹Úâ¿ø 20100318 Á¤½Â¿ì ½Å»ý¾ÆÀ¯ÇüÀº Á¦¿ÜÃß°¡
				if (readonly == "Y") {
					messageBox("ÀбâÀü¿ë ¸ðµåÀÔ´Ï´Ù. µî·Ï¾Ï ¿äÀ²À» Àû¿ëÇϰųª Ãë¼Ò","E001");
					return;
				}
				if (indschacptstat == "D") {
					messageBox("ÀÌ¹Ì Åð¿øÇÑ È¯ÀÚÀÔ´Ï´Ù. µî·Ï¾Ï ¿äÀ²À» Àû¿ëÇϰųª Ãë¼Ò","E001");
					return;
				}
				if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
					messageBox("ÀÌ¹Ì ¸¶°¨µÈ ȯÀÚÀÔ´Ï´Ù. µî·Ï¾Ï ¿äÀ²À» Àû¿ëÇϰųª Ãë¼Ò","E001");
					return;
				}
				var msg = messageBox("µî·Ï¾ÏȯÀÚÀÔ´Ï´Ù. ÁßÁõ¿äÀ² Àû¿ë","S001");
				if(msg !=6){
					return;
				}else{
					if (fSaveMain("P") == true) {
						var cfe = model.getValue("/root/main/item1/iteminfo/cfe");
						var suppkind = "06";
						
						if (cfe == "E" || cfe == "F") {
							suppkind = "40";	// Â÷»óÀ§2Á¾µî·Ï¾ÏÀ¸·Î ¼ÂÆÃ
						} 
						
						Insuchange(suppkind);
					}
				}
			}
			
		}else if(vcode == "V191" || vcode == "V192"){
			// 6½Ã°£ ¹Ì¸¸ ȯÀÚ´Â È­¸éÀ» º¸¿©ÁÖÁö ¾Ê´Â´Ù. - 20081105 ¹Úâ¿ø
			if (sixtimyn == "Y") {
				messageBox("6½Ã°£ ¹Ì¸¸ »óÅ ÀÔ´Ï´Ù. ÁßÁõ¼ö¼ú ¿äÀ²À» ¼³Á¤(ÀúÀå) ","E001");
				model.setValue("/root/hidden/sppij01900/cond/saveyn","Y");
			}
			
			if (trgtManWindow == null) {
					open("SPPIJ01900" ,"", "10", "10", "SPPIJ01900","/root/hidden/sppij01900/cond", "/root/send/cond");
			} else {
				activateChild("SPPIJ01900");
				model.refresh();
			}
		}
	}
}

//Åð¿ø¸¶°¨Ãë¼Ò
function fdschclosecancel() {
	var chk = model.getValue("/root/main/item1/iteminfo/patnm");
	var tmpnotiyn;
	
	var notichngflag = "N";
	// Åð¿ø ¸¶°¨ Ãë¼Ò½Ã Åð¿ø¼ö³³ÀÌ µÇ¾ú´ÂÁö ½Ç½ÃÇÑ È®ÀÎ ÈÄ ÁøÇàÇÑ´Ù.
	// ¸¶°¨¿¡¼­ºÎÅÍ Ãë¼Ò»çÀÌ¿¡ ¼ö³³¿¡¼­ Åð¿ø¼ö³³ÀÌ µÇ¾ú´Âµ¥ ¸¶°¨Ãë¼Ò°¡ µÇ´Â »óȲÀÌ ¹ß»ýµÇÁö ¾Ê±â À§ÇÔ 
	// Åð¿ø¼ö³³ÀÌ µÈ°æ¿ì¿¡´Â ´ë»óÀÚ Á¶È¸ È£¸éÀ» refresh ÇÏ°í 
	// ¸ÞÀÎÈ­¸éÀÇ ½É»ç»óŸ¦ 'A' ¹Ì½É»óÅ·ΠÇÏ°í ¸ÞÀÎÈ­¸éÀ» ´Ù½Ã ·Îµå- 20080927 ¹Úâ¿ø
	model.makeValue("/root/send/checkyn","Y");
	if (!submit("TRPIJ00315", false)) {
		messageBox("½Ç½Ã°£ ȯÀÚ»óÅ üũ¿¡ ½ÇÆÐ Çß½À´Ï´Ù. ½Ã½ºÅÛ ¿À·ùÀÔ´Ï´Ù.°ü¸®ÀÚ ¹®ÀÇ ÈÄ", "C003");
		return;
	}
	var indschacptstat = model.getValue("/root/main/item11/endcnclstat/indschacptstat");
	
	if (indschacptstat == 'D') {
		messageBox("ÀÌ¹Ì Åð¿ø󸮰¡ µÈ ȯÀÚÀÔ´Ï´Ù. ¸¶°¨Ãë¼Ò ", "E001");
		// ¹«Á¶°Ç ´ë»óÀÚ Á¶È¸ È­¸éÀ» refresh 
		var trgtManWindow = getChildWindow("SMPIJ00200");
		trgtManWindow.javascript.fGetInBfJudgTrgtManList();
		trgtManWindow.javascript.fCountPat();
		trgtManWindow.model.refresh();
		
  		fGetItemInfo();
		return;
	}
	
	if(chk){						
		var receiptyn = model.getValue("/root/main/item1/iteminfo/receiptyn");
		var dschnotiyn = model.getValue("/root/main/item1/iteminfo/dschnotiyn");
		
		var dschdclrtyn = model.getValue("/root/main/item11/endcnclstat/dschdclrtyn");
		var dschjudgprcsstat = model.getValue("/root/main/item11/endcnclstat/dschjudgprcsstat"); 
		
		if (receiptyn != ""  && dschnotiyn == "Y") {
			messageBox("Åð¿ø(°¡Åð¿ø) ¼ö³³ÀÌ µÇ¾úÀ¸¹Ç·Î ¸¶°¨Ãë¼Ò¸¦","E001");
		} else if  (receiptyn == ""  && (dschnotiyn == "Y" || ( dschjudgprcsstat == 'G' && dschdclrtyn == 'Y' ))) {
			
			//DRG »ó¼¼ ¸¶°¨ Ãë¼Ò Æ˾÷
			if (fGetDrgOpenPopup("O") == false) {
				return false;
			}
			
			if ( dschnotiyn == "Y" ) { 
//				var msg = messageBox("°£È£ÀÇ Åð¿øÈ®Á¤¿©ºÎµµ ÇÔ²² Ãë¼Ò","S001");
//				if(msg == 6){
//					if (indschacptstat == "T") { // °¡Åð¿ø ºí·ÎÅ· Ãß°¡ - 20081005 ¹Úâ¿ø
//						var msg1 = messageBox("°¡Åð¿ø »óÅ¿¡¼­´Â °£È£È®Á¤ Ãë¼Ò°¡ ºÒ°¡ÇÕ´Ï´Ù. °è¼ÓÁøÇà","S001");
//						if (msg1 != 6) {
//							return;
//						}
//					} else {
//						model.setValue("/root/main/item1/iteminfo/dschnotiyn","Z");
//					}		
//				}else if(msg == 2){
//					return;
//				}
			}
			
			if (fJudgEndCancel()) {
				if(fSaveCalcAmt("D")) {
				} else {
					messageBox("¸¶°¨Ãë¼Ò 󸮰¡ µÇÁö","E007");
					return 0;
				} 
			} else {
				messageBox("¸¶°¨Ãë¼Ò 󸮰¡ µÇÁö","E007");
				return 0;
			}
			
			if(model.getValue("/root/main/item1/iteminfo/dschnotiyn") == "Z"){
				model.setValue("/root/main/item1/iteminfo/dschnotiyn","N");
				 notichngflag = "Y";		
			}		
			
			fJudgEndClear();
		}
	}
}

//Á¾·á
function fClear() {
	// ½É»ç»óŸ¦ ¹Ì½É»óÅ·Π¹Ù²Ù°í ´ë»óÀÚ Á¶È¸¸¦ ¸®ÇÁ·¹½¬ - 20081004 ¹Úâ¿ø
	// ½É»ç»óŸ¦ ½Ç½Ã°£ üũÇÏ¿© ½É»ç»óÅ°¡ ½É»çÁßÀ϶§¸¸ ¾÷µ¥ÀÌÆ® µÇ°Ô ÇÔ - 20081008 ¹Úâ¿ø
	if (!submit("TRPIJ00315", false)) {
		messageBox("½Ç½Ã°£ ȯÀÚ»óÅ üũ¿¡ ½ÇÆÐ Çß½À´Ï´Ù.±âº»µ¥ÀÌÅÍ ÀÌ»óÀ̳ª ½Ã½ºÅÛ ¿À·ùÀÔ´Ï´Ù.°ü¸®ÀÚ ¹®ÀÇ ÈÄ", "C003");
		return;
	}

	// Ȥ½Ã¸ð¸£´Â Á¾·á¹öÆ° Ŭ¸¯½Ã °£È£Åð¿øÈ®Á¤ Ãë¼Ò¸¦ ¸·±âÀ§ÇØ Àû¿ë - 20081008 ¹Úâ¿ø
	var realnotiyn = model.getValue("/root/main/item11/endcnclstat/dschnotiyn");
	var notiyn = model.getValue("/root/main/item1/iteminfo/dschnotiyn");
	var readonly = model.getValue("/root/send/readonly");
	
	if (notiyn == "Z") {
		model.setValue("/root/main/item1/iteminfo/dschnotiyn", realnotiyn);
	}
	
	var dschjudgprcsstat = model.getValue("/root/main/item11/endcnclstat/dschjudgprcsstat");
	if (dschjudgprcsstat == "B" && readonly != "Y") {
		model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat","Z");
		submit("TXPIJ00301");
	}
	
	// 2. È­¸é Ŭ¸®¾î (°øÅë)
	fJudgEndClear();
}

//Áß°£Ã»±¸¸¶°¨
function fMidcomplete() {
	// 20091126 JHP ¼öÁ¤Ãß°¡ 
	var chk = model.getValue("/root/main/item1/iteminfo/patnm");
	var indd = model.getValue("/root/main/item1/iteminfo/indd");
	var ans = 0;
	if(chk){						
		if(ipt_pid.currentText.length >1){
			if(indd.length>1){	
				
				if (!submit("TRPIJ00319", false )) {
					messageBox("½Ç½Ã°£ ȯÀÚ»óÅ üũ¿¡ ½ÇÆÐ Çß½À´Ï´Ù. ½Ã½ºÅÛ ¿À·ùÀÔ´Ï´Ù.°ü¸®ÀÚ ¹®ÀÇ ÈÄ", "C003");
					return;
				}
				
				var noactyn = model.getValue("/root/main/item16/noactyn/noactyn");
				if (noactyn == 'Y') {
					modal("SPPIJ00900" ,"", "10", "10", "SPPIJ00900", "/root/main/item1/iteminfo/pid", "/root/send/send_pid/pid", "", "");
				}
				var trgtManWindow = getChildWindow("SMPID10100");
								
				var patunitsrch1 = model.getValue("/root/main/item1/iteminfo/pid").getTrim();	// (stringHelper.js) ¹®ÀÚ¿­ ¾ÕµÚ¿¡ ÀÖ´Â °ø¹é Á¦°Å

				// 2008.01.23 ¹ÚÁö¿í ¼öÁ¤ (Áß°£Ã»±¸µî·ÏÈ­¸é¿¡ ³Ñ°ÜÁÖ´Â µ¥ÀÌÅÍ Ãß°¡ - pid, indd)
				model.removenode("/root/hidden/midclam");
				model.makeValue("/root/hidden/midclam/pid", patunitsrch1);
				model.makeValue("/root/hidden/midclam/indd", model.getValue("/root/main/item1/iteminfo/indd"));
					
				if (trgtManWindow == null) {
					ans = messageBox("½É»ç ¸¶°¨ ÇÒ °æ¿ì", "S001");
					if (ans == 6) {
						
						model.makeValue("/root/send/checkyn","Y");
						if (!submit("TRPIJ00315", false )) {
							messageBox("½Ç½Ã°£ ȯÀÚ»óÅ üũ¿¡ ½ÇÆÐ Çß½À´Ï´Ù. ½Ã½ºÅÛ ¿À·ùÀÔ´Ï´Ù.°ü¸®ÀÚ ¹®ÀÇ ÈÄ", "C003");
							return;
						}
						
						if (fGetDrgOpenPopup("O") == false) {
								return false;
						}
							
						model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat","C");
						if (submit("TXPIJ00301")) {
							open("SMPID10100" ,"", "10", "10", "SMPID10100", "/root/hidden/midclam", "/root/hidden/midclam");
						}
					} else {
					}
					
					
				} else {
					ans = messageBox("½É»ç ¸¶°¨ ÇÒ °æ¿ì", "S001");
					if (ans == 6) {
						
						model.makeValue("/root/send/checkyn","Y");
						if (!submit("TRPIJ00315", false)) {
							messageBox("½Ç½Ã°£ ȯÀÚ»óÅ üũ¿¡ ½ÇÆÐ Çß½À´Ï´Ù. ½Ã½ºÅÛ ¿À·ùÀÔ´Ï´Ù.°ü¸®ÀÚ ¹®ÀÇ ÈÄ", "C003");
							return;
						}
						
						if (fGetDrgOpenPopup("O") == false) {
								return false;
						}
						
						model.setValue("/root/main/item1/iteminfo/dschjudgprcsstat","C");
						if (submit("TXPIJ00301")) {
							activateChild("SMPID10100");
							trgtManWindow.javascript.fGetMidClamList();
						}
					} else {
						activateChild("SMPID10100");
						trgtManWindow.javascript.fGetMidClamList();
					}
				}
				model.refresh();
			}
		}
	}
}

//Áß°£Ã»±¸¸¶°¨
function fAccept() {
	// ½É»ç¸¶°¨À̳ª Åð¿øÇÑ È¯ÀÚ´Â ¿äÀ²º¯°æÀ» ÇÒ ¼ö ¾ø´Ù. - 20080924 ¹Úâ¿ø
	// ±âÁ¸¿¡´Â ½É»ç¸¶°¨À̳ª Åð¿ø¿©ºÎ¸¦ ÀνºÅϽº¿¡¼­ °¡Á®¿À´ø °ÍÀ» ½Ç½Ã°£ üũ·Î º¯°æ - 20080927 ¹Úâ¿ø
	if (!submit("TRPIJ00315", false)) {
		messageBox("½Ç½Ã°£ ȯÀÚ»óÅ üũ¿¡ ½ÇÆÐ Çß½À´Ï´Ù. ½Ã½ºÅÛ ¿À·ùÀÔ´Ï´Ù.°ü¸®ÀÚ ¹®ÀÇ ÈÄ", "C003");
		return;
	}
	// ¿ÀÇÂÀÏ Àû¿ë - 20090302 ¹Úâ¿ø - ÇϵåÄÚµù Á¦°Å - È®»êº´¿øÀº ÀÚ·á°¡ ±¸ÃàµÇ¾î ÀÖÁö ¾Ê±â ¶§¹®¿¡ ¿ÀÇÂÀü±îÁö ¿¹¿Üó¸®
	var opendd = model.getValue("/root/main/item1/iteminfo/opendd");
	var indschacptstat = model.getValue("/root/main/item1/iteminfo/indschacptstat");
	var dschjudgprcsstat = model.getValue("/root/main/item1/iteminfo/dschjudgprcsstat");
	// Áß°£Ã»±¸, ÀбâÀü¿Ë ¿©ºÎ¸¦ ÆÇ´ÜÇؼ­ ºí·ÎÅ· - 20081017 ¹Úâ¿ø
	var lastmdlclamdd = model.getValue("/root/main/item1/iteminfo/lastmdlclamdd");
	var fromdd = model.getValue("/root/main/item1/iteminfo/fromdd");
	var readonly = model.getValue("/root/send/readonly");
	if (lastmdlclamdd > fromdd && lastmdlclamdd > "20081003"  && lastmdlclamdd != "" ) {
		messageBox("Áß°£Ã»±¸ µî·ÏÀÌ µÇ¾îÀÖ½À´Ï´Ù. ¿äÀ²À» º¯°æ","E001");
		grp_changeownbrate.visible = false;
		return;
	} else if (readonly == "Y") {
		messageBox("ÀбâÀü¿ë ¸ðµå¿¡¼­´Â ¿äÀ²À» º¯°æ","E001");
		grp_changeownbrate.visible = false;
		return;
	} else if (indschacptstat == "D") {
		messageBox("ÀÌ¹Ì Åð¿øÇÑ È¯ÀÚÀÔ´Ï´Ù. ¿äÀ²À» º¯°æ","E001");
		grp_changeownbrate.visible = false;
		return;
	} else if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
		messageBox("ÀÌ¹Ì ¸¶°¨µÈ ȯÀÚÀÔ´Ï´Ù. ¿äÀ²À» º¯°æ","E001");
		grp_changeownbrate.visible = false;
		return;
	}

	fChangeRate1();
}

//º´¿ë±Ý±âÈ®ÀÎ
function fUseincombinationtaboo() {
	// 20091126 ¼öÁ¤Ãß°¡ JHP º´¿ë±Ý±â³»¿ª È®ÀÎ
	var prcsyn = messageBox("º´¿ë±Ý±âÈ®Àνà °è»ê³»¿ª¿¡ µû¶ó ÀϺΠ½Ã°£ÀÌ Áö¿¬µÉ¼ö ÀÖ½À´Ï´Ù.\n\n","Q003");
	if(prcsyn == "6"){
		var pid = model.getValue("/root/main/item1/iteminfo/pid");
		if(pid == "" || pid == null || pid == " "){
		}else{
			submit("TRPIJ00318");
			var nodecnt = getNodesetCount("/root/hidden/useincombinationtaboo/list");
			
			if(nodecnt > 1){
				var seeyn = messageBox("º´¿ë±Ý±â³»¿ªÀÌ Á¸ÀçÇÕ´Ï´Ù. È®ÀÎ","Q005");
				if(seeyn == "6"){
					grp_taboo.attribute("left") = "420px";
					grp_taboo.attribute("top") = "525px";
					grp_taboo.attribute("width") = "508px";
					grp_taboo.attribute("height") = "199px";
					grp_taboo.visible = true;
				}else{
				}
			}else{
				messageBox("º´¿ë±Ý±â³»¿ªÀÌ Á¸ÀçÇÏÁö ","I011");
			}
		}
	}
}

//½É»çº¯°æÀ¯¹« üũ È®ÀÎ
function fCheckChngStatus() {
	var rslt = true;
	var judgrmk = model.getValue("/root/main/item1/iteminfo/judgrmk");
	var edirmk = model.getValue("/root/main/item1/iteminfo/edirmk");
	var tstrmk = model.getValue("/root/main/item1/iteminfo/tstrmk");
	var judgrmk_orign = model.getValue("/root/main/item1/iteminfo/judgrmk_orign");
	var edirmk_orign = model.getValue("/root/main/item1/iteminfo/edirmk_orign");
	var tstrmk_orign = model.getValue("/root/main/item1/iteminfo/tstrmk_orign");
	
/*	for (var i = 1; i < grd_diaglist.rows; i++) {									
		if (grd_diaglist.rowstatus(i) != 0 && grd_diaglist.valueMatrix(i, grd_diaglist.colRef("diagcd")) != "" &&  grd_diaglist.valueMatrix(i, grd_diaglist.colRef("diagcd")) != "") {
			rslt = false;
		}
	}*/
	
	for (var i = 1; i < grd_clcjlist.rows; i++) {									
		if (grd_clcjlist.rowstatus(i) != 0 && grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("edicd")) != "" &&  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd")) != "") {
			rslt = false;
		}
	}
	
	if (judgrmk != judgrmk_orign) {
		rslt = false;
	}
	
	if (edirmk != edirmk_orign) {
		rslt = false;
	}
	
	if (tstrmk != tstrmk_orign) {
		rslt = false;
	}

	return rslt;
}

function fOpenSPPIJ03800(){
	var cond = "/root/hidden/SPPIJ03800_cond";
	var ref = "/root/main/item1/iteminfo";
	var send = "/root/send";
	
	model.makevalue(cond+"/pid", model.getValue(ref+"/pid"));
	model.makevalue(cond+"/cretno", model.getValue(ref+"/cretno"));
	model.makevalue(cond+"/orddd", model.getValue(ref+"/fromdd"));
	model.makevalue(cond+"/ordtodd", model.getValue(ref+"/todd"));
	
	fLinkPopMenu("SPPIJ03800", cond, send, "modal");
}

function responseHandlerTRPIJ00322() {
	if (getNodesetCount("/root/chklist/goso") > 0) { 
		messageBox("¿ÜÃâ¿Ü¹Ú 24½Ã°£ ÃÊ°úµÈ ¿ÏÈ­ÀÇ·á ´ë»ó ȯÀÚÀÔ´Ï´Ù. ÇØ´ç ÀÏÀÚÀÇ ÀÔ¿ø·á¸¦", "I007")
	}
}