YNU_JEUS/app_home/himed/xpapps/emr/medirecxp/xp/SPMMR05400.xjs

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

    부서별기록관리 ( SPMMR05400_부서별기록관리.xfdl - JScript )

      - Version :
          1)  : Ver.1.00.01


  - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩
*/

var gFormcd = "";
var gFormrecdd = "";
/**
 * @desc   : 화면초기화
 * @id     :
 * @event  : xforms-ready
 * @return : void
 */
 function fInitalize()
{
    grp_base.ivw_loader.afterSaveExeFuncNm = "fReclistClick";
    grp_base.switch1.case_patlist.ivw_patlist.fInitalize();
    grp_base.switch1.tabindex = 0;

    fSetPatInfo();
    fAddDateReq("today");
    frmf_setParameter("SPMRI01300_openerid", "SPMMR05400");
    

    var if_tabflag = opener.frmf_getParameter("SPMMR05400_tabflag");
    if (utlf_isNull(if_tabflag) || if_tabflag == "formlist") {
    	grp_base.switch1.tabindex = 0;
    	grp_base.ivw_loader.visible = true;
    	grp_base.ivw_reccnts.visible = false;
    	fGetFormList();
    } 
    else if (if_tabflag = "reclist"){
    	fReclistClick();
    }
    
    //20100104 dhkim care plan 버튼 활성화
    fVisibleCarePlan();

}

/**
 * @desc   : 디폴트 서식 오픈
 * @id     :
 * @event  : xforms-ready
 * @return : void
 * @authur : 박종훈
 */
function fLoadDefForm()
{
    if (!utlf_isNull(gFormcd))
    {   
    	if(!utlf_isNull(gFormrecdd)){
    		grp_base.ivw_loader.frmf_setParameter("SSMMR01100_formrecdd",gFormrecdd);
    	}
    	var vBtn = true;
    	
//         if (sysf_getUserInfo("jobkindcd").substring(0, 2) != "03")
//         {
//             //grp_base.ivw_loader.grup_btn.enable = true;
//             vBtn = true;
//         }
    	
    	//  환자정보 없이 서식 오픈시 버튼 처리
    	if( ds_paminfo.rowcount == 0 ){
			vBtn = false;
    	}
    	
        var ioflag 		= ds_paminfo.getColumn(ds_paminfo.rowposition,"ioflag");
        var orddd 		= "";
        var orddrid 	= "";
		
		if(ioflag == "I" || ioflag == "D" || ioflag == "E" ){ // 입원        	
        	orddrid = ds_paminfo.getColumn(ds_paminfo.rowposition,"medispclid");
        	orddd 	= ds_paminfo.getColumn(ds_paminfo.rowposition,"indd");
        	if(utlf_isNull(orddd))
        	{
				orddd 	= ds_paminfo.getColumn(ds_paminfo.rowposition,"orddd");
				orddrid 	= ds_paminfo.getColumn(ds_paminfo.rowposition,"orddrid");
			}
        }else{
        	orddrid = ds_paminfo.getColumn(ds_paminfo.rowposition,"orddrid");
        	orddd 	= ds_paminfo.getColumn(ds_paminfo.rowposition,"orddd");
        }
    	
    	var sParam = "";
		var tmpIoflag = ioflag;
		if(tmpIoflag == "O" && tmpIoflag=="S"){
			tmpIoflag = "O";
		}else if( tmpIoflag == "I" && tmpIoflag=="D" ){
			tmpIoflag = "I";
		}
		var nInstcd = sysf_getUserInfo("dutplceinstcd");
		var nPid = ds_paminfo.getColumn(0, "pid");
		var nCretno = ds_paminfo.getColumn(0, "cretno");
		var nDschdd = dsf_getColumnNullToEmpty(ds_paminfo, 0, "dschdd");
						
		sParam = 	tmpIoflag   + "▦" + 
					nPid   		+ "▦" + 
					orddd   	+ "▦" + 
					nCretno 	+ "▦" + 
					nInstcd 	+ "▦" + 
					nDschdd;	     
    	
    	
        frmf_setParameter("SSMMR01100_recsavechk", "Y");
		var path = grp_base;
		var objArg = new Object();
		var vFormKind = "new";

		ds_cond_formdata.clearData();
		ds_cond_formdata.addRow();
		ds_cond_formdata.setColumn(0, "formcd", gFormcd);    // 서식목록 - linkcd, 기록목록 - formrecseq  컬럼값.  
		ds_cond_formdata.setColumn(0, "formkind", vFormKind);     // 서식목록 탭 - new , 기록목록 - rec
		ds_cond_formdata.setColumn(0, "btnvisible", vBtn);
		ds_cond_formdata.setColumn(0, "pid", ds_paminfo.getColumn(0, "pid"));
		ds_cond_formdata.setColumn(0, "orddd", orddd);
		ds_cond_formdata.setColumn(0, "cretno", ds_paminfo.getColumn(0, "cretno"));
		ds_cond_formdata.setColumn(0, "orddeptcd", ds_paminfo.getColumn(0, "orddeptcd"));
		ds_cond_formdata.setColumn(0, "orddrid", orddrid);
		ds_cond_formdata.setColumn(0, "ioflag", ds_paminfo.getColumn(0, "ioflag"));
		ds_cond_formdata.setColumn(0, "topyn", "N");
		ds_cond_formdata.setColumn(0, "paminfo", sParam);

		objArg.ds_cond_formdata = ds_cond_formdata;
		 
		lf_loadSMMMR01100(false, objArg, path);

        
        var nFindRow = ds_form_formlist.findRow("linkcd", gFormcd);
        if( nFindRow > -1 ){
			ds_form_formlist.rowposition = nFindRow;
        }
        
    }
}

/**
 * @desc   : 환자정보
 * @id     :
 * @event  : ondblclick
 * @return : void
 */
function fSetPatInfo()
{
   
    var patinfo = "";

    if(frmf_isPopup() && sysf_getObjType(this) == "Form")
        patinfo = opener.frmf_getParameter("SPMMR05400_parm_pinfo");

    var pid = "";
    var orddd = "";
    var cretno = "";
    var ioflag = "";
    var orddeptcd = "";
    var orddrid = "";
    var patnm = "";
    var age = "";
    var sex = "";
    var formdeptcd = "";
	
    if (utlf_isNull(patinfo))
    {
        var pamInfoCvs = sysf_getGlobalVariable("paminfo");  //상단정보가 있을 경우는 검색

        if(!utlf_isNull(pamInfoCvs))
        { //cvs가 null이 아닌 경우에만 처리함.
			ds_paminfo.clearData();
            dsf_setCSVToDs ("ds_paminfo", pamInfoCvs);
            
            ioflag = ds_paminfo.getColumn(0,"ioflag");


            if (ioflag == "O")
            {
                orddd = ds_paminfo.getColumn(0,"orddd");
                orddrid = ds_paminfo.getColumn(0,"orddrid");
            }
            else
            {
                orddd = ds_paminfo.getColumn(0,"indd");
                orddrid = ds_paminfo.getColumn(0,"medispclid");
            }

            pid = ds_paminfo.getColumn(0,"pid");
            cretno = ds_paminfo.getColumn(0,"cretno");
            orddeptcd = ds_paminfo.getColumn(0,"orddeptcd");
            patnm = ds_paminfo.getColumn(0,"hngnm");
            age = ds_paminfo.getColumn(0,"age");
            sex = ds_paminfo.getColumn(0,"sex");
        }
    }
    else
    {
        patinfo = patinfo.split("▦");
        pid = patinfo[0];
        orddd = patinfo[1];
        cretno = patinfo[2];
        ioflag = patinfo[3];
        orddeptcd = patinfo[4];
        orddrid = patinfo[5];
        patnm = patinfo[6];
        age = patinfo[7];
        sex = patinfo[8];
        formdeptcd = patinfo[9];

        dsf_makeValue(ds_paminfo,"pid",			"string", pid);
        dsf_makeValue(ds_paminfo,"orddeptcd",	"string", orddeptcd);
        
        dsf_makeValue(ds_paminfo,"orddd",		"string", utlf_transNullToEmpty(orddd).substring(0,8));
		dsf_makeValue(ds_paminfo,"cretno",		"string", cretno);
		dsf_makeValue(ds_paminfo,"ioflag",		"string", ioflag);
		dsf_makeValue(ds_paminfo,"orddrid",		"string", orddrid);
		dsf_makeValue(ds_paminfo,"hngnm",		"string", patnm);
    }

    //진료부서 조회

    lf_mmbfGetDeptCodeComboList(ds_init_deptlist, "A");

    if (utlf_isNull(pid))
    {
        sysf_messageBox("기록에 필요한 환자 원무정보가", "I004");
        grp_base.ivw_loader.grup_btn.enable = false;
        grp_base.switch1.tabindex = 2;
    }
    else
    {
        if (!utlf_isNull(formdeptcd))
        {
            ds_send.setColumn(0,"formdeptcd", formdeptcd);
        }
        else
        {
            ds_send.setColumn(0,"formdeptcd", orddeptcd);
        }
	
        ds_init.setColumn(0,"patinfo", pid + " " + patnm + "(" + sex + "/" + age + ")");
        
        //서식로더에서 환자 기록관련 원무정보를 Top에서 조회해올지 여부(N일경우 Top에서 참조하지 않음)
        frmf_setParameter("SSMMR01100_getTopYn", "N");
        grp_base.ivw_loader.fSetPamInfo(pid, orddd, cretno, ioflag , orddeptcd, orddrid);
        
        //2010.04.01 dhkim careplan노드 셋팅
        var objParam = [{col:"pid", type:"string", size:256, val:pid}, 
		               {col:"orddd", type:"string", size:256, val:orddd},
		               {col:"cretno", type:"string", size:256, val:cretno},
		               {col:"ioflag", type:"string", size:256, val:ioflag},
		               {col:"patnm", type:"string", size:256, val:patnm}]
		dsf_createDsRow("ds_init_careplaninfo",objParam,false);
	    
    }
}

/**
 * @desc   : 환자 리스트에서 환자 원무 정보 셋팅
 * @id     :
 * @event  : xforms-ready
 * @return : void
 * @authur : 박종훈
 */
function fIvwSetPamInfo(pid, orddd, cretno, ioflag , orddeptcd, orddrid, patnm, sa, dschdd)
{
    ds_init.setColumn(0,"patinfo", pid + " " + patnm + "(" + sa + ")");
    
    ds_paminfo.clearData();
    ds_paminfo.addRow();
    
    dsf_makeValue(ds_paminfo,"pid",			"string", pid);
    dsf_makeValue(ds_paminfo,"orddeptcd",	"string", orddeptcd);
    dsf_makeValue(ds_paminfo,"orddd",		"string", orddd.substring(0,8));
    dsf_makeValue(ds_paminfo,"cretno",		"string", cretno);
    dsf_makeValue(ds_paminfo,"ioflag",		"string", ioflag);
    dsf_makeValue(ds_paminfo,"orddrid",		"string", orddrid);
    dsf_makeValue(ds_paminfo,"hngnm",		"string", patnm);
        
    ds_send.setColumn(0,"formdeptcd", ds_paminfo.getColumn(0,"orddeptcd"));
    
    //20100104 dhkim 환자리스트에서 선택한 환자 원무정보 careplan용으로 세팅
    
    ds_init_careplaninfo.clearData();
    ds_init_careplaninfo.addRow();
    ds_init_careplaninfo.setColumn(0,"pid",pid);
    ds_init_careplaninfo.setColumn(0,"orddd",orddd);
    ds_init_careplaninfo.setColumn(0,"cretno",cretno);
    ds_init_careplaninfo.setColumn(0,"ioflag",ioflag);
    ds_init_careplaninfo.setColumn(0,"patnm",patnm);
    
    //grp_base.ivw_loader.fSetPamInfo(pid, orddd.substring(0, 8), cretno, ioflag , orddeptcd, orddrid);
    frmf_setParameter("SSMMR01100_getTopYn", "N");

    if (!utlf_isNull(gFormcd))
    {
        //서식로드시 TOP정보 조회 여부 셋팅(N일경우 Top참조 안함)
        //grp_base.ivw_loader.fLoadNewForm(gFormcd, false);
        
        frmf_setParameter("SSMMR01100_recsavechk", "Y");
		var path = grp_base;
		var objArg = new Object();
		var vFormKind = "new";
		
		var sParam = "";
		var tmpIoflag = ioflag;
		if(tmpIoflag == "O" && tmpIoflag=="S"){
			tmpIoflag = "O";
		}else if( tmpIoflag == "I" && tmpIoflag=="D" ){
			tmpIoflag = "I";
		}
		var nInstcd = sysf_getUserInfo("dutplceinstcd");
						
		sParam = 	tmpIoflag   + "▦" + 
					pid    		+ "▦" + 
					orddd   	+ "▦" + 
					cretno 		+ "▦" + 
					nInstcd 	+ "▦" + 
					dschdd;	                      
		
		
		
		ds_cond_formdata.clearData();
		ds_cond_formdata.addRow();
		ds_cond_formdata.setColumn(0, "formcd", gFormcd);    // 서식목록 - linkcd, 기록목록 - formrecseq  컬럼값.  
		ds_cond_formdata.setColumn(0, "formkind", vFormKind);     // 서식목록 탭 - new , 기록목록 - rec
		ds_cond_formdata.setColumn(0, "btnvisible", true);
		ds_cond_formdata.setColumn(0, "pid", pid);
		ds_cond_formdata.setColumn(0, "orddd", orddd.substring(0,8));
		ds_cond_formdata.setColumn(0, "cretno", cretno);
		ds_cond_formdata.setColumn(0, "orddeptcd", orddeptcd);
		ds_cond_formdata.setColumn(0, "ioflag", ioflag);
		ds_cond_formdata.setColumn(0, "topyn", "N");
		ds_cond_formdata.setColumn(0, "paminfo", sParam);

		objArg.ds_cond_formdata = ds_cond_formdata;
		 
		lf_loadSMMMR01100(false, objArg, path);

        if (sysf_getUserInfo("jobkindcd").substring(0, 2) != "03")
        {
            grp_base.ivw_loader.grup_btn.enable = true;
        }
    }

    fGetFormList();
    //model.toggle("case_form");


    if (grp_base.ivw_loader.visible == false )
    {
	    grp_base.ivw_loader.visible = true;
	    grp_base.ivw_reccnts.visible = false;
	}

}

/**
 * @desc   : 서식 리스트 조회
 * @id     :
 * @event  : xforms-ready
 * @return : void
 * @authur : 박종훈
 */
function fGetFormList()
{
	ds_form_formlist.clearData();
    var oParam = {};
		oParam.id          = "TRMMR05401";
		oParam.service     = "medirecapp.ComnMediRec";
		oParam.method      = "reqGetDeptFormList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_form_formlist=formlist";
		oParam.async       = false;
		oParam.callback    = "cf_TRMMR05401";

	tranf_submit(oParam);
    
}
function cf_TRMMR05401(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    
    for(var i=0; i<ds_form_formlist.rowcount; i++){
		var nFormnm = ds_form_formlist.getColumn(i, "formnm");
		if( !utlf_isNull(nFormnm) && nFormnm.indexOf("\n") > -1 ){
			nFormnm = nFormnm.setReplaceWord("\n", " ");
			ds_form_formlist.setColumn(i, "formnm", nFormnm);
		}
    }
    
    //2016.04.11 gFormcd 유무에 따른 포지션 설정
    if (!utlf_isNull(gFormcd))
    {
		var nFindRow = ds_form_formlist.findRow("linkcd", gFormcd);
		if( nFindRow > -1 ){
			ds_form_formlist.rowposition = nFindRow;
		}
    }else{
		ds_form_formlist.rowposition = -1;
	}
}
/**
 * @desc   : 서식 오픈
 * @id     :
 * @event  : ondblclick
 * @return : void
 * @authur : 박종훈
 */
function fSelectForm()
{
    var formcd =  utlf_transNullToEmpty(ds_form_formlist.getColumn(ds_form_formlist.rowposition,"linkcd"));
		
    if (!utlf_isNull(formcd))
    {
        gFormcd = formcd;
        
        //만 12세이상에는 작성 할 수 없는 서식인지 파악
		//mmbfGetHardCodeInfo("/root/send/reqdata", "/root/init/formforyng", 5986);
		lf_getHardCDList("N", 5986, null, ds_init_formforyng);	
        var formCnt = ds_init_formforyng.getCaseCount("cdseqno == 1 && hardcd == '" + formcd + "'");  
        //var age = ds_paminfo.getColumn(0,"age");
        
        var sSendDsNm		  = dsf_createDsRow("ds_send_TRMMR05402", [{col: "patinfo", type:"string", size:256, val:ds_init.getColumn(0, "patinfo")}]);
        var sRtnDsNm		  = dsf_createDs("ds_hidden_patinfo_patlist", [{col: "curage", type:"string", size:256}]);
        
        var oParam = {};
			oParam.id          = "TRMMR05402";
			oParam.service     = "medirecapp.ComnMediRec";
			oParam.method      = "reqGetCurPidAge";
			oParam.inds        = "req="+sSendDsNm;
			oParam.outds       = sRtnDsNm+"=patlist";
			oParam.async       = false;
			oParam.callback    = "cf_TRMMR05402";

		tranf_submit(oParam);
        
        var age = "";
        if(arErrorCode.pop("TRMMR05402") > -1) {
			age = ds_hidden_patinfo_patlist.getColumn(0, "curage");
			
			//tempDs Delete
			dsf_deleteDs(sSendDsNm);
			dsf_deleteDs(sRtnDsNm);
		}
        
        if ( !utlf_isNull(age) && age >= 18 && formCnt > 0 ) {
        	sysf_messageBox("만 18세 이상 성인은 사용할 수 없는 서식입니다","I");
			return;
        }
        
        //만 12세미만에는 작성 할 수 없는 서식인지 파악
		var formCnt = ds_init_formforyng.getCaseCount("cdseqno == 2 && hardcd == '" + formcd + "'");  
        
        if ( !utlf_isNull(age) && age < 18 && formCnt > 0 ) {
        	sysf_messageBox("만 18세 미만 소아는  사용할 수 없는 서식입니다","I");
			return;
        }
        
        //이윤주 추가(20150507)
        //mmbfGetHardCodeInfo("/root/send/reqdata", "/root/init2/jinformcd", 5986);
        lf_getHardCDList("N", 5986, null, ds_init2_jinformcd);	
		var formcdcnt = ds_init2_jinformcd.getCaseCount("hardcd == '" + gFormcd + "'");  //진정,회복기록여부
			
		if (formcdcnt > 0) {
			grp_base.ivw_loader.frmf_setParameter("SSMMR01100_formrecdd",utlf_getCurrentDate());
		}
        
        
        var pid 		= ds_paminfo.getColumn(ds_paminfo.rowposition,"pid");  
        var cretno 		= ds_paminfo.getColumn(ds_paminfo.rowposition,"cretno");
        var ioflag 		= ds_paminfo.getColumn(ds_paminfo.rowposition,"ioflag");
        var orddeptcd 	= ds_paminfo.getColumn(ds_paminfo.rowposition,"orddeptcd");
        var orddd 		= "";
        var orddrid 	= "";
		
		if(ioflag == "I" || ioflag == "D" || ioflag == "E" ){ // 입원        	
        	orddrid = ds_paminfo.getColumn(ds_paminfo.rowposition,"medispclid");
        	orddd 	= ds_paminfo.getColumn(ds_paminfo.rowposition,"indd");
        	if(utlf_isNull(orddd))
        	{
				orddd 	= ds_paminfo.getColumn(ds_paminfo.rowposition,"orddd");
				orddrid 	= ds_paminfo.getColumn(ds_paminfo.rowposition,"orddrid");
			}
        }else{
        	orddrid = ds_paminfo.getColumn(ds_paminfo.rowposition,"orddrid");
        	orddd 	= ds_paminfo.getColumn(ds_paminfo.rowposition,"orddd");
        }
        
        
//         
//         grp_base.ivw_loader.fLoadNewForm(formcd, false);
// 
		var vBtn;
        if (utlf_isNull(ds_paminfo.getColumn(0,"pid")))
        {
            //grp_base.ivw_loader.grup_btn.enable = false;
            vBtn = false;
        }
        else
        {
            //grp_base.ivw_loader.grup_btn.enable = true;
            vBtn = true;
        }
        
        var sParam = "";
		var tmpIoflag = ioflag;
		if(tmpIoflag == "O" && tmpIoflag=="S"){
			tmpIoflag = "O";
		}else if( tmpIoflag == "I" && tmpIoflag=="D" ){
			tmpIoflag = "I";
		}
		var nInstcd = sysf_getUserInfo("dutplceinstcd");
		var nDschdd = dsf_getColumnNullToEmpty(ds_paminfo, ds_paminfo.rowposition, "dschdd");
						
		sParam = 	tmpIoflag   + "▦" + 
					pid   		+ "▦" + 
					orddd   	+ "▦" + 
					cretno 	+ "▦" + 
					nInstcd 	+ "▦" + 
					nDschdd;	     
        

		// 서식 로드
		frmf_setParameter("SSMMR01100_recsavechk", "Y");
		var path = grp_base;
		var objArg = new Object();
		var vFormKind = "rec";
		if(grp_base.switch1.tabindex == 0){
			vFormKind = "new";
		}
		ds_cond_formdata.clearData();
		ds_cond_formdata.addRow();
		ds_cond_formdata.setColumn(0, "formcd", formcd);    // 서식목록 - linkcd, 기록목록 - formrecseq  컬럼값.  
		ds_cond_formdata.setColumn(0, "formkind", vFormKind);     // 서식목록 탭 - new , 기록목록 - rec
		ds_cond_formdata.setColumn(0, "btnvisible", vBtn);
		ds_cond_formdata.setColumn(0, "pid", pid);
		ds_cond_formdata.setColumn(0, "orddd", orddd);
		ds_cond_formdata.setColumn(0, "cretno", cretno);
		ds_cond_formdata.setColumn(0, "orddeptcd", orddeptcd);
		ds_cond_formdata.setColumn(0, "ioflag", ioflag);		//인증서 관련 처리 필요
		ds_cond_formdata.setColumn(0, "topyn", "N");
		ds_cond_formdata.setColumn(0, "paminfo", sParam);

		objArg.ds_cond_formdata = ds_cond_formdata;
		 
		lf_loadSMMMR01100(false, objArg, path);
	
    }
}

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

/**
 * @desc   : 기록목록을 가져온다
 * @id     :
 * @event  : DOMActivate
 * @return : void
 * @authur : 박종훈
 */
function fGetRecList()
{
    if (utlf_isNull(ds_paminfo.getColumn(0,"pid")))
    {
        sysf_messageBox("기록에 필요한 환자 원무정보가", "I004");
        return;
    }

    ds_send_reqmedireclist.setColumn(0,"formrecdeptcd", "ALL");
    ds_send_reqmedireclist.setColumn(0,"chosflag", "A");

    ds_send_reqmedireclist.setColumn(0,"pid", ds_paminfo.getColumn(0,"pid"));

    if (ds_paminfo.getColumn(0,"ioflag") == "O")
    {
	      ds_send_reqmedireclist.setColumn(0,"orddd", ds_paminfo.getColumn(0,"orddd"));
	}
    else
    {
		    ds_send_reqmedireclist.setColumn(0,"orddd", ds_paminfo.getColumn(0,"indd"));
	}

    ds_send_reqmedireclist.setColumn(0,"cretno", ds_paminfo.getColumn(0,"cretno"));
    ds_send_reqmedireclist.setColumn(0,"orddeptcd", ds_paminfo.getColumn(0,"orddeptcd"));

    ds_send_reqmedireclist.setColumn(0,"recfromdt", ds_init_reqmedireclist.getColumn(0,"recfromdt"));
    ds_send_reqmedireclist.setColumn(0,"rectodt", ds_init_reqmedireclist.getColumn(0,"rectodt"));
    
    var tmpformcd = ds_init.getColumn(0,"formcd");
    
    if (utlf_isNull(tmpformcd))
    {
        tmpformcd = "-";
    }
    
    dsf_makeValue(ds_send_reqmedireclist,"formcd", "string", tmpformcd);
    dsf_makeValue(ds_send_reqmedireclist,"deptrecyn", "string", "Y");
	dsf_setTypeFormat(ds_send_reqmedireclist, "cretno:INT");
    var oParam = {};
		oParam.id          = "TRMMR00101";
		oParam.service     = "medirecapp.ComnMediRec";
		oParam.method      = "reqGetFormRecMastList";
		oParam.inds        = "req=ds_send_reqmedireclist";
		oParam.outds       = "ds_mainlist_medireclist=medireclist ds_mainlist_visitdept=visitdept";
		oParam.async       = false;
		oParam.callback    = "cf_TRMMR00101";

	tranf_submit(oParam);

    if(arErrorCode.pop("TRMMR00101") > -1)
    {
        //예진기록만 복사하여 보여준다
        ds_mainlist_medireclist.filter("foctsnwyn == 'Y'");
        ds_foctsnwlist_medireclist.copyData(ds_mainlist_medireclist, true);
        ds_mainlist_medireclist.filter("");       

    }
}
function cf_TRMMR00101(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
/**
 * @desc   : 기록내용을 가져온다
 * @id     :
 * @event  : DOMActivate
 * @return : void
 * @authur : 박종훈
 */
function fShowMediRecCnt(formrecseq)
{
    if (utlf_isNull(ds_paminfo.getColumn(0,"pid")))
    {
        return;
    }

    var cond = new COMN_CONT_RECCNTS();
    //var instance = document.models(0).instances(0);
    //var nodeReclist = instance.selectNodes("/root/main/foctsnwlist/medireclist");
    var nodeReclistlength = ds_foctsnwlist_medireclist.rowcount;

    cond.pid = ds_paminfo.getColumn(0,"pid");
    cond.formrecdeptcd = ds_send_reqmedireclist.getColumn(0,"formrecdeptcd");
    cond.chosflag = ds_send_reqmedireclist.getColumn(0,"chosflag");
    cond.reclistlength = nodeReclistlength;

    if (utlf_isNull(formrecseq))
    {
        cond.recfromdt = ds_init_reqmedireclist.getColumn(0,"recfromdt");
        cond.rectodt = ds_init_reqmedireclist.getColumn(0,"rectodt");
    }
    else
    {
        cond.recfromdt = "";
        cond.rectodt = "";
    }

    cond.formrecseq = formrecseq;

    grp_base.ivw_reccnts.fRefMediRecCnts(cond);
    
    
    //2009-07-04 오후 11:40:30 강지훈 수정 : 1. 하드코드 9905에 등록된 서식만 출력버튼이 활성화 된다. 2. 기록저장부서와 같은부서일경우만 출력버튼 활성화

    ds_hidden_formhardcd.clear();
    //mmbfGetHardCodeInfo("/root/send/formhrdcd", "/root/hidden/formhardcd", 9905);
    lf_getHardCDList("N", 9905, null, ds_hidden_formhardcd);	
    var formcd        = ds_foctsnwlist_medireclist.getColumn(ds_foctsnwlist_medireclist.rowposition,"formcd");
    var formrecdeptcd = ds_foctsnwlist_medireclist.getColumn(ds_foctsnwlist_medireclist.rowposition,"formrecdeptcd")
    var orddeptcd     = ds_paminfo.getColumn(0,"orddeptcd");
    var iexNodeCnt = ds_hidden_formhardcd.getCaseCount("hardcd == '" + formcd + "']"); 
		if(iexNodeCnt > 0) {			
			if(orddeptcd == formrecdeptcd){
				grp_base.btn_print.visible = true;
			}
			else{
				grp_base.btn_print.visible = false;
			} 
		}else{
		    grp_base.btn_print.visible = false;
		}
		
		if (utlf_isNull(formcd)) {
			setToggleButton(grp_base.switch1.case_rec.grd_reclist, true);
		} 

}

/**
 * @desc   : 검색 날짜기간
 * @id     :
 * @event  : DOMActivate
 * @return : void
 * @authur : 박종훈
 */
function fAddDateReq(diffFlag)
{
    var frdd = ds_init_reqmedireclist.getColumn(0,"recfromdt");
    var todd = ds_init_reqmedireclist.getColumn(0,"rectodt");
    var srcdd = new Date();
    var destdd = new Date();
    var diffdt;
    if (diffFlag == "next")
    {
        srcdd = todd.toDate();
        srcdd = srcdd.getAddDate(1, "D");
        frdd = srcdd.getDateFormat();

        diffdt = parseInt(ds_init_reqmedireclist.getColumn(0,"diffdt")) * 1;
        destdd = srcdd.getAddDate(diffdt, "M");
        todd = destdd.getDateFormat();
    }
    else if (diffFlag == "back")
    {
        srcdd = frdd.toDate();
        srcdd = srcdd.getAddDate(-1, "D");
        todd = srcdd.getDateFormat();

        diffdt = parseInt(ds_init_reqmedireclist.getColumn(0,"diffdt")) * -1;
        destdd = srcdd.getAddDate(diffdt, "M");
        frdd = destdd.getDateFormat();
    }
    else if (diffFlag == "today")
    {
        todd = utlf_getCurrentDate();

        var today = new Date();
        var frday = new Date();
        var diffdt = parseInt(ds_init_reqmedireclist.getColumn(0,"diffdt")) * -1;
        frday = today.getAddDate(diffdt , "M");
        frdd = frday.getDateFormat();
    }
    else
    {
        var today = todd.toDate();
        var frday = new Date();
        var diffdt = parseInt(ds_init_reqmedireclist.getColumn(0,"diffdt")) * -1;
        frday = today.getAddDate(diffdt , "M");
        frdd = frday.getDateFormat();
    }

    ds_init_reqmedireclist.setColumn(0,"recfromdt", frdd);
    ds_init_reqmedireclist.setColumn(0,"rectodt", todd);

}

/**
 * @desc   : 기록수정
 * @id     :
 * @event  :
 * @return : void
 * @authur : 박종훈
 */
function fRecModify()
{

    var recseq = ds_foctsnwlist_medireclist.getColumn(ds_foctsnwlist_medireclist.rowposition,"formrecseq");
    //grp_base.ivw_loader.fLoadRecForm(recseq, false);
    
    //서식로드시 TOP정보 조회 여부 셋팅(N일경우 Top참조 안함)
	//grp_base.ivw_loader.fLoadNewForm(gFormcd, false);
	frmf_setParameter("SSMMR01100_recsavechk", "Y");
	var path = grp_base;
	var objArg = new Object();
	var vFormKind = "rec";
	var vBtn = true;
	
	var orddd 		= "";
	var ioflag 		= ds_paminfo.getColumn(ds_paminfo.rowposition, "ioflag");
	
	if(ioflag == "I" || ioflag == "D" || ioflag == "E" ){ // 입원        	
		orddd 	= ds_paminfo.getColumn(ds_paminfo.rowposition,"indd");
		if(utlf_isNull(orddd))
		{
			orddd 	= ds_paminfo.getColumn(ds_paminfo.rowposition,"orddd");
		}
	}else{
		orddd 	= ds_paminfo.getColumn(ds_paminfo.rowposition,"orddd");
	}
	
	
	var sParam = "";
	var tmpIoflag = ioflag;
	if(tmpIoflag == "O" && tmpIoflag=="S"){
		tmpIoflag = "O";
	}else if( tmpIoflag == "I" && tmpIoflag=="D" ){
		tmpIoflag = "I";
	}
	var nInstcd = sysf_getUserInfo("dutplceinstcd");
	var nPid = ds_paminfo.getColumn(0, "pid");
	var nCretno = ds_paminfo.getColumn(0, "cretno");
	var nDschdd = dsf_getColumnNullToEmpty(ds_paminfo, 0, "dschdd");
					
	sParam = 	tmpIoflag   + "▦" + 
				nPid   		+ "▦" + 
				orddd   	+ "▦" + 
				nCretno 	+ "▦" + 
				nInstcd 	+ "▦" + 
				nDschdd;	              
	
	
	
	ds_cond_formdata.clearData();
	ds_cond_formdata.addRow();
	ds_cond_formdata.setColumn(0, "formcd", recseq);    // 서식목록 - linkcd, 기록목록 - formrecseq  컬럼값.  
	ds_cond_formdata.setColumn(0, "formkind", vFormKind);     // 서식목록 탭 - new , 기록목록 - rec
	ds_cond_formdata.setColumn(0, "btnvisible", vBtn);
	ds_cond_formdata.setColumn(0, "pid", ds_paminfo.getColumn(0, "pid"));
	ds_cond_formdata.setColumn(0, "orddd", orddd);
	ds_cond_formdata.setColumn(0, "cretno", ds_paminfo.getColumn(0, "cretno"));
	ds_cond_formdata.setColumn(0, "orddeptcd", ds_paminfo.getColumn(0, "orddeptcd"));
	ds_cond_formdata.setColumn(0, "ioflag", ds_paminfo.getColumn(0, "ioflag"));
	ds_cond_formdata.setColumn(0, "topyn", "N");
	ds_cond_formdata.setColumn(0, "paminfo", sParam);

	objArg.ds_cond_formdata = ds_cond_formdata;
	 
	lf_loadSMMMR01100(false, objArg, path);
    
    
    grp_base.ivw_loader.visible = true;
    grp_base.ivw_reccnts.visible = false;
    
    if (ds_foctsnwlist_medireclist.getColumn(ds_foctsnwlist_medireclist.rowposition,"formcd") == "1000007334") { //진정회복기록 (내시경, 건진)일때 동일부서내 사용자 임시저장 활성화
    	setEnableButton(grp_base.switch1.case_rec.grd_reclist);
    }
}


/**
 * @desc   : 기록목록탭 클릭시 이벤트
 * @id     :
 * @event  :
 * @return : void
 * @authur : 박종훈
 */
function fReclistClick()
{
    grp_base.switch1.tabindex = 1;
	grp_base.ivw_loader.visible = false;
    grp_base.ivw_reccnts.visible = true;
	grp_base.ivw_reccnts.fClear();
	grp_base.caption7.text = "기록내용";
	
	fGetRecList();
	//btn_formrecupdt.attribute("visibility") = "visible";
}






/**
 * @group  :
 * @ver    : 2009-06-25 오전 10:54:51
 * @by     : 강지훈
 * @---------------------------------------------------
 * @type   : function
 * @desc   : 출력 버튼 이벤트
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
 function fClickPrtBtn()
{
	var formcd = "";
	var signno = "";
	var prtparam = "";
	
	
	var formcd =  ds_foctsnwlist_medireclist.getColumn(ds_foctsnwlist_medireclist.rowposition,"formcd");
	var signno =  ds_foctsnwlist_medireclist.getColumn(ds_foctsnwlist_medireclist.rowposition,"espiseq");
	
	if(utlf_isNull(formcd)){
		sysf_messageBox("선택된 서식이 ", "I004");
		return;
	}
	if(utlf_isNull(signno)){
		sysf_messageBox("인증저장된 기록만 출력이 ", "I006");
		return;
	}
	prtparam += "E▦" + signno + "▦" + formcd + "▩";
	frmf_setParameter("SPMRI02400_prtrecinfo", prtparam);
	frmf_modal("SPMRI02400","SPMRI02400", null, null, null, null, null, null, null, null, null, null, "M");
}


/**
 * @ver : 2010-01-04 오후 3:39:20
 * @by  : dhkim
 * @desc: 재활의학과 사용자의 경우 care plan버튼 활성화
 */
 function fVisibleCarePlan(){
 	
 	var dutplcecd = sysf_getUserInfo("dutplcecd");
//2010.01.25 dhkim - 재활의학과 코드 변경 (2220000000 -> 2220400000)
// 	if(dutplcecd == "2220000000"){//재활의학과

	if(dutplcecd == "2220400000"){//재활의학팀
 		grp_base.btn_careplan.visible = true;
 	}else{
 		grp_base.btn_careplan.visible = false;
 	}
 	
 }

/**
 * @ver : 2010-01-04 오후 3:39:20
 * @by  : dhkim
 * @desc: care plan 화면 팝업
 */ 
 function fPopCarePlan(){
 
 	var isSelectedPat = ds_init.getColumn(0,"patinfo");
 	if(utlf_isNull(isSelectedPat)){
 		sysf_messageBox("환자를 선택하셔야 다직종간 Care plan을 조회하실 수 있습니다.", "E");
    	return;
 	}else{
 		
	 	var pid       = ds_init_careplaninfo.getColumn(0,"pid");
	    
	    if(utlf_isNull(pid)){
	    	
	    	
	    	var orddd = ds_paminfo.getColumn(0,"indd");
	    	if(utlf_isNull(orddd)){
	    		orddd = ds_paminfo.getColumn(0,"orddd");
	    	}
	    	
	    	//careplaninfo노드에 값이 없는경우 새로 세팅
	    	ds_init_careplaninfo.clearData();
			ds_init_careplaninfo.addRow();
			ds_init_careplaninfo.setColumn(0,"pid",ds_paminfo.getColumn(0,"pid"));
			ds_init_careplaninfo.setColumn(0,"orddd",orddd);
			ds_init_careplaninfo.setColumn(0,"cretno",ds_paminfo.getColumn(0,"cretno"));
			ds_init_careplaninfo.setColumn(0,"ioflag",ds_paminfo.getColumn(0,"ioflag"));
			ds_init_careplaninfo.setColumn(0,"patnm",ds_paminfo.getColumn(0,"hngnm"));
	    	
	    }
	    
	    
    	pid           = ds_init_careplaninfo.getColumn(0,"pid");
	    orddd         = ds_init_careplaninfo.getColumn(0,"orddd");
	    var cretno    = ds_init_careplaninfo.getColumn(0,"cretno");
	    var patnm     = ds_init_careplaninfo.getColumn(0,"patnm");
	    var ioflag    = ds_init_careplaninfo.getColumn(0,"ioflag");
	    
	    if(!utlf_isNull(pid) && !utlf_isNull(orddd) && !utlf_isNull(cretno)){
	    
	    	frmf_setParameter("SMMRJ00100_pid",    pid);
	    	frmf_setParameter("SMMRJ00100_orddd",  orddd);
	    	frmf_setParameter("SMMRJ00100_cretno", cretno);
	    	frmf_setParameter("SMMRJ00100_hngnm",  patnm);
	    	frmf_setParameter("SMMRJ00100_ioflag", ioflag);
	    
	    	frmf_modal("SMMRJ00100", "SMMRJ00100", null, null, 1, 0, 0, null, null, null, null, null, "M");
	    }
 	
 	}
 }
 
 /**
  * 선택한 기록이 [진정/회복 기록 (Sedation/Postsedation Record)-내시경,건진] 인 경우 최초작성자와 동일부서의 사용자만 임시저장 가능하게
  */
 function setEnableButton(o) {
		
		var objParam = [{col:"formcd", type:"string", size:256, val:"1000007334"}, 
		               {col:"formrecseq", type:"string", size:256, val:ds_foctsnwlist_medireclist.getColumn(ds_foctsnwlist_medireclist.rowposition,"formrecseq")},
		               {col:"pid", type:"string", size:256, val:ds_foctsnwlist_medireclist.getColumn(ds_foctsnwlist_medireclist.rowposition,"pid")},
		               {col:"dutplcecd", type:"string", size:256, val:sysf_getUserInfo("dutplcecd")}]
		dsf_createDsRow("ds_send_editable",objParam,false);
		
	
		var oParam = {};
			oParam.id          = "TRMMR01304";
			oParam.service     = "medirecapp.RecIf";
			oParam.method      = "reqGetEditableUserYn";
			oParam.inds        = "req=ds_send_editable";
			oParam.outds       = "ds_editableInfo=editableInfo";
			oParam.async       = false;
			oParam.callback    = "cf_TRMMR01304";

		tranf_submit(oParam);

		if (arErrorCode.pop("TRMMR01304") > -1) {
			if (ds_editableInfo.getColumn(0,"editableyn") == "Y") {
				ivw_loader.btn_tmpsave.disabled = false; // 
				
			}	else {
				ivw_loader.btn_tmpsave.disabled = true; // 
				
			}
		}					
 }
 function cf_TRMMR01304(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}


]]></Script>