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

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[
/*
      환자별IO조회(SMMNR08600_환자별IO조회.xrw - JScript )
      - Version :
          1)  : Ver.1.00.01
*/
var xPathMemoInfo = "/root/main/memoinfo/memolist";
var xPathCondInfo = "/root/main/cond";
/**
 * @group  :
 * @ver    : 2008.07.02
 * @by     : 양천덕
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 화면 초기화
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fInitialize(){
	
	for(var i = grd_patlist.getBindCellIndex("body","ioyn"); i <= grd_patlist.getBindCellIndex("body","acyn"); i++) {
		grd_patlist.setRealColSize(i, 0, false);
	}

    if( utlf_isNull(ds_main_cond.getColumn(0, "seardd")) ){
        ipt_seardd.value = utlf_getCurrentDate();
    }


    // 간호환경설정 테이블 조회_20110215
    var pCode = "'002'"; // 조회할 CdGrupID 코드정보
    var pDate = utlf_getCurrentDate(); //조회기준일자
    fGetNursHardCdInfo(pCode, pDate);
	
	dsf_makeValue(ds_send_reqdata,"flag"	, "string", "Y");

    //부서콤보 조회
    var oParam = {};
    oParam.id          = "TRMNW11001";
    oParam.service     = "wardorderapp.NursPrcpMngt";
    oParam.method      = "reqGetDeptListInfo";
    oParam.inds        = "req=ds_send_reqdata";
    oParam.outds       = "ds_init_deptinfo_deptlist=deptlist";
    oParam.async       = false;

	tranf_submit(oParam);


     //설정된 상단정보를 불러옴
    ds_main_paminfo.clearData();
    var node = sysf_getGlobalVariable("paminfo");
    dsf_setCSVToDs("ds_main_paminfo", node);

    //로그인한 부서로 자동setting한다.
    ds_main_cond.setColumn(0, "wardcd", sysf_getUserInfo("dutplcecd"));    
	dsf_makeValue(ds_main_cond,"wardnm", "string",grp_inpatinfo.cmb_wardlist.text);
    
    ds_send_reqdata.clearData();
    dsf_makeValue(ds_send_reqdata,"wardcd", "string", ds_main_cond.getColumn(0, "wardcd"));

	var oParam = {};
    oParam.id          = "TRMNW10902";
    oParam.service     = "wardorderapp.NursPrcpMngt";
    oParam.method      = "reqGetWardRoomInfo";
    oParam.inds        = "reqCond=ds_send_reqdata";
    oParam.outds       = "ds_init_roominfo_room=room";
    oParam.async       = false;

	tranf_submit(oParam);


    if ( !utlf_isNull(ds_main_paminfo.getColumn(0, "pid")) ) {//상단정보에 환자가 셋팅되어 있을 경우
		dsf_makeValue(ds_main_cond,"upinfoyn", "string", "Y");

        ////20110828_KNUH_Start 내환자setting정보 조회.
        ds_main_cond.setColumn(0, "wardcd", ds_main_paminfo.getColumn(0, "wardcd"));
        fGetSettringInfoRef();

        //내환자셋팅정보가 있으면 set,없으면 그냥 null
        settingnurid = ds_init_settinginfo_settingrn.lookup("settingrnid", sysf_getUserInfo("userid"), "settingrnid");

        if( utlf_isNull(settingnurid) ) {
			ds_main_cond.setColumn(0, "roomcd", '-');
			ds_main_cond.setColumn(0, "settingrnid", '');
        } else {
			ds_main_cond.setColumn(0, "roomcd", '-');
			ds_main_cond.setColumn(0, "settingrnid", sysf_getUserInfo("userid"));
        }
        //20110828_KNUH_End

   } else {
	ds_main_cond.setColumn(0, "wardcd", sysf_getUserInfo("dutplcecd"));    //상단정보가 없을 경우 간호사 소속부서


    //20110828_KNUH_Start 환자setting정보 조회
    fGetSettringInfoRef();

    settingnurid = ds_init_settinginfo_settingrn.lookup("settingrnid", sysf_getUserInfo("userid"), "settingrnid");


      //내환자셋팅정보가 있으면 set,없으면 그냥 null
        if( utlf_isNull(settingnurid) ) {
			ds_main_cond.setColumn(0, "roomcd", '-');
			ds_main_cond.setColumn(0, "settingrnid", '');
        } else {
			ds_main_cond.setColumn(0, "roomcd", '-');
			ds_main_cond.setColumn(0, "settingrnid", sysf_getUserInfo("userid"));
        }

        //20110828_KNUH_End
    }
	    //20110215 이선경 : 경북대 - 응급실일 경우 구역정보를 조회
	  fGetZoneList();
	  fnZoneDisp();

    //fSearIOInfo();
    fPatInfoRef("I");
}


//20110828_KNUH_Start
function fGetPatInfo() {

	var settingnurid = ds_main_cond.getColumn(0, "settingrnid");

	if( utlf_isNull(settingnurid) ) {
		grp_inpatinfo.cmb_room.enable = true;
	} else {
		grp_inpatinfo.cmb_room.enable = false;
	}
	
	ds_send_reqdata.clearData();
	dsf_makeValue(ds_send_reqdata,"wardcd","string", ds_main_cond.getColumn(0, "wardcd"));
	dsf_makeValue(ds_send_reqdata,"settingrnid","string", ds_main_cond.getColumn(0, "settingrnid"));

	var oParam = {};
    oParam.id          = "TRMNW10902";
    oParam.service     = "wardorderapp.NursPrcpMngt";
    oParam.method      = "reqGetWardRoomInfo";
    oParam.inds        = "reqCond=ds_send_reqdata";
    oParam.outds       = "ds_init_roominfo_room=room";
    oParam.async       = false;

	tranf_submit(oParam);
	
	ds_main_cond.setColumn(0, "roomcd", "-");		//해당 병실 셋팅

	//해당 병실의 환자 조회
	ds_send_reqdata.clearData();
	dsf_makeValue(ds_send_reqdata,"orddd","string", ds_main_cond.getColumn(0, "seardd"));
	dsf_makeValue(ds_send_reqdata,"wardcd","string", ds_main_cond.getColumn(0, "wardcd"));
	dsf_makeValue(ds_send_reqdata,"roomcd","string", ds_main_cond.getColumn(0, "roomcd"));
	dsf_makeValue(ds_send_reqdata,"refflag","string", "room");
	dsf_makeValue(ds_send_reqdata,"ordtype","string", "I");
	
	dsf_makeValue(ds_send_reqdata,"settingrnid","string", ds_main_cond.getColumn(0, "settingrnid"));
	dsf_makeValue(ds_send_reqdata,"barflag","string", "Y");
	dsf_makeValue(ds_send_reqdata,"typeflag","string", ds_main_cond.getColumn(0, "typeflag"));

	var oParam = {};
    oParam.id          = "TRMNW10903";
    oParam.service     = "wardorderapp.NursPrcpMngt";
    oParam.method      = "reqGetRoomPatList";
    oParam.inds        = "reqCond=ds_send_reqdata";
    oParam.outds       = "ds_init_patinfo_patlist=patlist";
    oParam.async       = false;

	tranf_submit(oParam);
	
	if( !utlf_isNull(ds_init_patinfo_patlist.getColumnInfo("acptseqno")) && !utlf_isNull(ds_init_patinfo_patlist.getColumnInfo("cretno")) ){
		dsf_setTypeFormat(ds_init_patinfo_patlist, "acptseqno:INT^cretno:INT");
	}
}
//20110828_KNUH_End

/**
 * @desc   : 부서조건에 따른 병실 조회
 * @
 * @param  :initflag ="init" 초기화
 * @return :
 * @author : 성미연
 * @---------------------------------------------------
 */
function fRoomInfoRef(initflag) {
    ds_init_roominfo_room.updatecontrol = false;
	ds_init_roominfo_room.deleteColumn("roomcd");
	ds_init_roominfo_room.updatecontrol = true;
	
    ds_main_cond.setColumn(0, "patnm", "");
	ds_main_cond.setColumn(0, "pid", "");


    var settingrnid = ds_main_cond.getColumn(0, "settingrnid");

    grp_inpatinfo.cmb_room.enable = true;
    ds_send_reqdata.clearData();
	dsf_makeValue(ds_send_reqdata,"wardcd","string", ds_main_cond.getColumn(0, "wardcd") );
	dsf_makeValue(ds_send_reqdata,"settingrnid","string", ds_main_cond.getColumn(0, "settingrnid") );

	var oParam = {};
    oParam.id          = "TRMNW10902";
    oParam.service     = "wardorderapp.NursPrcpMngt";
    oParam.method      = "reqGetWardRoomInfo";
    oParam.inds        = "reqCond=ds_send_reqdata";
    oParam.outds       = "ds_init_roominfo_room=room";
    oParam.async       = false;
    oParam.callback    = "cf_TRMNW10902";

	tranf_submit(oParam);

    if(arErrorCode.pop("TRMNW10902") > -1){	
        if (ds_main_cond.getColumn(0, "upinfoyn") == "Y") {        //상단정보에 환자가 셋팅되어 있을 경우

            //20110828_KNUH_Start
            if( utlf_isNull(settingrnid) ) {
				ds_main_cond.setColumn(0, "roomcd", ds_main_paminfo.getColumn(0, "roomcd"));
            } else {
				ds_main_cond.setColumn(0, "roomcd", "");
            }
            //20110828_KNUH_End
            fPatInfoRef("I",initflag);
        } else {
			ds_main_cond.setColumn(0, "roomcd", "-");
			ds_init_patinfo_patlist.clearData();
        }
    }
}


function fnZoneDisp() {

    //응급의료센터(2280200000)인 경우
    //병동정보대신에 구역정보가 보임)(20080620)    
    if ( !utlf_isNull(ds_codelist.getColumn(ds_codelist.findRowExpr("cdgrupid == '002' && cdid == '"+grp_inpatinfo.cmb_wardlist.value+"'"), "cdid")) ) {
        grp_inpatinfo.caption15.visible = false;
        grp_inpatinfo.cmb_room.visible  = false;
        grp_inpatinfo.cap_Zone.visible  = true;
        grp_inpatinfo.cmb_Zone.visible  = true;


        //20110830_KNUH_Start
        grp_inpatinfo.cmb_settingrn.visible = false;
        grp_inpatinfo.cap_settingrn.visible = false;
        //20110830_KNUH_End

        grp_inpatinfo.cmb_room.value = "-";

        var zonecd = ds_main_paminfo.getColumn(0, "sectioncd");
        if( !utlf_isNull(zonecd) && zonecd != "-" ){
            grp_inpatinfo.cmb_Zone.value =  ds_main_paminfo.getColumn(0, "sectioncd");
        } else {
            grp_inpatinfo.cmb_Zone.value = "-";
        }
        grp_inpatinfo.cmb_settingrn.visible = false;


    } else {
        grp_inpatinfo.caption15.visible = true;
        grp_inpatinfo.cmb_room.visible  = true;


        grp_inpatinfo.cmb_settingrn.visible = true;
        grp_inpatinfo.cap_Zone.visible  = false;
        grp_inpatinfo.cmb_Zone.visible  = false;
        grp_inpatinfo.cmb_Zone.value = "";

        //20110830_KNUH_Start
        grp_inpatinfo.cmb_settingrn.visible = true;
        grp_inpatinfo.cap_settingrn.visible = true;
        //20110830_KNUH_End

    }
}

/**
 * @desc   : 병실별 환자리스트 조회, 부서별 환자리스트 조회
 * @
 * @param  :
 * @return :
 * @author : 성미연
 * @---------------------------------------------------
 */
function fPatInfoRef(deptflag, initflag) {

    var settingnurid="";

    settingnurid = ds_main_cond.getColumn(0, "settingrnid");

    ds_send_reqdata.clearData();
    dsf_makeValue(ds_send_reqdata,"orddd","string", ds_main_cond.getColumn(0, "seardd"));
    dsf_makeValue(ds_send_reqdata,"wardcd","string", ds_main_cond.getColumn(0, "wardcd"));
    dsf_makeValue(ds_send_reqdata,"settingrnid","string", ds_main_cond.getColumn(0, "settingrnid"));


        //20110828_KNUH_Start
    if( utlf_isNull(settingnurid) ) {
		dsf_makeValue(ds_send_reqdata,"roomcd","string", ds_main_cond.getColumn(0, "roomcd"));
    } else {
		dsf_makeValue(ds_send_reqdata,"roomcd","string", "-");
    }
    //20110828_KNUH_End
	dsf_makeValue(ds_send_reqdata,"refflag","string", "room");
	dsf_makeValue(ds_send_reqdata,"ordtype","string", "I");
	dsf_makeValue(ds_send_reqdata,"zonecd","string", ds_main_cond.getColumn(0, "zonecd"));
	dsf_makeValue(ds_send_reqdata,"settingrnid","string", ds_main_cond.getColumn(0, "settingrnid"));
	dsf_makeValue(ds_send_reqdata,"barflag","string", "Y");
	dsf_makeValue(ds_send_reqdata,"typeflag","string", ds_main_cond.getColumn(0, "typeflag"));

	var oParam = {};
    oParam.id          = "TRMNW10903";
    oParam.service     = "wardorderapp.NursPrcpMngt";
    oParam.method      = "reqGetRoomPatList";
    oParam.inds        = "reqCond=ds_send_reqdata";
    oParam.outds       = "ds_init_patinfo_patlist=patlist";
    oParam.async       = false;

	tranf_submit(oParam);
	
	if( !utlf_isNull(ds_init_patinfo_patlist.getColumnInfo("acptseqno")) && !utlf_isNull(ds_init_patinfo_patlist.getColumnInfo("cretno")) ){
		dsf_setTypeFormat(ds_init_patinfo_patlist, "acptseqno:INT^cretno:INT");
	}
}


//20110828_KNUH_Start 환자setting정보 조회
function fGetSettringInfoRef() {
	dsf_makeValue(ds_send_reqdata,"wardcd"		,"string", ds_main_cond.getColumn(0, "wardcd"));

    var oParam = {};
    oParam.id          = "TRMNW10910";
    oParam.service     = "wardcareapp.WardCareMngt";
    oParam.method      = "reqGetSettingRnList";
    oParam.inds        = "req=ds_send_reqdata";
    oParam.outds       = "ds_init_settinginfo_settingrn=settingrn";
    oParam.async       = false;

	tranf_submit(oParam);
	
	if( utlf_isNull(ds_init_settinginfo_settingrn.getColumn(0, "settingrnid")) ){
		ds_init_settinginfo_settingrn.setColumn(0, "settingrnid", "");
	}
	dsf_makeValue(ds_main_cond,"settingrnid","string", ds_init_settinginfo_settingrn.getColumn(0, "settingrnid"));

}


/**
 * @group  :
 * @ver    : 2008.07.02
 * @by     : 양천덕
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : IO정보 조회
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSearIOInfo(){

	ds_main_ioinfo_iolist.clearData();
	ds_send.copyData(ds_main_cond);
	ds_main_cond.setColumn(0, "seartodd", getDateCalc(String(ipt_seardd.value), 1, "+"));
   
	dsf_makeValue(ds_send,"pid"			,"string", ds_main_cond.getColumn(0, "pid"));
	dsf_makeValue(ds_send,"cretno"		,"string", ds_main_cond.getColumn(0, "cretno"));
	dsf_makeValue(ds_send,"indd"		,"string", ds_main_cond.getColumn(0, "orddd"));
	dsf_makeValue(ds_send,"seardd"		,"string", ds_main_cond.getColumn(0, "seardd"));
	dsf_makeValue(ds_send,"wardcd"		,"string", ds_main_cond.getColumn(0, "wardcd"));
	dsf_makeValue(ds_send,"seartodd"	,"string", ds_main_cond.getColumn(0, "seartodd"));
	dsf_makeValue(ds_send,"memoitemflag","string", "08");
	
	dsf_createDs("ds_main_ioinfo_iolist", [{col: "itemnm", type:"string", size:256}
										,  {col: "setyn",  type:"string", size:256}
										,  {col: "lnkbizcd",  type:"string", size:256}
										,  {col: "dayrslt",  type:"string", size:256}
										,  {col: "evnrslt",  type:"string", size:256}
										,  {col: "ngtrslt",  type:"string", size:256}
										,  {col: "daycnt",  type:"string", size:256}
										,  {col: "evncnt",  type:"string", size:256}
										,  {col: "ngtcnt",  type:"string", size:256}
										,  {col: "total",  type:"string", size:256}
										,  {col: "lnkrecflag",  type:"string", size:256}], true);
	
    var oParam = {};
    oParam.id          = "TRMNR05801_SJH";
    oParam.service     = "flowchartapp.FlowChartRecMngt";
    oParam.method      = "reqGetIntakeOutputInfo";
    oParam.inds        = "req=ds_send";
    oParam.outds       = "ds_main_ioinfo_dietprcplist=dietprcplist ds_main_ioinfo_iolist=iolist ds_main_memoinfo_memolist=memolist ds_main_patinfo_patinfo=patinfo";
    oParam.async       = false;

	tranf_submit(oParam);

	if( !utlf_isNull(ds_main_memoinfo_memolist.getColumnInfo("seqno")) ){	
		dsf_setTypeFormat(ds_main_memoinfo_memolist, "seqno:INT");
	}
	
	if( utlf_isNull(ds_main_ioinfo_iolist.getColumnInfo("d_lnkrecflag")) ){
		ds_main_ioinfo_iolist.addColumn("d_lnkrecflag", "string");
	}
	
	if( utlf_isNull(ds_main_ioinfo_iolist.getColumnInfo("e_lnkrecflag")) ){	
		ds_main_ioinfo_iolist.addColumn("e_lnkrecflag", "string");
	}
	
	if( utlf_isNull(ds_main_ioinfo_iolist.getColumnInfo("n_lnkrecflag")) ){	
		ds_main_ioinfo_iolist.addColumn("n_lnkrecflag", "string");
	}
	
	if( utlf_isNull(ds_main_ioinfo_iolist.getColumnInfo("subtotal")) ){	
		ds_main_ioinfo_iolist.addColumn("subtotal", "string");
	}
	for(var i =0; i < ds_main_ioinfo_iolist.rowcount; i++ ){
		ds_main_ioinfo_iolist.setColumn(i, "d_lnkrecflag"	, ds_main_ioinfo_iolist.getColumn(i, "lnkrecflag"));
		ds_main_ioinfo_iolist.setColumn(i, "e_lnkrecflag"	, ds_main_ioinfo_iolist.getColumn(i, "lnkrecflag"));
		ds_main_ioinfo_iolist.setColumn(i, "n_lnkrecflag"	, ds_main_ioinfo_iolist.getColumn(i, "lnkrecflag"));
		ds_main_ioinfo_iolist.setColumn(i, "subtotal"		, ds_main_ioinfo_iolist.getColumn(i, "total"));
	}

   	fSettingIOlnfo();
}

/**
 * @group  :
 * @ver    : 2008.07.02
 * @by     : 양천덕
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 조회 정보 Setting
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fSettingIOlnfo(){
	
	grdf_initGridStyle(grd_ioinfo);
	
	var tRow = ds_main_ioinfo_iolist.rowcount;
	var OralSum = 0;
	var DrugSum = 0;
	var BloodSum = 0 ;
	var EtcSum = 0;
	var OutPutSum = 0;
	var IntakeTotalSum = 0;
	var OutputTotalSum = 0;
	var SpecSum = 0;
	var StartFlag = "";
	var sAddIntakeRow = "";
	var IntakeLastRow = -1;
	
	OralSum   = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '01' && utlf_isNull(itemnm)"), "total");
	DrugSum   = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '02' && utlf_isNull(itemnm)"), "total");
	BloodSum  = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '03' && utlf_isNull(itemnm)"), "total");
	EtcSum    = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '04' && utlf_isNull(itemnm)"), "total");
	OutPutSum = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '07' && utlf_isNull(itemnm)"), "total");

	var DayOralSum   = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '01' && itemnm == '경구입력'"), "dayrslt");
	var EvnOralSum   = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '01' && itemnm == '경구입력'"), "evnrslt");
	var NgtOralSum   = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '01' && itemnm == '경구입력'"), "ngtrslt");
	var totalOralSum = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '01' && itemnm == '경구입력'"), "subtotal");
	
	var DaySum1 = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '01' && utlf_isNull(itemnm)"), "dayrslt");
	var DaySum2 = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '02' && utlf_isNull(itemnm)"), "dayrslt");
	var DaySum3 = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '03' && utlf_isNull(itemnm)"), "dayrslt");
	var DaySum4 = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '04' && utlf_isNull(itemnm)"), "dayrslt");
	var EvnSum1 = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '01' && utlf_isNull(itemnm)"), "evnrslt");
	var EvnSum2 = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '02' && utlf_isNull(itemnm)"), "evnrslt");
	var EvnSum3 = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '03' && utlf_isNull(itemnm)"), "evnrslt");
	var EvnSum4 = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '04' && utlf_isNull(itemnm)"), "evnrslt");
	var NgtSum1 = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '01' && utlf_isNull(itemnm)"), "ngtrslt");
	var NgtSum2 = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '02' && utlf_isNull(itemnm)"), "ngtrslt");
	var NgtSum3 = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '03' && utlf_isNull(itemnm)"), "ngtrslt");
	var NgtSum4 = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '04' && utlf_isNull(itemnm)"), "ngtrslt");
	
	var SubTotal1 = ds_main_ioinfo_iolist.getColumn(ds_main_ioinfo_iolist.findRowExpr("lnkbizcd == '01' && utlf_isNull(itemnm)"), "subtotal");
	
	
	
	if( utlf_isNull(DaySum1) )DaySum1=0;
	if( utlf_isNull(DaySum2) )DaySum2=0;
	if( utlf_isNull(DaySum3) )DaySum3=0;
	if( utlf_isNull(DaySum4) )DaySum4=0;
	if( utlf_isNull(EvnSum1) )EvnSum1=0;
	if( utlf_isNull(EvnSum2) )EvnSum2=0;
	if( utlf_isNull(EvnSum3) )EvnSum3=0;
	if( utlf_isNull(EvnSum4) )EvnSum4=0;
	if( utlf_isNull(NgtSum1) )NgtSum1=0;
	if( utlf_isNull(NgtSum2) )NgtSum2=0;
	if( utlf_isNull(NgtSum3) )NgtSum3=0;
	if( utlf_isNull(NgtSum4) )NgtSum4=0;
	
	for(var i=0; i < ds_main_ioinfo_iolist.rowcount; i++) {
		lnkbizcd =  grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","lnkbizcd"));
		itemnm   =  grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm"));
	  
		if(lnkbizcd == "01" && utlf_isNull(itemnm) ) {
			ds_main_ioinfo_iolist.setColumn(i, "dayrslt"	, parseFloat(DaySum1)   + parseFloat(DayOralSum));
			ds_main_ioinfo_iolist.setColumn(i, "evnrslt"	, parseFloat(EvnSum1)   + parseFloat(EvnOralSum));
			ds_main_ioinfo_iolist.setColumn(i, "ngtrslt"	, parseFloat(NgtSum1)   + parseFloat(NgtOralSum));
			ds_main_ioinfo_iolist.setColumn(i, "subtotal"	, parseFloat(SubTotal1) + parseFloat(totalOralSum));
			ds_main_ioinfo_iolist.setColumn(i, "total"		, parseFloat(SubTotal1) + parseFloat(totalOralSum));
		}
	}
	

	if(tRow > -1){
		var sExprColor   = "EXPR(";
		var sExprSize    = "EXPR(";
		for(var i = 0; i < ds_main_ioinfo_iolist.rowcount; i++){
			
			if(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","setyn")) == "1"){
				IntakeLastRow = i;
			}
			
			var param = grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","lnkbizcd"));

     
			//수치가 0인 항목 삭제 및 항목명 입력
			if(param == "01"){
				if( utlf_isNull( grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","d_lnkrecflag")) ) && !utlf_isNull( grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm")) ) ){
					ds_main_ioinfo_iolist.setColumn(i, "d_lnkrecflag", grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm")));	
				}
				
				if( utlf_isNull( grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","e_lnkrecflag")) ) && !utlf_isNull( grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm")) ) ){ 
				    ds_main_ioinfo_iolist.setColumn(i, "e_lnkrecflag", grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm")));	                                                                                                 
				}
				
				if( utlf_isNull( grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","n_lnkrecflag")) ) && !utlf_isNull( grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm")) ) ){
					ds_main_ioinfo_iolist.setColumn(i, "n_lnkrecflag", grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm")));
				}
			}else{
				if( utlf_isNull( grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","d_lnkrecflag")) ) ){
					ds_main_ioinfo_iolist.setColumn(i, "d_lnkrecflag", utlf_transNullToEmpty(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm")))+ 
					       (  param == "03" 
					       && grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","daycnt")) !=  "0" 
					       &&  !utlf_isNull(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm"))) 
					       ? " ("+ utlf_transNullToEmpty(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","daycnt"))) + ")" : "") );
					

				}else if( !utlf_isNull(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm"))) ){
					ds_main_ioinfo_iolist.setColumn(i, "dayrslt", "");		
				}

				if( utlf_isNull(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","e_lnkrecflag"))) ){
					ds_main_ioinfo_iolist.setColumn(i, "e_lnkrecflag", utlf_transNullToEmpty(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm")))+ 
					          (  param == "03" 
					          && grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","evncnt")) !=  "0" 
					          &&  !utlf_isNull(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm"))) 
					          ? " ("+ utlf_transNullToEmpty(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","evncnt"))) + ")" : "") );

				}else if( !utlf_isNull(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm"))) ){
					ds_main_ioinfo_iolist.setColumn(i, "evnrslt", "");
				}
				
				if( utlf_isNull( grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","n_lnkrecflag")) ) ){
					ds_main_ioinfo_iolist.setColumn(i, "n_lnkrecflag", utlf_transNullToEmpty(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm")))+ 
					          (  param == "03" 
					          && grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","ngtcnt")) !=  "0" 
					          &&  !utlf_isNull(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm"))) 
					          ? " ("+ utlf_transNullToEmpty(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","ngtcnt"))) + ")" : "") );

				}else if( !utlf_isNull(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","itemnm"))) ){
					ds_main_ioinfo_iolist.setColumn(i, "ngtrslt", "");
				}
			}

			var fRow = ds_main_ioinfo_iolist.findRow("lnkbizcd", ds_main_ioinfo_iolist.getColumn(i, "lnkbizcd"));

			
			//구분별 합계 입력(Merge 작업을 하기위하여 머지할 행 데이터 일치시키기 위함)
			switch(param){
				case "01" :
					ds_main_ioinfo_iolist.setColumn(i, "total", "     " + OralSum);
					break;
				case "02" :
					ds_main_ioinfo_iolist.setColumn(i, "total", " " + DrugSum);
					break;
				case "03" :
					ds_main_ioinfo_iolist.setColumn(i, "total", "  " + BloodSum);
					break;
				case "04" :
					ds_main_ioinfo_iolist.setColumn(i, "total", "   " + EtcSum);		
					break;
				case "05" :
					ds_main_ioinfo_iolist.setColumn(i, "total", "    " + OutPutSum);					
					break;
			}
			
			//구분필드 색상 변경
			sExprColor += "currow == "+i+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","setyn"))   +") ? '#ccccff' : ";
			sExprColor += "currow == "+i+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","lnkbizcd"))+") ? '#ccccff' : ";
			sExprSize  += "currow == "+i+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","setyn"))   +") ? 'Dotum,9,bold' : ";
			sExprSize  += "currow == "+i+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","lnkbizcd"))   +") ? 'Dotum,9,bold' : ";
			
			
			//SubTotal Row 색상 변경
			if( utlf_isNull(ds_main_ioinfo_iolist.getColumn(i, "itemnm")) ){
				for(var stcol = grd_ioinfo.getBindCellIndex("body","d_lnkrecflag") ; stcol <= grd_ioinfo.getBindCellIndex("body","subtotal"); stcol++){
					sExprColor += "currow == "+i+" && (self.col == "+stcol+") ? '#ffff99' : ";
				}
			}
			
				
			//Total Output Row 색상변경
			if( ds_main_ioinfo_iolist.getColumn(i, "lnkbizcd") == "07"){
				for(var tocol = grd_ioinfo.getBindCellIndex("body","setyn"); tocol <= grd_ioinfo.getBindCellIndex("body","total"); tocol++){
					sExprColor = sExprColor.replace("currow == "+i+" && (self.col == "+tocol+") ? '#ccccff' : ", "currow == "+i+" && (self.col == "+tocol+") ? '#ffff00' : ");
					sExprColor = sExprColor.replace("currow == "+i+" && (self.col == "+tocol+") ? '#ffff99' : ", "currow == "+i+" && (self.col == "+tocol+") ? '#ffff00' : ");
					sExprSize += "currow == "+i+" && (self.col == "+tocol+") ? 'Dotum,9,bold' : ";
				}	
			}
		}

		//Intake 합계 Row 추가 		
		var intaketotalsetrow = -1;
		
		if(IntakeLastRow > -1){
			
			ds_main_ioinfo_iolist.insertRow(IntakeLastRow + 1);

			for(var itr = ds_main_ioinfo_iolist.rowcount-2; itr > IntakeLastRow; itr--){
				sExprColor = sExprColor.replace("currow == "+itr+"", "currow == "+(itr+1)+"");
				sExprSize  = sExprSize.replace("currow == "+itr+"", "currow == "+(itr+1)+"");
			}
			intaketotalsetrow = IntakeLastRow + 1;
		}
		
		if(intaketotalsetrow > -1){
			ds_main_ioinfo_iolist.setColumn(intaketotalsetrow, "setyn"		, "06");
			ds_main_ioinfo_iolist.setColumn(intaketotalsetrow, "lnkbizcd"	, "06");
			ds_main_ioinfo_iolist.setColumn(intaketotalsetrow, "dayrslt"	, eval(DayOralSum) + eval(DaySum1) + eval(DaySum2) + eval(DaySum3)+ eval(DaySum4));
			ds_main_ioinfo_iolist.setColumn(intaketotalsetrow, "evnrslt"	, eval(EvnOralSum) + eval(EvnSum1) + eval(EvnSum2) + eval(EvnSum3)+ eval(EvnSum4));
			ds_main_ioinfo_iolist.setColumn(intaketotalsetrow, "ngtrslt"	, eval(NgtOralSum) + eval(NgtSum1) + eval(NgtSum2) + eval(NgtSum3)+ eval(NgtSum4));     
			
			
			for(var itcol = grd_ioinfo.getBindCellIndex("body","setyn"); itcol <= grd_ioinfo.getBindCellIndex("body","total"); itcol++){
				sExprColor = sExprColor.replace("currow == "+intaketotalsetrow+" && (self.col == "+itcol+") ? '#ccccff' : ", "currow == "+intaketotalsetrow+" && (self.col == "+itcol+") ? '#ffff00' : ");
				sExprColor += "currow == "+intaketotalsetrow+" && (self.col == "+itcol+") ? '#ffff00' : ";
				sExprSize  += "currow == "+intaketotalsetrow+" && (self.col == "+itcol+") ? 'Dotum,9,bold' : ";
			}
		}
		
		// 비고 Row 추가및 계산 정보 입력
		var insertRow = -1 ;
		var specRow = -1;
		var outputtotalsetrow = ds_main_ioinfo_iolist.findRow("setyn", "07");		

		if(intaketotalsetrow > -1 && outputtotalsetrow > -1){
			ds_main_ioinfo_iolist.insertRow(outputtotalsetrow + 1);
			
			for(var qlrhr = ds_main_ioinfo_iolist.rowcount-2; qlrhr > outputtotalsetrow; qlrhr--){
				sExprColor = sExprColor.replace("currow == "+qlrhr+"", "currow == "+(qlrhr+1)+"");
				sExprSize  = sExprSize.replace("currow == "+qlrhr+"", "currow == "+(qlrhr+1)+"");
			}
			
			specRow = outputtotalsetrow+1;			
		}

		if(specRow > -1 ){
			var sExprColor2   = "EXPR(";
			var d_spec = eval(ds_main_ioinfo_iolist.getColumn(intaketotalsetrow, "dayrslt")) - eval(ds_main_ioinfo_iolist.getColumn(outputtotalsetrow, "dayrslt"));
			var e_spec = eval(ds_main_ioinfo_iolist.getColumn(intaketotalsetrow, "evnrslt")) - eval(ds_main_ioinfo_iolist.getColumn(outputtotalsetrow, "evnrslt"));
			var n_spec = eval(ds_main_ioinfo_iolist.getColumn(intaketotalsetrow, "ngtrslt")) - eval(ds_main_ioinfo_iolist.getColumn(outputtotalsetrow, "ngtrslt"));
			var t_spec = eval(d_spec) + eval(e_spec) + eval(n_spec);

			d_spec = Math.round(d_spec * Math.pow(10, (-4)*(-1)-1)) / Math.pow(10, (-4)*(-1)-1);
			e_spec = Math.round(e_spec * Math.pow(10, (-4)*(-1)-1)) / Math.pow(10, (-4)*(-1)-1);
			n_spec = Math.round(n_spec * Math.pow(10, (-4)*(-1)-1)) / Math.pow(10, (-4)*(-1)-1);
			t_spec = Math.round(t_spec * Math.pow(10, (-4)*(-1)-1)) / Math.pow(10, (-4)*(-1)-1);
			
			ds_main_ioinfo_iolist.setColumn(specRow, "setyn"	, "08");
			ds_main_ioinfo_iolist.setColumn(specRow, "lnkbizcd"	, "08");

			
			if(d_spec > 0){
				ds_main_ioinfo_iolist.setColumn(specRow, "dayrslt", "+" + d_spec);
				sExprColor2 += "currow == "+specRow+" && (self.col == "+grd_ioinfo.getBindCellIndex("body","dayrslt")+") ? '#ff0000' : ";
			}else if(d_spec == 0){
				ds_main_ioinfo_iolist.setColumn(specRow, "dayrslt", d_spec);    		
			}else{
				ds_main_ioinfo_iolist.setColumn(specRow, "dayrslt", d_spec);    
				sExprColor2 += "currow == "+specRow+" && (self.col == "+grd_ioinfo.getBindCellIndex("body","dayrslt")+") ? '#0000ff' : ";   
			}
			
			if(e_spec > 0){
				ds_main_ioinfo_iolist.setColumn(specRow, "evnrslt", "+" + e_spec);
				sExprColor2 += "currow == "+specRow+" && (self.col == "+grd_ioinfo.getBindCellIndex("body","evnrslt")+") ? '#ff0000' : ";     
			}else if(e_spec == 0){
				ds_main_ioinfo_iolist.setColumn(specRow, "evnrslt", e_spec);     		
			}else{
				ds_main_ioinfo_iolist.setColumn(specRow, "evnrslt", e_spec); 
				sExprColor2 += "currow == "+specRow+" && (self.col == "+grd_ioinfo.getBindCellIndex("body","evnrslt")+") ? '#0000ff' : ";                 
			}
			
			if(n_spec > 0){
				ds_main_ioinfo_iolist.setColumn(specRow, "ngtrslt", "+" + n_spec); 
				sExprColor2 += "currow == "+specRow+" && (self.col == "+grd_ioinfo.getBindCellIndex("body","ngtrslt")+") ? '#ff0000' : ";   
			}else if(n_spec == 0){
				ds_main_ioinfo_iolist.setColumn(specRow, "ngtrslt", n_spec);      		
			}else{
				ds_main_ioinfo_iolist.setColumn(specRow, "ngtrslt", n_spec);         
				sExprColor2 += "currow == "+specRow+" && (self.col == "+grd_ioinfo.getBindCellIndex("body","ngtrslt")+") ? '#0000ff' : ";         			
			}
			
			if(t_spec > 0){
				ds_main_ioinfo_iolist.setColumn(specRow, "subtotal", "+" + t_spec);
				ds_main_ioinfo_iolist.setColumn(specRow, "total", "+" + t_spec);
				
				sExprColor2 += "currow == "+specRow+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","subtotal"))   +") ? '#ff0000' : ";
				sExprColor2 += "currow == "+specRow+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","total"))	  +") ? '#ff0000' : ";    
				
			}else if(t_spec == 0){
				ds_main_ioinfo_iolist.setColumn(specRow, "subtotal", t_spec);
				ds_main_ioinfo_iolist.setColumn(specRow, "total", t_spec);
				
			}else{
				ds_main_ioinfo_iolist.setColumn(specRow, "subtotal", t_spec);
				ds_main_ioinfo_iolist.setColumn(specRow, "total", t_spec);
				
				sExprColor2 += "currow == "+specRow+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","subtotal"))   +") ? '#0000ff' : ";
				sExprColor2 += "currow == "+specRow+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","total"))	  +") ? '#0000ff' : ";    
			}

 			for(var qlrh = grd_ioinfo.getBindCellIndex("body","setyn"); qlrh <= grd_ioinfo.getBindCellIndex("body","total"); qlrh++){
 				sExprColor = sExprColor.replace("currow == "+specRow+" && (self.col == "+qlrh+") ? '#ccccff' : ", "currow == "+specRow+" && (self.col == "+qlrh+") ? '#ffcc99' : ");
 				sExprColor += "currow == "+specRow+" && (self.col == "+qlrh+") ? '#ffcc99' : ";
 				sExprSize  += "currow == "+specRow+" && (self.col == "+qlrh+") ? 'Dotum,9,bold' : ";
 			}
 			sExprColor2  += "'')";
		}
		
		sExprColor  += "'')";
		
		for(var expnum = 0; expnum <grd_ioinfo.getCellCount("Body"); expnum++){
			grd_ioinfo.setCellProperty("Body", expnum, "background", sExprColor);
			grd_ioinfo.setCellProperty("Body", expnum, "background2", sExprColor);
			grd_ioinfo.setCellProperty("Body", expnum, "color", sExprColor2);
		}
		
		
		sExprSize  += "'Dotum,9')";

		for(var expnum2 = 0; expnum2 <grd_ioinfo.getCellCount("Body"); expnum2++){
			grd_ioinfo.setCellProperty("Body", expnum2, "font", sExprSize);
		}

		//그리드 선택 제어 부분
		grp_inpatinfo.btn_close.setFocus();
		ds_main_ioinfo_iolist.rowposition = -1;
		grd_ioinfo.readonly = true;
		
		//그리드 머지 작업
		/*
		grd_ioinfo.mergecells = "bycolrec"; // byrestriccol  byrestricrow
		
		grd_ioinfo.mergecol(0) = true;	
		grd_ioinfo.mergecol(1) = true;
		grd_ioinfo.mergecol(2) = false;	
		grd_ioinfo.mergecol(3) = false;	
		grd_ioinfo.mergecol(4) = false;	
		grd_ioinfo.mergecol(5) = false;	
		grd_ioinfo.mergecol(6) = false;	
		grd_ioinfo.mergecol(7) = false;
		grd_ioinfo.mergecol(8) = false;	
		grd_ioinfo.mergecol(9) = true;
		*/
		
		//Total Intake 합계 데이터 입력(Merge로 인하여 제일 하단에 추가)
		if(intaketotalsetrow > -1){
			ds_main_ioinfo_iolist.setColumn(intaketotalsetrow, "subtotal"	, "      " + Math.round((eval(DaySum1) + eval(DaySum2) + eval(DaySum3)+ eval(DaySum4) + eval(EvnSum1) + eval(EvnSum2) + eval(EvnSum3)+ eval(EvnSum4) + eval(NgtSum1) + eval(NgtSum2) + eval(NgtSum3)+ eval(NgtSum4)) * Math.pow(10, (-4)*(-1)-1)) / Math.pow(10, (-4)*(-1)-1));
			ds_main_ioinfo_iolist.setColumn(intaketotalsetrow, "total"		, "      " + Math.round((eval(DaySum1) + eval(DaySum2) + eval(DaySum3)+ eval(DaySum4) + eval(EvnSum1) + eval(EvnSum2) + eval(EvnSum3)+ eval(EvnSum4) + eval(NgtSum1) + eval(NgtSum2) + eval(NgtSum3)+ eval(NgtSum4)) * Math.pow(10, (-4)*(-1)-1)) / Math.pow(10, (-4)*(-1)-1));
		}
	}

	for(var i = 0; i < ds_main_ioinfo_iolist.rowcount; i ++){
		if( utlf_isNull(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","dayrslt"))) ){
			ds_main_ioinfo_iolist.setColumn(i, "d_lnkrecflag", "");
		}
		
		if( utlf_isNull(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","evnrslt"))) ){
			ds_main_ioinfo_iolist.setColumn(i, "e_lnkrecflag", "");
		}
		
		if( utlf_isNull(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","ngtrslt"))) ){
			ds_main_ioinfo_iolist.setColumn(i, "n_lnkrecflag", "");
		}
	}	
	
	//수치량이 존재하지 않는 Row 삭제
	for(var i = 0; i < ds_main_ioinfo_iolist.rowcount; i++){
		if( grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","dayrslt")) == "07"){
			//grd_ioinfo.mergerow(i) = true;	
		}
		
		if(utlf_isNull(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","dayrslt"))) &&
		   utlf_isNull(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","evnrslt"))) &&
		   utlf_isNull(grd_ioinfo.getCellValue(i,  grd_ioinfo.getBindCellIndex("body","ngtrslt"))) ){
			 ds_main_ioinfo_iolist.deleteRow(i);
			 i = i-1;
		}
	}
	
	var sExprdpValue    = "EXPR(";
	var sExpredValue    = "EXPR(";
	for(var exva = 0; exva < ds_main_ioinfo_iolist.rowcount; exva++){
		for(var cds = 0; cds < ds_temp_lnkrecinfo_lnkreclist.rowcount; cds++){
			if(ds_temp_lnkrecinfo_lnkreclist.getColumn(cds, "cd") == ds_main_ioinfo_iolist.getColumn(exva, "d_lnkrecflag")){
				sExprdpValue += "currow == "+exva+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","d_lnkrecflag"))   +") ? 'combo' : ";
				sExpredValue += "currow == "+exva+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","d_lnkrecflag"))   +") ? 'combo' : ";
			}
			
			if(ds_temp_lnkrecinfo_lnkreclist.getColumn(cds, "cd") == ds_main_ioinfo_iolist.getColumn(exva, "e_lnkrecflag")){
				sExprdpValue += "currow == "+exva+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","e_lnkrecflag"))   +") ? 'combo' : ";
				sExpredValue += "currow == "+exva+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","e_lnkrecflag"))   +") ? 'combo' : ";
			}
			
			if(ds_temp_lnkrecinfo_lnkreclist.getColumn(cds, "cd") == ds_main_ioinfo_iolist.getColumn(exva, "n_lnkrecflag")){
				sExprdpValue += "currow == "+exva+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","n_lnkrecflag"))   +") ? 'combo' : ";
				sExpredValue += "currow == "+exva+" && (self.col == "+(grd_ioinfo.getBindCellIndex("body","n_lnkrecflag"))   +") ? 'combo' : ";
			}
		}	
	}
	sExprdpValue  += "'normal')";
	sExpredValue  += "'none')";
	grd_ioinfo.setCellProperty("Body", grd_ioinfo.getBindCellIndex("body","d_lnkrecflag"), "displaytype", sExprdpValue);
	grd_ioinfo.setCellProperty("Body", grd_ioinfo.getBindCellIndex("body","d_lnkrecflag"), "edittype", sExpredValue);

	grd_ioinfo.setCellProperty("Body", grd_ioinfo.getBindCellIndex("body","e_lnkrecflag"), "displaytype", sExprdpValue);
	grd_ioinfo.setCellProperty("Body", grd_ioinfo.getBindCellIndex("body","e_lnkrecflag"), "edittype", sExpredValue);

	grd_ioinfo.setCellProperty("Body", grd_ioinfo.getBindCellIndex("body","n_lnkrecflag"), "displaytype", sExprdpValue);
	grd_ioinfo.setCellProperty("Body", grd_ioinfo.getBindCellIndex("body","n_lnkrecflag"), "edittype", sExpredValue);
}


/**
 * @group  :
 * @ver    : 2009.07.01
 * @by     : 김홍점
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 메모저장, 메모삭제
 * @param  :PFlag : D - 메모삭제 , S - 저장
 * @return :
 * @---------------------------------------------------
 */
function fMedrMomoSave(pFlag){
alert("메모저장 안쓰는것 같음");return;
/*
    var saveHearder = "m▦memocnts▦pid▦memoitemflag▦seqno▦recdd_b▦rectm_b▦recdd▦rectm▦indd▦cretno▩";
    var saveData = "";
    var status = "";
    if ( utlf_isNull(ds_main_cond.getColumn(0, "pid")) ) {
        sysf_messageBox("해당 환자가 선택되지", "E007");
        return;
    } else {
        model.removeNodeset("/root/send/savedata");
        model.makeNode("/root/send/savedata");

        model.makeValue("/root/send/savedata/condinfo/wardcd",  model.getValue(xPathCondInfo + "/wardcd"));
        model.makeValue("/root/send/savedata/condinfo/pid", model.getValue(xPathCondInfo + "/pid"));
        model.makeValue("/root/send/savedata/condinfo/indd", model.getValue(xPathCondInfo + "/orddd"));
        model.makeValue("/root/send/savedata/condinfo/cretno", model.getValue(xPathCondInfo + "/cretno"));
        model.makeValue("/root/send/savedata/condinfo/orddd", model.getValue(xPathCondInfo + "/seardd"));
        model.makeValue("/root/send/savedata/condinfo/seardd", model.getValue(xPathCondInfo + "/seardd"));
        model.makeValue("/root/send/savedata/condinfo/memoitemflag", "08");

        if( pFlag =="D"){
            saveData = "d" + "▦"
                     + ""  + "▦"
                     + model.getValue(xPathCondInfo + "/pid")  + "▦"
                     + "08"  + "▦"
                     + model.getValue(xPathMemoInfo + "/seqno") + "▦"
                     + model.getValue(xPathMemoInfo + "/recdd_b") + "▦"
                     + model.getValue(xPathMemoInfo + "/rectm_b") + "▦"
                     + model.getValue(xPathMemoInfo + "/recdd_b") + "▦"
                     + model.getValue(xPathMemoInfo + "/rectm_b") + "▦"
                     + model.getValue(xPathCondInfo + "/orddd")  + "▦"
                     + model.getValue(xPathCondInfo + "/cretno")  + "▩";

            model.makeValue("/root/send/savedata/memoinfo",saveHearder+saveData);

            model.resetInstanceNode(xPathMemoInfo);

            if(submit("TXMNR05801","false")){
                messageBox("성공적으로", "I001");
            }

        }else{

            if ( isNull(model.getValue(xPathMemoInfo + "/memocnts")) ){
               messageBox("저장할 메모를", "C001");//" 입력하십시오."
               return;
            }

            if(isNull(model.getValue(xPathMemoInfo+"/status"))){
               status="i";
                saveData = status + "▦"
                         + model.getValue(xPathMemoInfo+"/memocnts")  + "▦"
                         + model.getValue(xPathCondInfo + "/pid")  + "▦"
                         + "08"  + "▦"
                         + model.getValue(xPathMemoInfo + "/seqno") + "▦"
                         + model.getValue(xPathMemoInfo + "/recdd_b") + "▦"
                         + model.getValue(xPathMemoInfo + "/rectm_b") + "▦"
                         + model.getValue(xPathCondInfo + "/seardd") + "▦"
                         + "0000▦"
                         + model.getValue(xPathCondInfo + "/orddd")  + "▦"
                         + model.getValue(xPathCondInfo + "/cretno")  + "▩";
            }else{
               status="u";
                saveData = status + "▦"
                         + model.getValue(xPathMemoInfo+"/memocnts")  + "▦"
                         + model.getValue(xPathCondInfo + "/pid")  + "▦"
                         + "08"  + "▦"
                         + model.getValue(xPathMemoInfo + "/seqno") + "▦"
                         + model.getValue(xPathMemoInfo + "/recdd_b") + "▦"
                         + model.getValue(xPathMemoInfo + "/rectm_b") + "▦"
                         + model.getValue(xPathMemoInfo + "/recdd_b") + "▦"
                         + model.getValue(xPathMemoInfo + "/rectm_b") + "▦"
                         + model.getValue(xPathCondInfo + "/orddd")  + "▦"
                         + model.getValue(xPathCondInfo + "/cretno")  + "▩";
            }

            model.makeValue("/root/send/savedata/memoinfo",saveHearder+saveData);

            model.resetInstanceNode(xPathMemoInfo);

            if(submit("TXMNR05801","false")){
                messageBox("성공적으로", "I001");
            }
        }
    }
*/
}
]]></Script>