YNU_JEUS/app_home/himed/xpapps/emr/agonalcarexp/xp/SMMNH014.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[
function fSave()
{
	if(utlf_isNull(ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "pid")))
	{
		return;
	}

	var sPassData =
			  "pid"             // 01.등록번호
			+ "▦cretdd"        // 02.생성일자
			+ "▦crettm"        // 02_1.생성시간
			+ "▦chrtpcl"       // 03.기록구분(1: sheet I  , 2: sheet II)
			+ "▦supitemcd"     // 04.상위임상항목코드
			+ "▦recitemcd"     // 05.기록항목코드
			+ "▦supitem"       // 06.상위기록항목명
			+ "▦recitem"       // 06_1.기록항목명
			+ "▦refenum"       // 07.조회순서
			+ "▦dday"          // 08.값0
			+ "▦staiud"        // 09.비교값0
			+ "▦recdd"         // 10.기록일자0
			+ "▦suprefenum"    // 11.상위조회순서
			+ "▦dday_1"        // 12.값1
			+ "▦staiud_1"      // 13.비교값1
			+ "▦recdd_1"       // 14.기록일자1
			+ "▦dday_2"        // 15.값2
			+ "▦staiud_2"      // 16.비교값2
			+ "▦recdd_2"       // 17.기록일자2
			+ "▦dday_3"        // 18.값3
			+ "▦staiud_3"      // 19.비교값3
			+ "▦recdd_3"       // 20.기록일자3
			+ "▦dday_4"        // 21.값4
			+ "▦staiud_4"      // 22.비교값4
			+ "▦recdd_4"       // 23.기록일자4
			+ "▩"   ;
	
	if(group3.switch1.tabindex == 0)
	{
		for (var i = 0; i < ds_main_inpt_inptlist.rowcount; i++ ) 
		{
			recitem = ds_main_inpt_inptlist.getColumn(i, "recitem");
			
			if(utlf_isNull(recitem))
			{
				continue;
			}
			sPassData +=
						   utlf_transNullToEmpty(ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "pid"))
				  + "▦" + utlf_transNullToEmpty(ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "cretdd"))
				  + "▦" + utlf_transNullToEmpty(ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "crettm"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "chrtpcl"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "supitemcd"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "recitemcd"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "supitem"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "recitem"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "refenum"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "dday"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "staiud"))
				  + "▦" + group3.switch1.case1.grd_inptlist.getCellProperty("head", 3, "text")
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "suprefenum"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "dday_1"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "staiud_1"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case1.grd_inptlist.getCellProperty("head", 5, "text"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "dday_2"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "staiud_2"))
				  + "▦" + group3.switch1.case1.grd_inptlist.getCellProperty("head", 7, "text")
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "dday_3"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "staiud_3"))
				  + "▦" + group3.switch1.case1.grd_inptlist.getCellProperty("head", 9, "text")
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "dday_4"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist.getColumn(i, "staiud_4"))
				  + "▦" + group3.switch1.case1.grd_inptlist.getCellProperty("head", 11, "text")
				  + "▩"   ;
		}

		for (var i = 0; i < ds_main_inpt_iovslist.rowcount; i++)
		{
			recitem = ds_main_inpt_iovslist.getColumn(i, "recitem");
			
			if(utlf_isNull(recitem))
			{
				continue;
			}
			sPassData +=
						   utlf_transNullToEmpty(ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "pid"))
				  + "▦" + utlf_transNullToEmpty(ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "cretdd"))
				  + "▦" + utlf_transNullToEmpty(ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "crettm"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "chrtpcl"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "supitemcd"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "recitemcd"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "supitem"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "recitem"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "refenum"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "dday"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "staiud"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case1.grd_iovslist.getCellProperty("head", 3, "text"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "suprefenum"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "dday_1"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "staiud_1"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case1.grd_iovslist.getCellProperty("head", 5, "text"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "dday_2"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "staiud_2"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case1.grd_iovslist.getCellProperty("head", 7, "text"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "dday_3"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "staiud_3"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case1.grd_iovslist.getCellProperty("head", 9, "text"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "dday_4"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_iovslist.getColumn(i, "staiud_4"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case1.grd_iovslist.getCellProperty("head", 11, "text"))
				  + "▩"   ;
		} 

		for (var i = 0; i < ds_main_inpt_painlist.rowcount; i++ ) 
		{
			recitem = ds_main_inpt_painlist.getColumn(i, "recitem");
			
			if(utlf_isNull(recitem))
			{
				continue;
			}
			sPassData +=
						   utlf_transNullToEmpty(ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "pid"))
				  + "▦" + utlf_transNullToEmpty(ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "cretdd"))
				  + "▦" + utlf_transNullToEmpty(ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "crettm"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "chrtpcl"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "supitemcd"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "recitemcd"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "supitem"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "recitem"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "refenum"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "dday"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "staiud"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case1.grd_painlist.getCellProperty("head", 3, "text"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "suprefenum"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "dday_1"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "staiud_1"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case1.grd_painlist.getCellProperty("head", 5, "text"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "dday_2"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "staiud_2"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case1.grd_painlist.getCellProperty("head", 7, "text"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "dday_3"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "staiud_3"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case1.grd_painlist.getCellProperty("head", 9, "text"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "dday_4"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_painlist.getColumn(i, "staiud_4"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case1.grd_painlist.getCellProperty("head", 11, "text"))
				  + "▩"   ;
		}
	}

	else if(group3.switch1.tabindex == 1)
	{		
		for (var i = 0; i < ds_main_inpt_inptlist2.rowcount; i++)
		{
			recitem = ds_main_inpt_inptlist2.getColumn(i, "recitem");
			
			if(utlf_isNull(recitem))
			{
				continue;
			}
			sPassData +=
						   utlf_transNullToEmpty(ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "pid"))
				  + "▦" + utlf_transNullToEmpty(ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "cretdd"))
				  + "▦" + utlf_transNullToEmpty(ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "crettm"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "chrtpcl"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "supitemcd"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "recitemcd"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "supitem"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "recitem"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "refenum"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "dday"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "staiud"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case2.grd_inptlist2.getCellProperty("head", 3, "text"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "suprefenum"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "dday_1"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "staiud_1"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case2.grd_inptlist2.getCellProperty("head", 5, "text"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "dday_2"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "staiud_2"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case2.grd_inptlist2.getCellProperty("head", 7, "text"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "dday_3"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "staiud_3"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case2.grd_inptlist2.getCellProperty("head", 9, "text"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "dday_4"))
				  + "▦" + utlf_transNullToEmpty(ds_main_inpt_inptlist2.getColumn(i, "staiud_4"))
				  + "▦" + utlf_transNullToEmpty(group3.switch1.case2.grd_inptlist2.getCellProperty("head", 11, "text"))
				  + "▩"   ;
		} 
	}
	
	dsf_setCSVToDs("ds_send_sPassData", sPassData);

	var oParam = {};
		oParam.id          = "TXMNH01402";
		oParam.service     = "hospiceapp.HospiceRecMngt";
		oParam.method      = "reqsetPcoi";
		oParam.inds        = "reqsetPcoi=ds_send_sPassData";
		oParam.outds       = "";
		oParam.async       = false;
		//oParam.callback    = "cf_TXMNH01402";

	tranf_submit(oParam);

}


function fSearch()
{
	ds_main_htfa_htfalist.clearData();
	ds_main_inpt_inptlist.clearData();
	ds_main_inpt_inptlist2.clearData();
	ds_main_inpt_iovslist.clearData();
	ds_main_inpt_painlist.clearData();
	ds_send.clearData();
	ds_send.addRow();
	ds_send.setColumn(0, "gubun", ds_hidden.getColumn(0, "gubun"));
	
	if(ds_hidden.getColumn(0, "gubun") == "L")
	{
		ds_send.setColumn(0, "fromdd", ds_hidden.getColumn(0, "fromdd"));
		ds_send.setColumn(0, "todd", ds_hidden.getColumn(0, "todd"));
	}
	var oParam = {};
		oParam.id          = "TRMNH01401";
		oParam.service     = "hospiceapp.HospiceRecMngt";
		oParam.method      = "reqHtfaList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_htfa_htfalist=htfalist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNH01401";

	tranf_submit(oParam);
	ds_main_htfa_htfalist.rowposition = -1;
}

function fChangeGridDate()
{
	group3.switch1.case1.grd_inptlist.setCellProperty("head", 2, "text", ds_temp.getColumn(0, "fromdd").substr(4,2)+"/"+ ds_temp.getColumn(0, "fromdd").substr(6,8));
	group3.switch1.case1.grd_inptlist.setCellProperty("head", 3, "text", ds_temp.getColumn(0, "fromdd"));
	group3.switch1.case1.grd_inptlist.setCellProperty("head", 4, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -1).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-1).substr(6,8));
	group3.switch1.case1.grd_inptlist.setCellProperty("head", 5, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -1));
	group3.switch1.case1.grd_inptlist.setCellProperty("head", 6, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -2).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-2).substr(6,8));
	group3.switch1.case1.grd_inptlist.setCellProperty("head", 7, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -2));	
	group3.switch1.case1.grd_inptlist.setCellProperty("head", 8, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -3).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-3).substr(6,8));
	group3.switch1.case1.grd_inptlist.setCellProperty("head", 9, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -3));
	group3.switch1.case1.grd_inptlist.setCellProperty("head", 10, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -4).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-4).substr(6,8));
	group3.switch1.case1.grd_inptlist.setCellProperty("head", 11, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -4));
	
	group3.switch1.case1.grd_iovslist.setCellProperty("head", 2, "text", ds_temp.getColumn(0, "fromdd").substr(4,2)+"/"+ ds_temp.getColumn(0, "fromdd").substr(6,8));
	group3.switch1.case1.grd_iovslist.setCellProperty("head", 3, "text", ds_temp.getColumn(0, "fromdd"));
	group3.switch1.case1.grd_iovslist.setCellProperty("head", 4, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -1).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-1).substr(6,8));
	group3.switch1.case1.grd_iovslist.setCellProperty("head", 5, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -1));
	group3.switch1.case1.grd_iovslist.setCellProperty("head", 6, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -2).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-2).substr(6,8));
	group3.switch1.case1.grd_iovslist.setCellProperty("head", 7, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -2));	
	group3.switch1.case1.grd_iovslist.setCellProperty("head", 8, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -3).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-3).substr(6,8));
	group3.switch1.case1.grd_iovslist.setCellProperty("head", 9, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -3));
	group3.switch1.case1.grd_iovslist.setCellProperty("head", 10, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -4).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-4).substr(6,8));
	group3.switch1.case1.grd_iovslist.setCellProperty("head", 11, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -4));
	
	group3.switch1.case1.grd_painlist.setCellProperty("head", 2, "text", ds_temp.getColumn(0, "fromdd").substr(4,2)+"/"+ ds_temp.getColumn(0, "fromdd").substr(6,8));
	group3.switch1.case1.grd_painlist.setCellProperty("head", 3, "text", ds_temp.getColumn(0, "fromdd"));
	group3.switch1.case1.grd_painlist.setCellProperty("head", 4, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -1).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-1).substr(6,8));
	group3.switch1.case1.grd_painlist.setCellProperty("head", 5, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -1));
	group3.switch1.case1.grd_painlist.setCellProperty("head", 6, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -2).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-2).substr(6,8));
	group3.switch1.case1.grd_painlist.setCellProperty("head", 7, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -2));	
	group3.switch1.case1.grd_painlist.setCellProperty("head", 8, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -3).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-3).substr(6,8));
	group3.switch1.case1.grd_painlist.setCellProperty("head", 9, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -3));
	group3.switch1.case1.grd_painlist.setCellProperty("head", 10, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -4).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-4).substr(6,8));
	group3.switch1.case1.grd_painlist.setCellProperty("head", 11, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -4));
	
	group3.switch1.case2.grd_inptlist2.setCellProperty("head", 2, "text", ds_temp.getColumn(0, "fromdd").substr(4,2)+"/"+ ds_temp.getColumn(0, "fromdd").substr(6,8));
	group3.switch1.case2.grd_inptlist2.setCellProperty("head", 3, "text", ds_temp.getColumn(0, "fromdd"));
	group3.switch1.case2.grd_inptlist2.setCellProperty("head", 4, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -1).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-1).substr(6,8));
	group3.switch1.case2.grd_inptlist2.setCellProperty("head", 5, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -1));
	group3.switch1.case2.grd_inptlist2.setCellProperty("head", 6, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -2).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-2).substr(6,8));
	group3.switch1.case2.grd_inptlist2.setCellProperty("head", 7, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -2));	
	group3.switch1.case2.grd_inptlist2.setCellProperty("head", 8, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -3).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-3).substr(6,8));
	group3.switch1.case2.grd_inptlist2.setCellProperty("head", 9, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -3));
	group3.switch1.case2.grd_inptlist2.setCellProperty("head", 10, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -4).substr(4,2)+"/"+getAddDay(ds_temp.getColumn(0, "fromdd"),-4).substr(6,8));
	group3.switch1.case2.grd_inptlist2.setCellProperty("head", 11, "text", getAddDay(ds_temp.getColumn(0, "fromdd"), -4));
}

function getAddDay(inputday,addend)
{ 
	var backDate ="";
	var rt = 0;
	var yyyy = inputday.substr(0,4) +"";
	var mm   = inputday.substr(4,2) +"";
	var dd   = inputday.substr(6,2) +"";

	var startDate = new Date(yyyy,(eval(mm)-1),dd); 

	startDate.setTime(startDate.getTime()+(86400000*addend)); 
	
	NowYear = startDate.getYear();
	NowMonth = startDate.getMonth()+1;
	NowDay = startDate.getDate();
	backDate += NowYear ;
	
	if (NowMonth < 10 ) 
	{
		backDate += "0" + NowMonth ;
	}
	else 
	{
		backDate += (startDate.getMonth() + 1); 
	}
	
	if(NowDay < 10 )
	{
		backDate += "0" + NowDay ;
	}
	else 
	{
		backDate += (startDate.getDate());
	}
	return backDate ;
}     

function fPcoiSearch()
{
	var row = ds_main_htfa_htfalist.rowposition;
	
	if(utlf_isNull(ds_main_htfa_htfalist.getColumn(row, "pid")))
	{
		return;
	}
	
	ds_send.setColumn(0, "pid", ds_main_htfa_htfalist.getColumn(row, "pid"));
	ds_send.setColumn(0, "indd", ds_main_htfa_htfalist.getColumn(row, "indd"));
	ds_send.setColumn(0, "cretno", ds_main_htfa_htfalist.getColumn(row, "cretno"));
	ds_send.setColumn(0, "cretdd", ds_main_htfa_htfalist.getColumn(row, "cretdd"));
	ds_send.setColumn(0, "crettm", ds_main_htfa_htfalist.getColumn(row, "crettm"));
	ds_send.setColumn(0, "chrtpcl", group3.switch1.tabindex+1);
	ds_send.setColumn(0, "dday", ds_temp.getColumn(0, "fromdd"));
	
	if(group3.switch1.tabindex == 0)
	{
		var oParam = {};
			oParam.id          = "TRMNH01403";
			oParam.service     = "hospiceapp.HospiceRecMngt";
			oParam.method      = "reqPaasList";
			oParam.inds        = "reqPaasList=ds_send";
			oParam.outds       = "ds_main_inpt_iovslist=iovslist ds_main_inpt_painlist=painlist ds_main_inpt_inptlist=inptlist ds_main_inpt_pasmlist=pasmlist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRMNH01403";

		tranf_submit(oParam);
		
		ds_main_inpt_inptlist.rowposition = -1;
		dsf_setDefaultVal(ds_main_inpt_inptlist, "edittype:combo,display:combo,color2:#000000,color4:#000000,color6:#000000,color8:#000000,color10:#000000,background2:#ffffff,background4:#ffffff,background6:#ffffff,background8:#ffffff,background10:#ffffff");

		for(var i = 0; i < ds_main_inpt_inptlist.rowcount; i++)
		{
			for(var j = 0; j < 11; j++)
			{
				tmp = ds_main_inpt_inptlist.getColumn(i, j);

				if(!utlf_isNull(tmp))
				{
					tmplng = String(tmp).length-2;
					tmp = String(ds_main_inpt_inptlist.getColumn(i, j)).substr(tmplng, tmp.length);
					result = ds_main_inpt_inptlist.getColumn(i, j).substr(0, tmplng);
				}
				
				if(tmp == "@@")
				{				
					ds_main_inpt_inptlist.setColumn(i, j, result);
					ds_main_inpt_inptlist.setColumn(i, "color"+j, "#3366FF");
				}
				else
				{
					//ds_main_inpt_inptlist.setColumn(i, "color"+j, "#000000");
				}
			}
			if( i == 2){			
				ds_main_inpt_inptlist.setColumn(i, "edittype", "combo");
				ds_main_inpt_inptlist.setColumn(i, "display", "combo");
			}else {			
				ds_main_inpt_inptlist.setColumn(i, "edittype", "text");			
				ds_main_inpt_inptlist.setColumn(i, "display", "text");			
			}		
		}
		
		ds_main_inpt_inptlist.setColumn(0, "edittype", "none");
		ds_main_inpt_inptlist.setColumn(0, "display", "normal");			
		
		ds_main_inpt_inptlist.setColumn(0, "color2", "#FF0000");
		ds_main_inpt_inptlist.setColumn(0, "background2", "#FFF0FF");
		
		ds_main_inpt_inptlist.setColumn(0, "color4", "#FF0000");
		ds_main_inpt_inptlist.setColumn(0, "background4", "#FFF0FF");
		
		ds_main_inpt_inptlist.setColumn(0, "color6", "#FF0000");
		ds_main_inpt_inptlist.setColumn(0, "background6", "#FFF0FF");
		
		ds_main_inpt_inptlist.setColumn(0, "color8", "#FF0000");
		ds_main_inpt_inptlist.setColumn(0, "background8", "#FFF0FF");
		
		ds_main_inpt_inptlist.setColumn(0, "color10", "#FF0000");
		ds_main_inpt_inptlist.setColumn(0, "background10", "#FFF0FF");
	}
		
	else if(group3.switch1.tabindex == 1)
	{
		var oParam = {};
			oParam.id          = "TRMNH01404";
			oParam.service     = "hospiceapp.HospiceRecMngt";
			oParam.method      = "reqPaasList";
			oParam.inds        = "reqPaasList=ds_send";
			oParam.outds       = "ds_main_inpt_inptlist2=inptlist2";
			oParam.async       = false;
			//oParam.callback    = "cf_TRMNH01404";

		tranf_submit(oParam);
		
		if(ds_main_inpt_inptlist2.rowcount < 2)
		{
			
		}
		else
		{
			var supitemCd = ""; 
			var staiud = "";   
			var dday = "";
			var staiud_1 = ""; 
			var dday_1 = "";
			
			for(var i = 0; i < ds_main_inpt_inptlist2.rowcount; i++)
			{
				supitemCd = ds_main_inpt_inptlist2.getColumn(i, "supitemcd");
				staiud    = ds_main_inpt_inptlist2.getColumn(i, "staiud");
				staiud_1  = ds_main_inpt_inptlist2.getColumn(i, "staiud_1");
				dday      = ds_main_inpt_inptlist2.getColumn(i, "dday");
				dday_1    = ds_main_inpt_inptlist2.getColumn(i, "dday_1");
				
				if((supitemCd == "IJ"|| supitemCd == "AC") && utlf_isNull(staiud) && utlf_isNull(dday) && !utlf_isNull(staiud_1) && !utlf_isNull(dday_1) && staiud_1 == dday_1)
				{
					ds_main_inpt_inptlist2.setColumn(i, "dday", dday_1);
				}
			}
		}
		
		for(var i = 0; i < ds_main_inpt_inptlist2.rowcount; i++)
		{
 			if(ds_main_inpt_inptlist2.getColumn(i, "recitem") == "가래(sputum)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "가려움(itching)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "구강건조(dry mouth)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "구내염(stomatitis)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "구토(vomiting)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "기면(drowsyness)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "기침(cough)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "딸꾹질(hiccup)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "발작(seizure)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "배뇨곤란(dysuria)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "변비(constipation)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "복수(ascites)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "부종(edema)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "상처(wound)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "설사(diarrhea)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "식욕부진(anorexia)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "연하곤란(dysphagia)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "오심(nausea)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "허약(weakness)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "호흡곤란(dyspnea)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "수면장애(insomnia)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "섬망(delirium)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "우울(depression)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "불안(anxiety)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "두려움(fear)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "수치감(shame)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "슬픔(sadness)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "외로움(loneliness)"
 				|| ds_main_inpt_inptlist2.getColumn(i, "recitem") == "양가감정(ambivalence)" || ds_main_inpt_inptlist2.getColumn(i, "recitem") == "죄책감(guilty feeling)")
 			{
 			/*
  				group3.switch1.case2.grd_inptlist2.setCellProperty("body", 2, "edittype", "none");
  				group3.switch1.case2.grd_inptlist2.setCellProperty("body", 2, "displaytype", "text");
  				group3.switch1.case2.grd_inptlist2.setCellProperty("body", 4, "edittype", "none");
  				group3.switch1.case2.grd_inptlist2.setCellProperty("body", 4, "displaytype", "text");
  				group3.switch1.case2.grd_inptlist2.setCellProperty("body", 6, "edittype", "none");
  				group3.switch1.case2.grd_inptlist2.setCellProperty("body", 6, "displaytype", "text");
  				group3.switch1.case2.grd_inptlist2.setCellProperty("body", 8, "edittype", "none");
  				group3.switch1.case2.grd_inptlist2.setCellProperty("body", 8, "displaytype", "text");
  				group3.switch1.case2.grd_inptlist2.setCellProperty("body", 10, "edittype", "none");
  				group3.switch1.case2.grd_inptlist2.setCellProperty("body", 10, "displaytype", "text");
  			*/	
  				ds_main_inpt_inptlist2.setColumn(i, "edittype", "none");
  				ds_main_inpt_inptlist2.setColumn(i, "display", "text");	
 			}
 			else{
  				ds_main_inpt_inptlist2.setColumn(i, "edittype", "combo");
  				ds_main_inpt_inptlist2.setColumn(i, "display", "combo");	
 			}

			
			for(j = 2; j < 11; j++)
			{
				tmp = ds_main_inpt_inptlist2.getColumn(i, j);

				if(!utlf_isNull(tmp))
				{
					tmplng = String(tmp).length-2;
					tmp = String(ds_main_inpt_inptlist2.getColumn(i, j)).substr(tmplng, tmp.length);

					result = ds_main_inpt_inptlist2.getColumn(i, j).substr(0, tmplng);
				}
				
				if(tmp == "@@")
				{
					ds_main_inpt_inptlist2.setColumn(i, "tmp", tmp);
					ds_main_inpt_inptlist2.setColumn(i, j, result);
				}
				else
				{
					
				}
			}
		}
	}
}

function fPrint()
{
	ds_tmp_printinfo_dethbfc.clearData();
	ds_tmp_printinfo_dethcare.clearData();
	ds_tmp_printinfo_dethaftcare.clearData();
	
	ds_tmp_printinfo.setColumn(0, "pid", ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "pid"));
	ds_tmp_printinfo.setColumn(0, "hngnm", ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "hngnm"));
	ds_tmp_printinfo.setColumn(0, "roomcd", ds_main_htfa_htfalist.getColumn(ds_main_htfa_htfalist.rowposition, "roomcd"));
	
	ds_tmp_printinfo.setColumn(0, "grdcaption1", group3.switch1.case2.grd_inptlist2.getCellProperty("head", 2, "text"));
	ds_tmp_printinfo.setColumn(0, "grdcaption2", group3.switch1.case2.grd_inptlist2.getCellProperty("head", 4, "text"));
	ds_tmp_printinfo.setColumn(0, "grdcaption3", group3.switch1.case2.grd_inptlist2.getCellProperty("head", 6, "text"));
	ds_tmp_printinfo.setColumn(0, "grdcaption4", group3.switch1.case2.grd_inptlist2.getCellProperty("head", 8, "text"));
	ds_tmp_printinfo.setColumn(0, "grdcaption5", group3.switch1.case2.grd_inptlist2.getCellProperty("head", 10, "text"));
	
	if(ds_tmp_printinfo_cond.getColumn(0, "dethbfc") == "Y")
	{
		for(var i = 0; i < ds_main_inpt_inptlist2.rowcount; i++)
		{
			if(ds_main_inpt_inptlist2.getColumn(i, "supitemcd") == "IMJM0001")
			{
				var addRow = ds_tmp_printinfo_dethbfc.addRow();
				
				ds_tmp_printinfo_dethbfc.copyRow(addRow, ds_main_inpt_inptlist2, i);
			}
		}
	}
	if(ds_tmp_printinfo_cond.getColumn(0, "dethcare") == "Y")
	{
		for(var i = 0; i < ds_main_inpt_inptlist2.rowcount; i++)
		{
			if(ds_main_inpt_inptlist2.getColumn(i, "supitemcd") == "ACDM0002")
			{
				var addRow = ds_tmp_printinfo_dethcare.addRow();
				
				ds_tmp_printinfo_dethcare.copyRow(addRow, ds_main_inpt_inptlist2, i);
			}
		}
	}
	if(ds_tmp_printinfo_cond.getColumn(0, "dethaftcare") == "Y")
	{
		for(var i = 0; i < ds_main_inpt_inptlist2.rowcount; i++)
		{
			if(ds_main_inpt_inptlist2.getColumn(i, "supitemcd") == "ACFM0001")
			{
				var addRow = ds_tmp_printinfo_dethaftcare.addRow();
				
				ds_tmp_printinfo_dethaftcare.copyRow(addRow, ds_main_inpt_inptlist2, i);
			}
		}
	}
	
	var objDOM = rptf_createDOM();	
	rptf_setNodeListToDOM(objDOM, "/root/tmp/printinfo", ds_tmp_printinfo);
	rptf_setNodeListToDOM(objDOM, "/root/tmp/printinfo/cond", ds_tmp_printinfo_cond);
	rptf_setNodeListToDOM(objDOM, "/root/tmp/printinfo/dethbfc", ds_tmp_printinfo_dethbfc);
	rptf_setNodeListToDOM(objDOM, "/root/tmp/printinfo/dethcare", ds_tmp_printinfo_dethcare);
	rptf_setNodeListToDOM(objDOM, "/root/tmp/printinfo/dethaftcare", ds_tmp_printinfo_dethaftcare);
	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;
	
	
	var option = "open=1;save=0;directprint=0;printdialog=0;print=0;zoom=0;";	
	
	rptf_exeReportPreview30(["RPMNH01400"],[objParam], option);
}

function fOpenVasKpsPopup(popGbn, grd_inptcol)
 {
	var grdInptRow;
	var grdInptCol = grd_inptcol;
	
	if(popGbn=="VAS")
	{
// 		grdInptRow  = grd_pasmlist.row; //현재row index
// 		grdInptCol  = grd_pasmlist.col; //현재col index
	}
	else
	{
		grdInptRow = ds_main_inpt_inptlist.rowposition;
	}
	
	var grdHtfaRow  = ds_main_htfa_htfalist.rowposition;

	if((grdInptCol == 2) || (grdInptCol==4) || (grdInptCol==6) || (grdInptCol==8) || (grdInptCol==10))
	{
		if(popGbn == "VAS")
		{
			var pid         = ds_main_htfa_htfalist.getColumn(grdHtfaRow, "pid");
			var cretdd      = ds_main_htfa_htfalist.getColumn(grdHtfaRow, "cretdd");
			var crettm      = ds_main_htfa_htfalist.getColumn(grdHtfaRow, "crettm");
			var instcd      = ds_main_htfa_htfalist.getColumn(grdHtfaRow, "instcd");
			var recitemcd   = ds_main_htfa_htfalist.getColumn(grdHtfaRow, "recitemcd");
			var recdd;
			//var vashval     = grd_pasmlist.valueMatrix(grdInptRow, grdInptCol);             //통증사전에 들어있는 현재그리드 row, col의 값
			//var spid        = model.getValue("/root/main/inpt/pasmlist[" + grdInptRow + "]/pid");       //통증사정에 들어있는 현재그리드 row의 pid값
		}
		else
		{
			var pid         = ds_main_htfa_htfalist.getColumn(grdHtfaRow, "pid");
			var cretdd      = ds_main_htfa_htfalist.getColumn(grdHtfaRow, "cretdd");
			var crettm      = ds_main_htfa_htfalist.getColumn(grdHtfaRow, "crettm");
			var instcd      = ds_main_htfa_htfalist.getColumn(grdHtfaRow, "instcd");
			var recitemcd   = ds_main_inpt_inptlist.getColumn(grdInptRow, "recitemcd");

			var recdd;
			var vashval     = ds_main_inpt_inptlist.getColumn(grdInptRow, grdInptCol);
			var spid        = ds_main_inpt_inptlist.getColumn(grdInptRow, "pid");
		}

		if(popGbn == "VAS")
		{
			if(grdInptCol==2)
			{
				recdd = group3.switch1.case1.grd_pasmlist.getCellProperty("head", 3, "text");
			}
			else if(grdInptCol==4)
			{
				recdd = group3.switch1.case1.grd_pasmlist.getCellProperty("head", 5, "text");
			}
			else if(grdInptCol==6)
			{
				recdd = group3.switch1.case1.grd_pasmlist.getCellProperty("head", 7, "text");
			}
			else if(grdInptCol==8)
			{
				recdd = group3.switch1.case1.grd_pasmlist.getCellProperty("head", 9, "text");
			}
			else if(grdInptCol==10)
			{
				recdd = group3.switch1.case1.grd_pasmlist.getCellProperty("head", 11, "text");
			}
		}
		else
		{
			if(grdInptCol==2)
			{
				recdd       = group3.switch1.case1.grd_inptlist.getCellProperty("head", 3, "text");
			}
			else if(grdInptCol==4)
			{
				recdd       = group3.switch1.case1.grd_inptlist.getCellProperty("head", 5, "text");
			}
			else if(grdInptCol==6)
			{
				recdd       = group3.switch1.case1.grd_inptlist.getCellProperty("head", 7, "text");
			}
			else if(grdInptCol==8)
			{
				recdd       = group3.switch1.case1.grd_inptlist.getCellProperty("head", 9, "text");
			}
			else if(grdInptCol==10)
			{
				recdd       = group3.switch1.case1.grd_inptlist.getCellProperty("head", 11, "text");
			}
		}
	
		frmf_setParameter("pid",         pid);
		frmf_setParameter("cretdd",      cretdd);
		frmf_setParameter("crettm",      crettm);
		frmf_setParameter("instcd",      instcd);
		frmf_setParameter("recitemcd",   recitemcd);
		frmf_setParameter("recdd",       recdd);
		frmf_setParameter("vas_row",     grdInptRow);
		frmf_setParameter("vas_col",     grdInptCol);
		frmf_setParameter("vashval",     vashval);
		frmf_setParameter("spid",        spid);
		frmf_setParameter("popGbn",      popGbn);//KPS와 VAS를 구분한다.
		
		popGbn = (popGbn == "VAS") ? "SMMNH03300" : (popGbn == "KPS") ? "SMMNH03700" : "";
		
		if(utlf_isNull(popGbn))
		{
			return;
		}

		frmf_modal(popGbn, popGbn, "", "", "", "", "", "", "", "", "", "", "M");
		
		frmf_clearParameter("pid");
		frmf_clearParameter("cretdd");
		frmf_clearParameter("crettm");
		frmf_clearParameter("instcd");
		frmf_clearParameter("recitemcd");
		frmf_clearParameter("recdd");
		frmf_clearParameter("vas_row");
		frmf_clearParameter("vas_col");
		frmf_clearParameter("vashval");
		frmf_clearParameter("spid");
		frmf_clearParameter("popGbn");
	}				
}]]></Script>