/*
  
      SPMNR05000_°£È£Item ½Ã°£º¯°æ.xrw(SPMNR05000.xrw - JScript )

      - Version :
          1)  : Ver.1.00.01 
*/
var xPrcpInfoPath = "/root/main/prcpinfo";
var xClsListPath = "/root/main/clsinfo/clslist";
var xTimeListPath = "/root/main/timeinfo/timelist";
var xSaveInfoPath = "/root/main/saveinfo";
var sTimeColor = "#fcd2c1";
var PageFlag = "";
var sApntseqno = "";
var sSelectRow = "";
var sPrcpdd = "";
var sPrcpno = "";
var sPrcpHistNo = "";
/**
 * @group  : 
 * @ver    : 2007.08.08
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : È­¸é ÃʱâÈ­
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fInitialize(){
	var sParamMsg = "";	
	var sApntTMSpecList="";	// ±âÁؽð£setting
	var sRemainder = 0;		// ³ª¸ÓÁö
	var sCareItemCD = "";
	var sFlag = "";
	var iRow = 0;
	var sStatus = "";
	if(checkOpener()){
		submit("TRMNR04901");		
		sParamMsg = opener.javascript.getParameter("SPMNR05000_Param");
		model.setValue(	xPrcpInfoPath+"/prcpnm", getArrayData(sParamMsg,1,0));	
		model.setValue(	xPrcpInfoPath+"/prcpcd", getArrayData(sParamMsg,1,1));	
		model.setValue(	xPrcpInfoPath+"/careitemcd", getArrayData(sParamMsg,1,2));	
		model.setValue(	xPrcpInfoPath+"/apnttmspec", getArrayData(sParamMsg,1,3));
		model.setValue(	xSaveInfoPath+"/apnttmspec", getArrayData(sParamMsg,1,3));
		model.setValue(	xPrcpInfoPath+"/supcd", getArrayData(sParamMsg,1,4));
		sApntseqno = getArrayData(sParamMsg,1,6);
		PageFlag = getArrayData(sParamMsg,1,5);
		sStatus = getArrayData(sParamMsg,1,7);
		sSelectRow = getArrayData(sParamMsg,1,8);
	}
	fSearchItem();
	
	if(sStatus == "I"){
		if(PageFlag == "B"){
			ipt_prcpnm.disabled = false;
		}else{
			if(getArrayData(sParamMsg,1,4) != ""){
				cmb_itemcls.disabled = true;	
			}
		}
		btn_change.disabled = true;
	}else{
		if(PageFlag == "B"){
			ipt_prcpnm.disabled = false;
			cmb_item.disabled = true; 
			cmb_itemcls.disabled = true;
		}else{
			if(getArrayData(sParamMsg,1,4) != ""){
				cmb_itemcls.disabled = true;
			}
			if(getArrayData(sParamMsg,1,2) != "" && getArrayData(sParamMsg,1,2) != getArrayData(sParamMsg,1,4)){
				cmb_item.disabled = true;
			}
		}
		btn_add.disabled = true;
	}
	
	if(PageFlag == "B"){
		caption14.attribute("text") = "Áö½Ãó¹æ Á÷Á¢ÀÔ·Â";
	}else{
    sPrcpdd = getArrayData(sParamMsg,1,8);        
    sPrcpno = getArrayData(sParamMsg,1,9);   
    sPrcpHistNo = getArrayData(sParamMsg,1,10);   
	}

	// ½Ã°£ ¼¼ÆÃ
	model.removenodeset(xTimeListPath);
	var i = 1;
	for(iRow=1; iRow<=4; iRow++){
		grd_timelist.addRow(false);		
		for(var iCol=1; iCol<=6; iCol++){
			if(i == 24){
				i=0;	
			}
			model.setValue(xTimeListPath+"["+iRow+"]/time"+iCol,i);
			i++;
		}	
	}
	grd_timelist.rebuild();
	
	sApntTMSpecList = model.getValue(xPrcpInfoPath+"/apnttmspec");
	if(	sApntTMSpecList != ""){
		var sApntTMSpec = sApntTMSpecList.split(",");
		for(i=0; i<sApntTMSpec.length; i++){
			sRemainder = eval(sApntTMSpec[i]) % 6;			
			if(sRemainder == 0) sRemainder += 6;
			
			setCellStyle("grd_timelist","0",sApntTMSpec[i],"time"+sRemainder , "equal");	
		}
	}
	model.refresh();
}

/**
 * @group  : 
 * @ver    : 2007.08.08
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ±×¸®µå Ŭ¸¯½Ã
 * @param  : 
 * @return :
 * @---------------------------------------------------
 */
function fClinckGridRow(){
	var iRow = grd_timelist.row;
	var iCol = grd_timelist.col;
	var sApntTMSpec = "";
	if(grd_timelist.cellStyle("background-color", iRow, iCol) == sTimeColor){
		grd_timelist.cellStyle("background-color", iRow, iCol) = "#ffffff";
	}else{
		grd_timelist.cellStyle("background-color", iRow, iCol) = sTimeColor;
	}
	for(var i = 1; i <= 4; i++){
		for(var j = 0; j < 6; j++){
			if(grd_timelist.cellStyle("background-color", i, j) == sTimeColor){
					if(sApntTMSpec == ""){
						sApntTMSpec = grd_timelist.labelmatrix(i,j);
					}else{
						sApntTMSpec += "," + grd_timelist.labelmatrix(i,j);
					}
			}
		}
	}
	model.setValue(	xSaveInfoPath+"/apnttmspec", sApntTMSpec);
	grd_timelist.row = 0;
	grd_timelist.col = -1;
	model.refresh();
}

/**
 * @group  : 
 * @ver    : 2007.08.08
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : °£È£Item ¶Ç´Â ½Ã°£ setting ÃʱâÈ­ 
 * @param  : pFlag ( time : ½Ã°£setting, item : °£È£ Item)
 * @return :
 * @---------------------------------------------------
 */
 
function fClearGrid(){
	grd_timelist.allstyle( "all", "background-color" ) = "#FFFFFF";
	model.setValue(	xSaveInfoPath+"/apnttmspec", "");
	model.refresh();
}
/**
 * @group  : 
 * @ver    : 2007.08.08
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : °£È£Item ½Ã°£ Setting Àü¼Û
 * @param  : 
 * @return :
 * @---------------------------------------------------
 */
function fSend(pFlag){
	var sApntTMSpec = model.getValue("/root/main/saveinfo/apnttmspec");
	var sCareItemCd = model.getValue("/root/main/prcpinfo/careitemcd");
	var sSupcd      = model.getvalue("/root/main/prcpinfo/supcd");
	var sPrcpnm     = model.getvalue("/root/main/prcpinfo/prcpnm");
	
	if(sApntTMSpec == ""){
		messageBox("½Ã°£À»","C002");	
		return;		
	}
	if(sSupcd == ""){
		messageBox("°£È£ Item ºÐ·ù¸¦","C002");	
		return;	
	}
	
  var sCareItemNm = model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/itemnm");	
	var sSupcdNm    = model.getValue("/root/main/clsinfo/clslist[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+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/clincobs"       )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/intake"         )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/output"         )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/catheter"       )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/careexec"       )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/clincobsprcpyn" )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/cathprcpyn"     )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/careexecprcpyn" )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/mainrecflag"    )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/extyn"          )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/itemorigincd"   )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/instru"   )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/instruprcpyn"   )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/supsetno"   )+"¢Ì";				
		opener.javascript.setParameter("SPMNR05000_Return",sReturnMsg);
		opener.javascript.setParameter("SPMNR05000_ReturnItem",sReturnMsgItem);		
		window.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+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/clincobs"       )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/intake"         )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/output"         )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/catheter"       )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/careexec"       )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/clincobsprcpyn" )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/cathprcpyn"     )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/careexecprcpyn" )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/mainrecflag"    )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/extyn"          )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/itemorigincd"   )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/instru"   )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/instruprcpyn"   )+"¢Ë"
		                    + model.getValue("/root/main/iteminfo/itemlist[itemcd='"+sCareItemCd+"']/supsetno"   )+"¢Ì";				
		opener.javascript.setParameter("SPMNR05000_Return",sReturnMsg);
        opener.javascript.setParameter("SPMNR05000_ReturnItem",sReturnMsgItem);		
		window.close();			
	}
}

/**
 * @group  : 
 * @ver    : 2007.08.08
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : IntervalÁöÁ¤ ½Ã°£ °è»ê
 * @param  : 
 * @return :
 * @---------------------------------------------------
 */
function fIntervalCalculate(){
	
	grd_timelist.allstyle( "all", "background-color" ) = "#FFFFFF";
	var time = Number(model.getValue("/root/main/cond/time"));
	var interval = Number(model.getValue("/root/main/cond/interval"));
	
	if(time > 24 || time < 0){
		messageBox("½ÃÀ۽𣠼³Á¤ÀÌ Àß ¸ø µÇ¾ú½À´Ï´Ù.", "I");
		model.setFocus("ipt_time");
		return;
	}

	if(interval < 1 || interval > 24){
		messageBox("Interval ¼³Á¤ÀÌ Àß ¸ø µÇ¾ú½À´Ï´Ù.", "I");
		model.setFocus("ipt_interval");
		return;		
	}
		
	if(time == 24){
		time = 0;	
	}
	
	var curtime = time;
	var sApntTMSpecList = "";
	var cnt = 0;
	var sRemainder = "";
	
	while(curtime <= 24){
		if(cnt == 0){
			if(curtime == 24){
				sApntTMSpecList += "0";
			}else{
				sApntTMSpecList += curtime.toString();
			}
		}else{
			if(curtime == 24){
				if(time != 0 ){
					sApntTMSpecList += ",0";
				}
			}else{
				sApntTMSpecList += "," + curtime.toString();
			}
		}
		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;
			setCellStyle("grd_timelist","0",sApntTMSpec[i],"time"+sRemainder , "equal");	
		}
	}
	
	model.setValue(xSaveInfoPath + "/apnttmspec", sApntTMSpecList);
	model.refresh();
}

/**
 * @group  : 
 * @ver    : 2008.06.10
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ºÐ·ùº° Item List Á¶È¸
 * @param  : 
 * @return :
 * @---------------------------------------------------
 */
function fSearchItem(){
	model.makeValue("/root/send/itemcd" , cmb_itemcls.value );
	submit("TRMNR05001");
}