YNU_JEUS/app_home/himed/xpapps/emr/chrtmngtxp/xp/SMMRC01500.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[/**
  - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩

     - 외래차트대출신청 및 상태조회 ( SMMRC01500_외래차트대출신청 및 상태조회.xrw - JScript )

      - Version :
          1)  : Ver.1.00.01
 

  - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩
**/
/**
 * @ver    :  2007/12/11 
 * @desc   : 폼초기화 및 공통코드 load,상단정보 있을시 검색
 * @
 * @by     : 이창록
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function finitialize() {
    ds_main_appchrt_outchrtlist.clearData();
    ds_main_otherchrt_otherchrtlist.clearData();
	cap_oldimgER.text = "";
	cap_oldimgAH.text = "";

    //mmbfGetDeptCodeComboList("/root/send/reqdata", "/root/init/wardlist", "W"); //병동코드 콤보    
    lf_mmbfGetDeptCodeComboList(ds_init_wardlist, "W");

    var pamInfoCvs = sysf_getGlobalVariable("paminfo");
    if (!utlf_isNull(pamInfoCvs)) { //cvs가 null이 아닌 경우에만 처리함.        
        ds_main_result_paminfo_list.clearData();

        dsf_setCSVToDs("ds_main_result_paminfo_list", pamInfoCvs);
        var pid = ds_main_result_paminfo_list.getColumn(0, "pid");
        var orddeptcd = ds_main_result_paminfo_list.getColumn(0, "orddeptcd");
        var wardcd = ds_main_result_paminfo_list.getColumn(0, "wardcd");
        var roomcd = ds_main_result_paminfo_list.getColumn(0, "roomcd");
        var indd = ds_main_result_paminfo_list.getColumn(0, "indd");
        //model.setColumn("/root/outcond/chrtdept" ,orddeptcd);
        ds_outcond.setColumn(0, "ward", wardcd);
        ds_outcond.setColumn(0, "pid", pid);
        ds_outcond.setColumn(0, "ddlist", utlf_getCurrentDate());
        dsf_makeValue(ds_outcond, "instcd", "string", sysf_getUserInfo("dutplceinstcd"));
        //dsf_makeValue("/root/outcond/dschdd"  ,getCurrentDate());
        ds_othercond.setColumn(0, "ward", wardcd);
        fSelectWard();
        fOutChartList();
        ds_othercond.setColumn(0, "room", roomcd);
        fRoomPatList();
        ds_othercond.setColumn(0, "pid", pid);
        dsf_makeValue(ds_othercond, "indd", "string", indd);
        dsf_makeValue(ds_othercond, "instcd", "string", sysf_getUserInfo("dutplceinstcd"));
        fOtherChrtList();
    } else if (utlf_isNull(pamInfoCvs)) {
        ds_outcond.setColumn(0, "ward", sysf_getUserInfo("dutplcecd"));
        dsf_makeValue(ds_outcond, "ddlist", "string", utlf_getCurrentDate());
        dsf_makeValue(ds_outcond, "instcd", "string", sysf_getUserInfo("dutplceinstcd"));
        fOutChartList();
    }
    
    grd_outchrtlist.setCellProperty("body", 9, "edittype", "none");    
}
/**
 * @group  :
 * @ver    : 2007.12.11
 * @by     : 이창록
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 외래차트대출 상태조회
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fOutChartList() {
    var oParam = {};
    oParam.id = "TRMRC01501";
    oParam.service = "chrtmngtapp.ChrtRendMngt";
    oParam.method = "reqGetOutchartList";
    oParam.inds = "outcond=ds_outcond";
    oParam.outds = "ds_main_appchrt_outchrtlist=outchrtlist";
    oParam.async = false;
    oParam.callback = "cf_TRMRC01501";

    tranf_submit(oParam);
        
	if(utlf_isNull(ds_main_appchrt_outchrtlist.getColumnInfo("edittype")))
	{
		ds_main_appchrt_outchrtlist.addColumn("edittype", "string");
	}

    if (arErrorCode.pop("TRMRC01501") > -1) {        
        if(utlf_isNull(ds_main_appchrt_outchrtlist.getColumnInfo("rendflag"))){
			ds_main_appchrt_outchrtlist.addColumn("rendflag", "string");
        }
        
        for (var i = 0; i < ds_main_appchrt_outchrtlist.rowcount; i++) {
            if (ds_outcond.getColumn(0, "dschInddlist") == "dschdd") {
                if (!utlf_isNull(ds_main_appchrt_outchrtlist.getColumn(i, "trgCol"))) { //그 인덱스 값이 없을 때                     
                    //grd_outchrtlist.isReadOnly(i, "rendflag") = true; //edit못하게 
                    ds_main_appchrt_outchrtlist.setColumn(i, "edittype", "none");
                }
            } else if (ds_outcond.getColumn(0, "dschInddlist") == "indd") {
                if (ds_main_appchrt_outchrtlist.getColumn(i, "appdd") == "신청중") {
                    grd_outchrtlist.isReadOnly(i, rendflagCol) = true;
                } else if (!utlf_isNull(ds_main_appchrt_outchrtlist.getColumn(i, "appdd"))) {                   
                    //grd_outchrtlist.isReadOnly(i, "rendflag") = true;
                    ds_main_appchrt_outchrtlist.setColumn(i, "edittype", "none");
                } else {                   
                   // grd_outchrtlist.isReadOnly(i, "rendflag") = false;
                   ds_main_appchrt_outchrtlist.setColumn(i, "edittype", "checkbox");
                }
            }
            else
            {
				ds_main_appchrt_outchrtlist.setColumn(i, "edittype", "checkbox");
            }
        }
    }
}

function cf_TRMRC01501(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
/**
 * @group  :
 * @ver    : 2007.12.11
 * @by     : 이창록
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 외래차트대출
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fRowRendflag() {

    if (ds_main_appchrt_outchrtlist.rowposition >= 0) {
    
    
        var iRow = ds_main_appchrt_outchrtlist.rowposition;
        var rRow = ds_main_otherchrt_otherchrtlist.rowposition;
        var rendflag = ds_main_appchrt_outchrtlist.getColumn(iRow, "rendflag");
        var chrtflag = ds_main_appchrt_outchrtlist.getColumn(iRow, "chrtflag");
        var appdeptcd = ds_main_appchrt_outchrtlist.getColumn(iRow, "appdeptcd");
        var appdd = ds_main_appchrt_outchrtlist.getColumn(iRow, "appdd");
        var appmanid = ds_main_appchrt_outchrtlist.getColumn(iRow, "appmanid");
        var lendmanid = ds_main_appchrt_outchrtlist.getColumn(iRow, "lendmanid");
        var rtndd = ds_main_appchrt_outchrtlist.getColumn(iRow, "rtndd");
        if (chrtflag != "P") {
            sysf_messageBox("이 환자는 해당 입원과 차트가 없으니 오른쪽의 타과 차트 대출에서 신청", "I008");
            ds_main_appchrt_outchrtlist.setColumn(iRow, "rendflag", "false");
            return;
        }
        if (rendflag == "true" || rendflag == "1") {
            ds_main_appchrt_outchrtlist.setColumn(iRow, "rendflag", "true");
            ds_main_appchrt_outchrtlist.setColumn(iRow, "appdd", utlf_getCurrentDate());
        } else if (rendflag == "false" || rendflag == "0") {
            ds_main_appchrt_outchrtlist.setColumn(iRow, "appdd", "");
            ds_main_appchrt_outchrtlist.setColumn(iRow, "rendflag", "false");
        }
    }
}
/**
 * @group  :
 * @ver    : 2007.12.11
 * @by     : 이창록
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 병동에 병실 조회
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSelectWard() {
    dsf_makeValue(ds_send_reqdata, "wardcd", "string", ds_othercond.getColumn(0, "ward"));    

    var oParam = {};
    oParam.id = "TRMRC00051";
    oParam.service = "chrtmngtapp.ChrtRendMngt";
    oParam.method = "reqGetRoom";
    oParam.inds = "req=ds_send_reqdata";
    oParam.outds = "ds_init_room=room";
    oParam.async = false;
    //oParam.callback = "cf_TRMRC00051";

    tranf_submit(oParam);

    ipt_pid.value = "";
}
/**
 * @group  :
 * @ver    : 2007.12.11
 * @by     : 이창록
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 입원환자차트리스트 저장 
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fReqLendChrt() {
    //grd_outchrtlist.clearStatus();
    //ds_send.clearData();
    var iRow = ds_main_appchrt_outchrtlist.rowposition;
    var bSave = false;
    for (var i = 0; i < ds_main_appchrt_outchrtlist.rowcount; i++) {
        var check = ds_main_appchrt_outchrtlist.getColumn(i, "rendflag");
        if (check == "true" || check == "1") {
            //grd_outchrtlist.rowStatus(i) = 1;
            ds_main_appchrt_outchrtlist.enableevent = false;
            ds_main_appchrt_outchrtlist.updatecontrol = false;
            ds_main_appchrt_outchrtlist.setRowType(i, 2);
            ds_main_appchrt_outchrtlist.updatecontrol = true;
            ds_main_appchrt_outchrtlist.enableevent = true;
            bSave = true;
        }
    }
    if (bSave == true) {
        var iRow = ds_main_appchrt_outchrtlist.rowposition;
        var ward = ds_outcond.getColumn(0, "ward");

        if (ward == "2280200000") {
            //병동이 응급의료센터일때 대출용도를 강제로 006로 저장 
            ds_main_appchrt_outchrtlist.setColumn(iRow, "rendcd", "006");
        } else{
            ds_main_appchrt_outchrtlist.setColumn(iRow, "rendcd", "004");
           }
        //dsf_makeValue(ds_send, "savedata", "string", grd_outchrtlist.getUpdateData());

        var oParam = {};
        oParam.id = "TXMRC01501";
        oParam.service = "chrtmngtapp.ChrtRendMngt";
        oParam.method = "insOutChrtList";
        oParam.inds = "req=ds_main_appchrt_outchrtlist";
        oParam.outds = "";
        oParam.async = false;
        oParam.callback = "cf_TXMRC01501";

        tranf_submit(oParam);
        if (arErrorCode.pop("TXMRC01501") > -1) {
            sysf_messageBox("선택하신 차트가", "I001");
        } else {
            sysf_messageBox("선택하신 차트가", "E009");
        }
        //model.removeNodeset("/root/send/savedata");        
        fOutChartList();
    } else {
        sysf_messageBox("대출신청할 종이차트를", "C002");
    }
}

function cf_TXMRC01501(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

/**
 * @group  :
 * @ver    : 2007.12.11
 * @by     : 이창록
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 병실에 환자 가져오기
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fRoomPatList() {
    dsf_makeValue(ds_send_reqdata, "roomcd", "string", ds_othercond.getColumn(0, "room"));
   
    var oParam = {};
    oParam.id = "TRMRC01503";
    oParam.service = "chrtmngtapp.ChrtRendMngt";
    oParam.method = "reqGetRoomPatList";
    oParam.inds = "req=ds_send_reqdata";
    oParam.outds = "ds_init_roompatlist=roompatlist";
    //oParam.async = false;
    
    tranf_submit(oParam);
    ipt_pid.value = "";
}

/**
 * @group  :
 * @ver    : 2007.12.11
 * @by     : 이창록
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 기준일자에 따른 버튼 disabled 상태변경 및 TEXT명 변경 
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSelectRdoList() {
    var dschInddlist = ds_outcond.getColumn(0, "dschInddlist");

    if (dschInddlist == "indd") {
        cap_snm.text = "입원기준일";
        btn_x_appchrt.disabled = "false";
        
        //grd_outchrtlist.colHidden(10) = true;
		//grd_outchrtlist.colHidden(7) = false;
        grd_outchrtlist.setCellProperty("body", 9, "edittype", "none"); 
		grd_outchrtlist.setCellProperty("body", 6, "edittype", "none"); 
        ds_main_appchrt_outchrtlist.clearData();
    } else if (dschInddlist == "dschdd") {
        cap_snm.text = "퇴원기준일";
        btn_x_appchrt.disabled = "true";
        
        //grd_outchrtlist.colHidden(10) = false;
        //grd_outchrtlist.colHidden(7) = true;
        grd_outchrtlist.setCellProperty("body", 9, "edittype", "none"); 
        grd_outchrtlist.setCellProperty("body", 6, "edittype", "none"); 
        ds_outcond.setColumn(0, "ddlist", utlf_getCurrentDate());
        ds_main_appchrt_outchrtlist.clearData();
    }
}

/**
 * @group  :
 * @ver    : 2007.12.11
 * @by     : 이창록
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :타과 차트리스트 조회
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fOtherChrtList() {
    var pid = ds_othercond.getColumn(0, "pid");
    var indd = ds_init_roompatlist.lookup("pid", pid, "indd");
    var iRow = ds_main_otherchrt_otherchrtlist.rowposition;
    var instcd = sysf_getUserInfo("dutplceinstcd");
    dsf_makeValue(ds_othercond, "indd", "string", indd);
    dsf_makeValue(ds_othercond, "instcd", "string", instcd);

    var oParam = {};
    oParam.id = "TRMRC01502";
    oParam.service = "chrtmngtapp.ChrtRendMngt";
    oParam.method = "reqGetOtherChrtList";
    oParam.inds = "othercond=ds_othercond";
    oParam.outds = "ds_main_otherchrt_otherchrtlist=otherchrtlist";
    oParam.async = false;
    oParam.callback = "cf_TRMRC01502";

    tranf_submit(oParam);
    
    if(utlf_isNull(ds_main_otherchrt_otherchrtlist.getColumnInfo("edittype")))
	{
		ds_main_otherchrt_otherchrtlist.addColumn("edittype", "string");
	}

    if (arErrorCode.pop("TRMRC01502") > -1) {
        for (var i = 0; i < ds_main_otherchrt_otherchrtlist.rowcount; i++) {
            //var trgCol = grd_otherchrtlist.colRef("appdd");
            //var rendflagCol = grd_otherchrtlist.colRef("rendflag");
            var appmCol = cmb_ward.value;
            if (ds_main_otherchrt_otherchrtlist.getColumn(i, "trgCol") == "신청중") {                
                //grd_otherchrtlist.isReadOnly(i, rendflagCol) = true;   
                ds_main_appchrt_outchrtlist.setColumn(i, "edittype", "none");             
            } else {
                if (!utlf_isNull(ds_main_otherchrt_otherchrtlist.getColumn(i, "trgCol"))) {                    
                    //grd_otherchrtlist.isReadOnly(i, rendflagCol) = true;                    
                    ds_main_appchrt_outchrtlist.setColumn(i, "edittype", "none");
                } else {                    
                    //grd_otherchrtlist.isReadOnly(i, rendflagCol) = false;
                    ds_main_appchrt_outchrtlist.setColumn(i, "edittype", "checkbox");
                }
            }
//             else{
// 				ds_main_appchrt_outchrtlist.setColumn(i, "edittype", "checkbox");
//             }            
        }
    }

    // 2009.06.02. 의정부인 경우.. 응급실, 건진센터 구영상 조회하기..
    var instcd = sysf_getUserInfo("dutplceinstcd");
    if (instcd == "013") {
        var oParam = {};
			oParam.id          = "TRMRC00147";
			oParam.service     = "chrtmngtapp.ChrtRendMngt";
			oParam.method      = "reqGetOldImgRec";
			oParam.inds        = "req=ds_othercond";
			oParam.outds       = "ds_main_oldimg_oldimglist=oldimglist";
			oParam.async       = false;
			oParam.callback    = "cf_TRMRC00147";

		tranf_submit(oParam);

        var msgER = "";
        var msgAH = "";

        var dataCnt = ds_main_oldimg_oldimglist.rowcount;
        for (var i = 0; i <= dataCnt; i++) {
            var cls = ds_main_oldimg_oldimglist.getColumn(i, "cls");
            var cnt = ds_main_oldimg_oldimglist.getColumn(i, "cnt");

            // 구영상 응급의학과
            if (cls == "E") {
                msgER = "▣ 구영상 응급의학과 (" + cnt + "건)";
            }
            // 구영상 건진
            if (cls == "S") {
                msgAH = "▣ 구영상 건진 (" + cnt + "건)";
            }
        }
//         ds_hidden.setColumn(0, "cap_oldimgER", msgER);
//         ds_hidden.setColumn(0, "cap_oldimgAH", msgAH);
        cap_oldimgER.text = msgER;
        cap_oldimgAH.text = msgAH;
    }

}

function cf_TRMRC01502(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

/**
 * @group  :
 * @ver    : 2007.12.11
 * @by     : 이창록
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :타과 차트신청
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fReqotherLendChrt() {
    //grd_otherchrtlist.clearStatus();
    var iRow = ds_main_otherchrt_otherchrtlist.rowposition;
    var cSave = false;

    for (var i = 0; i < ds_main_otherchrt_otherchrtlist.rowcount; i++) {
        var check = ds_main_otherchrt_otherchrtlist.getColumn(i, "rendflag");
        var stat = ds_main_otherchrt_otherchrtlist.getColumn(i, "stat");
        if (check == "true" || check == "1") {
            if (utlf_isNull(stat)) {
                //grd_otherchrtlist.rowStatus(i) = 1;
                ds_main_otherchrt_otherchrtlist.enableevent = false;
                ds_main_otherchrt_otherchrtlist.updatecontrol = false;
                ds_main_otherchrt_otherchrtlist.setRowType(i, 2);
                ds_main_otherchrt_otherchrtlist.updatecontrol = true;
                ds_main_otherchrt_otherchrtlist.enableevent = true;
            } else if (stat == "u") {
                //grd_otherchrtlist.rowStatus(i) = 2;
                ds_main_otherchrt_otherchrtlist.enableevent = false;
                ds_main_otherchrt_otherchrtlist.updatecontrol = false;
                ds_main_otherchrt_otherchrtlist.setRowType(i, 4);
                ds_main_otherchrt_otherchrtlist.updatecontrol = true;
                ds_main_otherchrt_otherchrtlist.enableevent = true;
            }
            cSave = true;
        }
    }

    if (cSave == true) {
        var iRow = ds_main_otherchrt_otherchrtlist.rowposition;
        var xOtherChrtListPath = ds_main_otherchrt_otherchrtlist;
        var ward = ds_othercond.getColumn(0, "ward");
        if (ward == "2280200000") {
            ds_main_otherchrt_otherchrtlist.setColumn(iRow, "rendcd", "006");
        } else {
            ds_main_otherchrt_otherchrtlist.setColumn(iRow, "rendcd", "004");
        }
        //dsf_makeValue("/root/send/savedata", grd_otherchrtlist.getUpdateData());
        var oParam = {};
            oParam.id          = "TXMRC01502";
            oParam.service     = "chrtmngtapp.ChrtRendMngt";
            oParam.method      = "reqExeOtherChrtList";
            oParam.inds        = "req=ds_main_otherchrt_otherchrtlist";
            oParam.outds       = "";
            oParam.async       = false;
            oParam.callback    = "cf_TXMRC01502";
        
        tranf_submit(oParam);

        if (arErrorCode.pop("TXMRC01502") > -1) {
            sysf_messageBox("선택한 차트가", "I001");
            //model.removeNodeset("/root/send/savedata");            
            fOtherChrtList();
        }
    } else {
        sysf_messageBox("대출신청할 차트가", "I004");
    }    
}

function cf_TXMRC01502(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
/**
 * @group  :
 * @ver    : 2007.12.11
 * @by     : 이창록
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :타과 차트 신청시 신청된 차트는 확인
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fOtherRowRendflag() {
    if (ds_main_otherchrt_otherchrtlist.rowposition >= 0) {
        var iRow =ds_main_otherchrt_otherchrtlist.rowposition;
        var outRow = ds_main_appchrt_outchrtlist.rowposition;
        var Rendflag = ds_main_otherchrt_otherchrtlist.getColumn(iRow, "rendflag");
        var Chrtflag = ds_main_otherchrt_otherchrtlist.getColumn(iRow, "chrtflag");
        var ward = ds_main_otherchrt_otherchrtlist.getColumn(iRow, "ward");
        var Otherdeptcd = ds_main_otherchrt_otherchrtlist.getColumn(outRow, "appdeptcd");
        var Outdeptcd = ds_main_appchrt_outchrtlist.getColumn(outRow, "appdeptcd");
        if (Chrtflag != "P") {
            sysf_messageBox("종이차트만 대출신청", "I006");
            ds_main_otherchrt_otherchrtlist.setColumn(iRow, "rendflag", "false");            
            return;
        }
        if (Rendflag == "true" || Rendflag == "1") {
            if (ds_main_otherchrt_otherchrtlist.getColumn(iRow, "appdd") == "신청중") {
                var Msgchrt = sysf_messageBox("이 차트는 이미 신청된차트입니다. 그래도 ", "Q004");
                if (Msgchrt == "7") {
                    ds_main_otherchrt_otherchrtlist.setColumn(iRow, "rendflag", "false");
                    dsf_makeValue(ds_main_otherchrt_otherchrtlist, "appdd", "string", "신청중", iRow);                    
                    return;
                } else if (Msgchrt == "6") {
                    ds_main_otherchrt_otherchrtlist.setColumn(iRow, "rendflag", "true");
                    ds_main_otherchrt_otherchrtlist.setColumn(iRow, "appdd", utlf_getCurrentDate(), iRow);
                    dsf_makeValue(ds_main_otherchrt_otherchrtlist, "appmanid", "string", sysf_getUserId(), iRow);
                    dsf_makeValue(ds_main_otherchrt_otherchrtlist, "appmanm", "string", sysf_getUserInfo("usernm"), iRow);
                    dsf_makeValue(ds_main_otherchrt_otherchrtlist, "appdeptcd", "string", sysf_getUserInfo("dutplcecd"), iRow);
                    dsf_makeValue(ds_main_otherchrt_otherchrtlist, "appdeptnm", "string", sysf_getUserInfo("dutplcenm"), iRow);
                    //dsf_makeValue("/root/main/otherchrt/otherchrtlist[" + iRow + "]/stat"     ,"u");                    
                }
            } else {
                ds_main_otherchrt_otherchrtlist.setColumn(iRow, "rendflag", "true");
                ds_main_otherchrt_otherchrtlist.setColumn(iRow, "appdd", utlf_getCurrentDate());
            }
        } else if (Rendflag == "false" || Rendflag == "0") {
            ds_main_otherchrt_otherchrtlist.setColumn(iRow, "appdd", "");
            ds_main_otherchrt_otherchrtlist.setColumn(iRow, "appmanid", "");
            ds_main_otherchrt_otherchrtlist.setColumn(iRow, "appmanm", "");
            ds_main_otherchrt_otherchrtlist.setColumn(iRow, "appdeptcd", "");
            ds_main_otherchrt_otherchrtlist.setColumn(iRow, "appdeptnm", "");
        }
    }    
}

/**
 * @ver    :  
 * @desc   : 입원/퇴원환자 차트 리스트 조회한 것을 엑셀에 저장 
 * @
 * @by     : 이창록
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fChrtListSaveExcel() {
    //var fileName = window.fileDialog("save", ",", false, "입퇴원환자차트리스트", "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");

    if (ds_main_appchrt_outchrtlist.rowcount > 0) {
        //grd_outchrtlist.saveExcel(fileName, "SheetName", false, false, "", "", "false");        
        grdf_exportExcel(grd_outchrtlist, "입퇴원환자차트리스트", "입퇴원환자차트리스트", false, "", "", false);
    }
}
/**
 * @ver    :  
 * @desc   : 입/퇴원환자차트 리스트 더블클릭시 환자별 차트리스트 조회
 * @
 * @by     : 이창록
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fPatChrtInfo(iRow) {
    ds_othercond.setColumn(0, "ward", ds_main_appchrt_outchrtlist.getColumn(iRow, "ward"));
    ds_othercond.setColumn(0, "instcd", ds_main_appchrt_outchrtlist.getColumn(iRow, "instcd"));
    fSelectWard();
    ds_othercond.setColumn(0, "room", ds_main_appchrt_outchrtlist.getColumn(iRow, "roomcd"));
    ds_othercond.setColumn(0, "indd", ds_main_appchrt_outchrtlist.getColumn(iRow, "indd"));
    fRoomPatList();
    ds_othercond.setColumn(0, "pid", ds_main_appchrt_outchrtlist.getColumn(iRow, "pid"));
    fOtherChrtList();
}]]></Script>