YNU_JEUS/app_home/himed/xpapps/emr/carerecxp/xp/SPMNR05000.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[/*
  
      SPMNR05000_간호Item 시간변경.xrw(SPMNR05000.xrw - JScript )

      - Version :
          1)  : Ver.1.00.01 
*/
var xPrcpInfoPath = ds_prcpinfo;
var xClsListPath = ds_clsinfo_clslist;
var xTimeListPath = ds_timeinfo_timelist;
var xSaveInfoPath = ds_saveinfo;
var sTimeColor = "#fcd2c1";
var PageFlag = "";
var sApntseqno = "";
var sSelectRow = "";
var sPrcpdd = "";
var sPrcpno = "";
var sPrcpHistNo = "";

//화면 초기화
function fInitialize()
{
	var sParamMsg = "";	
	var sApntTMSpecList="";	// 기준시간setting
	var sRemainder = 0;		// 나머지
	var sCareItemCD = "";
	var sFlag = "";
	var iRow = 0;
	var sStatus = "";
	if(frmf_checkOpener())
	{
		var oParam = {};
			oParam.id          = "TRMNR04901";
			oParam.service     = "carerecapp.RecItemMngt";
			oParam.method      = "reqGetClsItemList";
			oParam.inds        = "req=ds_prcpinfo";
			oParam.outds       = "ds_clsinfo_clslist=clslist"; 
			oParam.async       = false;			
		tranf_submit(oParam);
							
		sParamMsg = opener.frmf_getParameter("SPMNR05000_Param");		
		
		xPrcpInfoPath.setColumn(0, "prcpnm", lf_getArrayData(sParamMsg,1,0, "▩", "▦"));	
		xPrcpInfoPath.setColumn(0, "prcpcd", lf_getArrayData(sParamMsg,1,1, "▩", "▦"));	
		xPrcpInfoPath.setColumn(0, "careitemcd", lf_getArrayData(sParamMsg,1,2, "▩", "▦"));	
		xPrcpInfoPath.setColumn(0, "apnttmspec", lf_getArrayData(sParamMsg,1,3, "▩", "▦"));
		xSaveInfoPath.setColumn(0, "apnttmspec", lf_getArrayData(sParamMsg,1,3, "▩", "▦"));
		xPrcpInfoPath.setColumn(0, "supcd", lf_getArrayData(sParamMsg,1,4, "▩", "▦"));
		sApntseqno = lf_getArrayData(sParamMsg,1,6, "▩", "▦");
		PageFlag = lf_getArrayData(sParamMsg,1,5, "▩", "▦");
		sStatus = lf_getArrayData(sParamMsg,1,7, "▩", "▦");
		sSelectRow = lf_getArrayData(sParamMsg,1,8, "▩", "▦");
	}
	//수정
	fSearchItem();
	//
	
	if(sStatus == "I")
	{
		if(PageFlag == "B")
		{
			ipt_prcpnm.enable = true;
			ipt_prcpnm.readonly =  false;
		}
		else
		{
			if(lf_getArrayData(sParamMsg,1,4, "▩", "▦") != "")
			{
				cmb_itemcls.enable = false;	
			}
		}
		btn_change.enable = false;
	}
	else
	{
		if(PageFlag == "B")
		{
			ipt_prcpnm.enable = true;
			ipt_prcpnm.readonly = false;
			cmb_item.enable = false; 
			cmb_itemcls.enable = false;
		}
		else
		{
			if(lf_getArrayData(sParamMsg,1,4, "▩", "▦") != "")
			{
				cmb_itemcls.enable = false;
			}
			if(lf_getArrayData(sParamMsg,1,2, "▩", "▦") != "" && lf_getArrayData(sParamMsg,1,2, "▩", "▦") != lf_getArrayData(sParamMsg,1,4, "▩", "▦"))
			{
				cmb_item.enable = false;
			}
		}
		btn_add.enable = false;
	}
	
	if(PageFlag == "B")
	{
		caption14.text = "지시처방 직접입력";
	}
	else
	{
		sPrcpdd = lf_getArrayData(sParamMsg,1,8, "▩", "▦");        
		sPrcpno = lf_getArrayData(sParamMsg,1,9, "▩", "▦");   
		sPrcpHistNo = lf_getArrayData(sParamMsg,1,10, "▩", "▦");   
	}

	// 시간 세팅	
	xTimeListPath.clearData();
	var i = 1;
	for(iRow=0; iRow < 4; iRow++){
		ds_timeinfo_timelist.addRow(false);		
		for(var iCol = 1; iCol <= 6; iCol++){
			if(i == 24){
				i=0;	
			}
			xTimeListPath.setColumn(iRow, "time"+iCol, i);
			i++;
		}	
	}
	
	sApntTMSpecList = xPrcpInfoPath.getColumn(0, "apnttmspec");
	if(	!utlf_isNull(sApntTMSpecList) )
	{
		var sApntTMSpec = sApntTMSpecList.split(",");
		for(i=0; i<sApntTMSpec.length; i++)
		{
			sRemainder = eval(sApntTMSpec[i]) % 6;	
			if(sRemainder == 0) sRemainder += 6;

			//grdf_setCellStyle(grd_timelist, "0", sApntTMSpec[i], "time"+sRemainder , "equal");				
			ds_timeinfo_timelist.filter("time" + sRemainder + " == '"+sApntTMSpec[i]+"'");
			ds_timeinfo_timelist.setColumn(0, "time"+sRemainder+"_1", sTimeColor);
			ds_timeinfo_timelist.filter("");
		}
	}	
}

//분류별 Item List 조회
function fSearchItem()
{
	dsf_makeValue(ds_send, "itemcd", "string", cmb_itemcls.value);
		
	var oParam = {};
		oParam.id          = "TRMNR05001";
		oParam.service     = "carerecapp.RecItemMngt";
		oParam.method      = "reqGetSubItemList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_iteminfo_itemlist=itemlist";
		oParam.async       = false;		
	tranf_submit(oParam);
}

 //desc   : 간호Item 또는 시간 setting 초기화 
 //param  : pFlag ( time : 시간setting, item :  
function fClearGrid()
{	
	for(var i = 0; i < ds_timeinfo_timelist.rowcount; i++)
	{		
		for(var j = 0; j < 12 ; j++)
		{
			if(j >= 0 && j < 6)
			{
				
// 				grd_timelist.setCellProperty("Body", j, "background", "");
// 				grd_timelist.setCellProperty("Body", j, "background2", "");
			}
			else if(j >= 6)
			{	
				
				ds_timeinfo_timelist.setColumn(i, j, "");
			}
		}
	}		
	xSaveInfoPath.setColumn(0, "apnttmspec", "");	
}

//그리드 클릭시
function fClinckGridRow()
{
	var iRow = grd_timelist.currentrow;
	var iCol = grd_timelist.currentcol;
	var sApntTMSpec = "";
	//var sExprBack = "EXPR(";
			
	if(utlf_isNull(ds_timeinfo_timelist.getColumn(iRow, iCol + 6)))
	{		
		ds_timeinfo_timelist.setColumn(iRow, iCol + 6, sTimeColor);
	}
	else if(!utlf_isNull(ds_timeinfo_timelist.getColumn(iRow, iCol + 6)))
	{				
		ds_timeinfo_timelist.setColumn(iRow, iCol + 6, "");
	}
			
	for(var i = 0; i < 4; i++)
	{
		for(var j = 0; j < 6; j++)
		{			
			if(!utlf_isNull(ds_timeinfo_timelist.getColumn(i, j + 6)))
			{
				if(sApntTMSpec == "")
				{
					sApntTMSpec = ds_timeinfo_timelist.getColumn(i, j); 
				}
				else
				{
					sApntTMSpec += "," + ds_timeinfo_timelist.getColumn(i, j);
				}
			}
		}
	}
	xSaveInfoPath.setColumn(0, "apnttmspec", sApntTMSpec);
// 	grd_timelist.row = 0;
// 	grd_timelist.col = -1;

}

//Interval지정 시간 계산
function fIntervalCalculate()
{		
	for(var i = 0; i < ds_timeinfo_timelist.rowcount; i++)
	{		
		for(var j = 0; j < 12 ; j++)
		{
			if(j >= 0 && j < 6)
			{				
// 				grd_timelist.setCellProperty("Body", j, "background", "");
// 				grd_timelist.setCellProperty("Body", j, "background2", "");
			}
			else if(j >= 6)
			{	
				
				ds_timeinfo_timelist.setColumn(i, j, "");
			}
		}
	}		
	
	var time = Number(ds_cond.getColumn(0, "time"));
	var interval = Number(ds_cond.getColumn(0, "interval"));
	
	if(time > 24 || time < 0)
	{
		sysf_messageBox("시작시간 설정이 잘 못 되었습니다.", "I");
		ipt_time.setFocus();
		return;
	}

	if(interval < 1 || interval > 24){
		sysf_messageBox("Interval 설정이 잘 못 되었습니다.", "I");
		ipt_interval.setFocus();
		return;		
	}
		
	if(time == 24)
	{
		time = 0;	
	}
		
	var curtime = time;
	var sApntTMSpecList = "";
	var cnt = 0;
	var sRemainder = "";
	var sExprBack = "EXPR(";
	var j = 0;
	var k = 0;
	var iRow = 0;
	var iCol = 0;
	var breackReturn = false;
	
	while(curtime <= 24)
	{
		if(cnt == 0)
		{
			if(curtime == 24)
			{
				sApntTMSpecList += "0";
			}
			else
			{
				sApntTMSpecList += curtime;
			}
		}
		else
		{
			if(curtime == 24)
			{
				if(time != 0 )
				{
					sApntTMSpecList += ",0";
				}
			}
			else
			{
				sApntTMSpecList += "," + curtime;
			}
		}
		curtime += interval;
		cnt++;
	}
	if(	sApntTMSpecList != "")
	{
		var sApntTMSpec = sApntTMSpecList.split(",");
		
		for(i=0; i < sApntTMSpec.length; i++)
		{
			sRemainder = eval(sApntTMSpec[i]) % 6;			
			if(sRemainder == 0) sRemainder += 6;														
			breackReturn = false;
			
			for(j = 0; j < 4 ;j++)
			{
				for(k = 0; k < 6 ; k++)
				{
					if(ds_timeinfo_timelist.getColumn(j, k) == sApntTMSpec[i])
					{						
						breackReturn = true;						
						break;
					}
				}
				if(breackReturn == true)
				{
					break;
				}
			}
			iRow = j;
			iCol = k;
						
			if(utlf_isNull(ds_timeinfo_timelist.getColumn(iRow, iCol + 6)))
			{		
				ds_timeinfo_timelist.setColumn(iRow, iCol + 6, "currow == " + iRow + " ? '" + sTimeColor + "' : " );
			}
			else if(!utlf_isNull(ds_timeinfo_timelist.getColumn(iRow, iCol + 6)))
			{				
				ds_timeinfo_timelist.setColumn(iRow, iCol + 6, "");
			}
			
		}		
		for(k = 0 ; k < 6 ;k++)		
		{		
			breackReturn = false;
			sExprBack = "EXPR(";
			for(j = 0; j < ds_timeinfo_timelist.rowcount; j++)
			{
				if( !utlf_isNull(ds_timeinfo_timelist.getColumn(j, k + 6)))
				{
					sExprBack += ds_timeinfo_timelist.getColumn(j, k + 6);
					breackReturn = true;
				}
			}
			if(breackReturn == true)
			{				
				sExprBack += "'')";											
// 				grd_timelist.setCellProperty("Body", k, "background", sExprBack);
// 				grd_timelist.setCellProperty("Body", k, "background2", sExprBack);	
			}
			else
			{
				sExprBack = "";
// 				grd_timelist.setCellProperty("Body", k, "background", sExprBack);
// 				grd_timelist.setCellProperty("Body", k, "background2", sExprBack);	
			}
		}						
	}	
	xSaveInfoPath.setColumn(0, "apnttmspec", sApntTMSpecList);	
}

//간호Item 시간 Setting 전송
function fSend(pFlag)
{
	dsf_setDefaultVal(ds_prcpinfo, "all");
	var sApntTMSpec = ds_saveinfo.getColumn(0, "apnttmspec");
	var sCareItemCd = ds_prcpinfo.getColumn(0, "careitemcd");
	var sSupcd      = ds_prcpinfo.getColumn(0, "supcd");
	var sPrcpnm     = ds_prcpinfo.getColumn(0, "prcpnm");

	if(utlf_isNull(sApntTMSpec))
	{
		sysf_messageBox("시간을","C002");	
		return;		
	}
	if(utlf_isNull(sSupcd))
	{
		sysf_messageBox("간호 Item 분류를","C002");	
		return;	
	}
	
	var sCareItemNm = ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "itemnm");		
	if(utlf_isNull(sCareItemNm))
	{
		sCareItemNm = "";
	}	
	var sSupcdNm    = ds_clsinfo_clslist.lookup("itemcd", sSupcd, "itemnm");			
	if(PageFlag == "P")
	{
		var sReturnMsg = "flag▦careitemcd▦careitemnm▦apnttmspec▦supcd▦supnm▦apntflag▦prcpnm▦apntseqno▦rownum▦prcpdd▦prcpno▦prcphistno▩"+pFlag+"▦"+sCareItemCd+"▦"+sCareItemNm+"▦"+sApntTMSpec+"▦"+sSupcd+"▦"+sSupcdNm+"▦"+PageFlag+"▦"+"▦"+sApntseqno+"▦"+sSelectRow+"▦"+sPrcpdd+"▦"+sPrcpno+"▦"+sPrcpHistNo+"▩";
		var sReturnMsgItem = "careitemcd▦careitemnm▦supcd▦supnm▦clincobs▦intake▦output▦catheter▦careexec▦clincobsprcpyn▦cathprcpyn▦careexecprcpyn▦mainrecflag▦extyn▦itemorigincd▦instru▦instruprcpyn▦supsetno▩";
		    sReturnMsgItem += sCareItemCd+"▦"+sCareItemNm+"▦"+sSupcd+"▦"+sSupcdNm+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "clincobs"       )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "intake"         )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "output"         )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "catheter"       )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "careexec"       )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "clincobsprcpyn" )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "cathprcpyn"     )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "careexecprcpyn" )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "mainrecflag"    )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "extyn"          )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "itemorigincd"   )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "instru"   )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "instruprcpyn"   )+"▦"
		                    if( !utlf_isNull(ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "supsetno") ))
		                    {
								+ ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "supsetno"   )+"▩";				
		                    }
		                    else
		                    {
								+ "" +"▩";				
		                    }
		opener.frmf_setParameter("SPMNR05000_Return",sReturnMsg);		
		opener.frmf_setParameter("SPMNR05000_ReturnItem",sReturnMsgItem);		
		this.close();	
	}
	else
	{
		var sReturnMsg = "flag▦careitemcd▦careitemnm▦apnttmspec▦supcd▦supnm▦apntflag▦prcpnm▦apntseqno▦rownum▦prcpdd▦prcpno▦prcphistno▩"+pFlag+"▦"+sCareItemCd+"▦"+sCareItemNm+"▦"+sApntTMSpec+"▦"+sSupcd+"▦"+sSupcdNm+"▦"+PageFlag+"▦"+sPrcpnm+"▦"+sApntseqno+"▦"+sSelectRow+"▦"+"▦"+"▦"+"▩";
		var sReturnMsgItem = "careitemcd▦careitemnm▦supcd▦supnm▦clincobs▦intake▦output▦catheter▦careexec▦clincobsprcpyn▦cathprcpyn▦careexecprcpyn▦mainrecflag▦extyn▦itemorigincd▦instru▦instruprcpyn▦supsetno▩";
		    sReturnMsgItem += sCareItemCd+"▦"+sCareItemNm+"▦"+sSupcd+"▦"+sSupcdNm+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "clincobs"       )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "intake"         )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "output"         )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "catheter"       )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "careexec"       )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "clincobsprcpyn" )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "cathprcpyn"     )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "careexecprcpyn" )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "mainrecflag"    )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "extyn"          )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "itemorigincd"   )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "instru"   )+"▦"
		                    + ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "instruprcpyn"   )+"▦"
							if( !utlf_isNull(ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "supsetno") ))
		                    {
								+ ds_iteminfo_itemlist.lookup("itemcd", sCareItemCd, "supsetno"   )+"▩";				
		                    }
		                    else
		                    {
								+ "" +"▩";				
		                    }
			
        opener.frmf_setParameter("SPMNR05000_Return",sReturnMsg);
		opener.frmf_setParameter("SPMNR05000_ReturnItem",sReturnMsgItem);		
		
		this.close();			
	}	
}]]></Script>