/**
 * PET-CT ÀÇ·Ú ¹× ÀÇ·ÚÃë¼Ò µ¥ÀÌÅÍ ÀúÀå
 * @return
 */
function fSaveData_Bak(){
	var cnt = getNodesetCount("/root/main/petctlist[chkflag='true']");
	var kind = model.getValue("/root/main/petctlist[chkflag='true']/kind");
	var pkgcd = model.getValue("/root/main/petctlist[chkflag='true']/pkgcd");
	var rcptstatcd = model.getValue("/root/main/petctlist[chkflag='true']/rcptstatcd")

	
	if(parseInt(cnt)<1){
		messageBox("¼±ÅÃµÈ ³»¿ªÀÌ ¾ø½À´Ï´Ù.", "E");
		return;
	}
	
	if(parseInt(cnt)>1){
		messageBox("º¹¼ö°ÇÀÇ µ¥ÀÌÅÍ°¡ ¼±ÅõǾú½À´Ï´Ù.", "E");
		return;
	}
	
	if(event.currentTarget=="btn_E"){
		if(kind=="F"){
			messageBox("ÀÇ·ÚÃë¼Ò µÈ °ÇÀ» ÀçÀÇ·Ú ÇÏ½Ç ¼ö´Â ¾ø½À´Ï´Ù.\n½Å±Ô·Î ÀÇ·Ú ºÎŹµå¸³´Ï´Ù.", "E");
			return;
		}
	}else if(event.currentTarget=="btn_F"){
		if(kind=="F"){
			messageBox("ÀÌ¹Ì ÀÇ·ÚÃë¼Ò µÈ °ÇÀÔ´Ï´Ù.", "E");
			return;
		}
		if(kind=="S" || kind == "R"){
			messageBox("¿¹¾à ¶Ç´Â ¼ö³³µÈ ÀÇ·Ú°ÇÀº ÀÇ·ÚÃë¼Ò°¡ ºÒ°¡´ÉÇÕ´Ï´Ù.\n°ÇÁø¼¾ÅÍ·Î ¿¬¶ôºÎŹµå¸®°Ú½À´Ï´Ù.", "E");
			return;
		}
		
		var rtn = messageBox("¼±ÅÃµÈ ³»¿ªÀ» ÀÇ·ÚÃë¼ÒÇϽðڽÀ´Ï±î?", "S001");
		if(rtn!="6"){
			return;
		}
	}
	
	if(isNull(pkgcd)){
		messageBox("ÆÐÅ°Áö¸íÀÌ ¼±ÅõÇÁö ¾Ê¾Ò½À´Ï´Ù.", "E");
		return;
	}
	
	
	if(isNull(model.getValue("/root/main/petctlist[chkflag='true']/pid"))){
		messageBox("ȯÀÚ¹øÈ£°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù.", "E");
		return;
	}else{
		model.makeValue("/root/send/reqdata/srchpid", model.getValue("/root/main/petctlist[chkflag='true']/pid"));
		model.makeValue("/root/send/reqdata/sess_posinstcd", getUserInfo("dutplceinstcd"));
		model.makeValue("/root/send/reqdata/srchinstcd", getUserInfo("dutplceinstcd"));
		model.makeValue("/root/send/reqdata/srchfromdd", getCurrentDate());
		model.makeValue("/root/send/reqdata/srchtodd", getCurrentDate());
		model.makeValue("/root/send/reqdata/etccd", "G14");
		model.makeValue("/root/send/reqdata/srchhealexamdetlflag", "C01");
		model.makeValue("/root/send/reqdata/srchmode", "1");
		model.makeValue("/root/send/reqdata/clscd", "G");
		model.makeValue("/root/send/reqdata/srchcond", "pid");
		
		if(submit("TRAHA00101")){ // ȯÀÚ Á¤º¸ Á¶È¸
			if(isNull(model.getValue("/root/temp/patinfo/item/pid"))){
				messageBox("ȯÀÚ Á¤º¸ °Ë»ö¿¡ ½ÇÆÐÇÏ¿´½À´Ï´Ù.", "E");
				return;
			}else{
				
				if(event.currentTarget=="btn_E"){ // ÀÇ·Ú
					model.copyNode("/root/send/save", "/root/temp/patinfo/item");
					model.makeValue("/root/send/save/orddd", 		getCurrentDate());
					model.makeValue("/root/send/save/pid", 		model.getValue("/root/main/petctlist[chkflag='true']/pid"));
					model.makeValue("/root/send/save/instcd", 	getUserInfo("dutplceinstcd"));
					model.makeValue("/root/send/save/userid", 	getUserId());
					model.makeValue("/root/send/save/healexamflag", 	"C");
					model.makeValue("/root/send/save/healexamdetlflag", 	"C01");
					model.makeValue("/root/send/save/rsrvdd", 	getCurrentDate());
					model.makeValue("/root/send/save/hopedd", 	getCurrentDate());
					model.makeValue("/root/send/save/rsrvflag", 	"01");
					model.makeValue("/root/send/save/mode", 		"E");
					model.makeValue("/root/send/save/rsrvdetlflag", 		"C01");
					model.makeValue("/root/send/save/pkgcd", 	model.getValue("/root/main/petctlist[chkflag='true']/pkgcd"));
					model.makeValue("/root/send/save/tagno", 	"");
					model.makeValue("/root/send/save/disccd", 	"-");
					model.makeValue("/root/send/save/choiflag", "01");
					model.makeValue("/root/send/save/healexamplacecd", "S");
					model.makeValue("/root/send/save/pkguncocd", "V01");
					if(submit("TXAHA00012")){
						model.makeValue("/root/send/srchdata/pid", model.getValue("/root/main/petctlist[chkflag='true']/pid"));
						fSearch();
					}	
				}else if(event.currentTarget=="btn_F"){ // ÀÇ·ÚÃë¼Ò
					model.copyNode("/root/send/save", "/root/temp/patinfo/item");
					model.makeValue("/root/send/save/orddd", 		getCurrentDate());
					model.makeValue("/root/send/save/pid", 		model.getValue("/root/main/petctlist[chkflag='true']/pid"));
					model.makeValue("/root/send/save/instcd", 	getUserInfo("dutplceinstcd"));
					model.makeValue("/root/send/save/userid", 	getUserId());
					model.makeValue("/root/send/save/healexamflag", 	"C");
					model.makeValue("/root/send/save/healexamdetlflag", 	"C01");
					model.makeValue("/root/send/save/hopedd", 	getCurrentDate());
					model.makeValue("/root/send/save/rsrvflag", 	"01");
					model.makeValue("/root/send/save/mode", 		"F");
					model.makeValue("/root/send/save/rsrvdetlflag", 		"C01");
					model.makeValue("/root/send/save/pkgcd", 	model.getValue("/root/main/petctlist[chkflag='true']/pkgcd"));
					
					model.makeValue("/root/send/save/orddd", 	model.getValue("/root/main/petctlist[chkflag='true']/orddd"));
					model.makeValue("/root/send/save/cretno", 	model.getValue("/root/main/petctlist[chkflag='true']/cretno"));
					model.makeValue("/root/send/save/rsrvdd", 	model.getValue("/root/main/petctlist[chkflag='true']/grsrvdd"));
					model.makeValue("/root/send/save/rsrvno", 	model.getValue("/root/main/petctlist[chkflag='true']/grsrvno"));
					
					model.makeValue("/root/send/save/tagno", 	"");
					model.makeValue("/root/send/save/disccd", 	"-");
					model.makeValue("/root/send/save/choiflag", "01");
					model.makeValue("/root/send/save/healexamplacecd", "S");
					model.makeValue("/root/send/save/pkguncocd", "V01");
					if(submit("TXAHA00012")){
						model.makeValue("/root/send/srchdata/pid", model.getValue("/root/main/petctlist[chkflag='true']/pid"));
						fSearch();
					}
				}
			}
		}
	}
}

/**
 * ÆÐÅ°Áö¸íÀ» ±âÁØÀÚ·á·Î °ü¸®
 * @return
 */
function fGetBaseInfo(){
	
	healGetCodeList(new Array("S910"), new Array("/root/init/pkglist"));	
} 

/**
 * PET-CT ÀÇ·Ú ¹× ÀÇ·ÚÃë¼Ò µ¥ÀÌÅÍ ÀúÀå
 * @return
 */
function fSaveData(){
	var pid = model.getValue("/root/send/srchdata/pid");
	var pkgcd = model.getValue("/root/send/srchdata/pkgcd");
	
	var cnt = getNodesetCount("/root/main/petctlist[chkflag='true']");
	var kind = model.getValue("/root/main/petctlist[chkflag='true']/kind");
	var rcptstatcd = model.getValue("/root/main/petctlist[chkflag='true']/rcptstatcd")
	
	if(parseInt(cnt)>1){
		messageBox("º¹¼ö°ÇÀÇ µ¥ÀÌÅÍ°¡ ¼±ÅõǾú½À´Ï´Ù.", "E");
		return;
	}

	if(event.currentTarget=="btn_E"){
		if(kind=="F"){
			messageBox("ÀÇ·ÚÃë¼Ò µÈ °ÇÀ» ÀçÀÇ·Ú ÇÏ½Ç ¼ö´Â ¾ø½À´Ï´Ù.\n½Å±Ô·Î ÀÇ·Ú ºÎŹµå¸³´Ï´Ù.", "E");
			return;
		}
	}else if(event.currentTarget=="btn_F"){
		if(parseInt(cnt)<1){
			messageBox("¼±ÅÃµÈ µ¥ÀÌÅÍ°¡ ¾ø½À´Ï´Ù.", "E");
			return;
		}
		
		if(kind=="F"){
			messageBox("ÀÌ¹Ì ÀÇ·ÚÃë¼Ò µÈ °ÇÀÔ´Ï´Ù.", "E");
			return;
		}
		if(kind=="S" || kind == "R"){
			messageBox("¿¹¾à ¹× ¼ö³³µÈ ÀÇ·Ú°ÇÀº ÀÇ·ÚÃë¼Ò°¡ ºÒ°¡´ÉÇÕ´Ï´Ù.\n°ÇÁø¼¾ÅÍ·Î ¿¬¶ôºÎŹµå¸®°Ú½À´Ï´Ù.", "E");
			return;
		}
		
		var rtn = messageBox("¼±ÅÃµÈ ³»¿ªÀ» ÀÇ·ÚÃë¼ÒÇϽðڽÀ´Ï±î?", "S001");
		if(rtn!="6"){
			return;
		}
	}
	
	if(isNull(pkgcd)){
		messageBox("ÆÐÅ°Áö¸íÀÌ ¼±ÅõÇÁö ¾Ê¾Ò½À´Ï´Ù.", "E");
		return;
	}
	
	
	if(isNull(pid)){
		messageBox("ȯÀÚ¹øÈ£°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù.", "E");
		return;
	}else{
		model.makeValue("/root/send/reqdata/srchpid", pid);
		model.makeValue("/root/send/reqdata/sess_posinstcd", getUserInfo("dutplceinstcd"));
		model.makeValue("/root/send/reqdata/srchinstcd", getUserInfo("dutplceinstcd"));
		model.makeValue("/root/send/reqdata/srchfromdd", getCurrentDate());
		model.makeValue("/root/send/reqdata/srchtodd", getCurrentDate());
		model.makeValue("/root/send/reqdata/etccd", "G14");
		model.makeValue("/root/send/reqdata/srchhealexamdetlflag", "C01");
		model.makeValue("/root/send/reqdata/srchmode", "1");
		model.makeValue("/root/send/reqdata/clscd", "G");
		model.makeValue("/root/send/reqdata/srchcond", "pid");
		
		if(submit("TRAHA00101")){ // ȯÀÚ Á¤º¸ Á¶È¸
			if(isNull(model.getValue("/root/temp/patinfo/item/pid"))){
				messageBox("ȯÀÚ Á¤º¸ °Ë»ö¿¡ ½ÇÆÐÇÏ¿´½À´Ï´Ù.", "E");
				return;
			}else{
				if(event.currentTarget=="btn_E"){ // ÀÇ·Ú
					model.copyNode("/root/send/save", "/root/temp/patinfo/item");
					model.makeValue("/root/send/save/orddd", 		getCurrentDate());
					model.makeValue("/root/send/save/pid", 		pid);
					model.makeValue("/root/send/save/instcd", 	getUserInfo("dutplceinstcd"));
					model.makeValue("/root/send/save/userid", 	getUserId());
					model.makeValue("/root/send/save/healexamflag", 	"C");
					model.makeValue("/root/send/save/healexamdetlflag", 	"C01");
					model.makeValue("/root/send/save/rsrvdd", 	getCurrentDate());
					model.makeValue("/root/send/save/hopedd", 	getCurrentDate());
					model.makeValue("/root/send/save/rsrvflag", 	"01");
					model.makeValue("/root/send/save/mode", 		"E");
					model.makeValue("/root/send/save/rsrvdetlflag", 		"C01");
					model.makeValue("/root/send/save/pkgcd", 	pkgcd);
					model.makeValue("/root/send/save/tagno", 	"");
					model.makeValue("/root/send/save/disccd", 	"-");
					model.makeValue("/root/send/save/choiflag", "01");
					model.makeValue("/root/send/save/healexamplacecd", "S");
					model.makeValue("/root/send/save/pkguncocd", "V01");
					if(submit("TXAHA00012")){
						fSearch();
					}	
				}else if(event.currentTarget=="btn_F"){ // ÀÇ·ÚÃë¼Ò
					model.copyNode("/root/send/save", "/root/temp/patinfo/item");
					model.makeValue("/root/send/save/orddd", 		getCurrentDate());
					model.makeValue("/root/send/save/pid", 		model.getValue("/root/main/petctlist[chkflag='true']/pid"));
					model.makeValue("/root/send/save/instcd", 	getUserInfo("dutplceinstcd"));
					model.makeValue("/root/send/save/userid", 	getUserId());
					model.makeValue("/root/send/save/healexamflag", 	"C");
					model.makeValue("/root/send/save/healexamdetlflag", 	"C01");
					model.makeValue("/root/send/save/hopedd", 	getCurrentDate());
					model.makeValue("/root/send/save/rsrvflag", 	"01");
					model.makeValue("/root/send/save/mode", 		"F");
					model.makeValue("/root/send/save/rsrvdetlflag", 		"C01");
					model.makeValue("/root/send/save/pkgcd", 	model.getValue("/root/main/petctlist[chkflag='true']/pkgcd"));
					
					model.makeValue("/root/send/save/orddd", 	model.getValue("/root/main/petctlist[chkflag='true']/orddd"));
					model.makeValue("/root/send/save/cretno", 	model.getValue("/root/main/petctlist[chkflag='true']/cretno"));
					model.makeValue("/root/send/save/rsrvdd", 	model.getValue("/root/main/petctlist[chkflag='true']/grsrvdd"));
					model.makeValue("/root/send/save/rsrvno", 	model.getValue("/root/main/petctlist[chkflag='true']/grsrvno"));
					
					model.makeValue("/root/send/save/tagno", 	"");
					model.makeValue("/root/send/save/disccd", 	"-");
					model.makeValue("/root/send/save/choiflag", "01");
					model.makeValue("/root/send/save/healexamplacecd", "S");
					model.makeValue("/root/send/save/pkguncocd", "V01");
					if(submit("TXAHA00012")){
						model.makeValue("/root/send/srchdata/pid", model.getValue("/root/main/petctlist[chkflag='true']/pid"));
						fSearch();
					}
				}
			}
		}
	}
}

/**
 * PET-CTȯÀÚ °Ë»ö
 * @return
 */
function fSearch(){
	var pid = model.getValue("/root/send/srchdata/pid");
	var pkgcd = model.getValue("/root/send/srchdata/pkgcd");

	if(isNull(pid)){
		messageBox("ȯÀÚ ¹øÈ£°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù.", "E");
		return;
	}
	
	submit("TRAHA00199");
}