YNU_JEUS/app_home/himed/imsi/xpapps/emr/medirecxp/xp/MMR00100.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[/**
 * @desc   : 초기 화면 설정
 * @id     : 
 * @event  : xforms-ready
 * @return : void
 * @authur : 박종훈
 */
function fReadyForm_old()
{
    
    ivw_loader.attribute("top") = 30;
    ivw_loader.attribute("height") = 740;
	
    ivw_loader.src = "../../../emr/medirecweb/xrw/SSMMR01100_서식로더.xrw";
    ivw_patsmm.src = "../../../emr/medirecweb/xrw/SSMMR04800_진료요약기록.xrw";

    ivw_loader.window.javascript.gMediRecMain = true;
    ivw_loader.window.javascript.gIsCashedFormDegn = true;
    //ivw_patsmm.window.javascript.fResizeGrup("1", parseInt(ivw_patsmm.attribute("height")), parseInt(ivw_patsmm.attribute("width")));
    ivw_loader.window.javascript.fInitPage(true, true, parseInt(ivw_loader.attribute("height")));
    ivw_loader.window.javascript.afterSaveExeFuncNm = "fRefMediRecList";
    
    grd_medireclist.mergecol(grd_medireclist.colref("formrecdd")) = true;

    fReadyFormInitData();

    model.setValue("/root/init/reqmedireclist/diffdt", 12); //검색 디폴트 12개월
    
    fAddDateReq("today");

    model.setValue("/root/send/reqmedireclist/formrecdeptcd", getUserInfo("dutplcecd"));
	  model.setValue("/root/send/reqmedireclist/chosflag", "A");
    
    model.setValue("/root/hidden/openform/degnid", getUserInfo("usernm"));
    model.refresh();
    
//    if (window.document.location == "C:/CMCProject/application/webapps/emr/medirecweb/xrw/" || window.document.location == "D:/CMCProject/application/webapps/emr/medirecweb/xrw/")
//    {// TFViewer로 생성시에 환자세팅을 위하여...
//        fTmpInitPamInfo("O");
//        //fOpenNewForm("0000000532");
//    }
//    else
//    {
//        fInitRecPamInfo();
//    }
    fInitRecPamInfo();
    
    var nodeList = model.instances(0).selectNodes("/root/main/mainlist/medireclist");
    
    if (nodeList.length > 0)
    {
        fShowMediRecCnt(grd_medireclist.valueMatrix(1, grd_medireclist.colref("formrecseq")));
    }
}

/**
 * @desc   : 환자요약 화면 설정
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 */
gIsSmmFst = "Y";
function fSetPatSmm(visible)
{
    if (visible)
    {
        ivw_patsmm.window.javascript.fInitalize();
        
        if (! ivw_patsmm.visible)
        {
            ivw_loader.attribute("top") = 215;
            ivw_loader.attribute("height") = 553;
        }
    }
    else
    {
        //ivw_patsmm.visible = false;
        ivw_loader.attribute("top") = 30;
        ivw_loader.attribute("height") = 740;
    }
    
    if (ivw_patsmm.visible != visible)
    {
        ivw_patsmm.visible = visible;
        ivw_loader.window.javascript.fInitPage(true, true, parseInt(ivw_loader.attribute("height")));

        if (gIsSmmFst == "Y")   //처음 오픈시에만 사이즈 조절
        {
            ivw_patsmm.window.javascript.fResizeGrup("1", parseInt(ivw_patsmm.attribute("height")), parseInt(ivw_patsmm.attribute("width")));
            gIsSmmFst = "N";
        }
    }
}

function fSetRecItemValueBydegnitemlevlcd(reciteminfo)
{
    return ivw_loader.window.javascript.fSetRecItemValue_MMR01100(reciteminfo);
}

/**
 * @desc   : 진료기록 리스트 조회조건의 진료과 조회 및 서식즐겨찾기 조회
 *           2010.04.13 dhkim 기간옵션 조회 추가
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 */
function fReadyFormInitData()
{
    mmbfGetDeptCodeComboList("/root/send/reqdeptlist", "/root/init/deptlist", "A");
    sortNodeList("/root/init/deptlist/dept", "depthngnm", "asc"); // 가나다 순으로 정리되도록 수정.
    addComboItem("cbo_deptlist", "- 전체 -", "ALL", "above" );
    
    fFavorRefresh("refresh");  //즐겨찾기 조회
    
    //2010.04.12 dhkim 기간옵션 조회
    fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/srchday", "024");
    var srchday = model.getValue("/root/envinit/srchday/answcnt");
    switch(srchday)
    {
        case "001" :
            model.setValue("/root/init/reqmedireclist/diffdt", "1");
            break;
        case "002" :
            model.setValue("/root/init/reqmedireclist/diffdt", "3");
            break;
        case "003" :
            model.setValue("/root/init/reqmedireclist/diffdt", "6");
            break;
        case "004" :
            model.setValue("/root/init/reqmedireclist/diffdt", "9");
            break;
        case "005" :
            model.setValue("/root/init/reqmedireclist/diffdt", "12");
            break;
        case "006" :
            model.setValue("/root/init/reqmedireclist/diffdt", "24");
            break;
        case "007" :
            model.setValue("/root/init/reqmedireclist/diffdt", "36");
            break;
        case "008" :
            model.setValue("/root/init/reqmedireclist/diffdt", "48");
            break;
        case "009" :
            model.setValue("/root/init/reqmedireclist/diffdt", "60");
            break;
        default :
            model.setValue("/root/init/reqmedireclist/diffdt", "12");
            break;    
    
    }
    combo4.refresh();
    
    
	// 2013.08.28 CYW 
	fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/btnviewflag"	, "041");  // 진료기록메인의 기록조회 디폴트 설정(버튼View)
	fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/mainyn"		, "042");  // 진료기록메인의 기록조회 디폴트 설정(공통기록만보기)
	fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/rechfview"	, "043");  // 진료기록메인의 기록조회 디폴트 설정(기록Header/Footer보기)
	
	// 2013.10.28 CYW 
	fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/painhide"	, "048");  // 진료기록메인의 기록조회 디폴트 설정(통증숨김여부)
	
	// 2014.05.19 엄영만
	fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/deptmemopopyn", "054");  // 진료기록메인의 타과메모 팝업 여부
	
	// 통증숨김여부
	if( model.getValue("/root/envinit/painhide/answcnt") == "002" ){
		model.setValue("/root/temp/painhideflag", "true");
	}else{
		model.setValue("/root/temp/painhideflag", "false");
	}
	
	// 버튼보기여부
	if( model.getValue("/root/envinit/btnviewflag/answcnt") == "002" ){
		model.setValue("/root/temp/btnviewflag", "true");
		grp_btnbox.visible = false;
		group3.attribute("top") = "55";
		swt_left.attribute("top") = "80";
		swt_left.attribute("height") = "695";
		grd_medireclist.attribute("height") = "690";
		ivw_reccnts.attribute("height") = "690";
		ivw_reccnts.grd_medirec.attribute("style") = "left:0px; top:0px; width:583px; height:688px; background-position:center; border-style:none;";
		ivw_reccnts.grd_medirec.refresh();	
	}else{
		model.setValue("/root/temp/btnviewflag", "false");
	}
	
	// 공통 기록지만 보기여부
	if( model.getValue("/root/envinit/mainyn/answcnt") == "002" ){
		model.setValue("/root/temp/btnmainyn", "true");
	}else{
		model.setValue("/root/temp/btnmainyn", "false");
	}
	
	// 기록내용 Header/Footer 보기여부
	if( model.getValue("/root/envinit/rechfview/answcnt") == "002" ){
		model.setValue("/root/temp/rechfview", "true");
	}else{
		model.setValue("/root/temp/rechfview", "false");
	}			
	bool_btnmainyn.refresh();
	bool_btnviewflag.refresh();
	bool_rechfview.refresh();
	// 2013.08.28 CYW

    //2010.04.26 dhkim - 간호정보조사지 서울성모만 버튼 visible처리
	//기관코드(간호공통기준자료테이블에서 가져옴)
	var pCode = "'077'"; // 조회할 CdGrupID 코드정보(077:각기관코드정보)
	var pDate = getCurrentDate(); //조회기준일자
	fGetNursHardCdInfo_MMR00100(pCode, pDate);
	if(getUserInfo("dutplceinstcd") == model.getValue("/root/code_mmr00100/codeinfo/codelist[supcdid='01']/cdid")){
		btn_nursinfo.visible = true;
	}else{
		btn_nursinfo.visible = false;
	}   
}

/**
 * @desc   : 진료기록 메인의 왼쪽 스위치에 따른 함수 호출
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 */
function fRefMain()
{
    switch (swt_left.selectedIndex)
    {
        case 0:
            fRefMediRecList();
        break;

        case 1:
        //2014/03/17 이정택 추가
        	fRefMediRecList();
		//2014/03/17 이정택 추가
            fShowMediRecCnt("");
        break;
        
        case 2:
            fShowOrdCnt();  //처방내역 조회
        break;

        default:
					// ivew 조건 설정 (치과 외래진료일 경우 치과기록 사용 : 최원돈 20101222 경북대)
					if (   btn_tab_denti.visible
					    && ivw_denti.src != ""
					    && btn_tab_denti.selected)
					{
						ivw_denti.window.javascript.fGetrecinfo();
					}
        break;
    }
    
    //2013.11.28 김영기 수진일자와 기록일자가 다를경우 색상변화
    fSetColorByNotSameOrdddandRecdd(grd_medireclist);
    
}

/**
 * @desc   : 미리보기 조회
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 * @parameter : formrecseq - 검색하고자 하는 seq번호
 						findrowInfo - 원하는 그룹 search(같은서식 검색으로  seq가 구분자로 멀티로 구성되어 넘어옴.)
 * 2010/01/04 hkjoo 수정
 */
function fShowMediRecCnt(formrecseq, arrFormrecseq)
{
	
	model.addlog("fShowMediRecCnt_start");	
	
    if (model.getValue("/root/main/paminfo/pid") == "")
    {
        return;
    }
    //cyw
    fGrdSortFlag();
    
    var cond = new COMN_CONT_RECCNTS();
    var instance = document.models(0).instances(0);
    var nodeReclist = instance.selectNodes("/root/main/mainlist/medireclist");
    var nodeReclistlength = nodeReclist.length;
    
    cond.pid 				= model.getValue("/root/main/paminfo/pid");
    cond.formrecdeptcd = model.getValue("/root/send/reqmedireclist/formrecdeptcd");
    cond.chosflag 		= model.getValue("/root/send/reqmedireclist/chosflag");
    cond.rechfview 		= model.getValue("/root/temp/rechfview");
    cond.mainyn 			= model.getValue("/root/temp/btnmainyn");		// 2013.09.25 CYW
    cond.recformsort 	= model.getValue("/root/temp/recformsort");		// 2013.10.22 CYW 
    cond.painhideflag 	= model.getValue("/root/temp/painhideflag");		// 2013.10.28 CYW
    cond.notprogress 	= model.getValue("/root/temp/notprogress");		// 2014.05.30 이윤주
    
    
    cond.reclistlength = nodeReclistlength;
    
    //2014/02/20 이정택 추가
    // 페이징 여부를 넘겨줌
    if(formrecseq!="" && formrecseq!=null){
    	cond.pagingyn = "N";
    	ivw_reccnts.window.javascript.btn_paging.visible=false;
    }else{
    	cond.formrecseq="";
    	cond.pagingyn = "Y";
    	cond.pagecnt = "1";
    }
    //2014/02/20 이정택 추가

    if (formrecseq == ""){
        cond.recfromdt = model.getValue("/root/init/reqmedireclist/recfromdt");
        cond.rectodt = model.getValue("/root/init/reqmedireclist/rectodt");
    }else{
        cond.recfromdt = "";
        cond.rectodt = "";
    }
    
    //2010/01/04 hkjoo 추가
    if ( arrFormrecseq != null )
    	cond.arrFormrecseq = arrFormrecseq;
    ////////////////////////

    cond.formrecseq = formrecseq;

    ivw_reccnts.window.javascript.fRefMediRecCnts(cond);

    swt_left.selectedIndex = 1;
    button15.selected = true;
    fSetIviewVisible(false); // ivew 화면 설정 (치과 외래진료일 경우 치과기록 사용 : 최원돈 20101223 경북대)
    
    model.addlog("fShowMediRecCnt_end");  
}

/**
 * @desc   : 미리보기 조회(XSLT)
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 */
function fShowMediRecCntByXslt(signno, formcd)
{
    model.resetInstanceNode("/root/send/xslsend");
    model.removeNodeset("/root/tmpinicert");
    model.makeValue("/root/send/xslsend/signno", signno);
    
    if(submit("TRMRI02401"))
    {
        var certnodeList = instance1.selectNodes("/root/tmpinicert/iniinfo");
        var foldernm = "C:/CertrecPrnt";
        
        if (certnodeList.length <= 0)
        return;
        
        fExistFolder(foldernm);
        
        var emrpath = "";
        var emrorddate = "";
        var emrformnm = "";
        var emrformcd = "";
        var emrdeptnm = "";
        var emrdeptcd = "";
        var emrpage = "";
        var emrhiddenmsg = "";
        var k = "";
        var pid = "";
        var ptnm = "";
        var deptengabbr = "";
        var rgstno = "";
        var sa = "";
        var disporddd = "";
        var orddd = "";
        var drid = "";
        var roomcd = "";
        var ordtype = "";
        var chosflag = "";
        var orddeptcd = "";
        var signflag = "";
        
        var signno = 0;
        var formcd = "";
        var formnm = "";
        var recdt = "";
        
        for(var i = 1; i <= certnodeList.length; i++)
        {
            signno = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/signno");
            formcd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/formcd");
            formnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/formnm");
            recdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/recdt");
            trans = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/trans");
            pid = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/pid");
            ptnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/ptnm");
            deptengabbr = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/deptengabbr");
            rgstno = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/rgstno");
            sa = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/sa");
            disporddd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/disporddd");
            orddd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/orddd");
            drid = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/drid");
            roomcd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/roomcd");
            ordtype = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/ordtype");
            chosflag = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/chosflag");
            orddeptcd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/orddeptcd");
            signflag = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/signflag");
            
            
            model.makeValue("/root/prthist[" + i + "]/pid", pid);
            model.makeValue("/root/prthist[" + i + "]/signno", signno);
            model.makeValue("/root/prthist[" + i + "]/reckind", "01");
            model.makeValue("/root/prthist[" + i + "]/readprtflag", "P");
            model.makeValue("/root/prthist[" + i + "]/formcd", formcd);
            model.makeValue("/root/prthist[" + i + "]/signflag", signflag);
            model.makeValue("/root/prthist[" + i + "]/orddd", orddd);
            model.makeValue("/root/prthist[" + i + "]/chosflag", chosflag);
            model.makeValue("/root/prthist[" + i + "]/refusge", "");
            model.makeValue("/root/prthist[" + i + "]/refremark", "");
            
            if(trans == "")
            {
                trans = "<!--% \n %BASE " + getDomain() + "/himed/webapps/emr/ \n %INCLUDE recmngtweb/xrw/cmc.ini \n VAR_PAT_NUM = " + pid + " \n VAR_PAT_NAME = " + ptnm + " \n %-->\n" + "<html><head><title>출력화면 구현중입니다.</title></head><body>출력화면 구현중입니다.</body></html>"
                //alert("출력용 서식 디자인이 존재하지 않습니다.");
                //return;
            }
            else
            {
                trans = "<!--% \n %BASE " + getDomain() + "/himed/webapps/emr/ \n %INCLUDE recmngtweb/xrw/cmc.ini \n VAR_PAT_NUM = " + pid + " \n VAR_PAT_NAME = " + ptnm + " \n %-->\n" + trans
            }
            
            obj_cvrt.InputPath = "wide://" + trans;
            obj_cvrt.SaveFile(foldernm + "/" + signno + "_" + "####.jpg"); 
            pageno = obj_cvrt.TotalPage;
            
            for(var j = 1; j <= pageno; j++)
            {
                k = ("" + j + "").getLeftPad(4, "0");
                
                emrpath += foldernm + "/" + signno + "_" + k + ".jpg|";
                emrorddate += orddd + "|";
                emrformnm += formnm + "|";
                emrformcd += formcd + "|";
                emrdeptnm += deptengabbr + "|";
                emrdeptcd += orddeptcd + "|";
                emrpage += j+"|";
                emrhiddenmsg += formcd + "▦" + signno + "▦" + formnm + "▦" + chosflag + "▦" +pid + "▦" + ptnm + "▦" + deptengabbr
                         + "▦" + sa + "▦" + rgstno + "▦" + disporddd + "▦" + drid + "▦" + roomcd + "▦" + disporddd + "▦" + ordtype + "▦" + "E" +"|";
            }
        
        }
        
        model.removeNodeset("/root/temp/inisend");
        model.resetInstanceNode("/root/imgrec/iemr");
        //iviewerIemr.window.javascript.resetInstance_EMR();

        //이미지경로
        model.makeValue("/root/temp/inisend/emrpath", emrpath.substring(0, emrpath.length - 1));
        iviewerIemr.model.setValue("/root/main/emrpath", model.getValue("/root/temp/inisend/emrpath"));
        //진료일
        model.makeValue("/root/temp/inisend/emrorddate", emrorddate.substring(0, emrorddate.length - 1));
        iviewerIemr.model.setValue("/root/main/emrorddate", model.getValue("/root/temp/inisend/emrorddate"));
		//서식명
		model.makeValue("/root/temp/inisend/emrformnm", emrformnm.substring(0, emrformnm.length - 1));
		iviewerIemr.model.setValue("/root/main/emrformnm", model.getValue("/root/temp/inisend/emrformnm"));
		//서식코드
		model.makeValue("/root/temp/inisend/emrformcd", emrformcd.substring(0, emrformcd.length - 1));
		iviewerIemr.model.setValue("/root/main/emrformcd", model.getValue("/root/temp/inisend/emrformcd"));
		//진료과
		model.makeValue("/root/temp/inisend/emrdeptnm", emrdeptnm.substring(0, emrdeptnm.length - 1));
		iviewerIemr.model.setValue("/root/main/emrdeptnm", model.getValue("/root/temp/inisend/emrdeptnm"));
		//진료과코드
		model.makeValue("/root/temp/inisend/emrdeptcd", emrdeptcd.substring(0, emrdeptcd.length - 1));
		iviewerIemr.model.setValue("/root/main/emrdeptcd", model.getValue("/root/temp/inisend/emrdeptcd"));
		//페이지
		model.makeValue("/root/temp/inisend/emrpage", emrpage.substring(0, emrpage.length - 1));
		iviewerIemr.model.setValue("/root/main/emrpage", model.getValue("/root/temp/inisend/emrpage"));
		
		model.makeValue("/root/temp/inisend/emrhiddenmsg", emrhiddenmsg.substring(0, emrhiddenmsg.length - 1));
		iviewerIemr.model.setValue("/root/main/emrhiddenmsg", model.getValue("/root/temp/inisend/emrhiddenmsg"));
		
		var iemrNode = instance1.selectSingleNode("/root/imgrec/iemr");
    
        iviewerIemr.window.javascript.searchChart(iemrNode);
        
        if (iviewerIemr.window.javascript.downloadChart() == true)
    	{
    		iviewerIemr.window.javascript.setupChart("ChartView");
        }
    }
    
    model.toggle("case5");
    button16.selected = true;
}

/**
 * @desc   : 진료기록 리스트 조회조건 시작일, 종료일 셋팅
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 */
function fAddDateReq(diffFlag)
{
    var frdd = model.getValue("/root/init/reqmedireclist/recfromdt");
    var todd = model.getValue("/root/init/reqmedireclist/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(model.getValue("/root/init/reqmedireclist/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(model.getValue("/root/init/reqmedireclist/diffdt")) * -1;
        destdd = srcdd.getAddDate(diffdt, "M");
        frdd = destdd.getDateFormat();
    }
    else if (diffFlag == "today")
    {
        todd = getCurrentDate();

        var today = new Date();
        var frday = new Date();
        var diffdt = parseInt(model.getValue("/root/init/reqmedireclist/diffdt")) * -1;
        frday = today.getAddDate(diffdt , "M");
        frdd = frday.getDateFormat();
    }
    else
    {
        var today = todd.toDate();
        var frday = new Date();
        var diffdt = parseInt(model.getValue("/root/init/reqmedireclist/diffdt")) * -1;
        frday = today.getAddDate(diffdt , "M");
        frdd = frday.getDateFormat();
    }

    model.setValue("/root/init/reqmedireclist/recfromdt", frdd);
    model.setValue("/root/init/reqmedireclist/rectodt", todd);

    ipt_formrecdtfr.refresh();
    ipt_formrecdtto.refresh();
}

function fGetUserComnFormCd(srcformcd)
{
    selnode = instance1.selectSingleNode("/root/main/tmpformlist/endformlist[srcformcd='"+srcformcd+"' and formuseflag='D' and formdeptcd='"+ getUserInfo("dutplcecd") +"']/formcd");
    if (selnode.text == "")
    {
        selnode = instance1.selectSingleNode("/root/main/tmpformlist/endformlist[srcformcd='"+srcformcd+"' and formuseflag='C']/formcd");
    }
    return selnode.text;
}

/**
 * @desc   : 환자 원무 정보 셋팅(개발 환경이 로컬일 경우)
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 */
//function fTmpInitPamInfo(chosflag)
//{
//    // TF viewer로 로딩시에 환자정보 세팅
//    if (window.document.location != "C:/CMCProject/application/webapps/emr/medirecweb/xrw/" && window.document.location != "D:/CMCProject/application/webapps/emr/medirecweb/xrw/") return;
//    if (chosflag == "O")
//    {
//        model.makeValue("/root/main/paminfo/pid", "17419028");
//        model.makeValue("/root/main/paminfo/orddd", "20080303");
//        model.makeValue("/root/main/paminfo/cretno", "360043723");
//        model.makeValue("/root/main/paminfo/ioflag", "O");
//        model.makeValue("/root/main/paminfo/fsexamflag", "R");
//        model.makeValue("/root/main/paminfo/orddeptcd", "2060000000");
//        model.makeValue("/root/main/paminfo/orddrid", "93015133");
//    }
//    else if (chosflag == "I")
//    {
//        model.makeValue("/root/main/paminfo/pid", "16377040");
//        model.makeValue("/root/main/paminfo/indd", "20071007");
//        model.makeValue("/root/main/paminfo/cretno", "22532");
//        model.makeValue("/root/main/paminfo/ioflag", "I");
//        model.makeValue("/root/main/paminfo/orddeptcd", "2010000000");
//        model.makeValue("/root/main/paminfo/medispclid", "EMR");
//        model.makeValue("/root/main/paminfo/atdoctid", "EMR");
//    }
//    else if (chosflag == "E")
//    {
//        model.makeValue("/root/main/paminfo/pid", "19862");
//        model.makeValue("/root/main/paminfo/indd", "20070808");
//        model.makeValue("/root/main/paminfo/cretno", "1");
//        /*model.makeValue("/root/main/paminfo/pid", "20143");
//        model.makeValue("/root/main/paminfo/indd", "20070816");
//        model.makeValue("/root/main/paminfo/cretno", "1");*/
//        
//        model.makeValue("/root/main/paminfo/ioflag", "E");
//        model.makeValue("/root/main/paminfo/orddeptcd", "2280000000");
//        model.makeValue("/root/main/paminfo/medispclid", "10301864");
//        model.makeValue("/root/main/paminfo/atdoctid", "-");
//    }
//    
//    model.makeValue("/root/temp/initpatinfo/localyn", "Y");
//    
//    fInitRecPamInfo();
//}

/**
 * @desc   : 환자 원무 정보 셋팅전 기록 저장여부 체크
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 */
function fPrevInitRecPamInfo()
{
    if (ivw_loader.src != "" && ivw_loader.ivw_base.src != "")
    {
        var rtn = "N";
        rtn = ivw_loader.window.javascript.fCheckChangeDataForCosign();
               
        if (rtn != "N")     //수정데이터가 있는 경우
        {
            var sPid = model.getValue("/root/main/paminfo/pid");
            var sPnm = model.getValue("/root/main/paminfo/hngnm");
            
            var rtnmsg = messageBox("기록내용 중 저장되지 않은 내용이 있습니다. " + sPid + " " + sPnm + " 환자의 기록을", "Q002");
            
            setParameter("SSMMR01100_recsavechk", "Y");
    
            if (rtnmsg == 6)
            {
                var saveRtn = ivw_loader.window.javascript.fClickSave("Y");
                
                if (!saveRtn)
                {
                   	return false;
                }
                else
                {
                	//2010.03.24 안치원 - 환자선택시 저장후에 저장완료 메세지창 뜨지 않게 수정
                    //messageBox(sPid + " " + sPnm +" 환자의 기록으로 저장되었습니다.", "I", "");
                }
            }
        }
    }
    
    //2010.04.26 dhkim - 진료대상자 선택시 기존에 열려있던 간호정보조사지 팝업을 모두 닫음.
    fCloseNursrecPop();
    
    
    return true;
}

/**
 * @desc   : 환자 원무 정보 셋팅
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 */
function fInitRecPamInfo()
{
    //환자정보 새로 바뀔시 기록 수정을 위해 셋팅되어있던 파리미터 clear
    clearParameter("SSMMR01200_Param_formcd");
    clearParameter("SSMMR01200_Param_recseq");

    isFstListSrch = "Y";
		
    try
    {
//        if (model.getValue("/root/temp/initpatinfo/localyn") != "Y")
//    	{
//    	    var node = getGlobalVariable("paminfo");
//	
//	        model.removeNodeset("/root/main/paminfo");
//	        setCSVToNode("/root/main", node, "paminfo");
//        }
//        model.makeValue("/root/temp/initpatinfo/localyn", "N");
        var node = getGlobalVariable("paminfo");
    	
        model.removeNodeset("/root/main/paminfo");
        setCSVToNode("/root/main", node, "paminfo");

        model.setValue("/root/send/reqinitinfo/pid",        model.getValue("/root/main/paminfo/pid"));
        model.setValue("/root/send/reqinitinfo/cretno",     model.getValue("/root/main/paminfo/cretno"));
        model.setValue("/root/send/reqinitinfo/chosflag",   model.getValue("/root/main/paminfo/ioflag"));

        if (model.getValue("/root/send/reqinitinfo/chosflag") == "O" || model.getValue("/root/send/reqinitinfo/chosflag") == "S")
        {
            button24.disabled = true;
            model.setValue("/root/send/reqinitinfo/orddd",      model.getValue("/root/main/paminfo/orddd"));
        }
        else
        {
            button24.disabled = false;
            model.setValue("/root/send/reqinitinfo/orddd",      model.getValue("/root/main/paminfo/indd"));
        }
        
        fFavorRefresh("chosflag");
        
        /*
         * 진료대상자리스트의 외래out,입원in,응급er,수술op,의뢰cnst 구분값 세팅
         */
        var tabflag = "";
        var oprsrvno = "";
        var wndobj = getOpenWindow("SMMMO04100");
        
        if (wndobj != null)
        {
	        tabflag = wndobj.javascript.getParameter("SMMMO04100_medirec_caseid");
	    }
	    
	    
	    if (tabflag == "op")
	    {
	        var operation = getGlobalVariable("operation").split("▩")[1];
            
            if(operation != null && operation != ""){
                oprsrvno = operation.split("▦")[0];
            }
	    }
        
        model.makeValue("/root/send/reqinitinfo/tabflag",        tabflag);  
        model.makeValue("/root/send/reqinitinfo/patflag",      model.getValue("/root/main/paminfo/autoformcd"));
        model.makeValue("/root/send/reqinitinfo/formrecdeptcd", model.getValue("/root/send/reqmedireclist/formrecdeptcd"));
        model.makeValue("/root/send/reqinitinfo/oprsrvno", oprsrvno);
        
        ivw_reccnts.window.javascript.fClear();
        model.removeNodeset("/root/main/mainlist/medireclist");
        
        /*
         * 의사별미비리스트, CP 인터페이스 formcd및, formrecseq 세팅, formrecdd 세팅
         */       
		var unprepformcd = getGlobalVariable("linked_formcd", "emr"); 
		var unprepformrecseq = getGlobalVariable("linked_formrecseq", "emr"); 
		var unprepformrecdd = getGlobalVariable("linked_formrecdd", "emr"); 
		// 글로벌 파라미터 초기화 
		setGlobalVariable("linked_formcd", "", "emr") ; 
		setGlobalVariable("linked_formrecseq", "", "emr") ; 
		setGlobalVariable("linked_formrecdd", "", "emr") ; // 추후 수정 : 해당 위치에 셋팅 후 초기화
		
		var cpformcd = getGlobalVariable("linked_cpformcd", "emr"); 
		var cpformrecseq = getGlobalVariable("linked_cpformrecseq", "emr"); 
		var cpformrecdd = getGlobalVariable("linked_cpformrecdd", "emr"); 
		// 글로벌 파라미터 초기화 
		setGlobalVariable("linked_cpformcd", "", "emr") ; 
		setGlobalVariable("linked_cpformrecseq", "", "emr") ; 
		setGlobalVariable("linked_cpformrecdd", "", "emr") ; // 추후 수정 : 해당 위치에 셋팅 후 초기화 			
        
        if(unprepformcd != "")      //미비
        {            
            setParameter("SSMMR01100_cert_Cnfm", "Y");  //미비기록의 경우 인증서를 한번만 띄워주기 위한 param(2008-12-29 : 박종훈 추가)
            
            if(unprepformrecseq != "")
            {
                fOpenRecForm(unprepformcd, unprepformrecseq); 
                fShowMediRecCnt(unprepformrecseq);
            }
            else
            {
                ivw_loader.window.javascript.setParameter("SSMMR01100_formrecdd", unprepformrecdd);
                fOpenNewForm(unprepformcd); 
            } 	
            
            unprepformcd = ""; 
    		unprepformrecseq = ""; 
    		unprepformrecdd	= "";	
        }
        else if(cpformcd != "")     //CP
        {            
            if(cpformrecseq != "")
            {
                fOpenRecForm(cpformcd, cpformrecseq); 
            }
            else
            {
                ivw_loader.window.javascript.setParameter("SSMMR01100_formrecdd", cpformrecdd);
                fOpenNewForm(cpformcd); 
            }
            
            cpformcd = ""; 
    		cpformrecseq = ""; 
    		cpformrecdd = "";
        }
        else
        {
    		/*
             * 기본서식 조회
             */
            if (submit("TRMMR00102",false))
            {
                setParameter("srchmemo","Y");
                var isOpenNewForm = false;
                
                if (model.getValue("/root/main/initinfo/lastformrecseq") != "")
                {
					//KNUH_20110208, 주희경, 로그인 시 미리 데이터를 조회해 놓고 copy해서 쓰는 방식으로 변경
					//환경설정에서 진료기록메인의 왼쪽화면 디폴트 탭 설정 값을 읽어와 탭설정
					var viewerObj = getViewer("sysMessage");	
					var answvalnm = viewerObj.window.model.getValue(gvOrderBasicInfoPath +"/interface[qestcd='032']/answcnt"); 
					
					if ( answvalnm == "001" )
					{
						swt_left.selectedIndex = 0;
                        button66.selected = true;
						fRefMain();
					}
                    else if ( ( model.getValue("/root/main/initinfo/lastformrecseq") > 0 ) )
                    {
                        fShowMediRecCnt(model.getValue("/root/main/initinfo/lastformrecseq"));
                    }
                    else
                    {
                        swt_left.selectedIndex = 0;
                        button66.selected = true;
						fSetIviewVisible(false); // ivew 화면 설정 (치과 외래진료일 경우 치과기록 사용 : 최원돈 20101223 경북대)
                    }
                }
                
                if (model.getValue("/root/main/initinfo/formrecseq") != "")
                {
                    fOpenRecForm(model.getValue("/root/main/initinfo/formcd"), model.getValue("/root/main/initinfo/formrecseq"));
                }
                else
                {
                    isOpenNewForm = true;
                }
                
                if (isOpenNewForm)
                {
                    if (model.getValue("/root/main/initinfo/formcd") == "")
                    {
                        ivw_loader.src = "";
                        ivw_loader.src = "../../../emr/medirecweb/xrw/SSMMR01100_서식로더.xrw";
                        ivw_loader.window.javascript.fInitPage(true, true, parseInt(ivw_loader.attribute("height")));
                        //messageBox("기본서식을 알아 오는데 실패했습니다.\n\n서식목록이나 즐겨찾기에서 서식을 선택하시기 바랍니다.", "C", "")
                    }
                    else if (model.getValue("/root/main/initinfo/formcd") == "outfstmediform")
                    {
                        //messageBox("기존의 초진기록지에 수기작성해 주십시오.", "E", "");
                    }
                    else
                    {
                        fOpenNewForm(model.getValue("/root/main/initinfo/formcd"));
                    }
                }
            }
        }
    
        //2009.10.26 안치원 TASK-32482
		//서식목록에서 응급환자의 경우 입퇴원요약기록이 안보이게 한다.
		//환자의 내원구분이 바뀌면 서식목록을 리로드한다.
		var curObj = window.javascript.getOpenWindow("SPMMR01000");
		var selectedChosFlag = model.getValue("/root/hidden/selectedChosFlag");
		var chosFlag = model.getValue("/root/send/reqinitinfo/chosflag");
		if (curObj != null && selectedChosFlag != chosFlag) {
			model.makeValue("/root/hidden/selectedChosFlag", chosFlag);
			//환자의 내원구분이 바뀌면 서식목록을 닫는다.
			//curObj.window.javascript.reloadByRecMain();
			curObj.window.close();
		}
    }
    catch (e)
    {
        //alert("fInitRecPamInfo");
        throw e;
    } 
    
    //2009.11.18  안치원 - 진료대상자리스트의 환자 수진키와 비교한다.
    validPamInfo(model.getValue("/root/main/paminfo/pid")
				,model.getValue("/root/main/paminfo/orddd")
				,model.getValue("/root/main/paminfo/cretno"), 1);

    //시점 문제로 loader의 oncomnformloadcomplete으로 호출시점 변경
    //fOpenPrcpMainWnd();

	// 치과기록 버튼 및 초기화 설정 : 최원돈 20101222 경북대
	ivw_denti.src="";
	ivw_dentifmla.src="";
  btn_tab_denti.visible = (   model.getValue("/root/main/paminfo/ioflag") == "O"
		                       && model.getValue("/root/init/dentdept/hardcd[hardcd='" + getUserInfo("dutplcecd") + "']/hardcd") != "");
	fSetIviewVisible(false);
}

/**
 * @desc   : 처방 메인 새로고침
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 */
function fOpenPrcpMainWnd()
{
    var ordpatlistObj = getOpenWindow("SMMMO04100");
    if(ordpatlistObj != null)
    {
        ordpatlistObj.javascript.fOpenPrcpMainWnd();
    }
    fReadyFormInitData();//2010.04.13 dhkim 기록조회 환경설정내용 새로고침
    
}

/**
 * @desc   : CP창에서 기록지 호출
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 */
function fOpenFormByOther(formcd, formrecseq, calledflag, recdd)
{
    if (formrecseq != null && formrecseq != "")
	{
	    fOpenRecForm(formcd, formrecseq, calledflag);		
	}
	else
	{
	    ivw_loader.window.javascript.setParameter("SSMMR01100_formrecdd", recdd);
		fOpenNewForm(formcd, calledflag);
	}
}

function fCheckSaveRec()
{
    return false;
}

/**
 * @desc   : 기록 목록 조회
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 */
 var isFstListSrch = "Y";
function fRefMediRecList()
{
    if (model.getValue("/root/main/paminfo/pid") == "")
    {
        messageBox("환자정보가 존재하지 않아 진행  ", "E001");
        return;
    }

    model.setValue("/root/send/reqmedireclist/pid", model.getValue("/root/main/paminfo/pid"));

    if (model.getValue("/root/main/paminfo/ioflag") == "O")
	    model.setValue("/root/send/reqmedireclist/orddd", model.getValue("/root/main/paminfo/orddd"));
	else
		model.setValue("/root/send/reqmedireclist/orddd", model.getValue("/root/main/paminfo/indd"));
		
    model.setValue("/root/send/reqmedireclist/cretno", model.getValue("/root/main/paminfo/cretno"));
    model.setValue("/root/send/reqmedireclist/orddeptcd", model.getValue("/root/main/paminfo/orddeptcd"));

    model.setValue("/root/send/reqmedireclist/recfromdt", model.getValue("/root/init/reqmedireclist/recfromdt"));
    model.setValue("/root/send/reqmedireclist/rectodt", model.getValue("/root/init/reqmedireclist/rectodt"));
    model.makeValue("/root/send/reqmedireclist/formcd", "-");

    model.makeValue("/root/send/reqmedireclist/mainyn"		, model.getValue("/root/temp/btnmainyn") );
    model.makeValue("/root/send/reqmedireclist/recformsort"	, model.getValue("/root/temp/recformsort") );
    model.makeValue("/root/send/reqmedireclist/notprogress"	, model.getValue("/root/temp/notprogress") );
    
    submit("TRMMR00101");
    
    var cnt = getNodesetCnt(model, "/root/main/mainlist/visitdept");
    if (cnt > 0)
    {
	    var orddd = model.getValue("/root/send/reqmedireclist/orddd");
		var cretno = model.getValue("/root/send/reqmedireclist/cretno");
	    var cnt2 = getNodesetCnt(model, "/root/main/mainlist/medireclist");
	    
	    if (cnt2 == 0)
	    {	
		    for (var i = 1; i <= cnt; i++)
		    {
		    	model.makeValue("/root/main/mainlist/medireclist["+i+"]/formrecdeptcd", model.getValue("/root/main/mainlist/visitdept["+i+"]/orddeptcd"));
				model.makeValue("/root/main/mainlist/medireclist["+i+"]/formrecdeptnm", model.getValue("/root/main/mainlist/visitdept["+i+"]/orddeptnm"));
				
				model.makeValue("/root/main/mainlist/medireclist["+i+"]/formnminfo", "호출과 미작성");
				model.makeValue("/root/main/mainlist/medireclist["+i+"]/orddd", orddd);
				model.makeValue("/root/main/mainlist/medireclist["+i+"]/cretno", cretno);
			}
	    }
	    else
	    {
		    var cond = "/root/main/mainlist/medireclist[orddd='#orddd#' and cretno='#cretno#' and formrecdeptcd='#deptcd#']";
		    cond = cond.replace("#orddd#", orddd);
		    cond = cond.replace("#cretno#", cretno);
		    
		    var stmt;
	    
	    	for (var i = 1; i <= cnt; i++)
	    	{
	    		stmt = cond.replace("#deptcd#", model.getValue("/root/main/mainlist/visitdept["+i+"]/orddeptcd"));
	    		
	    		nodelist = instance1.selectNodes(stmt);
	    		cnt2 = getNodesetCnt(model, stmt);
	    		
	    		if (cnt2 == 0)
	    		{	    			
	    			grd_medireclist.insertRow(1, "above");
	
	    			model.setValue("/root/main/mainlist/medireclist[1]/formrecdeptcd", model.getValue("/root/main/mainlist/visitdept["+i+"]/orddeptcd"));
	    			model.setValue("/root/main/mainlist/medireclist[1]/formrecdeptnm", model.getValue("/root/main/mainlist/visitdept["+i+"]/orddeptnm"));
	    			
	    			model.setValue("/root/main/mainlist/medireclist[1]/formnminfo", "호출과 미작성");
	    			model.setValue("/root/main/mainlist/medireclist[1]/orddd", orddd);
	    			model.setValue("/root/main/mainlist/medireclist[1]/cretno", cretno);
	    			
	    		}
	    	}
    	}
    	
    	model.refresh();

    	for (var i = 1; i <= grd_medireclist.rows; i++)
    	{
    		if (grd_medireclist.valueMatrix(i, grd_medireclist.colref("orddd")) == orddd &&
    			grd_medireclist.valueMatrix(i, grd_medireclist.colref("cretno")) == cretno)
    			grd_medireclist.rowStyle(i, "data", "color") = "blue";
    	}
    }
    

//2014/03/17 이정택 주석처리   
//    swt_left.selectedIndex = 0;
//2014/03/17 이정택 주석처리   
    button66.selected = true;
    
    fSetIviewVisible(false); // ivew 화면 설정 (치과 외래진료일 경우 치과기록 사용 : 최원돈 20101223 경북대)

    grd_medireclist.mergeCol(grd_medireclist.colref("formrecdd")) = true;
    grd_medireclist.merge();
    
    if (grd_medireclist.rows > 1)
    {
        grd_medireclist.row = 1;
    }
}

/**
 * @desc   : 기록 삭제
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 */
function fDelete()
{
    var formcd = ivw_loader.window.javascript.fGetFormMast("formcd");
    if (formcd == "") return;

    var ret = ivw_loader.window.javascript.fDelFormRec();

    if (ret == null) return;

    fOpenNewForm(formcd);

    fRefMediRecList();
}

/**
 * @desc   : 서식 오픈
 * @id     : 
 * @event  : 
 * @return : void
 * @authur : 박종훈
 */
function fOpenNewForm(formcd, calledflag)
{
    ivw_loader.window.javascript.fLoadNewForm(formcd, null, calledflag);
    
		fDefaultBtnClick();// 치과기록 닫기 ivew 조건 설정 (치과 외래진료일 경우 치과기록 사용 : 최원돈 20101222 경북대)
}

/**
 * @desc   : 즐겨찾기 콤보에서의 서식 오픈
 * @id     : 
 * @event  : xforms-select
 * @return : void
 * @authur : 박종훈
 */
function fOpenNewFormByList()
{
    var sFormcd = model.getValue("/root/hidden/choinewform");
    
    if(sFormcd == "-"){
        fFavorRefresh();            //즐겨찾기 refresh
    } else {
        fOpenNewForm(sFormcd);
        model.setValue("/root/hidden/choinewform", "-");
        model.refresh();
    }
}

/**
 * @desc   : 기록된 서식 오픈
 * @id     : 
 * @event  : xforms-select
 * @return : void
 * @authur : 박종훈
 */
function fOpenRecForm(formcd, formrecseq, calledflag) {
    ivw_loader.window.javascript.setParameter("userdeptcd", getUserInfo("dutplcecd"));
    ivw_loader.window.javascript.fLoadRecForm(formrecseq, null, calledflag);
}

/**
 * @desc   : 기록 미리보기
 * @id     : 
 * @event  : xforms-select
 * @return : void
 * @authur : 박종훈
 */
function fPreview(node)
{
    swt_left.selectedIndex = 1;
    button4.selected = true;

    ivw_reccnts.window.javascript.fPreviewData(node);
}

/**
 * @desc   : 입원환자 간호기록 보기
 * @id     : 
 * @event  : xforms-select
 * @return : void
 * @authur : 박종훈
 */
function fShowNursingCnt()
{
    if (model.getValue("/root/main/paminfo/pid") == "")
    {
        return;
    }

    var cond = new COMN_CONT_RECCNTS();
    var ioflag = model.getValue("/root/main/paminfo/ioflag");
    
    cond.pid = model.getValue("/root/main/paminfo/pid");
    
    if(ioflag == "I" || ioflag == "E"){
        cond.indd = model.getValue("/root/main/paminfo/indd");
    } else {
        cond.orddd = model.getValue("/root/main/paminfo/orddd");
    }
    
    cond.cretno = model.getValue("/root/main/paminfo/cretno");
    cond.ioflag = ioflag;
    cond.fromdd = model.getValue("/root/send/reqmedireclist/recfromdt");
    cond.todd = model.getValue("/root/send/reqmedireclist/rectodt");

    ivw_ganho.window.javascript.fRefNursingCnts(cond);
}

/**
 * @desc   : 처방내역 보기
 * @id     : 
 * @event  : xforms-select
 * @return : void
 * @authur : 박종훈
 */
function fShowOrdCnt()
{
    if (model.getValue("/root/main/paminfo/pid") == "")
    {
        return;
    }
    
    //자식창(처방내역)
    var spid = ivw_ord.model.getValue("/root/send/prcp/pid");
    var sorddeptcd = ivw_ord.model.getValue("/root/send/prcp/orddeptcd");
    var sfromdd = ivw_ord.model.getValue("/root/send/prcp/fromdd");
    var stodd = ivw_ord.model.getValue("/root/send/prcp/todd");
    //부모창(진료기록메인)
    var ppid = model.getValue("/root/main/paminfo/pid");
    var pformrecdeptcd = model.getValue("/root/send/reqmedireclist/formrecdeptcd")
    var pfromdd = model.getValue("/root/send/reqmedireclist/recfromdt").substring(0, 8);
    var ptodd = model.getValue("/root/send/reqmedireclist/rectodt").substring(0, 8);
    
    if(spid != ppid || sorddeptcd != pformrecdeptcd || sfromdd != pfromdd || stodd != ptodd)
    {
        var cond = new COMN_CONT_RECCNTS();
        cond.pid = ppid;
        cond.formrecdeptcd = pformrecdeptcd;
        cond.fromdd = pfromdd;
        cond.todd = ptodd;
    
        ivw_ord.window.javascript.fRefOrdCnts(cond);
    }
    
//    var ioflag = model.getValue("/root/main/paminfo/ioflag");
//    if(ioflag == "I" || ioflag == "E"){
//        cond.indd = model.getValue("/root/main/paminfo/indd");
//    } else {
//        cond.orddd = model.getValue("/root/main/paminfo/orddd");
//    }
//    
//    cond.cretno = model.getValue("/root/main/paminfo/cretno");
//    cond.ioflag = ioflag;
}

/**
 * @desc   : 즐겨찾기 새로고침
 * @id     : 
 * @event  : xforms-select
 * @return : void
 * @authur : 박종훈
 */
function fFavorRefresh(flag)
{
    if (flag == "refresh")
	{
		var rsltref = "/root/main/formbasesetlist";
		var srcref = gvOrderBasicInfoPath + "/formbaseset";

		model.removeNodeset(rsltref);
		model.makeNode(rsltref);

		var viewerObj = getViewer("sysMessage");

		var targetNodes = instance1.selectSingleNode(rsltref);
		var srcNodes = viewerObj.window.instance1.selectNodes(srcref);

		for(i=0; i<srcNodes.length; i++)
		{
			targetNodes.appendChild(srcNodes.item(i));
		}

//        submit("TRMMR00103");
	}
    
    /*
     * 내원구분별 즐겨찾기 세팅
     */
    if (flag == "refresh" || flag == "chosflag")
    {
        var chosflag = model.getValue("/root/send/reqinitinfo/chosflag");
        var copycond = "";
        
        if (chosflag == "E")
        {
            copycond = "formchosflag= 'I' or formchosflag= 'E'";
        }
        else if (chosflag == "D")
        {
            copycond = "formchosflag= 'I' or formchosflag= 'D'";
        }
        else if (chosflag == "S")
        {
            copycond = "formchosflag= 'I' or formchosflag= 'S'";
        }
        else
        {
            copycond = "formchosflag='"+chosflag+"'";
        }
        
        //copyNodeset("/root/main/formbasesetcbo/formbaseset", "/root/main/formbasesetlist/formbaseset[formchosflag='"+chosflag+"' or formchosflag='C']", "replace", model, model);
        copyNodeset("/root/main/formbasesetcbo/formbaseset", "/root/main/formbasesetlist/formbaseset[" + copycond + " or formchosflag='C']", "replace", model, model);
    }
    
    if (flag == "refresh")
    {
        model.setValue("/root/hidden/choinewform", "-");
        model.refresh();
    }
}

/**
 * @desc   : 서식조회 팝업 호출
 * @id     : 
 * @event  : DOMActivate
 * @return : void
 * @authur : 박종훈
 */
function fOpenFormcdPopup()
{
    var sCode = model.getValue("/root/hidden/formcd");
        var sTmp = "";
        var iTmp = 0;
    
    // form코드 입력시 자릿수 채워준다
    if(sCode.indexOf("/")!= "-1"){
        
        sCode = sCode.substr(1,sCode.length);
        var iCodeLength = sCode.length;
        if(iCodeLength ==0){
            return false;
        }
        var temp = 10 - iCodeLength
        for(var i = 1; i <= temp; i++){
          sTmp += "0";
        } 
        sTmp = sTmp + sCode;
            
        setParameter("codeflag","Y");
        setParameter("formcd",sTmp);
    }else{
        //  form코드 아닐때 
        setParameter("formcd",sCode);
    }
     //서식선택 팝업 
    modal("SPMRF03600", 1,10, 10, "SPMRF03600", "/root/send", "/root/temp/condition/getdata");
     
    model.setValue("/root/hidden/formcd",getParameter("formcd"));

   
}

/**
 * @desc   : 서식선택팝업창 활성화
 * @id     : 
 * @event  : DOMActivate
 * @return : void
 * @authur : 박종훈
 */
function fFormcdPopupActivate()
{

    var mdiWindows = window.children;
    for(var i=0;i<mdiWindows.length;i++)
    {
        mdiWindows(i).restore();
    }

    // 서식선택팝업창 활성화 시킨다
    var mainObj = getMainViewer();
    var oldPrcpObj;
    var curObj = window.javascript.getOpenWindow("SMMMR02500");

    if(curObj == null){
    }else{
        
        window.children.item("SMMMR02500").activate();
    } 

}

/**
 * @desc   : 서식목록팝업창 활성화
 * @id     : 
 * @event  : DOMActivate
 * @return : void
 * @authur : 박종훈
 */
function fFormSetPopupActivate()
{
    /*var mainObj = getMainViewer();
    var oldPrcpObj;
    var curObj = window.javascript.getOpenWindow("SMMMR02500");

    // 서식목록팝업창 활성화 시킨다
    if(curObj == null){
        window.javascript.open("SMMMR02500", 1, 0, 0);
        // window.javascript.open("../../../emr/medirecweb/xrw/SMMMR02500_서식리스트.xrw", 1, 0, 0, "", "", "");
        oldPrcpObj = mainObj.javascript.getOpenWindow("SMMMR02500");
    }
    window.children.item("SMMMR02500").activate();

    var mdiWindows = window.children;
    for(var i=0;i<mdiWindows.length;i++)
    {
      mdiWindows(i).restore();
    }*/
    
    var mainObj = getMainViewer();
    var oldPrcpObj;
    var curObj = window.javascript.getOpenWindow("SPMMR01000");

    // 서식목록팝업창 활성화 시킨다
    if(curObj == null){
        window.javascript.open("SPMMR01000", 1, 0, 0);

        oldPrcpObj = mainObj.javascript.getOpenWindow("SPMMR01000");
    }
    window.children.item("SPMMR01000").activate();

    var mdiWindows = window.children;
    for(var i=0;i<mdiWindows.length;i++)
    {
      mdiWindows(i).restore();
    }
}

/**
 * @desc   : 환자요약 팝업
 * @id     : 
 * @event  : DOMActivate
 * @return : void
 * @authur : 박종훈
 */
function fClickPatSmmBtn()
{
    setParameter("SSMMP04800_pid", model.getValue("/root/main/paminfo/pid"));		//환자요약 조회를 위한 파라미터 셋팅
    
    open("SSMMR04800", 1, 0, 0, "", "", "");
    
    setParameter("SSMMP04800_pid", "");
    
    var refreshflag = getParameter("SSMMP04800_rtn");

    if(refreshflag == "Y" && (ivw_patsmm.visible))
    {
        ivw_patsmm.window.javascript.fSelect_sub();
    }
}

/**
 * @desc   : V/S 팝업 호출
 * @id     : 
 * @event  : DOMActivate
 * @return : void
 * @authur : 박종훈
 */
function fClickTPR()
{
    var ioflag = model.getValue("/root/main/paminfo/ioflag");
    if (ioflag == "I")
    {
        var pid = model.getValue("/root/main/paminfo/pid");
        var indd = model.getValue("/root/main/paminfo/indd");
        var cretno = model.getValue("/root/main/paminfo/cretno");
        var instcd = model.getValue("/root/main/paminfo/instcd");
        var jobkindcd = getUserInfo("jobkindcd");
        
        setParameter("SMMNR00900_Param", pid + "▦" + indd + "▦" + cretno + "▦" + instcd + "▦" + jobkindcd + "▩");
        
        open("SMMNR00900");
    }
}

/**
 * @desc   : 보험메모 여부확인
 * @id     : 
 * @return : String
 * @authur : 한재상
 */
function fGetPamMemoYN()
{
    model.removeNodeset("/root/send/patmemo");
    model.makeValue("/root/send/patmemo/pid",       model.getValue("/root/main/paminfo/pid"));
    model.makeValue("/root/send/patmemo/memo",      "pmemosel");
    model.makeValue("/root/send/patmemo/ioflag",    model.getValue("/root/main/paminfo/ioflag") );
    model.makeValue("/root/send/patmemo/deptcd",    getUserInfo("dutplcecd") );
        
    submit("TRMMR05601");
    var nodeList = instance1.selectNodes("/root/main/imemo/imemolist/memolistinfo");
    if ( nodeList.length > 0 ) {
        return "Y";
    } else {
        return "N";
    }
}

/**
 * @desc   : 환자메모 팝업 호출
 * @id     : 
 * @event  : DOMActivate
 * @return : void
 * @authur : 박종훈
 */
function fGetPatMemo()
{
    var sPid = getPatientInfo("pid");
    
    //knuh 20120104 최원돈 OCS 진료대상자 OCS 조회 시 환자메모를 자동으로 사라지게 설정-필요없어서 삭제. SMMMO04100.js, SPMMR05600.js, MMR00100.js
    ////상단정보의 pid와 instance의 pid가 다르면 띄우지 않는다-lyj(20111107)
    //if ( model.getValue("/root/main/paminfo/pid") != sPid )
    //{
    //	alert("상단정보와 일치하지 않습니다");
    //	return;
    //}
    if (model.getValue("/root/main/paminfo/pid") == model.getValue("/root/send/patmemo/pid")) {
        return;
    } else {
        model.removeNodeset("/root/send/patmemo");
        model.makeValue("/root/send/patmemo/pid",    model.getValue("/root/main/paminfo/pid"));
        model.makeValue("/root/send/patmemo/memo",   "pmemosel");
		model.makeValue("/root/send/patmemo/ioflag", model.getValue("/root/main/paminfo/ioflag") );			//KNUH_20110208, 주희경 속도 개선을 위해 TXMMR00101에서 TRMMR05601 같이 조회하도록 추가
		model.makeValue("/root/send/patmemo/deptcd", getUserInfo("dutplcecd") );
        //model.makeValue("/root/send/patmemo/delflag", "N");
        
        //20090724 한재상 추가. 보험메모 popup 조건체크. (보험메모가 있으면 무조건 띄운다.)
//        var pammemoyn = fGetPamMemoYN();
        
        if(submit("TXMMR00101")) {
			var pammemoyn = model.getValue("/root/send/pmemo/pammemoyn");	//KNUH_20110208, 주희경, 속도개선을 위해 TXMMR00101에서 TRMMR05601도 함께 조회
        	if(model.getValue("/root/send/pmemo/memo") != "" || model.getValue("/root/send/pmemo/nmemo") != "" || pammemoyn == "Y") {
            	if(model.getValue("/root/send/pmemo/deptmemo") != "") {
                    btn_memo.value = "메모■◆";
                } else {
                    btn_memo.value = "메모■◇";
                }
            	
            	//btn_memo.value = "메모■";
          	    if (  model.getValue("/root/send/pmemo/popupyn") == "Y"  // 자동팝업 여부
          	       || pammemoyn == "Y"                                   // 보험 메모 여부
          	       || ( model.getValue("/root/send/pmemo/deptmemo") != "" && model.getValue("/root/envinit/deptmemopopyn/answcnt") == "002")  // 타과메모가 존재하고 타과 메모 자동팝업일경우
          	       ) {
                  //btn_memo.dispatch("DOMActivate");
                  setParameter("SPMMR05600_pammemoyn", pammemoyn);
                  fPopMemo();
                } else {
                    var wndobj = getOpenWindow("SPMMR05600");
                    if(wndobj != null) {
                    	//창닫기
                    	wndobj.javascript.window.close();
                    }
                }
            } else {
                if(model.getValue("/root/send/pmemo/deptmemo") != "") {
                    btn_memo.value = "메모□◆";
                } else {
                    btn_memo.value = "메모□◇";
                }
                //btn_memo.value = "메모□";
                model.makeValue("/root/send/pmemo/memo", "");
                
                if(model.getValue("/root/send/pmemo/deptmemo") != "" && model.getValue("/root/envinit/deptmemopopyn/answcnt") == "002" ){  // 타과 메모 자동 팝업 여부 002 자동팝업
                    setParameter("SPMMR05600_pammemoyn", pammemoyn);
                    fPopMemo();
                } else {
                    if (model.getValue("/root/send/pmemo/popupyn") != "Y") {
                        var wndobj = getOpenWindow("SPMMR05600");
        				if(wndobj != null) {
        					//창닫기
        					wndobj.javascript.window.close();
        				}
        			}
    		    }
            }
        }else{
        	//2010.05.28 이지운 추가 - 메모 팝업정보 조회 실패시 Timer 를 이용하여 10ms 후에 재시도 하도록 수정함.
        	model.setValue("/root/send/patmemo/pid", "");
			htmlwindow.setTimeout(function(){
				fGetPatMemo(); 
			},10);
        }
    }
}

/**
 * @desc   : 환자메모 저장
 * @id     : 
 * @event  : DOMActivate
 * @return : void
 * @authur : 박종훈
 */
function fSaveMemo()
{
    var memo  = model.getValue("/root/send/pmemo/memo");
    var nmemo = model.getValue("/root/send/pmemo/nmemo");
    
    model.removeNodeset("/root/send/patmemo");
    model.makeValue("/root/send/patmemo/pid",    model.getValue("/root/main/paminfo/pid"));
    model.makeValue("/root/send/patmemo/memo",   memo);
    model.makeValue("/root/send/patmemo/nmemo",  nmemo);
    model.makeValue("/root/send/patmemo/deptcd", getUserInfo("dutplcecd") );
    
    if(submit("TXMMR00101")) {
        if(model.getValue("/root/send/pmemo/memo") != "" || model.getValue("/root/main/pmemo/nmemo") != "") {
            if(model.getValue("/root/send/pmemo/deptmemo") != "") {
                btn_memo.value = "메모■◆";
            } else {
                btn_memo.value = "메모■◇";
            }
            
        }
        
        grup_smm.visible = false;
    }
}

/**
 * @desc   : 환자메모 오픈
 * @id     : 
 * @event  : DOMActivate
 * @return : void
 * @authur : 박종훈
 */
var curMemoObj = null;
function fPopMemo()
{
    curMemoObj = getOpenWindow("SPMMR05600");
    if(curMemoObj != null)
    {    
        curMemoObj.javascript.fGetPatMemo();
        activateChild("SPMMR05600");
    } else{
        setParameter("SPMMR05600_ioflag",       model.getValue("/root/main/paminfo/ioflag"));
        setParameter("SPMMR05600_pid",          model.getValue("/root/main/paminfo/pid"));
        setParameter("SPMMR05600_deptcd",       getUserInfo("dutplcecd")); // 로그인한 과로 조회
        setParameter("SPMMR05600_deptnm",       getUserInfo("dutplcenm")); // 로그인한 과명로 조회
        setParameter("SPMMR05600_hngnm",        model.getValue("/root/main/paminfo/hngnm"));
        
        var offsetX = event.screenX - event.clientX;
        offsetX = parseInt(btn_memo.attribute("left")) + offsetX;
    		
    	var offsetY = event.screenY - event.clientY;
    	offsetY = parseInt(btn_memo.attribute("top")) + offsetY + 120;
    	
    	open("SPMMR05600", 1, offsetX, offsetY, "", "", "");
    }
}

/**
 * @desc   : 코사인 관리화면 팝업 호출
 * @id     : 
 * @event  : onclick
 * @return : void
 * @authur : 박종훈
 */
function fSetCoSign()
{
    var coFormrecseq = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colref("formrecseq"));
    var coRecDd = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colref("formrecdd"));
    var coRecHm = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colref("formrechm"));
    var coUserDeptCd = getUserInfo("dutplcecd");
    
    setParameter("SPMRI02200_formrecseq", coFormrecseq);
    setParameter("SPMRI02200_recdt", coRecDd + coRecHm);
    setParameter("SPMRI02200_recdeptcd", coUserDeptCd);
    
    modal("SPMRI02200");
}



/*******************************************************************************************************
튜닝 작업                                                                                            
*******************************************************************************************************/

function fSelectNewForm()
{
    var sCode = model.getValue("/root/hidden/formcd");
    var sTmp = "";
    var iTmp = 0;
    
    // form코드 입력시 자릿수 채워준다
    if(sCode.indexOf("/")!= "-1"){
        
        sCode = sCode.substr(1,sCode.length);
        var iCodeLength = sCode.length;
        if(iCodeLength ==0){
            return false;
        }
        var temp = 10 - iCodeLength
        for(var i = 1; i <= temp; i++){
          sTmp += "0";
        } 
        sTmp = sTmp + sCode;
            
        setParameter("codeflag","Y");
        setParameter("formcd",sTmp);
    }else{
        //  form코드 아닐때 
        setParameter("formcd",sCode);
    }
     //서식선택 팝업 
    modal("SPMRF03600", 1,10, 10, "SPMRF03600", "/root/send", "/root/temp/condition/getdata");
    model.setValue("/root/hidden/formcd", "");
    ipt_tmp.refresh();
    ivw_loader.window.javascript.fLoadNewForm(getParameter("formcd"));  
    
    fDefaultBtnClick();// 치과기록 닫기 ivew 조건 설정 (치과 외래진료일 경우 치과기록 사용 : 최원돈 20101222 경북대)  
}

/**
 * @desc   : 기록블라인드 처리에 따른 
 * @id     : 
 * @event  : onclick
 * @return : void
 * @authur : 박종훈
 */
function fRecMainReady()
{
	try {
	    var ordPatObj = getOpenWindow("SMMMO04100");
	    if (ordPatObj != null)
	    {
	        var answcnt = ordPatObj.javascript.getParameter("SMMMO04100_ANSWCNT");
	        if (answcnt =="002" || answcnt =="003")
	        {
	            fBtnInitReady();
			}
	        else
	        {
	            var fstload = model.getValue("/root/init/fstload");
	            if (fstload == "Y")
	            {
	                model.setValue("/root/init/fstload", "N");
	                fReadyForm();
	            }
	            else
	            {
	                fInitRecPamInfo();
	            }
	            
	            grp_tle.attribute("visibility") = "visible";
	            grp_base.attribute("visibility") = "visible";
	            btn_blind.attribute("visibility") = "hidden";
	        }
	    }
	    else
	    {
	        grp_tle.attribute("visibility") = "visible";
	        grp_base.attribute("visibility") = "visible";
	        btn_blind.attribute("visibility") = "hidden";
	        
	        fReadyForm();
	    }

	    // 진료기록 고도화 버튼 사용 일자 HARDCODE 등록해서 관리 2013.09.27 CYW
	    /*
	    debugger;
	    mmbfGetHardCodeInfo ("/root/send/reqdata", "/root/temp/emrrecbtn", 5592 );
	    if(model.getValue( "/root/temp/emrrecbtn/hardcd/hardcdnm") <= getCurrentDate() ){
	    	grp_btnsetting.attribute("visibility") = "visible";
	    }else{
	    	grp_btnsetting.attribute("visibility") = "hidden";
	    }
	    */
	    
	    /*
	    	2009.10.12 안치원 TASK-36554
	    	통증관리 버튼추가
	    */

		//KNUH_20110209, 주희경, 진료속도 개선 위해 로그인 시 조회 해놓은 데이터 카피
		fGetHardCDList("N", "132", 0, "/root/main/hardcdlist");
		//KNUH, 응급실에서 소아청소년과 의사가 처방 저장 시 인증서가 최초 1회만 뜨도록 (2011.03.21 JJE)
		fGetHardCDList("N", "282", 0, "/root/main/hardcdlist_282");
		
    	var cnt = getNodesetCnt(model, "/root/main/hardcdlist/hardcd[hardcd='"+getUserInfo("dutplcecd")+"']");
//alert("132 new cnt:"+cnt+ ":   getUserInfo(dutplcecd):"+getUserInfo("dutplcecd"));
		if (cnt > 0) {
			var tmp_left = btn_tong.attribute("left");
			btn_tong.attribute("left") = btn_nurrec.attribute("left");
			btn_nurrec.attribute("left") = tmp_left;
			btn_tong.attribute("visibility") = "visible";
		}

		////////////////
		/* KNUH_20110208, 주희경 주석처리
	    model.makeValue("/root/send/reqhardcd/hardcdno", "132");
	    model.makeValue("/root/send/reqhardcd/dutplcecd", getUserInfo("dutplcecd"));
	    if (submit("TRMRF03104")) {
	    	var cnt = getNodesetCnt(model, "/root/main/hardcdlist[trgtcd='"+getUserInfo("dutplcecd")+"']");
//	    	alert("/root/main/hardcdlist[trgtcd='"+getUserInfo("dutplcecd")+"']   " + cnt);
	    	if (cnt > 0) {
	    		var tmp_left = btn_tong.attribute("left");
	    		btn_tong.attribute("left") = btn_nurrec.attribute("left");
	    		btn_nurrec.attribute("left") = tmp_left;
	    		btn_tong.attribute("visibility") = "visible";
	    	}
	    }*///////////////////

	    
	    //2010.04.13 dhkim - 조회기간 설정 초기화
	    fReadyFormInitData();
	    
			// KNUH_20110104_최원돈_치과일 경우 치과기록이 Default Setting
			if (btn_tab_denti.visible)
			{
				btn_tab_denti.selected = true;
				btn_tab_denti.dispatch("onclick");
			}
	    
	} catch (e) {
		//2009.11.18  안치원 - 에러발생시 기록메인을 disable 한다.
//		sendSystemMail_MMR071(gMMR_INVALID_PATINFO_MMR071, null);
//		disabledRecMain_MMR001(true, fGetErrMsg(1,""), null);
	}
//20111031 대장암관련
/* 
	model.makeNode("/root/main/colorectal/count");
	model.makeValue("/root/send/colorectal/pid", model.getValue("/root/main/paminfo/pid"));
	model.makeValue("/root/send/colorectal/recflag", "4");
	
	submit("TRMMR08102");
	
	if(model.getValue("/root/main/colorectal/count")>=1){
		btn_colorectal.disabled="true";	
	}else{
		btn_colorectal.disabled="false";		
	}
	model.removeNode("/root/main/colorectal/count");
	model.removeNode("/root/send/colorectal");
*/	
//20111031
//20111115 간암관련
	model.makeNode("/root/main/liver/count");
	model.makeValue("/root/send/liver/pid", model.getValue("/root/main/paminfo/pid"));
	model.makeValue("/root/send/liver/recflag", "3");
	
	submit("TRMMR08102");
	
	if(model.getValue("/root/main/liver/count")>=1){
		btn_liver.disabled="true";	
	}else{
		btn_liver.disabled="false";		
	}
	model.removeNode("/root/main/liver/count");
	model.removeNode("/root/send/liver");
//20111115
}

/**
 * @desc   : 기록메인 로드
 * @id     : 
 * @event  : DOMActivate
 * @return : void
 * @authur : 박종훈
 */
function fLoadRecMain()
{
    var fstload = model.getValue("/root/init/fstload");
    if (fstload == "Y")
    {
        model.setValue("/root/init/fstload", "N");
        fReadyForm();
    }
    else
    {
        fInitRecPamInfo();
    }
    
    grp_tle.attribute("visibility") = "visible";
    grp_base.attribute("visibility") = "visible";
    btn_blind.attribute("visibility") = "hidden";
}

/**
 * @desc   : 버튼 활성화의 경우 처리
 * @id     : 
 * @event  : DOMActivate
 * @return : void
 * @authur : 박종훈
 */
function fBtnInitReady()
{
    btn_blind.attribute("visibility") = "visible";
    grp_tle.attribute("visibility") = "hidden";
    grp_base.attribute("visibility") = "hidden";
}

/**
 * @desc   : 메인화면 로딩
 * @id     : 
 * @event  : onclick
 * @return : void
 * @authur : 박종훈
 */
function fReadyForm()
{
    ivw_loader.attribute("top") = 30;
    ivw_loader.attribute("height") = 740;
	
    ivw_loader.src = "emr_medirecxp::SSMMR01100_서식로더.xfdl";
    //외래 재진인경우만 Load
    //ivw_patsmm.src = "../../../emr/medirecweb/xrw/SSMMR04800_진료요약기록.xrw";

    ivw_loader.window.javascript.gMediRecMain = true;
    ivw_loader.window.javascript.gIsCashedFormDegn = true;
    //ivw_patsmm.window.javascript.fResizeGrup("1", parseInt(ivw_patsmm.attribute("height")), parseInt(ivw_patsmm.attribute("width")));
    //ivw_loader.window.javascript.fInitPage(true, true, parseInt(ivw_loader.attribute("height")), null, true);     //출력버튼
    ivw_loader.window.javascript.fInitPage(true, true, parseInt(ivw_loader.attribute("height")));
    ivw_loader.window.javascript.afterSaveExeFuncNm = "fRefMediRecList";
    
		// ivew 설정을 위해서 치과 하드코드를 가져온다. (치과 외래진료일 경우 치과기록 사용 : 최원돈 20101222 경북대)
    fGethardcdArrayList(new Array(
                                  "dentdept|242"
                                  ),                                  
                        new Array(
                                  "/root/init"
                                  )
                        );      

    grd_medireclist.mergecol(grd_medireclist.colref("formrecdd")) = true;

    fReadyFormInitData();

	//2010.04.12 dhkim 조회기간 디폴트 환경설정값으로 변경(fReadyFormInitData안)
    //model.setValue("/root/init/reqmedireclist/diffdt", 12); //검색 디폴트 12개월
    
    fAddDateReq("today");
    
    var defltdeptcd = getUserInfo("dutplcecd");
    
    if (defltdeptcd == "2280000000")
    {
        defltdeptcd = "ALL";
    }
    model.setValue("/root/send/reqmedireclist/formrecdeptcd", defltdeptcd);
	model.setValue("/root/send/reqmedireclist/chosflag", "A");
    
    model.setValue("/root/hidden/openform/degnid", getUserInfo("usernm"));
    model.refresh();
    
    fInitRecPamInfo();
    
    /*20090309 사용하지 않는 화면(jonghun)
	//진료기록메인 호출하는 Popup Close (snoweye, 2008.08.13)
	var scrnwnd = getOpenWindow("SPMMB08500");
	if(scrnwnd != null){
		scrnwnd.javascript.fEMRClose();
	}
    */
    /*var nodeList = model.instances(0).selectNodes("/root/main/mainlist/medireclist");
    
    if (nodeList.length > 0)
    {
        fShowMediRecCnt(grd_medireclist.valueMatrix(1, grd_medireclist.colref("formrecseq")));
    }*/
}

/**
 * @desc   : 기록수정
 * @id     : 
 * @event  : onclick
 * @return : void
 * @authur : 박종훈
 */
function fModifyForm() {
    if (swt_left.selectedIndex == 0){
        var cnfmyn      = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colRef("cnfmyn"));
        var formcd      = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colRef("formcd"));
        var formrecseq  = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colRef("formrecseq"));
        var type        = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colRef("type"));
        
		if (grd_medireclist.row > 0) {
		    if (type == "A") {
		    	messageBox("진료기록 화면에서 수정할 수 없는 서식입니다", "I999");
		    	return;
		    }
		    if (cnfmyn == "Y") {
			    fOpenRecForm(formcd, formrecseq);
			} else {
			    messageBox("OCS에서 작성한 기록은 수정할 수 없습니다.", "I008");
			    return;
			}
		}
	} else if (swt_left.selectedIndex == 1) {
	    var formcd      = getParameter("SSMMR01200_Param_formcd");
		var formrecseq  = getParameter("SSMMR01200_Param_recseq");
		var cnfmyn      = getParameter("SSMMR01200_Param_cnfmyn");
		
		clearParameter("SSMMR01200_Param_formcd");
		clearParameter("SSMMR01200_Param_recseq");
		clearParameter("SSMMR01200_Param_cnfmyn");
		
		if(formrecseq != "") {
		    if (cnfmyn == "Y") {
			    fOpenRecForm(formcd, formrecseq);
			} else {
			    messageBox("OCS에서 작성한 기록은 수정할 수 없습니다.", "I008");
			    return;
			}
		}
	}
}

/**
 * @desc   : 인증데이터 생성
 * @id     : 
 * @event  : onclick
 * @return : void
 * @authur : 박종훈
 */
function fMakeSignData(signrecinfo, chosflag, sUserID)
{
    var certcnfmyn = getParameter("SSMMR01100_cert_Cnfm");     //미비기록의 경우 인증서를 한번만 띄워주기 위한 param(2008-12-29 : 박종훈 추가)
    clearParameter("SSMMR01100_cert_Cnfm");
    
    //KNUH, 응급실에서 소아청소년과 의사가 처방 저장 시 인증서가 최초 1회만 뜨도록 (2011.03.21 JJE)
    var userDeptCd = getUserInfo("dutplcecd");
    if( chosflag == "E" && instance1.selectSingleNode("/root/main/hardcdlist_282/hardcd[hardcd='"+ userDeptCd +"']") != null ){
    	certcnfmyn = "Y";
    }

    // 입원 또는 응급일 경우                    // 20111201 knuh 최원돈
    // 기록/처방 직전 인증저장이 정해진 시간(분 단위, 하드코드 401) 이내이면 인증서를 띄우지 않음(1/1)
    // SMMMO00100.js, MMR01300.js, MMR00100.js, SPMRF05200.js
    // 띄우지 않는 로직
    var ls_emrinptsavetime = fGetHardCDList("Y", 401, 3);
    var ll_emrinptsavetime = ls_emrinptsavetime == "" ? 0 : parseInt(ls_emrinptsavetime) * -1; 
    if (   (   chosflag == "I"
            || chosflag == "E")
        && ll_emrinptsavetime < 0
        && getGlobalVariable("emrinptsavetime") >= getCurrentDateTime().toDate("YYYYMMDD hhmmss").getAddDate(ll_emrinptsavetime, "m").getDateFormat("YYYYMMDD hhmmss"))
    {
        certcnfmyn = "Y";
    }
    
    if (chosflag == "O" || certcnfmyn == "Y")
    {
    		// KNUH_20100820_박성호_start 인증서 안나오게 수정
        var signedrecinfo = zesfSignData(signrecinfo, sUserID, false);       //외래환자일경우 한번만 인증서 띄움
        //var signedrecinfo = "-";       //외래환자일경우 한번만 인증서 띄움
        // KNUH_20100820_박성호_end 
    }
    else
    {
    		// KNUH_20100820_박성호_start 인증서 안나오게 수정 
        var signedrecinfo = zesfSignData(signrecinfo, sUserID, true);
        //var signedrecinfo = "-";       //외래환자일경우 한번만 인증서 띄움
        // KNUH_20100820_박성호_end 
    }
    
    return signedrecinfo
}

/* @group	: 폴더 존재여부 파악
 * @ver		: 2007.01.06
 * @by		: 박종훈
 * @-----------------------------------
 * @type		: function
 * @access	: public
 * @desc		:
*/
function fExistFolder(foldernm)
{
    var fso, folder, s;
    fso = new ActiveXObject("Scripting.FileSystemObject");

    try
    {
        folder = fso.GetFolder(foldernm);
        s = folder.DateCreated;

        if (s != "")
        {
            fDelFolder(foldernm);
            fMakeFolder(foldernm);
        }
    }
    catch (e)
    {
        fMakeFolder(foldernm);
    }
}

/* @group	: 폴더 생성
 * @ver		: 2007.01.06
 * @by		: 박종훈
 * @-----------------------------------
 * @type		: function
 * @access	: public
 * @desc		:
*/
function fMakeFolder(foldernm)
{
    var fso = new ActiveXObject("Scripting.FileSystemObject");
    var a = fso.CreateFolder(foldernm);
}

/* @group	: 폴더 삭제
 * @ver		: 2007.01.06
 * @by		: 박종훈
 * @-----------------------------------
 * @type		: function
 * @access	: public
 * @desc		:
*/
function fDelFolder(foldernm)
{
    var fso;
    fso = new ActiveXObject("Scripting.FileSystemObject");
    fso.DeleteFolder(foldernm);
}

/* @group	: 디자인보기버튼 클릭
 * @ver		: 2007.01.06
 * @by		: 박종훈
 * @-----------------------------------
 * @type		: function
 * @access	: public
 * @desc		:
*/
function fBtnViewDegn()
{
    
    model.toggle("case5");
}

/*
 * 기록메인을 disable 한다.
 */
function disabledRecMain_MMR001(disable, errMsg, lockMode) {
	/*btn_err.visible = disable;
	ivw_patsmm.visible = !disable;
	ivw_loader.visible = !disable;
	
	if (lockMode == 2) {
		errMsg += "\n\n☞ 클릭하면 해제됩니다."
	}
	
	if (disable) {
		model.toggle("case2");
		btn_err.text = isNull(errMsg) ? "ERROR - 기록창이 제한됩니다." : errMsg;
	} else {
		btn_err.text = "ERROR - 기록창이 제한됩니다.";
	}
	
	if (lockMode == null || lockMode > 2) {
		lockMode = 1;
	}
	
	if (lockMode == 1) {
		btn_err.disabled = true;
	} else {
		btn_err.disabled = false;
	}
	
//	alert("visible::"+btn_err.visible);
	btn_err.refresh();
	*/
}

/*
 * 진료대상자리스트의 환자 수진키와 비교한다.
 */
function validPamInfo(pPid, pOrddd, pCretno, lockMode)
{
	return true;
	/*var flag = false;
    var patListViewer = getOpenWindow("SMMMO04100");
    if (patListViewer == null) {
    	flag = fCheckPamInfo_MMR001(getPatientInfo("pid"), null, null, model.getValue("/root/main/paminfo/pid"), null, null, lockMode);
    } else {
    	flag = fCheckPamInfo_MMR001(patListViewer.window.javascript.getParameter("SMMMR00100_PATINFO_PID")
			    					,patListViewer.window.javascript.getParameter("SMMMR00100_PATINFO_ORDDD")
			    					,patListViewer.window.javascript.getParameter("SMMMR00100_PATINFO_CRETNO")
			    					,pPid
			    					,pOrddd
			    					,pCretno, lockMode);
    }
    
    return flag;
    */
}

function fGetErrMsg(flag, addMsg)
{
	if (flag == null) {
		flag = 0;
	}
	if (addMsg == null) {
		addMsg = "";
	}
	
	var errMsg = "";
	if (flag == 0) {
		errMsg = "ERROR - 기록창이 제한됩니다.";
		
	} else if (flag == 1) {
		errMsg = "["+gMMR_INVALID_PATINFO_MMR071+"]\n\n";
		errMsg += "진료대상자 정보를 설정하던 중 예기치 못한 에러가 발생했습니다.\n";
		errMsg += "진료대상자를 다시 선택 해 주시기 바랍니다.\n\n";
		errMsg += "같은 현상이 반복된다면 정보지원팀으로 문의 해 주시기 바랍니다.\n";
		
	} 
	
	errMsg += addMsg;
	
	return errMsg;
}

/*
 * 2009.11.18 안치원 - 상단환자정보와 Global정보가 틀리면 기록메인을 disable 한다.
 * 일단, pid 로만 검사한다.
 */
function fCheckPamInfo_MMR001(pPid, pOrddd, pCretno, gPid, gOrddd, gCretno, lockMode) 
{
	return true;
	
/*	var params = pPid +",";
	params += pOrddd +",";
	params += pCretno +".\n";
	params += gPid +",";
	params += gOrddd +",";
	params += gCretno +".";
	
	if (isNull(pPid) || isNull(pPid)) {
		disabledRecMain_MMR001(true, fGetErrMsg(1, params), lockMode);
		return false;
	}
	
	var flag = true;
	
	if (pPid != gPid) {
		flag = false;
	} //else if (pOrddd != gOrddd) {
//		flag = false;
//	} else if (pCretno != gCretno) {
//		flag = false;
//	}
	
//	alert("falg::"+flag);
	if (flag) {
		disabledRecMain_MMR001(false, null, lockMode);
	} else {
		disabledRecMain_MMR001(true, fGetErrMsg(1, params), lockMode);
		
		sendSystemMail_MMR071(gMMR_INVALID_PATINFO_MMR071, null);
	}
	
	return flag;
*/	
}

function fSetUnLockScreen()
{
	disabledRecMain_MMR001(false, null, null);
	btn_err.visible = false;
}

/* @group	: 기록목록에서 우클릭 메뉴에서 [같은 서식모아보기] 클릭 시 
 * @ver		: 2010.01.04
 * @by		: 주희경
 * @-----------------------------------
 * @type		: function
 * @access	: public
 * @desc		: 기록목록에서 우클릭 후 같은 서식모아보기 클릭 시 같은 서식만 모아 기록내용 조회 하도록 함수 추가
*/
function fGetMediRecCnt()
{
	var srcformcd = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colref("srcformcd"));
	var type = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colref("type"));
	
	if ( type == "A") {
		messageBox("같은서식 모아보기 기능은 제공되지 않습니다","I999");
		return;
	}
	
	//formcd가 동일한 서식 그룹의 formrecseq 추출
	var seqlist = instance1.selectNodes("/root/main/mainlist/medireclist[srcformcd='"+srcformcd+"']/formrecseq");
	
	var arrFormrecseq = new Array();
	
	for (i=0; i<seqlist.length; i++)
	{
		arrFormrecseq[i] = seqlist.item(i).value;
	}

	fShowMediRecCnt(arrFormrecseq[0], arrFormrecseq);
	
/*
	var formnminfo = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colref("formnminfo"));
	formnminfo = formnminfo.split("-");	//서식명 추출 (예, 입퇴원요약기록-공통) => 입퇴원요약기록 
	var findtext = formnminfo[0];
				
	var findrowInfo = "";
	
	//리스트에서 서식명이 같은 서식 추출	 (그리드리스트의 서식명 검색)		
	for(i=1; i<grd_medireclist.rows; i++)
	{
		var row = grd_medireclist.findRow( findtext, i, 2, false, false);	//서식명이 동일한 서식 찾기
		
		if ( row > i )
			i = row;
		if ( row != -1 )
		{
			var formrecseq = grd_medireclist.valueMatrix(row, grd_medireclist.colref("formrecseq"));
			findrowInfo = findrowInfo + formrecseq + "||";
		}
	}
	//////////////
	
	var arrFormrecseq = findrowInfo.split("||");
	*/
}

/* @group	: 기록목록에서 우클릭 메뉴에서 [선택목록조회] 클릭 시 
 * @ver		: 2014.05.30
 * @by		: 이윤주
 * @-----------------------------------
 * @type		: function
 * @access	: public
 * @desc		: 기록목록에서 우클릭 후 같은 선택목록조회 클릭 시 기록내용 조회 하도록 함수 추가
*/
function fGetSelectedRecCnt()
{
	var rows = grd_medireclist.rows;
	
	var arrFormrecseq = new Array();
	var j = 0;
	
	for (i=1; i <= rows; i++)
	{
		if (grd_medireclist.isSelected(i)) {
			arrFormrecseq[j] = model.getValue("/root/main/mainlist/medireclist['"+i+"']/formrecseq");
			j++;
		}
	}

	fShowMediRecCnt(arrFormrecseq);
	

}



/* @group	: 간호정보조사지 링크
 * @ver		: 2010.04.19
 * @by		: dhkim
 * @-----------------------------------
 * @type	: function
 * @access	: public
 * @desc	: 간호정보조사지 링크
*/
function fOpenNursCareRecInfo(){
	
	var path  = "/root/main/enrcarecomrecinfo";
	var param = "pid▦orddd▦cretno▦ordtype▩";
	
	var pid = model.getValue("/root/main/paminfo/pid");
	var orddd = model.getValue("/root/main/paminfo/orddd");
	var indd = model.getValue("/root/main/paminfo/indd");
	var cretno = model.getValue("/root/main/paminfo/cretno");
	var ordtype = model.getValue("/root/main/paminfo/ioflag");
	
	if(ordtype == "I" || ordtype == "E" || ordtype == "D"){
		orddd = indd;
	}
	
	
	//param setting
	param += pid + "▦" + orddd + "▦" + cretno + "▦" + ordtype + "▩";
	
	//instance node생성
	model.removenode(path);
	model.makeNode(path);
	model.refresh();
	
	//CareCom.js 호출
	fEnrCareComRecInfo_SPMNZ002(param, path);
	
	
}

/**
 * @desc : 열려있는 화면을 닫아준다.
 * @ver  : 2010.04.26 dhkim  
 *
 */
 function fCloseNursrecPop(){
 	
	
	//2010.04.26 dhkim - 간호정보조사 팝업을 열기 전에 기존에 열려있던 창을 모두 닫는다.
	/*
	 * 예)
	 * <root>
	 *    <hidden>
	 *        <opennurscarereclist>화면AID;화면BID;....</opennurscarereclist>
	 *    </hidden>
	 * </root>
	 */
	var opennurscarereclist = model.getValue("/root/hidden/opennurscarereclist");
	if(opennurscarereclist.length > 0){
		var opennurscarerecArr = opennurscarereclist.split(";");
		var wndobj;
		for(var i = 0 ; i < opennurscarerecArr.length-1 ; i++){
			wndobj = getOpenWindow(opennurscarerecArr[i]);
			if(wndobj != null){
				wndobj.javascript.window.close();//기존에 열려있던 창닫기
			}
		}
		
		//인스턴스 초기화
		model.removenode("/root/hidden/opennurscarereclist");
	}
	
 }


/**
 * @desc : 기관코드조회(간호공통테이블에서조회)
 * @ver  : 2010.04.26 dhkim 추가
 */
function fGetNursHardCdInfo_MMR00100(pCode, pDate){

	if ( pCode = "'077'" )	//KNUH_20110211, 주희경, 진료속도개선, '077'일 경우에만 로그인 시 조회해놓은 데이터를 copy
	{
		var targetNode = "/root/code_mmr00100/codeinfo";
		model.removeNodeset("/root/code_mmr00100");
		model.makeNode(targetNode);	

		var viewerObj = getViewer("sysMessage");
		var srcNodes = viewerObj.window.instance1.selectNodes(gvOrderBasicInfoPath + "/codelist");
		var targetNodes = instance1.selectSingleNode(targetNode);
		
		if ( srcNodes.length > 0 )
		{
			for(i=0; i<srcNodes.length; i++)
			{
				targetNodes.appendChild(srcNodes.item(i));
			}
		}
	}
	else
	{
		model.removeNodeset("/root/send_mmr00100");
		model.removeNodeset("/root/code_mmr00100");
		model.makeNode("/root/code_mmr00100");
		model.makeValue("/root/send_mmr00100/cdgrupid", pCode);  // 조회할 CdGrupID 코드정보
		model.makeValue("/root/send_mmr00100/srchdd"  , pDate);  // 조회기준일자
		submit("TRMMR00902",false);
	}

	
}


/**
 * @desc : 서울성모 의료정보팀용 메뉴 (JCI인증대비 인증저장정보조회)
 * @ver  : 2010.07.08 dhkim 추가
 * @param: formrecseq 기록순번
           rechistseq 이력순번
           signno 인증번호
           formrecdd  기록일자
           formrechm  기록시간
           formnminfo 서식명
           formrecdeptnm 작성과
           formrecusernm 작성자
           fstrgstdt 최초작성일시
 */
function fGetJCICertInfo(){
	
	var curRow = grd_medireclist.row;
	var medirecGrdPath = grd_medireclist.attribute("nodeset");
	var scrnid ="SPMRJ08000";
	
	var formrecseq    = model.getValue(medirecGrdPath + "[" + curRow + "]/formrecseq");
	var rechistseq    = model.getValue(medirecGrdPath + "[" + curRow + "]/lastrechistseq");
	var signno        = model.getValue(medirecGrdPath + "[" + curRow + "]/espiseq");
	var formrecdd     = model.getValue(medirecGrdPath + "[" + curRow + "]/formrecdd");
	var formrechm     = model.getValue(medirecGrdPath + "[" + curRow + "]/formrechm");
	var formnminfo    = model.getValue(medirecGrdPath + "[" + curRow + "]/formnminfo");
	var formrecdeptnm = model.getValue(medirecGrdPath + "[" + curRow + "]/formrecdeptnm");
	var formrecusernm = model.getValue(medirecGrdPath + "[" + curRow + "]/formrecusernm");
	var fstrgstdt     = model.getValue(medirecGrdPath + "[" + curRow + "]/fstrgstdt");
	
	setParameter(scrnid+"_formrecseq",    formrecseq);   //기록순번
	setParameter(scrnid+"_rechistseq",    rechistseq);   //이력순번
	setParameter(scrnid+"_signno",        signno);       //인증번호
	setParameter(scrnid+"_formrecdd",     formrecdd);    //기록일자
	setParameter(scrnid+"_formrechm",     formrechm);    //기록시간
	setParameter(scrnid+"_formnminfo",    formnminfo);   //서식명
	setParameter(scrnid+"_formrecdeptnm", formrecdeptnm);//작성과
	setParameter(scrnid+"_formrecusernm", formrecusernm);//작성자
	setParameter(scrnid+"_fstrgstdt",     fstrgstdt);    //최초작성일시
	
	modal(scrnid, 1, 10, 10, scrnid);
	
	//alert(formrecseq + ',' +rechistseq  + ',' + signno  + ',' + formrecdd  + ',' + formrechm + ',' + formnminfo  + ',' + formrecdeptnm  + ',' + formrecusernm  + ',' + fstrgstdt);
	
	
}

/**
 * @---------------------------------------------------
 * @creat  : 20101222
 * @author : 최원돈
 * @desc   : ivew Visible 설정 (치과 외래진료일 경우 치과기록 사용 : 경북대)
 * @---------------------------------------------------
 */
function fSetIviewVisible(pb_value)
{
	 model.addlog("fSetIviewVisible_start");
	if (   btn_tab_denti.visible
	    && pb_value)
	{
		ivw_denti.visible = true;
		ivw_dentifmla.visible = true;
		ivw_loader.visible = false;
		swt_left.visible = false;
		btn_formrecupdt.visible  = false;
		model.toggle("case7");
		
		if (ivw_denti.src == "")
		{
			ivw_denti.src="../../../emr/dentirecweb/xrw/SMMRE00100_치과기록.xrw";
			ivw_dentifmla.src="../../../emr/dentirecweb/xrw/SMMRE00700_치과기록치식.xrw";
			ivw_dentifmla.window.javascript.fRecMainReady();
		}
	}
	else
	{
		ivw_denti.visible = false;
		ivw_dentifmla.visible = false;
		ivw_loader.visible = true;
		swt_left.visible = true;
		btn_formrecupdt.visible  = true;
	}
	
	 model.addlog("fSetIviewVisible_end");
}

/**
 * @---------------------------------------------------
 * @creat  : 20101222
 * @authur : 최원돈
 * @desc   : ivew 화면 Default 설정(치과기록 닫기) : 경북대
 * @---------------------------------------------------
 */
function fDefaultBtnClick()
{
		if (   btn_tab_denti.visible
		    && ivw_denti.src != ""
		    && btn_tab_denti.selected)
		{
			button66.dispatch("onclick");
		}
}

/**
 *
 * 대장암 또는 간암 등록
 *
 *
 */
 function fSaveColorectalOrLiver(btn_nm){
 
		if(btn_nm=="btn_liver"){ //간암
 			model.makeValue("/root/send/liver/pid",model.getValue("/root/main/paminfo/pid"));
			model.makeValue("/root/send/liver/orddd",model.getValue("/root/main/paminfo/orddd"));
			model.makeValue("/root/send/liver/cretno",model.getValue("/root/main/paminfo/cretno"));
			model.makeValue("/root/send/liver/chosflag",model.getValue("/root/main/paminfo/ioflag"));
			if (model.getValue ("/root/main/paminfo/ioflag") == "O" || model.getValue ("/root/main/paminfo/ioflag") == "S")
	            {
	                model.makeValue("/root/send/liver/orddd", model.getValue ("/root/main/paminfo/orddd")); //수진일자
	            } else {
	            	model.makeValue("/root/send/liver/orddd", model.getValue ("/root/main/paminfo/indd"));  //수진일자
	            }
			model.makeValue("/root/send/liver/recflag", 3); //간암 관리는 3번
			model.makeValue("/root/send/liver/fstrgstrid",getUserInfo("userid"));
			model.makeValue("/root/send/liver/lastupdtrid",getUserInfo("userid"));
			
			if(model.getValue("/root/send/liver/pid")!=""){
				submit("TXMMO08101");
				alert("등록 되었습니다!");
				btn_liver.disabled="true";
			}else{
				alert("환자를 먼저 선택해주세요!");
			};
 		}
}


function fGrdSortFlag(){
	var cnt = getNodesetCount("/root/main/mainlist/medireclist");
	
	var fromdt = model.getValue("/root/main/mainlist/medireclist[1]/formrecdt"); 
	var todt = model.getValue("/root/main/mainlist/medireclist[" + cnt + "]/formrecdt");
	
	if( fromdt < todt ){
		sortflag = "asc";
	}else{
		sortflag = "desc";
	}

	model.makeValue("/root/temp/recformsort",  sortflag );
	model.refresh();
}

//2013.11.28 김영기 수진일자와 기록일자가 다를경우 색상변화
function fSetColorByNotSameOrdddandRecdd(datagrid){
	var cnt = getNodesetCount("/root/main/mainlist/medireclist");
	
	var orddd = "";
	var recdd = "";
	var srcformcd = "";
	
	for(var i=1; i<=cnt; i++){
		orddd = model.getValue("/root/main/mainlist/medireclist["+i+"]/orddd"); 
		recdd = model.getValue("/root/main/mainlist/medireclist["+i+"]/formrecdd");
		srcformcd = model.getValue("/root/main/mainlist/medireclist["+i+"]/srcformcd");
		
		datagrid.rowstyle( i , "data" , "background-color" ) = "#FFFFFF";	
		// 수진일자 와 기록일자가 다를경우 그리고 외래초진서식(0000000001) 및 외래재진서식(0000000002) 일경우
		if(orddd != recdd && (srcformcd == "0000000002" || srcformcd == "0000000001")){
		  datagrid.rowstyle( i , "data" , "background-color" ) = "#99CCFF";	
		}
				
	}
	
}

function fOpenSpecialCharacterViewer(){
	open("SPMMR09100");
}


//통합기록조회 간단모듈 호출(20140422 이윤주)
function fViewespi() {
	
	var oldflag = "E";
  var signno = model.getValue("/root/main/mainlist/medireclist["+grd_medireclist.row+"]/espiseq");
  var formcd = model.getValue("/root/main/mainlist/medireclist["+grd_medireclist.row+"]/formcd");
  
  setParameter("SPMRI02400_prtrecinfo", oldflag + "▦" + signno + "▦" + formcd + "▩");
  setParameter("SPMRI02400_prtyn", "N");
  
  modal("SPMRI02400");
 
	
}]]></Script>