YNU_JEUS/app_home/himed/webapps/emr/dschanalyweb/js/SMMRD00100.js

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

    진료 - 암환자 관리 ( SMMRD00100_암환자관리.xrw - JScript )

      - Version :
          1)  : Ver.1.00.01


  - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩
**/
/**
 * @desc   : 화면 초기화
 * @param  : Ref
           : RsltRef
 * @return : void
 * @authur : 2007.12.10 나종천 ,수정->이창록,2009-01-13 이창록  소스 튜닝
 * @---------------------------------------------------
 */
var para_pid = "";
var para_dschdd="";

var cncryn = "N";

function fInitialize(){
    //var Msg2= messageBox("동일한 암등록번호가 존재합니다. 수정","S003","신규로 저장");
    //alert(Msg2);
    
	model.addLog("===================시작");
	
	// KNUH_20101207_박성호_start_의무기록 부서코드 가져오기
	mmbfGetHardCodeInfo("/root/send/reqdata", "/root/temp/dutplcecd", 5502);	
	// KNUH_20101207_박성호_end
		
    if(checkOpener()){
        para_pid = opener.javascript.getParameter("SMMRD00100_pid");
        para_dschdd = opener.javascript.getParameter("SMMRD00100_dschdd");
        btn_cncrrgst.dispatch("onclick");
        model.setValue("/root/main/pathumtrainfo/cncrpatinfo/pid", para_pid);
        chk_cretchknum.value = "false";
    } else {
        btn_cncrpatsrch.dispatch("onclick");
    }
    var fromdd = ((getCurrentDate()).toDate()).getAddDate(-1, "M");
    var rgstfromdd = ((getCurrentDate()).toDate()).getAddDate(-6, "D");
        model.makeValue("/root/main/cncrpatref/fromdd"      , fromdd.getDateFormat());
        model.makeValue("/root/main/cncrpatref/todd"        , getCurrentDate());
        model.makeValue("/root/main/srchcncrpat/fromdd"     , rgstfromdd.getDateFormat());
        model.makeValue("/root/main/srchcncrpat/todd"       , getCurrentDate());
        model.addLog(getCurrentTime());
        
        zsdfGetInOutOrdDeptList(getUserInfo("dutplceinstcd"), "/root/main/common/com", "depthngnm", "asc");//전체 진료과 조회
        copyNodeset("/root/hidden/cncrpatref/orddeptinfo/orddeptlist", "/root/main/common/com/dept", "replace");
        copyNodeset("/root/init/srchcncrrgst/deptinfo", "/root/main/common/com/dept", "replace");
        
        addComboItem("cmb_srchdept", "전체", "-", "above");
        addComboItem("cmb_srchcncrrgst", "전체", "-", "above");
        model.setValue("/root/main/srchcncrpat/deptinfo", "-");
        //fChngSrchCond("/root/main/srchcncrpat/deptinfo", "/root/init/srchcncrrgst/drinfo");
        addComboItem("cmb_drinfo", "전체", "-", "above");
        model.setValue("/root/main/srchcncrpat/drinfo", "-");
        //fGetDrList("/root/send/reqdata", "/root/main/common/drlist", "-", "total");
        //copyNodeset("/root/hidden/cncrpatref/orddrinfo/drlist", "/root/main/common/drlist");
        
        // 공통코드 불러오기
        fDetCncrRgst();
        
    if(para_pid != ""){
        //btn_rgstpid.dispatch("DOMActivate");
        fGetPatinfo("param");
        /*if(para_dschdd !=""){
            if(model.getValue("/root/main/pathumtrainfo/cncrpatinfo/orddd")!=""){
                 cmb_outorddd.refresh();
                 model.setValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd",para_dschdd);
                 //model.refresh();
                 cmb_outorddd.dispatch("xforms-value-changed");
            }else if(model.getValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd")!=""){
                cmb_dschdd.refresh();
                model.setValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd", para_dschdd);
                //model.refresh();
                cmb_dschdd.dispatch("xforms-value-changed");
            }
        }*/
        var sCncrNo  = model.getValue("/root/main/humaninfo/cncrhist/histlist["+1+"]/cncr_histno");
        if(sCncrNo==""){
	        model.setValue("/root/main/cncrpatrgst/regstatus/flag","1");
	        rdo_flag.refresh();
	        rdo_flag.dispatch("xforms-value-changed");
        }
    }
    
    //================================================
    // 암센터, 의료정보 체크(20090213)
    // cncryn : 'Y'는 암센터, 'N'는 의료정보를 의미
    var instcd = getUserInfo("dutplceinstcd");
    var dutplcecd = getUserInfo("dutplcecd");

    if (instcd == "012" && dutplcecd == "6050000000")
    {
        // 암센터 여부
        cncryn = "Y";
    }
    //================================================
    
   model.addLog("===================종료");
}

/**
 * @desc   : 선택된 진료과의 진료의를 조회
 * @param  : Ref     - 진료과   instance xPath
           : RsltRef - 진료의 리스트 instance xPath
           : orddeptcd  - 진료과코드
 * @return : void
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fGetDrList(ref, rsltRef, orddeptcd, queryflag){
   model.makeValue(ref + "/orddeptcd" , orddeptcd);
   model.makeValue(ref + "/queryflag" , queryflag);
   submit("TRMRF02303", true, ref, rsltRef);
}

/**
 * @desc   : 선택된 환자조회 팝업
 * @param  : Ref     - PID, 환자성명 instance xPath
           : RsltRef - 환자기본 정보 instance xPath
           : patinfo
 * @return : void
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fPatSrch(s_val, flag){
    if(flag == "1"){
        model.makeValue("/root/temp/pid", s_val);
    } else if(flag == "2"){
        model.makeValue("/root/temp/hngnm", s_val);
    }
    model.makeValue("/root/temp/srchcond", flag);
    model.makeValue("/root/temp/autoflag","Y");  // 1건인경우 자동으로닫힘

    model.resetInstanceNode("/root/main/patinfo/patinfolist");
    modal("SPPMC02500", 1,10, 10, "SPPMC02500", "/root/temp", "/root/send");
    model.refresh();
}

/**
 * @desc   : 선택된 진료의 조회
 * @param  : Ref     - 진료과코드 instance xPath
           : RsltRef - 진료의 리스트 instance xPath
           : drlist
 * @return : void
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fChngSrchCond(deptref, drref){
   model.removeNodeset("/root/send/reqdata");
   var sDutplceCD = model.getValue(deptref);
   var sdschDD = model.getValue("/root/main/humaninfo/inpatinfo/patlist/dschdd");
   fGetDrList("/root/send/reqdata", "/root/main/common/drlist", sDutplceCD, "total");
   copyNodeset(drref, "/root/main/common/drlist");
   model.refresh();
}

function fSrchCncrRgstPat(){
	if((model.getValue("/root/main/cncrpatref/cncrnofrdd") != "" && model.getValue("/root/main/cncrpatref/cncrnotodd") == "") 
    		|| (model.getValue("/root/main/cncrpatref/cncrnofrdd") == "" && model.getValue("/root/main/cncrpatref/cncrnotodd") != "")){
    	messageBox("암등록번호로 조회시 검색할 시작번호, 종료번호 모두 입력하여야 합니다.","E");
    	return;
    }
	
	model.makeValue("/root/send/cncrrgstpat/ordtype"  ,model.getValue("/root/main/cncrpatref/ioflag"));
    model.makeValue("/root/send/cncrrgstpat/fromdd"   ,model.getValue("/root/main/cncrpatref/fromdd"));
    model.makeValue("/root/send/cncrrgstpat/todd"     ,model.getValue("/root/main/cncrpatref/todd"));
    model.makeValue("/root/send/cncrrgstpat/orddeptcd",model.getValue("/root/main/cncrpatref/orddeptinfo/orddeptlist"));
    model.makeValue("/root/send/cncrrgstpat/orddrid"  ,model.getValue("/root/main/cncrpatref/orddrinfo/drlist"));
    model.makeValue("/root/send/cncrrgstpat/tophcd"   ,model.getValue("/root/main/cncrpatref/tophcd"));
    model.makeValue("/root/send/cncrrgstpat/tophseq"  ,model.getValue("/root/main/cncrpatref/tophseq"));
    model.makeValue("/root/send/cncrrgstpat/morphcd"  ,model.getValue("/root/main/cncrpatref/morphcd"));
    model.makeValue("/root/send/cncrrgstpat/morphseq" ,model.getValue("/root/main/cncrpatref/morphseq"));
    model.makeValue("/root/send/cncrrgstpat/icd10cd"  ,model.getValue("/root/main/cncrpatref/icd10cd"));
    model.makeValue("/root/send/cncrrgstpat/fromage"  ,model.getValue("/root/main/cncrpatref/fromage"));
    model.makeValue("/root/send/cncrrgstpat/toage"    ,model.getValue("/root/main/cncrpatref/toage"));
    model.makeValue("/root/send/cncrrgstpat/sexflag"  ,model.getValue("/root/main/cncrpatref/sexflag"));
    model.makeValue("/root/send/cncrrgstpat/pid"      ,model.getValue("/root/main/cncrpatref/pid"));
    model.makeValue("/root/send/cncrrgstpat/hngnm"    ,model.getValue("/root/main/cncrpatref/pnm"));
    if( input25.value != ""){
    	model.makeValue("/root/send/cncrrgstpat/cncrnofrdd"      ,model.getValue("/root/main/cncrpatref/fromdd").substr(0,4)+model.getValue("/root/main/cncrpatref/cncrnofrdd"));
	}else{
		model.makeValue("/root/send/cncrrgstpat/cncrnofrdd", "");
	}
	if(input25.value != ""){
		model.makeValue("/root/send/cncrrgstpat/cncrnotodd"      ,model.getValue("/root/main/cncrpatref/todd").substr(0,4)+model.getValue("/root/main/cncrpatref/cncrnotodd"));
	}else{
		model.makeValue("/root/send/cncrrgstpat/cncrnotodd", "");
	}    
    var prgstno = model.getValue("/root/main/cncrpatref/prgstno");
    if(prgstno != ""){
        model.makeValue("/root/send/cncrrgstpat/rrgstno1", prgstno.substring(0, prgstno.lastIndexOf("-")-1));
        model.makeValue("/root/send/cncrrgstpat/rrgstno2", prgstno.substring(prgstno.lastIndexOf("-")+1, cncrno.length));
    }
    model.makeValue("/root/send/cncrrgstpat/srchopt", model.getValue("/root/main/cncrpatref/srchflag"));
    submit("TRMRD00105");
    model.removeNodeset("/root/send");
}
/**
 * @desc   : 공통코드 불러오기
 * @param  :
 * @return : void
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fDetCncrRgst(){
    //model.removenode("/root/main/common");
    //model.makeNode("/root/main/common");
    // 결혼여부 M0151,직업 M0149,관계 M0072,질병상태 M0172,사망장소 M0173,병기 M0176,내원전 치료방법1 M0177,원격전이부위M0178
    //최종진단방법 M0179,Regimen1,M0179,Regimen2 M0182,분화도 M0183,SeerM0184,ECOG(활동정도)M0320
    //진단병원 Z0007,T M0174,N M0393,M M0175,본원암치료방법(M0394,M0395),전이부위치료방법(M0394), 기타병기구분M0395, 진단경로:M0740, 편측성:M0750
    zbcfGetCodeList(new Array("M0151", "M0149", "M0072", "M0172", "M0173", "M0176", "M0177", "M0179", "M0182", "M0183", "M0184", "M0320",
                              "Z0007", "M0174", "M0175", "M0393", "M0394", "M0395", "M0740", "M0750"),
                    new Array("/root/main/common", "/root/main/common", "/root/main/common", "/root/main/common", "/root/main/common",
                              "/root/main/common", "/root/main/common", "/root/main/common", "/root/main/common", "/root/main/common",
                              "/root/main/common", "/root/main/common", "/root/main/common", "/root/main/common", "/root/main/common",
                              "/root/main/common", "/root/main/common", "/root/main/common", "/root/main/common","/root/main/common"));

    addComboItem("combo2", "선택필요", "99", "above");
	addComboItem("cmb_seer", "해당없음", " ", "above");
	addComboItem("cmb_difrntgrde", "해당없음", " ", "above");
	model.refresh();
}
/**
 * @desc   : 외래및입원환자  조회
 * @param  : 파라미터여부, 입원/외래구분, 조회날짜(외래:진료일자, 입원:퇴원일자)
 * @return : void
 * @authur : 2007. 5. 15 나종천  2008-12-15 수정 이창록->환자 기본정보 팝업 제거
 * @---------------------------------------------------
 */
function fGetPatinfo(sFlag, ordtype, searchdd){
	model.addLog("===================엔터 시작");
	
	// 20090415 추가(연고자정보를 reset)
	model.resetInstanceNode("/root/main/pathumtrainfo/relationinfo");
	
	cap_rgstrnm.attribute("text") = "";
    cap_rgstdt.attribute("text") = "";
	
    var trgXpath = "/root/main/pathumtrainfo/cncrpatinfo";
    //var srcXpath = "/root/main/patinfo/patinfolist";
   	//fReSetNode("A");
    //model.makeValue(trgXpath+"/pid"					, model.getValue(srcXpath+"/pid"));
    //model.makeValue("/root/send/reqdata/pid", model.getValue(srcXpath+"/pid"));
    
	//2008-12-15 수정 이창록
	if(model.getValue("/root/init/checknum/value") == "true"){
		var pid = getCretCheckNo(model.getValue("/root/main/pathumtrainfo/cncrpatinfo/pid"), getUserInfo("dutplceinstcd"));
	}else{
		var pid = model.getValue(trgXpath+"/pid");
	}
	
   	//model.makeValue(srcXpath+"/pid"					,pid);
   	//fReSetNode("A");

   	// 이중번호
   	// 이중번호 체크 관련
   	model.removeNodeset("root/send/cond");
    model.makeValue("/root/send/cond/srchcond", "1");
    model.makeValue("/root/send/cond/pid", pid);

   	model.makeValue("/root/send/reqdata/pid", pid);
   	
   	//================================================
    // 암센터, 의료정보 체크(20090213)
    // cncryn : 'Y'는 암센터, 'N'는 의료정보를 의미
    /*
    var instcd = getUserInfo("dutplceinstcd");
    var dutplcecd = getUserInfo("dutplcecd");

    if (instcd == "012" && dutplcecd == "6050000000")
    {
        // 암센터 여부
        var cncryn = "Y";
    }
    else
    {
        var cncryn = "N";

    }
    */

    model.makeValue("/root/send/reqdata/cncryn", cncryn);
    //================================================
    

   	if(submit("TRPMC02500"))
    {
        if(submit("TRMRD00101",false)){
            // 암환자조회에서 더블클릭시(암센터인 경우)
            if (sFlag == "Y")
            {
                if (ordtype == "I")
                {
                    fPutPatInfo(1, "/root/main/humaninfo/inpatinfo/patlist", ordtype, cncryn, searchdd);
                }
                else
                {
                    fPutPatInfo(1, "/root/main/humaninfo/outpatinfo/patlist", ordtype, cncryn, searchdd);
                }
                
            }
            else
            {
                var inpatNodeList = instance1.selectNodes("/root/main/humaninfo/inpatinfo/patlist");
            	if(inpatNodeList.length > 0){
            	    
          			if(sFlag=="param"){
            	 		fPutPatInfo(1, "/root/main/humaninfo/inpatinfo/patlist", "I","pCncr");//입원환자 조회
            		}else{
            			fPutPatInfo(1, "/root/main/humaninfo/inpatinfo/patlist", "I");//입원환자 조회
            		}
                }else{
                	fPutPatInfo(1, "/root/main/humaninfo/outpatinfo/patlist", "O");//외래환자 조회
                }
            }
        }
    }
    model.removeNodeset("/root/send/reqdata");
    model.addLog("===================엔터 종료");
}
/**
 * @desc   :기본정보 조회및 외래및입원환자  정보조회
 * @param  :
 * @return : void
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fPutPatInfo(iRow, ref, ordtype, pFlag, searchdd){
    var humanInfoPath = "/root/main/pathumtrainfo/cncrpatinfo";
    var patInfoList = ref;

    //var sOrDDD  = model.getValue("/root/main/humaninfo/inpatinfo/patlist/orddd");
    // lrow = cmb_outorddd.selectedIndex + 1;
    // model.getValue("/root/main/humaninfo/outpatinfo/patlist[" + lrow + "]/orddd");
    
	if(pFlag=="pCncr"){
        model.setValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd", para_dschdd);
        model.refresh();
        iRow= cmb_dschdd.selectedIndex + 1;
	}
    else if (pFlag == "Y")  // 암센터인 경우
    {
        if (ordtype == "I")
        {
            model.setValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd", searchdd);
            model.refresh();
            //iRow= cmb_indd.selectedIndex + 1;
            iRow= cmb_dschdd.selectedIndex + 1;
            //alert(searchdd);
            
            
        }
        else
        {
            //alert(searchdd);
            model.setValue("/root/main/pathumtrainfo/cncrpatinfo/code", searchdd);
            model.refresh();
            iRow= cmb_outorddd.selectedIndex + 1;
            model.setValue("/root/main/pathumtrainfo/cncrpatinfo/orddd", model.getValue("/root/main/humaninfo/outpatinfo/patlist[" + iRow + "]/orddd"));
        }
        
    }
    //alert(iRow);
	
    model.makeValue(humanInfoPath+"/pid"        ,model.getValue(patInfoList+"["+ iRow +"]/pid"));
    model.makeValue(humanInfoPath+"/pnm"        ,model.getValue(patInfoList+"["+ iRow +"]/pnm"));
    model.makeValue(humanInfoPath+"/cretno"     ,model.getValue(patInfoList+"["+ iRow +"]/cretno"));
    model.makeValue(humanInfoPath+"/ordtype"    ,model.getValue(patInfoList+"["+ iRow +"]/ordtype"));
    model.makeValue(humanInfoPath+"/rrgstno1"   ,model.getValue(patInfoList+"["+ iRow +"]/rrgstno1"));
    model.makeValue(humanInfoPath+"/rrgstno2"   ,model.getValue(patInfoList+"["+ iRow +"]/rrgstno2"));
    model.makeValue(humanInfoPath+"/epoch"      ,model.getValue(patInfoList+"["+ iRow +"]/epoch"));
    model.makeValue(humanInfoPath+"/age"        ,model.getValue(patInfoList+"["+ iRow +"]/age"));
    model.makeValue(humanInfoPath+"/sex"        ,model.getValue(patInfoList+"["+ iRow +"]/sex"));
    model.makeValue(humanInfoPath+"/maryflag"   ,model.getValue(patInfoList+"["+ iRow +"]/maryflag"));
    model.makeValue(humanInfoPath+"/zipcode1"   ,model.getValue(patInfoList+"["+ iRow +"]/zipcode1"));
    model.makeValue(humanInfoPath+"/zipcode2"   ,model.getValue(patInfoList+"["+ iRow +"]/zipcode2"));
    model.makeValue(humanInfoPath+"/addr"       ,model.getValue(patInfoList+"["+ iRow +"]/addr"));
    model.makeValue(humanInfoPath+"/detaddr"    ,model.getValue(patInfoList+"["+ iRow +"]/detaddr"));
    model.makeValue(humanInfoPath+"/hometel"    ,model.getValue(patInfoList+"["+ iRow +"]/hometel"));
    model.makeValue(humanInfoPath+"/mpphontel"  ,model.getValue(patInfoList+"["+ iRow +"]/mpphontel"));
    model.makeValue(humanInfoPath+"/forgnerflag",model.getValue(patInfoList+"["+ iRow +"]/forgnerflag"));
    model.makeValue(humanInfoPath+"/travoflag"  ,model.getValue(patInfoList+"["+ iRow +"]/travoflag"));
    model.makeValue(humanInfoPath+"/job1"       ,model.getValue(patInfoList+"["+ iRow +"]/job1"));
    model.makeValue(humanInfoPath+"/etcjob"     ,model.getValue(patInfoList+"["+ iRow +"]/etcjob"));

    if(ordtype == "I"){
        model.removeNodeset("/root/main/common/dsch/dschdeptlist");
        model.makeNode("/root/main/common/dsch/dschdeptlist");
        model.removeNodeset("/root/main/common/in/indeptlist");
        model.makeNode("/root/main/common/in/indeptlist");
        var sdschDD = model.getValue(patInfoList+"["+ iRow +"]/dschdd");
        var sInDD   = model.getValue(patInfoList+"["+ iRow +"]/indd");
        var dschorddept =model.getValue(patInfoList+"["+ iRow +"]/dschorddept");
        var inorddept = model.getValue(patInfoList+"["+ iRow +"]/inorddept");
        zsdfGetInOrdDeptList(getUserInfo("dutplceinstcd"), "/root/main/common/dsch/dschdeptlist", "depthngnm", "asc",sdschDD); //입원진료과(퇴원과)
        zsufGetOrdDeptDoctorList("none",getUserInfo("dutplceinstcd"),dschorddept,"/root/hidden/pathumtrainfo/cncrpatinfo/dschorddr","usernm","asc",sdschDD);//퇴원주치의(퇴원과)
        zsdfGetInOrdDeptList(getUserInfo("dutplceinstcd"), "/root/main/common/in/indeptlist", "depthngnm", "asc",sInDD);  //입원진료과(입원과)
        zsufGetOrdDeptDoctorList("none",getUserInfo("dutplceinstcd"),inorddept,"/root/hidden/pathumtrainfo/cncrpatinfo/inorddr","usernm","asc",sInDD);//입원주치의
        model.makeValue(humanInfoPath+"/dschdd"     ,model.getValue(patInfoList+"["+ iRow +"]/dschdd"));
        model.makeValue(humanInfoPath+"/dispdschdd" ,model.getValue(patInfoList+"["+ iRow +"]/dispdschdd"));
        model.makeValue(humanInfoPath+"/dschorddept",model.getValue(patInfoList+"["+ iRow +"]/dschorddept"));
        //var sdschDD = model.getValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd");
        //입원,퇴원과 및 주치의
        //zsdfGetInOrdDeptList(getUserInfo("dutplceinstcd"), "/root/main/common/dsch/dschdeptlist", "depthngnm", "asc",sdschDD); //입원진료과(퇴원과)
        //zsufGetOrdDeptDoctorList("none",getUserInfo("dutplceinstcd"),cmb_dschorddept.value,"/root/hidden/pathumtrainfo/cncrpatinfo/dschorddr","usernm","asc",sdschDD);//퇴원주치의(퇴원과)
        model.makeValue(humanInfoPath+"/dschorddr"  ,model.getValue(patInfoList+"["+ iRow +"]/dschorddr"));
        model.makeValue(humanInfoPath+"/indd"       ,model.getValue(patInfoList+"["+ iRow +"]/indd"));
        model.makeValue(humanInfoPath+"/dispindd"   ,model.getValue(patInfoList+"["+ iRow +"]/dispindd"));
        model.makeValue(humanInfoPath+"/inorddept"  ,model.getValue(patInfoList+"["+ iRow +"]/inorddept"));
        //var sInDD   = model.getValue("/root/main/pathumtrainfo/cncrpatinfo/indd");

        //zsdfGetInOrdDeptList(getUserInfo("dutplceinstcd"), "/root/main/common/in/indeptlist", "depthngnm", "asc",sInDD);  //입원진료과(입원과)
        //zsufGetOrdDeptDoctorList("none",getUserInfo("dutplceinstcd"),cmb_inorddept.value,"/root/hidden/pathumtrainfo/cncrpatinfo/inorddr","usernm","asc",sInDD);//입원주치의
        model.makeValue(humanInfoPath+"/inorddr"    ,model.getValue(patInfoList+"["+ iRow +"]/inorddr"));
        model.makeValue(humanInfoPath+"/indg"       ,model.getValue(patInfoList+"["+ iRow +"]/indg"));
        model.makeValue(humanInfoPath+"/totinhospdayno", model.getValue(patInfoList+"["+ iRow +"]/totinhospdayno"));
        model.makeValue(humanInfoPath+"/orddd", "");
        model.makeValue(humanInfoPath+"/code", "");
        model.makeValue(humanInfoPath+"/outorddept" ,"");
        model.makeValue(humanInfoPath+"/outorddr"   ,"");
        //zsdfGetInOrdDeptList(getUserInfo("dutplceinstcd"), "/root/main/common/dsch/dschdeptlist", "depthngnm", "asc",sdschDD); //입원진료과(퇴원과)
		//zsufGetOrdDeptDoctorList("none",getUserInfo("dutplceinstcd"),cmb_dschorddept.value,"/root/hidden/pathumtrainfo/cncrpatinfo/dschorddr","usernm","asc",sdschDD);//퇴원주치의(퇴원과)
		//zsdfGetInOrdDeptList(getUserInfo("dutplceinstcd"), "/root/main/common/in/indeptlist", "depthngnm", "asc",sInDD);  //입원진료과(입원과)
		//zsufGetOrdDeptDoctorList("none",getUserInfo("dutplceinstcd"),cmb_inorddept.value,"/root/hidden/pathumtrainfo/cncrpatinfo/inorddr","usernm","asc",sInDD);//입원주치의
    } else if(ordtype == "O"){
    	var sOrDDD= model.getValue(patInfoList+"["+ iRow +"]/orddd");
    	var outOrddept =model.getValue(patInfoList+"["+ iRow +"]/outorddept");
        model.removeNodeset("/root/main/common/out/outdeptlist");
        model.makeNode("/root/main/common/out/outdeptlist");
        zsdfGetOutOrdDeptList(getUserInfo("dutplceinstcd"), "/root/main/common/out/outdeptlist", "depthngnm", "asc",sOrDDD);// 외래진료과
        zsufGetOrdDeptDoctorList("none",getUserInfo("dutplceinstcd"),outOrddept,"/root/hidden/pathumtrainfo/cncrpatinfo/outorddr","usernm","asc",sOrDDD);//외래진료의
        model.makeValue(humanInfoPath+"/orddd"      ,model.getValue(patInfoList+"["+ iRow +"]/orddd"));
        model.makeValue(humanInfoPath+"/code"      ,model.getValue(patInfoList+"["+ iRow +"]/orddd") + model.getValue(patInfoList+"["+ iRow +"]/cretno") );
        model.makeValue(humanInfoPath+"/disporddd"  ,model.getValue(patInfoList+"["+ iRow +"]/disporddd"));
        model.makeValue(humanInfoPath+"/outorddept" ,model.getValue(patInfoList+"["+ iRow +"]/outorddept"));
        //var sOrDDD= model.getValue("/root/main/pathumtrainfo/cncrpatinfo/orddd");
         //외래과 및 외래진료의
        //zsdfGetOutOrdDeptList(getUserInfo("dutplceinstcd"), "/root/main/common/out/outdeptlist", "depthngnm", "asc",sOrDDD);// 외래진료과
        //zsufGetOrdDeptDoctorList("none",getUserInfo("dutplceinstcd"),cmb_outorddept.value,"/root/hidden/pathumtrainfo/cncrpatinfo/outorddr","usernm","asc",sOrDDD);//외래진료의
        model.makeValue(humanInfoPath+"/outorddr"   ,model.getValue(patInfoList+"["+ iRow +"]/outorddr"));
        model.makeValue(humanInfoPath+"/dschdd"     ,"");
        model.makeValue(humanInfoPath+"/dschorddept","");
        model.makeValue(humanInfoPath+"/dschorddr"  ,"");
        model.makeValue(humanInfoPath+"/indd"       ,"");
        model.makeValue(humanInfoPath+"/inorddept"  ,"");
        model.makeValue(humanInfoPath+"/inorddr"    ,"");
        model.makeValue(humanInfoPath+"/indg"       ,"");
        model.makeValue(humanInfoPath+"/totinhospdayno", "");
        
        //alert(ordtype);
    }

	fReSetNode("P");
    model.refresh();
}
/**
 * @desc   : 암등록환자상세 조회
 * @param  :
 * @return : void
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fDisplay(iRow){
    var trgXpath = "/root/main/cncrpatrgst";
    var srcXpath = "/root/main/humaninfo/cncrhist/histlist";
    var ref = srcXpath;
    var ordtype = model.getValue(srcXpath+"["+ iRow +"]/ordtype");
    fPutPatInfo(iRow, ref, ordtype)
    model.makeValue(trgXpath+"/regstatus/cncrnoinfo/cncrno"             ,model.getValue(srcXpath+"["+ iRow +"]/cncr_histno"));
    model.makeValue(trgXpath+"/regstatus/seqno"                         ,model.getValue(srcXpath+"["+ iRow +"]/seqno"));
    model.makeValue(trgXpath+"/regstatus/prmycncryn"                    ,model.getValue(srcXpath+"["+ iRow +"]/prmycncryn"));
    model.makeValue(trgXpath+"/regstatus/sickstat"                      ,model.getValue(srcXpath+"["+ iRow +"]/sickstatcd"));
    model.makeValue(trgXpath+"/regstatus/cureopendd"                    ,model.getValue(srcXpath+"["+ iRow +"]/cureopendd"));
    model.makeValue(trgXpath+"/dethinfo/dethplce"                       ,model.getValue(srcXpath+"["+ iRow +"]/dethplcecd"));
    model.makeValue(trgXpath+"/dethinfo/dethdd"                         ,model.getValue(srcXpath+"["+ iRow +"]/dethdd"));
    model.makeValue(trgXpath+"/dethinfo/dethcascd"                      ,model.getValue(srcXpath+"["+ iRow +"]/dethcause"));
    model.makeValue(trgXpath+"/dethinfo/existterm/yearcnt"              ,model.getValue(srcXpath+"["+ iRow +"]/yearcnt"));
    model.makeValue(trgXpath+"/dethinfo/existterm/monthcnt"             ,model.getValue(srcXpath+"["+ iRow +"]/monthcnt"));
    model.makeValue(trgXpath+"/diaginfo/diagdd"                         ,model.getValue(srcXpath+"["+ iRow +"]/diagdd"));
    model.makeValue(trgXpath+"/diaginfo/diaghospinfo"                   ,model.getValue(srcXpath+"["+ iRow +"]/diaghospcd"));
    model.makeValue(trgXpath+"/diaginfo/etcdiaghospnm"                   ,model.getValue(srcXpath+"["+ iRow +"]/etcdiaghospnm"));
    model.makeValue(trgXpath+"/diaginfo/diagdrid"                       ,model.getValue(srcXpath+"["+ iRow +"]/diagdrid"));
    model.makeValue(trgXpath+"/diaginfo/lastdiagmthd"                   ,model.getValue(srcXpath+"["+ iRow +"]/lastdiagmthdcd"));
    model.makeValue(trgXpath+"/diaginfo/clinical"                       ,model.getValue(srcXpath+"["+ iRow +"]/clinical"));
    model.makeValue(trgXpath+"/diaginfo/etcclinical"                    ,model.getValue(srcXpath+"["+ iRow +"]/etcclinical"));
    model.makeValue(trgXpath+"/diaginfo/tophcd"                         ,model.getValue(srcXpath+"["+ iRow +"]/tophcd"));
    model.makeValue(trgXpath+"/diaginfo/tophnm"                         ,model.getValue(srcXpath+"["+ iRow +"]/tophnm"));
    model.makeValue(trgXpath+"/diaginfo/tophinfo"                       ,model.getValue(srcXpath+"["+ iRow +"]/tophseqno"));
    model.makeValue(trgXpath+"/diaginfo/morphcd1"                       ,model.getValue(srcXpath+"["+ iRow +"]/morphcd1"));
    model.makeValue(trgXpath+"/diaginfo/morphnm1"                       ,model.getValue(srcXpath+"["+ iRow +"]/morphnm1"));
    model.makeValue(trgXpath+"/diaginfo/morphinfo1"                     ,model.getValue(srcXpath+"["+ iRow +"]/morphseqno1"));
    model.makeValue(trgXpath+"/diaginfo/morphcd2"                       ,model.getValue(srcXpath+"["+ iRow +"]/morphcd2"));
    model.makeValue(trgXpath+"/diaginfo/morphnm2"                       ,model.getValue(srcXpath+"["+ iRow +"]/morphnm2"));
    model.makeValue(trgXpath+"/diaginfo/morphinfo2"                     ,model.getValue(srcXpath+"["+ iRow +"]/morphseqno2"));
    model.makeValue(trgXpath+"/diaginfo/icd10cd"                        ,model.getValue(srcXpath+"["+ iRow +"]/icd10cd"));
    model.makeValue(trgXpath+"/diaginfo/icd10nm"                        ,model.getValue(srcXpath+"["+ iRow +"]/icd10nm"));
    model.makeValue(trgXpath+"/diaginfo/difrntgrdecd"                   ,model.getValue(srcXpath+"["+ iRow +"]/difrntgrdecd"));
    model.makeValue(trgXpath+"/diaginfo/difrntgrde"                     ,model.getValue(srcXpath+"["+ iRow +"]/difrntgrdecd"));
    model.makeValue(trgXpath+"/diaginfo/seercd"                         ,model.getValue(srcXpath+"["+ iRow +"]/seer"));
    model.makeValue(trgXpath+"/diaginfo/seer"                           ,model.getValue(srcXpath+"["+ iRow +"]/seer"));
    model.makeValue(trgXpath+"/diaginfo/tcd"                            ,model.getValue(srcXpath+"["+ iRow +"]/t"));
    model.makeValue(trgXpath+"/diaginfo/t"                              ,model.getValue(srcXpath+"["+ iRow +"]/t"));
    model.makeValue(trgXpath+"/diaginfo/ncd"                            ,model.getValue(srcXpath+"["+ iRow +"]/n"));
    model.makeValue(trgXpath+"/diaginfo/n"                              ,model.getValue(srcXpath+"["+ iRow +"]/n"));
    model.makeValue(trgXpath+"/diaginfo/mcd"                            ,model.getValue(srcXpath+"["+ iRow +"]/m"));
    model.makeValue(trgXpath+"/diaginfo/m"                              ,model.getValue(srcXpath+"["+ iRow +"]/m"));
    model.makeValue(trgXpath+"/diaginfo/stagcd"                         ,model.getValue(srcXpath+"["+ iRow +"]/stagingcd"));
    model.makeValue(trgXpath+"/diaginfo/staging"                        ,model.getValue(srcXpath+"["+ iRow +"]/stagingcd"));
    model.makeValue(trgXpath+"/diaginfo/etcstagflagcd"                  ,model.getValue(srcXpath+"["+ iRow +"]/etcstagflagcd"));
    model.makeValue(trgXpath+"/diaginfo/etcstagflag"                    ,model.getValue(srcXpath+"["+ iRow +"]/etcstagflagcd"));
    model.makeValue(trgXpath+"/diaginfo/etcstagcnts"                    ,model.getValue(srcXpath+"["+ iRow +"]/etcstagcnts"));
    model.makeValue(trgXpath+"/diaginfo/diagroute"                      ,model.getValue(srcXpath+"["+ iRow +"]/diagroute"));
    model.makeValue(trgXpath+"/diaginfo/laterality"                     ,model.getValue(srcXpath+"["+ iRow +"]/laterality"));
    //2013/06/19 Start
    var diagroute=model.getValue(srcXpath+"["+ iRow +"]/diagroute");
    if(diagroute=="5"){
    	ipt_etcdiagroute.disabled=false;
    }else{
    	ipt_etcdiagroute.disabled=true;
    }
    model.makeValue(trgXpath+"/diaginfo/etcdiagroute"                     ,model.getValue(srcXpath+"["+ iRow +"]/etcdiagroute"));
    //2013/06/19 End
    model.makeValue(trgXpath+"/rerntmetstaspart/rerntmetstaspartcd1"    ,model.getValue(srcXpath+"["+ iRow +"]/rerntmetstaspartcd1"));
    model.makeValue(trgXpath+"/rerntmetstaspart/rerntmetstaspartnm1"    ,model.getValue(srcXpath+"["+ iRow +"]/rerntmetstaspartnm1"));
    model.makeValue(trgXpath+"/rerntmetstaspart/rerntmetstaspart1"      ,model.getValue(srcXpath+"["+ iRow +"]/rerntmetstaspartseq1"));
    model.makeValue(trgXpath+"/rerntmetstaspart/rerntmetstaspartcd2"    ,model.getValue(srcXpath+"["+ iRow +"]/rerntmetstaspartcd2"));
    model.makeValue(trgXpath+"/rerntmetstaspart/rerntmetstaspartnm2"    ,model.getValue(srcXpath+"["+ iRow +"]/rerntmetstaspartnm2"));
    model.makeValue(trgXpath+"/rerntmetstaspart/rerntmetstaspart2"      ,model.getValue(srcXpath+"["+ iRow +"]/rerntmetstaspartseq2"));
    model.makeValue(trgXpath+"/rerntmetstaspart/rerntmetstaspartcd3"    ,model.getValue(srcXpath+"["+ iRow +"]/rerntmetstaspartcd3"));
    model.makeValue(trgXpath+"/rerntmetstaspart/rerntmetstaspartnm3"    ,model.getValue(srcXpath+"["+ iRow +"]/rerntmetstaspartnm3"));
    model.makeValue(trgXpath+"/rerntmetstaspart/rerntmetstaspart3"      ,model.getValue(srcXpath+"["+ iRow +"]/rerntmetstaspartseq3"));
    model.makeValue(trgXpath+"/rerntmetstaspart/rerntmetstaspartcd4"    ,model.getValue(srcXpath+"["+ iRow +"]/rerntmetstaspartcd4"));
    model.makeValue(trgXpath+"/rerntmetstaspart/rerntmetstaspartnm4"    ,model.getValue(srcXpath+"["+ iRow +"]/rerntmetstaspartnm4"));
    model.makeValue(trgXpath+"/rerntmetstaspart/rerntmetstaspart4"      ,model.getValue(srcXpath+"["+ iRow +"]/rerntmetstaspartseq4"));
    model.makeValue(trgXpath+"/rerntmetstaspart/ecogcd"                 ,model.getValue(srcXpath+"["+ iRow +"]/ecog"));
    model.makeValue(trgXpath+"/rerntmetstaspart/ecog"                   ,model.getValue(srcXpath+"["+ iRow +"]/ecog"));
    model.makeValue(trgXpath+"/rerntmetstaspart/regimencd1"             ,model.getValue(srcXpath+"["+ iRow +"]/regimen1"));
    model.makeValue(trgXpath+"/rerntmetstaspart/regimen1"               ,model.getValue(srcXpath+"["+ iRow +"]/regimen1"));
    var code = model.getValue("/root/main/cncrpatrgst/rerntmetstaspart/regimencd1");
		fGetRegimenDet(code);
    model.makeValue(trgXpath+"/rerntmetstaspart/regimencd2"             ,model.getValue(srcXpath+"["+ iRow +"]/regimen2"));
    model.makeValue(trgXpath+"/rerntmetstaspart/regimen2"               ,model.getValue(srcXpath+"["+ iRow +"]/regimen2"));
    model.makeValue("/root/main/pathumtrainfo/relationinfo/relausernm"  ,model.getValue(srcXpath+"["+ iRow +"]/reluserhngnm"));
    model.makeValue("/root/main/pathumtrainfo/relationinfo/relation"    ,model.getValue(srcXpath+"["+ iRow +"]/relation"));
    model.makeValue("/root/main/pathumtrainfo/relationinfo/zipcode1"    ,model.getValue(srcXpath+"["+ iRow +"]/relzipcd1"));
    model.makeValue("/root/main/pathumtrainfo/relationinfo/zipcode2"    ,model.getValue(srcXpath+"["+ iRow +"]/relzipcd2"));
    model.makeValue("/root/main/pathumtrainfo/relationinfo/addr"        ,model.getValue(srcXpath+"["+ iRow +"]/reladdr"));
    model.makeValue("/root/main/pathumtrainfo/relationinfo/detaddr"     ,model.getValue(srcXpath+"["+ iRow +"]/reldetaddr"));
    model.makeValue("/root/main/pathumtrainfo/relationinfo/mpphontel"   ,model.getValue(srcXpath+"["+ iRow +"]/relmpphontel"));
    model.makeValue("/root/main/pathumtrainfo/relationinfo/hometel"     ,model.getValue(srcXpath+"["+ iRow +"]/relhometel"));

    cap_rgstrnm.attribute("text") = model.getValue(srcXpath+"["+ iRow +"]/lastrgstrnm");
    cap_rgstdt.attribute("text") = model.getValue(srcXpath+"["+ iRow +"]/lastupdtdt");

    model.makeValue("/root/send/reqdata/cncrno"                         ,model.getValue(srcXpath+"["+ iRow +"]/cncrno"));
    model.makeValue("/root/send/reqdata/cncrhistno"                     ,model.getValue(srcXpath+"["+ iRow +"]/cncrhistno"));
    model.makeValue("/root/send/reqdata/seqno"                          ,model.getValue(srcXpath+"["+ iRow +"]/seqno"));
    model.makeValue("/root/send/reqdata/instcd"                         ,model.getValue(srcXpath+"["+ iRow +"]/instcd"));

    if(submit("TRMRD00102")){
        var cncrno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
        //alert(cncrno.lastIndexOf("-"));
        if(cncrno.lastIndexOf("-")>4){
            model.setValue("/root/main/cncrpatrgst/regstatus/flag","")
            rdo_flag.refresh();
        }else{
            model.setValue("/root/main/cncrpatrgst/regstatus/flag","1")
            rdo_flag.refresh();
        }
        fBtnSetting(false);
        messageBox("조회가", "I002");
    } else {
        messageBox("조회를", "E009");
    }
    model.removeNodeset("/root/send/reqdata");
    
    var code = model.getValue(trgXpath+"/diaginfo/diaghospinfo" );  
    if ( code != "" && code.substr(0,2) != "01" )
    {    
    	var hospnm = model.getValue("/root/main/common/Z0007[cdid='"+code+"']/cdnm");
		model.setValue(trgXpath+"/diaginfo/etcdiaghospnm" , hospnm); 
		ipt_etcdiaghospnm.refresh();
    }    
}
/**
 * @desc   : 암용어 검색팝업과 연계
 * @param  : 2008-12-04 이창록 수정(암환자 용어검색팝업과 연계)
 * @return : void
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fSrchTerm(flag,code){
    var ordtype = model.getValue("/root/main/pathumtrainfo/cncrpatinfo/ordtype");
    var dschdd =model.getValue( "/root/main/pathumtrainfo/cncrpatinfo/dschdd");
    
    var orddd = model.getValue( "/root/main/pathumtrainfo/cncrpatinfo/orddd");
    //lrow = cmb_outorddd.selectedIndex + 1;
    //var orddd = model.getValue("/root/main/humaninfo/outpatinfo/patlist[" + lrow + "]/orddd");
    
    
		    if(flag == "toph"){
		        model.removeNodeset("/root/temp/terminfo");
		        if(ordtype=="I"){
		        	setParameter("stndd",dschdd);
		      	}else if(ordtype=="O"){
		      		setParameter("stndd",orddd);
		      	}else if(ordtype=="S"){
		      		setParameter("stndd",orddd);
		      	}
		        setParameter("SPMRT01700_SEARCHDATA", code);
		        setParameter("SPMRT01700_FLAG", "1");
		        modal("SPMRT01700");
		        if(getParameter("SPMRT01700_FLAG") == ""){
		            return;
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")>0){
		            model.setValue("/root/main/cncrpatrgst/diaginfo/tophcd", model.getValue("/root/temp/terminfo/tplinfo/tophlgcd"));
		            model.setValue("/root/main/cncrpatrgst/diaginfo/tophnm", model.getValue("/root/temp/terminfo/tplinfo/engnm"));
		            model.setValue("/root/main/cncrpatrgst/diaginfo/tophinfo", model.getValue("/root/temp/terminfo/tplinfo/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/icdo3info")>0){
		            if(getNodesetCnt(model,"/root/temp/terminfo/icdo3info")>1){
			        	  model.setValue("/root/main/cncrpatrgst/diaginfo/morphcd1"		, model.getValue("/root/temp/terminfo/icdo3info[1]/diagcd"));
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphnm1"		, model.getValue("/root/temp/terminfo/icdo3info[1]/diagengnm"));
			            model.setValue( "/root/main/cncrpatrgst/diaginfo/morphinfo1", model.getValue("/root/temp/terminfo/icdo3info[1]/seqno"));
			        	  model.setValue("/root/main/cncrpatrgst/diaginfo/morphcd2"		, model.getValue("/root/temp/terminfo/icdo3info[2]/diagcd"));
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphnm2"		, model.getValue("/root/temp/terminfo/icdo3info[2]/diagengnm"));
			            model.setValue( "/root/main/cncrpatrgst/diaginfo/morphinfo2", model.getValue("/root/temp/terminfo/icdo3info[2]/seqno"));
		        		}else{
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphcd1"		, model.getValue("/root/temp/terminfo/icdo3info/diagcd"));
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphnm1"		, model.getValue("/root/temp/terminfo/icdo3info/diagengnm"));
			            model.setValue( "/root/main/cncrpatrgst/diaginfo/morphinfo1", model.getValue("/root/temp/terminfo/icdo3info/seqno"));
		          	}
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/icd10info")>0){
		            model.setValue("/root/main/cncrpatrgst/diaginfo/icd10cd", model.getValue("/root/temp/terminfo/icd10info/diagcd"));
		            model.setValue("/root/main/cncrpatrgst/diaginfo/icd10nm", model.getValue("/root/temp/terminfo/icd10info/diagengnm"));
		        }
		    }else if(flag == "morph1"){
		        model.removeNodeset("/root/temp/terminfo");
		        if(ordtype=="I"){
		        	setParameter("stndd",dschdd);
		      	}else if(ordtype=="O"){
		      		setParameter("stndd",orddd);
		      	}
		        setParameter("SPMRT01700_SEARCHDATA", code);
		        setParameter("SPMRT01700_FLAG", "2");
		        modal("SPMRT01700");
		        if(getParameter("SPMRT01700_FLAG") == ""){
		            return;
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")>0){
		            model.setValue("/root/main/cncrpatrgst/diaginfo/tophcd", model.getValue("/root/temp/terminfo/tplinfo/tophlgcd"));
		            model.setValue("/root/main/cncrpatrgst/diaginfo/tophnm", model.getValue("/root/temp/terminfo/tplinfo/engnm"));
		            model.setValue("/root/main/cncrpatrgst/diaginfo/tophinfo", model.getValue("/root/temp/terminfo/tplinfo/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/icdo3info")>0){
		            if(getNodesetCnt(model,"/root/temp/terminfo/icdo3info")>1){
			        	  model.setValue("/root/main/cncrpatrgst/diaginfo/morphcd1"		, model.getValue("/root/temp/terminfo/icdo3info[1]/diagcd"));
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphnm1"		, model.getValue("/root/temp/terminfo/icdo3info[1]/diagengnm"));
			            model.setValue( "/root/main/cncrpatrgst/diaginfo/morphinfo1", model.getValue("/root/temp/terminfo/icdo3info[1]/seqno"));
			        	  model.setValue("/root/main/cncrpatrgst/diaginfo/morphcd2"		, model.getValue("/root/temp/terminfo/icdo3info[2]/diagcd"));
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphnm2"		, model.getValue("/root/temp/terminfo/icdo3info[2]/diagengnm"));
			            model.setValue( "/root/main/cncrpatrgst/diaginfo/morphinfo2", model.getValue("/root/temp/terminfo/icdo3info[2]/seqno"));
		        		}else{
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphcd1"		, model.getValue("/root/temp/terminfo/icdo3info/diagcd"));
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphnm1"		, model.getValue("/root/temp/terminfo/icdo3info/diagengnm"));
			            model.setValue( "/root/main/cncrpatrgst/diaginfo/morphinfo1", model.getValue("/root/temp/terminfo/icdo3info/seqno"));
		          	}
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/icd10info")>0){
		            model.setValue("/root/main/cncrpatrgst/diaginfo/icd10cd", model.getValue("/root/temp/terminfo/icd10info/diagcd"));
		            model.setValue("/root/main/cncrpatrgst/diaginfo/icd10nm", model.getValue("/root/temp/terminfo/icd10info/diagengnm"));
		        }
		    }else if(flag == "morph2"){
		        model.removeNodeset("/root/temp/terminfo");
		        if(ordtype=="I"){
		        	setParameter("stndd",dschdd);
		      	}else if(ordtype=="O"){
		      		setParameter("stndd",orddd);
		      	}
		        setParameter("SPMRT01700_SEARCHDATA", code);
		        setParameter("SPMRT01700_FLAG", "2");
		        modal("SPMRT01700");
		        if(getParameter("SPMRT01700_FLAG") == ""){
		            return;
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")>0){
		            model.setValue("/root/main/cncrpatrgst/diaginfo/tophcd", model.getValue("/root/temp/terminfo/tplinfo/tophlgcd"));
		            model.setValue("/root/main/cncrpatrgst/diaginfo/tophnm", model.getValue("/root/temp/terminfo/tplinfo/engnm"));
		            model.setValue("/root/main/cncrpatrgst/diaginfo/tophinfo", model.getValue("/root/temp/terminfo/tplinfo/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/icdo3info")>0){
		            if(getNodesetCnt(model,"/root/temp/terminfo/icdo3info")>1){
			        	  model.setValue("/root/main/cncrpatrgst/diaginfo/morphcd1"		, model.getValue("/root/temp/terminfo/icdo3info[1]/diagcd"));
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphnm1"		, model.getValue("/root/temp/terminfo/icdo3info[1]/diagengnm"));
			            model.setValue( "/root/main/cncrpatrgst/diaginfo/morphinfo1", model.getValue("/root/temp/terminfo/icdo3info[1]/seqno"));
			        	  model.setValue("/root/main/cncrpatrgst/diaginfo/morphcd2"		, model.getValue("/root/temp/terminfo/icdo3info[2]/diagcd"));
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphnm2"		, model.getValue("/root/temp/terminfo/icdo3info[2]/diagengnm"));
			            model.setValue( "/root/main/cncrpatrgst/diaginfo/morphinfo2", model.getValue("/root/temp/terminfo/icdo3info[2]/seqno"));
		        		}else{
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphcd1"		, model.getValue("/root/temp/terminfo/icdo3info/diagcd"));
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphnm1"		, model.getValue("/root/temp/terminfo/icdo3info/diagengnm"));
			            model.setValue( "/root/main/cncrpatrgst/diaginfo/morphinfo1", model.getValue("/root/temp/terminfo/icdo3info/seqno"));
		          	}
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/icd10info")>0){
		            model.setValue("/root/main/cncrpatrgst/diaginfo/icd10cd", model.getValue("/root/temp/terminfo/icd10info/diagcd"));
		            model.setValue("/root/main/cncrpatrgst/diaginfo/icd10nm", model.getValue("/root/temp/terminfo/icd10info/diagengnm"));
		        }
		    }else if(flag == "icd10"){
		        model.removeNodeset("/root/temp/terminfo");
		        setParameter("SPMRT01700_SEARCHDATA", code);
		        setParameter("SPMRT01700_FLAG", "3");
		        if(ordtype=="I"){
		        	setParameter("stndd",dschdd);
		      	}else if(ordtype=="O"){
		      		setParameter("stndd",orddd);
		      	}
		        modal("SPMRT01700");
		        if(getParameter("SPMRT01700_FLAG") == ""){
		            return;
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")>0){
		            model.setValue("/root/main/cncrpatrgst/diaginfo/tophcd", model.getValue("/root/temp/terminfo/tplinfo/tophlgcd"));
		            model.setValue("/root/main/cncrpatrgst/diaginfo/tophnm", model.getValue("/root/temp/terminfo/tplinfo/engnm"));
		            model.setValue("/root/main/cncrpatrgst/diaginfo/tophinfo", model.getValue("/root/temp/terminfo/tplinfo/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/icdo3info")>0){
		            if(getNodesetCnt(model,"/root/temp/terminfo/icdo3info")>1){
			        	  model.setValue("/root/main/cncrpatrgst/diaginfo/morphcd1"		, model.getValue("/root/temp/terminfo/icdo3info[1]/diagcd"));
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphnm1"		, model.getValue("/root/temp/terminfo/icdo3info[1]/diagengnm"));
			            model.setValue( "/root/main/cncrpatrgst/diaginfo/morphinfo1", model.getValue("/root/temp/terminfo/icdo3info[1]/seqno"));
			        	  model.setValue("/root/main/cncrpatrgst/diaginfo/morphcd2"		, model.getValue("/root/temp/terminfo/icdo3info[2]/diagcd"));
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphnm2"		, model.getValue("/root/temp/terminfo/icdo3info[2]/diagengnm"));
			            model.setValue( "/root/main/cncrpatrgst/diaginfo/morphinfo2", model.getValue("/root/temp/terminfo/icdo3info[2]/seqno"));
		        		}else{
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphcd1"		, model.getValue("/root/temp/terminfo/icdo3info/diagcd"));
			            model.setValue("/root/main/cncrpatrgst/diaginfo/morphnm1"		, model.getValue("/root/temp/terminfo/icdo3info/diagengnm"));
			            model.setValue( "/root/main/cncrpatrgst/diaginfo/morphinfo1", model.getValue("/root/temp/terminfo/icdo3info/seqno"));
		          	}
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/icd10info")>0){
		            model.setValue("/root/main/cncrpatrgst/diaginfo/icd10cd", model.getValue("/root/temp/terminfo/icd10info/diagcd"));
		            model.setValue("/root/main/cncrpatrgst/diaginfo/icd10nm", model.getValue("/root/temp/terminfo/icd10info/diagengnm"));
		        }
		    }
    model.removeNodeset("/root/send/reqdata");
    model.refresh();
}
/**
 * @desc   : 저장
 * @param  :
 * @return : void
 * @authur : 2007. 5. 15 2009-01-10 이창록 수정-> 암등록번호 체크 수정
 * @---------------------------------------------------
 */
function fSaveData(ordtype){

    //===============================================
    // 암센터, 의료정보 체크(20090213)
    // cncryn : 'Y'는 암센터, 'N'는 의료정보를 의미
    var instcd = getUserInfo("dutplceinstcd");
    var dutplcecd = getUserInfo("dutplcecd");
    var dschdd = model.getValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd");

    /*
    if (instcd == "012" && dutplcecd == "6050000000")
    {
        if (dschdd < "20090101")
        {
            messageBox("2009년 1월 1일 이전 퇴원환자 데이터는 의료정보팀에서만 저장이 가능합니다.", "I999" );
            return;
        }
    }
    else if (instcd == "012" && dutplcecd != "6050000000")
    {
        if (dschdd >= "20090101")
        {
            messageBox("2009년 1월 1일 이후 퇴원환자 데이터는 암센터에서만 저장이 가능합니다.", "I999" );
            return;
        }
    }
    */
    //==============================================


    if((model.getValue("/root/main/cncrpatrgst/regstatus/sickstat") == "07") || (model.getValue("/root/main/cncrpatrgst/regstatus/sickstat") == "08")){
        if((model.getValue("/root/main/cncrpatrgst/dethinfo/dethdd") == "") || (model.getValue("/root/main/cncrpatrgst/dethinfo/dethcascd") == "")){
            messageBox("사망일자 또는 사망원인이 입력되지", "E007");
            return;
        }
    }
    if(model.getValue("/root/main/cncrpatrgst/regstatus/sickstat") == ""){
        messageBox("등록시 질병상태가 입력되지", "E007" );
        return;
    }

    var nDiagdd = model.getValue("/root/main/cncrpatrgst/diaginfo/diagdd"); 
    if(nDiagdd == ""){
        messageBox("진단일자가 입력되지", "E007" );
        return;
    }else if(nDiagdd.length != 8){
    	messageBox("진단일자가 정확하게 입력되지", "E007" );
        return;
    }

    if((model.getValue("/root/main/cncrpatrgst/diaginfo/tophcd") == "") || (model.getValue("/root/main/cncrpatrgst/diaginfo/tophinfo") == "")){
        messageBox("T-Code가 입력되지", "E007" );
        return;
    }

    if((model.getValue("/root/main/cncrpatrgst/diaginfo/morphcd1") == "") || (model.getValue("/root/main/cncrpatrgst/diaginfo/morphinfo1") == "")){
        messageBox("M-Code가 입력되지", "E007" );
        return;
    }

    if(model.getValue("/root/main/cncrpatrgst/diaginfo/icd10cd") == ""){
        messageBox("ICD10코드가 입력되지", "E007" );
        return;
    }

    if(model.getValue("/root/main/cncrpatrgst/diaginfo/seercd") == ""){
        messageBox("Seer코드가 입력되지", "E007" );
        return;
    }

    if(model.getValue("/root/main/cncrpatrgst/diaginfo/lastdiagmthd") == ""){
        messageBox("최종진단방법이 입력되지", "E007" );
        return;
    }else{
    	if(model.getValue("/root/main/cncrpatrgst/diaginfo/lastdiagmthd") == "02"){
    		if(model.getValue("/root/main/cncrpatrgst/diaginfo/clinical") == ""){
    	        messageBox("최종진단방법이 02.임상검사의 경우 Sono, CT, MRI, 기타 체크박스 중 한가지 이상의 선택은 필수입력입니다.", "E999" );
    	        return;
    		}
    	}
    }
    
    if(model.getValue("/root/main/cncrpatrgst/diaginfo/diagroute") == ""){
        messageBox("진단경로가 입력되지", "E007" );
        return;
    }
    
    if(model.getValue("/root/main/cncrpatrgst/diaginfo/laterality") == ""){
        messageBox("편측성이 입력되지", "E007" );
        return;
    }
    
    if(model.getValue("/root/main/cncrpatrgst/diaginfo/difrntgrde") == ""){
        messageBox("분화도가 입력되지", "E007" );
        return;
    }
    
    if(model.getValue("/root/main/cncrpatrgst/diaginfo/laterality") == "99"){
        messageBox("편측성이 선택되지", "E007" );
        return;
    }
    
    var grdcnt = getNodesetCount("/root/main/cncrpatrgst/cureinfo/prmypart");
    if( grdcnt > 0 ){
    	for( var i = 1 ; i <= grdcnt  ; i++ ){
    		if( model.getValue("/root/main/cncrpatrgst/cureinfo/prmypart[" + i + "]/prmypartcd") == "" ){
    	        messageBox("본원치료방법( 원발부위치료방법 )의 " + i + "번째 행의 치료방법이 입력되지", "E007" );
    	        return;    			
    		}
    		
    		if( model.getValue("/root/main/cncrpatrgst/cureinfo/prmypart[" + i + "]/prmypartcd") != "11" ){
	    		if( model.getValue("/root/main/cncrpatrgst/cureinfo/prmypart[" + i + "]/prmypartcuredd") == "" ){
	    			messageBox("본원치료방법( 원발부위치료방법 )의 " + i + "번째 행의 치료일자가 입력되지", "E007" );
	    	        return;
	    		}    			
    		}else{
    			if( model.getValue("/root/main/cncrpatrgst/cureinfo/prmypart[" + i + "]/prmypartcuredd") != "" ){
    				model.setValue("/root/main/cncrpatrgst/cureinfo/prmypart[" + i + "]/prmypartcuredd", "");
    			}
    		}
    	}
    }else{
    	messageBox("본원치료방법( 원발부위치료방법 )은 필수입력입니다.", "E999" );
        return;
    }
    
    var savePath = "/root/send/savedata/cncrinfo";
    model.makeValue(savePath+"/instcd"        ,getUserInfo("dutplceinstcd"));
    model.makeValue(savePath+"/pid"           ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/pid"));
    model.makeValue(savePath+"/pnm"           ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/pnm"));
    model.makeValue(savePath+"/cretno"        ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/cretno"));
    model.makeValue(savePath+"/ordtype"       ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/ordtype"));
    model.makeValue(savePath+"/rrgstno1"      ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/rrgstno1"));
    model.makeValue(savePath+"/rrgstno2"      ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/rrgstno2"));
    model.makeValue(savePath+"/epoch"         ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/epoch"));
    model.makeValue(savePath+"/sex"           ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/sex"));
    model.makeValue(savePath+"/age"           ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/age"));
    model.makeValue(savePath+"/maryflag"      ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/maryflag"));
    model.makeValue(savePath+"/zipcode1"      ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/zipcode1"));
    model.makeValue(savePath+"/zipcode2"      ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/zipcode2"));
    model.makeValue(savePath+"/addr"          ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/addr"));
    model.makeValue(savePath+"/detaddr"       ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/detaddr"));
    model.makeValue(savePath+"/hometel"       ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/hometel"));
    model.makeValue(savePath+"/mpphontel"     ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/mpphontel"));
    model.makeValue(savePath+"/dschdd"        ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd"));
    model.makeValue(savePath+"/dschdeptcd"    ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/dschorddept"));
    model.makeValue(savePath+"/dschdrid"      ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/dschorddr"));
    model.makeValue(savePath+"/indg"          ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/indg"));
    model.makeValue(savePath+"/totinhospdayno",model.getValue("/root/main/pathumtrainfo/cncrpatinfo/totinhospdayno"));
    model.makeValue(savePath+"/forgnerflag"   ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/forgnerflag"));
    model.makeValue(savePath+"/travoflag"     ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/travoflag"));
    model.makeValue(savePath+"/job1"          ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/job1"));
    model.makeValue(savePath+"/etcjob"        ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/etcjob"));
    model.makeValue(savePath+"/relausernm"    ,model.getValue("/root/main/pathumtrainfo/relationinfo/relausernm"));
    model.makeValue(savePath+"/relation"      ,model.getValue("/root/main/pathumtrainfo/relationinfo/relation"));
    model.makeValue(savePath+"/relzipcode1"   ,model.getValue("/root/main/pathumtrainfo/relationinfo/zipcode1"));
    model.makeValue(savePath+"/relzipcode2"   ,model.getValue("/root/main/pathumtrainfo/relationinfo/zipcode2"));
    model.makeValue(savePath+"/reladdr"       ,model.getValue("/root/main/pathumtrainfo/relationinfo/addr"));
    model.makeValue(savePath+"/reldetaddr"    ,model.getValue("/root/main/pathumtrainfo/relationinfo/detaddr"));
    model.makeValue(savePath+"/relmpphontel"  ,model.getValue("/root/main/pathumtrainfo/relationinfo/mpphontel"));
    model.makeValue(savePath+"/relhometel"    ,model.getValue("/root/main/pathumtrainfo/relationinfo/hometel"));
    if(ordtype == "O" || ordtype == "S"){
        model.makeValue(savePath+"/orddd"     ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/orddd"));
        model.makeValue(savePath+"/orddeptcd" ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/outorddept"));
        model.makeValue(savePath+"/orddrid"   ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/outorddr"));
    } else {
        model.makeValue(savePath+"/orddd"     ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/indd"));
        model.makeValue(savePath+"/orddeptcd" ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/inorddept"));
        model.makeValue(savePath+"/orddrid"   ,model.getValue("/root/main/pathumtrainfo/cncrpatinfo/inorddr"));
    }

    model.makeValue(savePath+"/flag"          , model.getValue("/root/main/cncrpatrgst/regstatus/flag"));
    var cncrno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
    cncrno = cncrno.substring (0, 4) + cncrno.substring(5, cncrno.length);
    model.makeValue(savePath+"/cncrno", cncrno);
   
    
    if(cncrno.lastIndexOf("-")>0){
        model.makeValue(savePath+"/cncrhistno",cncrno.substring(cncrno.lastIndexOf("-")+1, cncrno.length));
        model.makeValue(savePath+"/cncrno",cncrno.substring(0, cncrno.lastIndexOf("-")));
    } else {
        model.makeValue(savePath+"/cncrhistno", "");
        model.makeValue(savePath+"/cncrno", cncrno);
    }
    model.makeValue(savePath+"/seqno"               ,model.getValue("/root/main/cncrpatrgst/regstatus/seqno"));
    model.makeValue(savePath+"/prmycncryn"          ,model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn"));
    model.makeValue(savePath+"/sickstat"            ,model.getValue("/root/main/cncrpatrgst/regstatus/sickstat"));
    model.makeValue(savePath+"/cureopendd"          ,model.getValue("/root/main/cncrpatrgst/regstatus/cureopendd"));
    model.makeValue(savePath+"/dethplce"            ,model.getValue("/root/main/cncrpatrgst/dethinfo/dethplce"));
    model.makeValue(savePath+"/dethdd"              ,model.getValue("/root/main/cncrpatrgst/dethinfo/dethdd"));
    model.makeValue(savePath+"/dethcascd"           ,model.getValue("/root/main/cncrpatrgst/dethinfo/dethcascd"));
    model.makeValue(savePath+"/yearcnt"             ,model.getValue("/root/main/cncrpatrgst/dethinfo/existterm/yearcnt"));
    model.makeValue(savePath+"/monthcnt"            ,model.getValue("/root/main/cncrpatrgst/dethinfo/existterm/monthcnt"));
    model.makeValue(savePath+"/diagdd"              ,model.getValue("/root/main/cncrpatrgst/diaginfo/diagdd"));
    model.makeValue(savePath+"/diaghospcd"          ,model.getValue("/root/main/cncrpatrgst/diaginfo/diaghospinfo"));
    model.makeValue(savePath+"/etcdiaghospnm"          ,model.getValue("/root/main/cncrpatrgst/diaginfo/etcdiaghospnm"));
    model.makeValue(savePath+"/diagdrid"            ,model.getValue("/root/main/cncrpatrgst/diaginfo/diagdrid"));
    model.makeValue(savePath+"/lastdiagmthd"        ,model.getValue("/root/main/cncrpatrgst/diaginfo/lastdiagmthd"));
    model.makeValue(savePath+"/clinical"            ,model.getValue("/root/main/cncrpatrgst/diaginfo/clinical"));
    model.makeValue(savePath+"/etcclinical"         ,model.getValue("/root/main/cncrpatrgst/diaginfo/etcclinical"));
    model.makeValue(savePath+"/tophcd"              ,model.getValue("/root/main/cncrpatrgst/diaginfo/tophcd"));
    model.makeValue(savePath+"/tophinfo"            ,model.getValue("/root/main/cncrpatrgst/diaginfo/tophinfo"));
    model.makeValue(savePath+"/morphcd1"            ,model.getValue("/root/main/cncrpatrgst/diaginfo/morphcd1"));
    model.makeValue(savePath+"/morphinfo1"          ,model.getValue("/root/main/cncrpatrgst/diaginfo/morphinfo1"));
    model.makeValue(savePath+"/morphcd2"            ,model.getValue("/root/main/cncrpatrgst/diaginfo/morphcd2"));
    model.makeValue(savePath+"/morphinfo2"          ,model.getValue("/root/main/cncrpatrgst/diaginfo/morphinfo2"));
    model.makeValue(savePath+"/icd10cd"             ,model.getValue("/root/main/cncrpatrgst/diaginfo/icd10cd"));
    model.makeValue(savePath+"/difrntgrdecd"        ,model.getValue("/root/main/cncrpatrgst/diaginfo/difrntgrde"));
    model.makeValue(savePath+"/seercd"              ,model.getValue("/root/main/cncrpatrgst/diaginfo/seer"));
    model.makeValue(savePath+"/t"                   ,model.getValue("/root/main/cncrpatrgst/diaginfo/t"));
    model.makeValue(savePath+"/n"                   ,model.getValue("/root/main/cncrpatrgst/diaginfo/n"));
    model.makeValue(savePath+"/m"                   ,model.getValue("/root/main/cncrpatrgst/diaginfo/m"));
    model.makeValue(savePath+"/stagcd"              ,model.getValue("/root/main/cncrpatrgst/diaginfo/staging"));
    model.makeValue(savePath+"/etcstagflagcd"       ,model.getValue("/root/main/cncrpatrgst/diaginfo/etcstagflagcd"));
    model.makeValue(savePath+"/etcstagcnts"         ,model.getValue("/root/main/cncrpatrgst/diaginfo/etcstagcnts"));
    model.makeValue(savePath+"/rerntmetstaspartcd1" ,model.getValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1"));
    model.makeValue(savePath+"/rerntmetstaspartcd2" ,model.getValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2"));
    model.makeValue(savePath+"/rerntmetstaspartcd3" ,model.getValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd3"));
    model.makeValue(savePath+"/rerntmetstaspartcd4" ,model.getValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd4"));
    model.makeValue(savePath+"/rerntmetstaspartseq1",model.getValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"));
    model.makeValue(savePath+"/rerntmetstaspartseq2",model.getValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"));
    model.makeValue(savePath+"/rerntmetstaspartseq3",model.getValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart3"));
    model.makeValue(savePath+"/rerntmetstaspartseq4",model.getValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart4"));
    model.makeValue(savePath+"/ecogcd"              ,model.getValue("/root/main/cncrpatrgst/rerntmetstaspart/ecog"));
    model.makeValue(savePath+"/regimencd1"          ,model.getValue("/root/main/cncrpatrgst/rerntmetstaspart/regimen1"));
    model.makeValue(savePath+"/regimencd2"          ,model.getValue("/root/main/cncrpatrgst/rerntmetstaspart/regimen2"));
    model.makeValue(savePath+"/fstrgstrid"          ,getUserInfo("userid"));
    model.makeValue(savePath+"/fstrgstdt"           ,getCurrentDate());
    model.makeValue(savePath+"/lastupdtrid"         ,getUserInfo("userid"));
    model.makeValue(savePath+"/lastupdtdt"          ,getCurrentDate());
    model.makeValue(savePath+"/diagroute"           ,model.getValue("/root/main/cncrpatrgst/diaginfo/diagroute"));
    model.makeValue(savePath+"/laterality"          ,model.getValue("/root/main/cncrpatrgst/diaginfo/laterality"));
    model.makeValue(savePath+"/etcdiagroute"        ,model.getValue("/root/main/cncrpatrgst/diaginfo/etcdiagroute"));


    fSetBFIOCure();             //내원전 치료
    fSetPrmyPartCure();         //본원치료 방법(원발부위치료방법)
    fSetMetstasPartCure();      //본원치료 방법(전위부위치료방법)

    if(model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno") == ""){
        messageBox("암등록번호가 입력되지", "E007");
        return;
    }
    var sCncrNo  = model.getValue("/root/main/humaninfo/cncrhist/histlist["+1+"]/cncr_histno");

    if(cncrno.lastIndexOf("-")>4){
        model.makeValue("/root/send/reqdata/cncrhistno" ,cncrno.substring(cncrno.lastIndexOf("-")+1, cncrno.length));
        model.makeValue("/root/send/reqdata/cncrno"     ,cncrno.substring(0, cncrno.lastIndexOf("-")));
    }else{
        model.makeValue("/root/send/reqdata/cncrhistno" ,"00");
        model.makeValue("/root/send/reqdata/cncrno"     ,cncrno);
    }
    
    if(submit("TRMRD00107")){
    	var insflag 		= 	model.getValue("/root/main/cncrnoinfo/haveno/insflag");//중복체크
        var cncrflag 		=	model.getValue("/root/main/cncrnoinfo/haveno/cncrflag");//중복체크
        var cncrhistflag 	=	model.getValue("/root/main/cncrnoinfo/haveno/cncrhistflag");//중복체크
        
        //다발성원발암 등록의 경우가 아니고(cncrhistno="00") 이미 등록되어 있는 암등록 번호 인 경우
        if(insflag == "T"){
            var Msg1 = messageBox("동일한 암등록번호가 존재합니다. 수정","S003","신규로 저장");
            
            //아니오, 신규저장
            if(Msg1=="7"){
            
            	//다발성원발암 여부가 Y가 아닌지 체크
 				if((model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn") == "N")
            		||(model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn") == "")){
                    fGetCncrNo();	//암등록번호 신규채번
                }
                
                //암등록번호 재저장
                cncrno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
                pCncrNo =  cncrno.substring(0,4)+cncrno.substring(5,9);
                model.makeValue(savePath+"/cncrno", pCncrNo);
                
                model.makeValue(savePath+"/cncrhistno", "");
            }else if(Msg1=="6"){	//예, 수정
                model.makeValue(savePath+"/flag","3");
            }else{	//취소
                return;
            }
        }else if((cncrflag =="T")&&(cncrhistflag=="F")){	//다발성원발암번호로 등록 할때 이미 암번호가 중복된 경우
            var Msg2= messageBox("동일한 암등록번호가 존재합니다. 수정","S003","신규로 저장");
            
            if(Msg2=="7"){
            	//암등록번호 신규채번
	            fGetCncrNo();
	            model.makeValue("/root/send/reqdata/cncrhistno" ,cncrno.substring(cncrno.lastIndexOf("-")+1, cncrno.length));
	        	model.makeValue("/root/send/reqdata/cncrno"     ,cncrno.substring(0, cncrno.lastIndexOf("-")));
	            
	            //암등록이력번호 생성
	            fGetCncrHistNo();
	            cncrno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
            	if(cncrno.lastIndexOf("-") > 4){
	                model.makeValue(savePath+"/cncrhistno"  , cncrno.substring(cncrno.lastIndexOf("-")+1, cncrno.length));
	                model.makeValue(savePath+"/cncrno"      , cncrno.substring(0,4)+cncrno.substring(5,9));
	                model.makeValue(savePath+"/flag","1");
              	}
	        }else if(Msg2=="6"){
                model.makeValue(savePath+"/flag","3");
            }else{
                return;
            }
        }else if((cncrflag =="F")&&(cncrhistflag=="T")){//다발성원발암으로 등록 할 때 이미 등록되어 있는 번호가 있는경우
			var Msg3 = messageBox("동일한 암등록번호가 존재합니다. 수정","S003","신규로 저장");
           	if(Msg3=="7"){
 			 	model.makeValue("/root/send/reqdata/cncrhistno" ,cncrno.substring(cncrno.lastIndexOf("-")+1, cncrno.length));
	        	model.makeValue("/root/send/reqdata/cncrno"     ,cncrno.substring(0, cncrno.lastIndexOf("-")));
	           
	            //암등록이력번호 생성
	            fGetCncrHistNo();
	            cncrno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
            	if(cncrno.lastIndexOf("-") > 4){
	                model.makeValue(savePath+"/cncrhistno"  , cncrno.substring(cncrno.lastIndexOf("-")+1, cncrno.length));
	                model.makeValue(savePath+"/cncrno"      , cncrno.substring(0,4)+cncrno.substring(5,9));
	                model.makeValue(savePath+"/flag","1");
              	}else{
	                model.makeValue(savePath+"/cncrhistno", "");
	                pCncrNo =  cncrno.substring(0,4)+cncrno.substring(5,9);
	                model.makeValue(savePath+"/cncrno", pCncrNo);
              	}
            }else if(Msg3=="6"){
                model.makeValue(savePath+"/flag","3");
            }else{
                return;
            }
        }else{
    		cncrno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
    		if(cncrno.lastIndexOf("-") > 4){
                model.makeValue(savePath+"/cncrhistno"  , cncrno.substring(cncrno.lastIndexOf("-")+1, cncrno.length));
                model.makeValue(savePath+"/cncrno"      , cncrno.substring(0,4)+cncrno.substring(5,9));
                model.makeValue(savePath+"/flag","1");
      		}else{
                model.makeValue(savePath+"/cncrhistno", "");
                pCncrNo =  cncrno.substring(0,4)+cncrno.substring(5,9);
                model.makeValue(savePath+"/cncrno", pCncrNo);
      		}
        }
    }
    
    if(getNodesetCnt(model,"/root/main/humaninfo/outpatinfo/patlist")>0){
        copyNodeset("/root/cncrinfo/humaninfo/outpatinfo/patlist","/root/main/humaninfo/outpatinfo/patlist");
    }
    if(getNodesetCnt(model,"/root/main/humaninfo/inpatinfo/patlist")>0){
        copyNodeset("/root/cncrinfo/humaninfo/inpatinfo/patlist","/root/main/humaninfo/inpatinfo/patlist");
    }
    
    if(submit("TXMRD00101")){
        messageBox("저장이", "I002");
    }else{
        messageBox("저장을", "E009");
    }

    if(model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn") == "Y"){
        fGetCncrHistNo();
    }
  	
  	model.removeNodeset("/root/send/savedata");
    if(getNodesetCnt(model,"/root/cncrinfo/humaninfo/outpatinfo/patlist")>0){
        copyNodeset("/root/main/humaninfo/outpatinfo/patlist","/root/cncrinfo/humaninfo/outpatinfo/patlist");
        model.removeNodeset("/root/cncrinfo/humaninfo/outpatinfo/patlist");
    }
    if(getNodesetCnt(model,"/root/cncrinfo/humaninfo/inpatinfo/patlist")>0){
        copyNodeset("/root/main/humaninfo/inpatinfo/patlist","/root/cncrinfo/humaninfo/inpatinfo/patlist");
        model.removeNodeset("/root/cncrinfo/humaninfo/inpatinfo/patlist");
    }

    model.resetInstanceNode("/root/main/cncrpatrgst/dethinfo");
    model.resetInstanceNode("/root/main/cncrpatrgst/diaginfo");
    model.resetInstanceNode("/root/main/cncrpatrgst/rerntmetstaspart");
    model.resetInstanceNode("/root/main/cncrpatrgst/cureinfo");
    model.setValue("/root/main/cncrpatrgst/regstatus/sickstat","");
    model.setValue("/root/main/cncrpatrgst/regstatus/cureopendd","");
    model.setValue("/root/main/cncrpatrgst/regstatus/flag","");
 	
 	model.refresh();
}
/**
 * @desc   : 내원전 치료
 * @param  :
 * @return : void
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fSetBFIOCure(){
    var saveBFPath = "/root/send/savedata";
    parameter = "i";
    model.makeValue(saveBFPath+"/savebfio", grd_bfiocure.getUpdateDataAll(parameter));
}
/**
 * @desc   : 본원치료 방법(원발부위치료방법)
 * @param  :
 * @return : void
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fSetPrmyPartCure(){
    var savePrmyPath = "/root/send/savedata";
    parameter = "i";
    model.makeValue(savePrmyPath+"/saveprmypart", grd_prmypart.getUpdateDataAll(parameter));
}
/**
 * @desc   : 본원치료 방법(전위부위치료방법)
 * @param  :
 * @return : void
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fSetMetstasPartCure(){
    var saveMetstasPath = "/root/send/savedata";
    parameter = "i";
    model.makeValue(saveMetstasPath+"/savemetstaspart", grd_metstaspart.getUpdateDataAll(parameter));
}
/**
 * @desc   : 암등록번호 생성
 * @param  :
 * @return : void
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fGetCncrNo(){
    if((model.getValue("/root/main/cncrpatrgst/regstatus/flag") == "1")||
    			model.getValue("/root/main/cncrpatrgst/regstatus/flag")==""){
            model.makeValue("/root/send/reqdata/flag", model.getValue("/root/main/cncrpatrgst/regstatus/flag"));
            if(model.getValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd") == ""){
                model.makeValue("/root/send/reqdata/dschdd", model.getValue("/root/main/pathumtrainfo/cncrpatinfo/orddd"));
            }else{
                model.makeValue("/root/send/reqdata/dschdd", model.getValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd"));
            }
            submit("TRMRD00103");
            
        	var cncrno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
            cncrno = cncrno.substring(0, 4) + "-" + cncrno.substring(4, cncrno.length);
            
            model.setValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno", cncrno);
            ipt_cncrno.refresh();
            model.removeNodeset("/root/send/reqdata");
            
            var prmycncryn = model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn");
            if ( prmycncryn == "Y" )		//다발성원발암여부가 Y일 경우 히스토리 번호로 다시 채번
            	 fGetCncrHistNo();            
            
            
    }/*else if(model.getValue("/root/main/cncrpatrgst/regstatus/flag") == "3"){

            model.makeValue("/root/send/reqdata/prmycncryn", model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn"));
            model.makeValue("/root/send/reqdata/flag"       ,model.getValue("/root/main/cncrpatrgst/regstatus/flag"));
            var iRow = grd_cncrhist.row - grd_cncrhist.fixedRows + 1
            var histno = model.getValue("/root/main/humaninfo/cncrhist/histlist["+1+"]/cncr_histno");
            histno = histno.substring(0, 4) +  histno.substring(5,histno.length);
            if(histno.lastIndexOf("-") > 0){
                model.makeValue("/root/send/reqdata/cncrno", histno);
            } else {
                model.makeValue("/root/send/reqdata/cncrno", histno);
            }
            submit("TRMRD00103");
                if(model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn") == "Y"){
                    var cncrno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
                    cncrno = cncrno.substring(0, 4) + "-" + cncrno.substring(4, cncrno.length);
                    model.setValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno", cncrno);
                    model.removeNodeset("/root/send/reqdata");
                    model.refresh();
                }else if(model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn") == "N"){
                    var cncrno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
                    cncrno = cncrno.substring(0, 4) + "-" + cncrno.substring(4,8);
                    model.setValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno", cncrno);
                    model.removeNodeset("/root/send/reqdata");
                    model.refresh();
               }

       }*/
}
/**
 * @desc   : 암등록이력번호 생성(다발성 원발암)
 * @param  :
 * @return : v0oid
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fGetCncrHistNo(){

    if(model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn") == "Y"){
        model.makeValue("/root/send/reqdata/prmycncryn", model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn"));
        model.makeValue("/root/send/reqdata/flag"       ,model.getValue("/root/main/cncrpatrgst/regstatus/flag"));
        var histno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
        histno = histno.substring(0, 4) + histno.substring(5,9);
        if(histno.lastIndexOf("-") > 0){

            model.makeValue("/root/send/reqdata/cncrno", histno);
        } else {
            model.makeValue("/root/send/reqdata/cncrno", histno);
        }

        	submit("TRMRD00103");        	

    } else if(model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn") == "N"){
        var Flag = model.getValue("/root/main/cncrpatrgst/regstatus/flag");
        var sCncrNo =model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno")
        CncrNo = sCncrNo.substring(0, 4) + sCncrNo.substring(5,9);
        if(Flag!="1"){
            model.makeValue("/root/send/reqdata/prmycncryn" ,model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn"));
            model.makeValue("/root/send/reqdata/cncrno"     ,CncrNo);
            model.makeValue("/root/send/reqdata/flag"       ,model.getValue("/root/main/cncrpatrgst/regstatus/flag"));
                if(model.getValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd") == ""){
                    model.makeValue("/root/send/reqdata/dschdd", model.getValue("/root/main/pathumtrainfo/cncrpatinfo/orddd"));
                }else{
                    model.makeValue("/root/send/reqdata/dschdd", model.getValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd"));
                }
        }else if(Flag=="1"){
            model.makeValue("/root/send/reqdata/prmycncryn" ,model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn"));
            model.makeValue("/root/send/reqdata/cncrno"     ,model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno"));
            model.makeValue("/root/send/reqdata/flag"       ,model.getValue("/root/main/cncrpatrgst/regstatus/flag"));
                if(model.getValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd") == ""){
                    model.makeValue("/root/send/reqdata/dschdd", model.getValue("/root/main/pathumtrainfo/cncrpatinfo/orddd"));
                }else{
                    model.makeValue("/root/send/reqdata/dschdd", model.getValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd"));
                }
        }

        	submit("TRMRD00103");        	

    }
    if(model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn") == "Y"){
        var cncrno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
        cncrno = cncrno.substring(0, 4) + "-" + cncrno.substring(4, cncrno.length);
        model.setValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno", cncrno);
        model.removeNodeset("/root/send/reqdata");
        model.refresh();
    }else if(model.getValue("/root/main/cncrpatrgst/regstatus/prmycncryn") == "N"){
        if(Flag!="1"){
            var cncrno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
            cncrno = cncrno.substring(0, 4) + "-" + cncrno.substring(4,8);
            model.setValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno", cncrno);
            model.removeNodeset("/root/send/reqdata");
            model.refresh();
        }else if(Flag=="1"){
            var cncrno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
            cncrno = cncrno.substring(0, 4) + "-" + cncrno.substring(4, cncrno.length);
            model.setValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno", cncrno);
            model.removeNodeset("/root/send/reqdata");
            model.refresh();
        }
    }

}
/**
 * @desc   : Regimen1코드에 맞는 Regimen2 조회
 * @param  :
 * @return : v0oid
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fGetRegimenDet(code){

        switch(code){

            case "01":
                zbcfGetCodeList(new Array("M0396"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0396");
                break;
            case "02":
                zbcfGetCodeList(new Array("M0397"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0397");
                break;
            case "03":
                zbcfGetCodeList(new Array("M0398"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0398");
                break;
            case "04":
                zbcfGetCodeList(new Array("M0399"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0399");
                break;
            case "05":
                zbcfGetCodeList(new Array("M0400"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0400");
                break;
            case "06":
                zbcfGetCodeList(new Array("M0401"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0401");
                break;
            case "07":
                zbcfGetCodeList(new Array("M0402"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0402");
                break;
            case "08":
                zbcfGetCodeList(new Array("M0403"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0403");
                break;
            case "09":
                zbcfGetCodeList(new Array("M0404"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0404");
                break;
            case "10":
                zbcfGetCodeList(new Array("M0405"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0405");
                break;
            case "11":
                zbcfGetCodeList(new Array("M0406"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0406");
                break;
            case "12":
                zbcfGetCodeList(new Array("M0407"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0407");
                break;
            case "13":
                zbcfGetCodeList(new Array("M0408"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0408");
                break;
            case "14":
                zbcfGetCodeList(new Array("M0409"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0409");
                break;
            case "15":
                zbcfGetCodeList(new Array("M0410"), new Array("/root/temp/com/common/regimenlist"));
                copyNodeset("/root/hidden/cncrpatrgst/rerntmetstaspart/regimen2", "/root/temp/com/common/regimenlist/M0410");
                break;
    }
    model.removeNodeset("/root/temp/com/common/regimenlist");
    model.makeNode("/root/temp/com/common/regimenlist");
    model.refresh();

}

function fgetEpoch(){
    var l_value = model.getValue("/root/main/pathumtrainfo/cncrpatinfo/rrgstno2");
    var flag = l_value.substring(0, 1);
    if((flag == "1")||(flag == "2")||(flag == "5")||(flag == "6")){
        model.makeValue("/root/main/pathumtrainfo/cncrpatinfo/epoch", "19");
    }else if((flag == "3")||(flag == "4")||(flag == "7")||(flag == "8")){
        model.makeValue("/root/main/pathumtrainfo/cncrpatinfo/epoch", "20");
    }
    model.refresh();
}

function fSetCode(resref, ref){
    model.makeValue(resref, model.getValue(ref));
    model.refresh();
}
/**
 * @desc   : 암환자 통계조회에서 더블클릭시 암등록 탭과 연계
 * @param  :
 * @return : void
 * @authur : 2007. 5. 15 수정 이창록 2008-12-16
 * @---------------------------------------------------
 */
function fChngCncrRgst(iRow){
    var cncr_histno = model.getValue("/root/main/cncrpatlist/list["+ iRow + "]/cncr_histno");
    var pat_pid = model.getValue("/root/main/cncrpatlist/list["+ iRow + "]/pid");
    var i = 0;
    btn_cncrrgst.dispatch("onclick");
    model.removeNodeset("/root/main/humaninfo/cncrhist/histlist");
    model.makeValue("/root/main/pathumtrainfo/cncrpatinfo/pid", "");
    model.makeValue("/root/main/pathumtrainfo/cncrpatinfo/pnm", "");
    model.makeValue("/root/main/pathumtrainfo/cncrpatinfo/pid", pat_pid);
    /*var pid = model.getValue("/root/main/pathumtrainfo/cncrpatinfo/pid");
    var patnm = model.getValue("/root/main/pathumtrainfo/cncrpatinfo/pnm");
    if((pid =="")&&(patnm !="")){
        fPatSrch(patnm, "2");
    } else if((pid !="")&&(patnm == "")){
        fPatSrch(pid, "1");
    }*/
    chk_cretchknum.value = "false";
    fGetPatinfo();
    var iRow_hist = grd_cncrhist.findRow(cncr_histno, 1, grd_cncrhist.colRef("cncr_histno"));
    grd_cncrhist.row = iRow_hist;
    fDisplay(iRow_hist);
}
/**
 * @desc   : 버튼 disabled
 * @param  :
 * @return : void
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fBtnSetting(bool){
        ipt_cureopendd.disabled = bool;
        cmb_dethplce.disabled = bool;
        ipt_dethdd.disabled = bool;
        ipt_dethcascd.disabled = bool;
        ipt_yearcnt.disabled = bool;
        ipt_monthcnt.disabled = bool;
        ipt_rerntmetstaspartcd1.disabled = bool;
        ipt_rerntmetstaspart1.disabled = bool;
        ipt_rerntmetstaspartcd2.disabled = bool;
        ipt_rerntmetstaspart2.disabled = bool;
        ipt_rerntmetstaspartcd3.disabled = bool;
        ipt_rerntmetstaspart3.disabled = bool;
        ipt_rerntmetstaspartcd4.disabled = bool;
        ipt_rerntmetstaspart4.disabled = bool;
        ipt_ecogcd.disabled = bool;
        cmb_ecog.disabled = bool;
        ipt_regimencd1.disabled = bool;
        cmb_regimen1.disabled = bool;
        ipt_regimencd2.disabled = bool;
        cmb_regimen2.disabled = bool;
        //grd_bfiocure
        //grd_prmypart
        //grd_metstaspart

    if(model.getValue("/root/main/cncrpatrgst/regstatus/flag") == "2"){
        ipt_cncrno.disabled = !bool;
        cmb_prmycncryn.disabled = !bool;
        cmb_sickstat.disabled = !bool;
        ipt_diagdd.disabled = !bool;
        cmb_diaghospinfo.disabled = !bool;
        ipt_diagdrid.disabled = !bool;
        cmb_lastdiagmthd.disabled = !bool;
        chk_clin.disabled = !bool;
        ipt_clin.disabled = !bool;
        ipt_tophcd.disabled = !bool;
        ipt_tophinfo.disabled = !bool;
        ipt_morphcd1.disabled = !bool;
        ipt_morphinfo1.disabled = !bool;
        ipt_morphcd2.disabled = !bool;
        ipt_morphinfo2.disabled = !bool;
        ipt_icd10cd.disabled = !bool;
        ipt_icd10nm.disabled = !bool;
        ipt_difrntgrdecd.disabled = !bool;
        cmb_difrntgrde.disabled = !bool;
        ipt_seercd.disabled = !bool;
        cmb_seer.disabled = !bool;
        ipt_tcd.disabled = !bool;
        cmb_t.disabled = !bool;
        ipt_ncd.disabled = !bool;
        cmb_n.disabled = !bool;
        ipt_mcd.disabled = !bool;
        cmb_m.disabled = !bool;
        ipt_stagcd.disabled = !bool;
        cmb_staging.disabled = !bool;
        ipt_etcstagflagcd.disabled = !bool;
        cmb_etcstagflag.disabled = !bool;
        ipt_etcstagcnts.disabled = !bool;
    } else {
        ipt_cncrno.disabled = bool;
        cmb_prmycncryn.disabled = bool;
        cmb_sickstat.disabled = bool;
        ipt_diagdd.disabled = bool;
        cmb_diaghospinfo.disabled = bool;
        ipt_diagdrid.disabled = bool;
        cmb_lastdiagmthd.disabled = bool;
        chk_clin.disabled = bool;
        ipt_clin.disabled = bool;
        ipt_tophcd.disabled = bool;
        ipt_tophinfo.disabled = bool;
        ipt_morphcd1.disabled = bool;
        ipt_morphinfo1.disabled = bool;
        ipt_morphcd2.disabled = bool;
        ipt_morphinfo2.disabled = bool;
        ipt_icd10cd.disabled = bool;
        ipt_icd10nm.disabled = bool;
        ipt_difrntgrdecd.disabled = bool;
        cmb_difrntgrde.disabled = bool;
        ipt_seercd.disabled = bool;
        cmb_seer.disabled = bool;
        ipt_tcd.disabled = bool;
        cmb_t.disabled = bool;
        ipt_ncd.disabled = bool;
        cmb_n.disabled = bool;
        ipt_mcd.disabled = bool;
        cmb_m.disabled = bool;
        ipt_stagcd.disabled = bool;
        cmb_staging.disabled = bool;
        ipt_etcstagflagcd.disabled = bool;
        cmb_etcstagflag.disabled = bool;
        ipt_etcstagcnts.disabled = bool;
    }
}
/**
 * @desc   : 암등록번호삭제
 * @param  :
 * @return : void
 * @authur : 2007. 5. 15
 * @---------------------------------------------------
 */
function fDelCncrInfo(){

    //=================================================
    // 암센터, 의료정보 체크(20090213)
    // cncryn : 'Y'는 암센터, 'N'는 의료정보를 의미
    var instcd = getUserInfo("dutplceinstcd");
    var dutplcecd = getUserInfo("dutplcecd");
    var dschdd = model.getValue("/root/main/pathumtrainfo/cncrpatinfo/dschdd");

    /*
    if (instcd == "012" && dutplcecd == "6050000000")
    {
        if (dschdd < "20090101")
        {
            messageBox("2009년 1월 1일 이전 퇴원환자 데이터는 의료정보팀에서만 삭제가 가능합니다.", "I999" );
            return;
        }
    }
    else if (instcd == "012" && dutplcecd != "6050000000")
    {
        if (dschdd >= "20090101")
        {
            messageBox("2009년 1월 1일 이후 퇴원환자 데이터는 암센터에서만 삭제가 가능합니다.", "I999" );
            return;
        }
    }
    */
    //===============================================

    var cncr_histno = model.getValue("/root/main/cncrpatrgst/regstatus/cncrnoinfo/cncrno");
    sCncrNo = cncr_histno.substring (0, 4) + cncr_histno.substring(5, cncr_histno.length);
    var cncrArry = cncr_histno.split("-");
    if(cncr_histno.lastIndexOf("-") > 4){
        var cncrno = cncr_histno.substring(0,4)+cncr_histno.substring(5,9);
        var histno = cncr_histno.substring(cncr_histno.lastIndexOf("-")+1, cncr_histno.length);
    } else {
        var cncrno = sCncrNo;
        var histno = "00";
    }
    model.makeValue("/root/send/reqdata/cncrno", cncrno);
    model.makeValue("/root/send/reqdata/cncrhistno", histno);
    model.makeValue("/root/send/reqdata/seqno", model.getValue("/root/main/cncrpatrgst/regstatus/seqno"));
    model.makeValue("/root/send/reqdata/pid", model.getValue("/root/main/pathumtrainfo/cncrpatinfo/pid"));
    model.makeValue("/root/send/reqdata/lastupdtrid", getUserInfo("userid"));
    if(getNodesetCnt(model,"/root/main/humaninfo/outpatinfo/patlist")>0){
        copyNodeset("/root/cncrinfo/humaninfo/outpatinfo/patlist","/root/main/humaninfo/outpatinfo/patlist");
    }
    if(getNodesetCnt(model,"/root/main/humaninfo/inpatinfo/patlist")>0){
        copyNodeset("/root/cncrinfo/humaninfo/inpatinfo/patlist","/root/main/humaninfo/inpatinfo/patlist");
    }
    submit("TXMRD00102");
    model.removeNodeset("/root/send/reqdata");
    if(getNodesetCnt(model,"/root/cncrinfo/humaninfo/outpatinfo/patlist")>0){
        copyNodeset("/root/main/humaninfo/outpatinfo/patlist","/root/cncrinfo/humaninfo/outpatinfo/patlist");
        model.removeNodeset("/root/cncrinfo/humaninfo/outpatinfo/patlist");
    }
    if(getNodesetCnt(model,"/root/cncrinfo/humaninfo/inpatinfo/patlist")>0){
        copyNodeset("/root/main/humaninfo/inpatinfo/patlist","/root/cncrinfo/humaninfo/inpatinfo/patlist");
        model.removeNodeset("/root/cncrinfo/humaninfo/inpatinfo/patlist");
    }
     copyNodeset("/root/main/cncrpatrgst", "/root/init/cncrpatrgst");
    model.refresh();
}
/**
 * @desc   : 초기화버튼 클릭시
 * @param  : Ref
           : RsltRef
 * @return : void
 * @authur : 2007.12.10 나종천
 * @ 기타  : 수정 이창록 2008/07/11
 * @---------------------------------------------------
 */
function fReSetNode(flag){
    if(flag == "A"){
        copyNodeset("/root/main/pathumtrainfo", "/root/init/pathumtrainfo");
        copyNodeset("/root/main/cncrpatrgst"	, "/root/init/cncrpatrgst");
        copyNodeset("/root/main/humaninfo/cncrhist/histlist", "/root/init/humaninfo/cncrhist/histlist");
        copyNodeset("/root/main/humaninfo/doainfo/list", "/root/init/humaninfo/doainfo/list");
        model.removeNodeset("/root/main/common/out/outdeptlist");
        model.removeNodeset("/root/main/common/dsch/dschdeptlist");
        model.removeNodeset("/root/main/common/in/indeptlist");
        model.removeNodeset("/root/hidden/pathumtrainfo/cncrpatinfo");
        cmb_dethplce.disabled   = false;
        ipt_dethdd.disabled     = false;
        ipt_dethcascd.disabled  = false;
        ipt_yearcnt.disabled    = false;
        ipt_monthcnt.disabled   = false;
        fBtnSetting(false);
    } else if(flag == "P"){
        copyNodeset("/root/main/cncrpatrgst", "/root/init/cncrpatrgst");
    }
   // model.refresh();
}

function fSrchCncrPatRgst(){
    model.makeValue("/root/send/reqdata/ordtype", model.getValue("/root/main/srchcncrpat/ordtype"));
    model.makeValue("/root/send/reqdata/fromdd", model.getValue("/root/main/srchcncrpat/fromdd"));
    model.makeValue("/root/send/reqdata/todd", model.getValue("/root/main/srchcncrpat/todd"));
    model.makeValue("/root/send/reqdata/orddeptcd", model.getValue("/root/main/srchcncrpat/deptinfo"));
    model.makeValue("/root/send/reqdata/orddrid", model.getValue("/root/main/srchcncrpat/drinfo"));
    model.makeValue("/root/send/reqdata/srchflag", model.getValue("/root/main/srchcncrpat/srchflag"));


    //================================================
    // 암센터, 의료정보 체크(20090213)
    // cncryn : 'Y'는 암센터, 'N'는 의료정보를 의미
    /*
    var instcd = getUserInfo("dutplceinstcd");
    var dutplcecd = getUserInfo("dutplcecd");

    //alert(instcd + "|||||||||||" + dutplcecd);

    if (instcd == "012" && dutplcecd == "6050000000")
    {
        // 암센터 여부
        var cncryn = "Y";
    }
    else
    {
        var cncryn = "N";

    }
    */
    //================================================

    model.makeValue("/root/send/reqdata/cncryn", cncryn);
    model.makeValue("/root/send/reqdata/dethyn", model.getValue("/root/main/srchcncrpat/dethyn"));
    model.makeValue("/root/send/reqdata/dschfromdd", model.getValue("/root/main/srchcncrpat/dschfromdd"));
    model.makeValue("/root/send/reqdata/dschtodd", model.getValue("/root/main/srchcncrpat/dschtodd"));

    submit("TRMRD00106");
    model.removeNodeset("/root/send/reqdata");
}
/**
 * @desc   : 암등록환자 조회리스트 더블 클릭시 암등록 화면 탭과 연계
 * @param  : Ref
 * @return : void
 * @authur : 2007.12.10 나종천
 * @ 기타  : 수정 이창록 2008-12-16
 * @---------------------------------------------------
 */
function fCncrRgstlist(iRow){
    var cncr_histno = model.getValue("/root/main/cncrrgstpatlist/list["+ iRow + "]/cncr_histno");
    var pat_pid 	= model.getValue("/root/main/cncrrgstpatlist/list["+ iRow + "]/pid");
    var pat_ordtype = model.getValue("/root/main/cncrrgstpatlist/list["+iRow+"]/ordtype");
    var i = 0;
    btn_cncrrgst.dispatch("onclick");
    model.removeNodeset("/root/main/humaninfo/cncrhist/histlist");
    model.makeValue("/root/main/pathumtrainfo/cncrpatinfo/pid", "");
    model.makeValue("/root/main/pathumtrainfo/cncrpatinfo/pnm", "");
    model.makeValue("/root/main/pathumtrainfo/cncrpatinfo/pid", pat_pid);
    
    //2008-12-16 이창록 수정
    /*var pid = model.getValue("/root/main/pathumtrainfo/cncrpatinfo/pid");
    var patnm = model.getValue("/root/main/pathumtrainfo/cncrpatinfo/pnm");
    if((pid =="")&&(patnm !="")){
        fPatSrch(patnm, "2");
    } else if((pid !="")&&(patnm == "")){
        fPatSrch(pid, "1");
    }*/
	chk_cretchknum.value = "false";//2008-12-16 이창록 수정

    
	//fGetPatinfo();
	//==========================================	
	// 암센터, 의료정보 체크(20090213)
	var ordtype = model.getValue("/root/main/cncrrgstpatlist/list[" + iRow + "]/ordtype");
	var searchdd = model.getValue("/root/main/cncrrgstpatlist/list[" + iRow + "]/dschdd");
    
    if (ordtype == "O")
    {
        searchdd = searchdd + model.getValue("/root/main/cncrrgstpatlist/list[" + iRow + "]/cretno");
    }	
	
	// searchdd는 입원일때는 퇴원일자, 외래일때는 진료일자를 넘김
    fGetPatinfo("Y", ordtype, searchdd);
    //==========================================	
    
    //var indx = cmb_dschdd.selectedIndex + 1;
	//fPutPatInfo(indx, "/root/main/humaninfo/inpatinfo/patlist", "I");
    
    if(model.getValue("/root/main/srchcncrpat/srchflag") == "2"){
        var iRow_hist = grd_cncrhist.findRow(cncr_histno, 1, grd_cncrhist.colRef("cncr_histno"));
        grd_cncrhist.row = iRow_hist;
        fDisplay(iRow_hist);
    }
}

/**
 * @desc   : (암등록환자조회)조회옵션에서 대상제외자료인 것은 저장
 * @param  :
 * @return : void
 * @authur :
 * @ 기타  :
 * @---------------------------------------------------
 */
function fSaveDataExpt(){
    var iRow = grd_cncrrgstlist.row - grd_cncrrgstlist.fixedRows + 1;

    model.resetInstanceNode("/root/send/reqdata/exptlist");
    model.makeValue("/root/send/reqdata/exptlist", grd_cncrrgstlist.getUpdateData());
    model.makeValue("/root/send/reqdata/ordtype", model.getValue("/root/main/srchcncrpat/ordtype"));
    model.makeValue("/root/send/reqdata/fromdd", model.getValue("/root/main/srchcncrpat/fromdd"));
    model.makeValue("/root/send/reqdata/todd", model.getValue("/root/main/srchcncrpat/todd"));
    model.makeValue("/root/send/reqdata/orddeptcd", model.getValue("/root/main/srchcncrpat/deptinfo"));
    model.makeValue("/root/send/reqdata/orddrid", model.getValue("/root/main/srchcncrpat/drinfo"));
    model.makeValue("/root/send/reqdata/srchflag", model.getValue("/root/main/srchcncrpat/srchflag"));

    //================================================
    // 암센터, 의료정보 체크(20090213)
    // cncryn : 'Y'는 암센터, 'N'는 의료정보를 의미
    /*
    var instcd = getUserInfo("dutplceinstcd");
    var dutplcecd = getUserInfo("dutplcecd");

    //alert(instcd + "|||||||||||" + dutplcecd);

    if (instcd == "012" && dutplcecd == "6050000000")
    {
        // 암센터 여부
        var cncryn = "Y";
    }
    else
    {
        var cncryn = "N";

    }
    */
    //================================================

    model.makeValue("/root/send/reqdata/cncryn", cncryn);

    submit("TXMRD00103");
}

/**
 * @desc   : 원격전위여부 Tophology 코드조회
 * @param  :
 * @return : void
 * @authur :
 * @ 기타  : 추가 이창록 2008/12/06
 * @---------------------------------------------------
 */
function fSrchRernmspCd(flag,code){
        var ordtype =  model.getValue("/root/main/pathumtrainfo/cncrpatinfo/ordtype");
        var dschdd  =  model.getValue( "/root/main/pathumtrainfo/cncrpatinfo/dschdd");
    	var orddd   =  model.getValue( "/root/main/pathumtrainfo/cncrpatinfo/orddd");
        clearParameter("SPMRT01700_SEARCHDATA");
        clearParameter("SPMRT01700_FLAG");
        clearParameter("stndd");
        model.removeNodeset("/root/temp/terminfo");
        if(ordtype=="I"){
            setParameter("stndd",dschdd);
        }else if(ordtype=="O"){
      	    setParameter("stndd",orddd);
        }
			if(flag == "1"){
		        setParameter("SPMRT01700_SEARCHDATA", code);
		        setParameter("SPMRT01700_FLAG", "1");
		        modal("SPMRT01700");
		        if(getParameter("SPMRT01700_FLAG") == ""){
		            return;
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==1){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm1", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==2){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm1", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2" , model.getValue("/root/temp/terminfo/tplinfo[2]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm2", model.getValue("/root/temp/terminfo/tplinfo[2]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"	 , model.getValue("/root/temp/terminfo/tplinfo[2]/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==3){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm1", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2" , model.getValue("/root/temp/terminfo/tplinfo[2]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm2", model.getValue("/root/temp/terminfo/tplinfo[2]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"	 , model.getValue("/root/temp/terminfo/tplinfo[2]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd3" , model.getValue("/root/temp/terminfo/tplinfo[3]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm3", model.getValue("/root/temp/terminfo/tplinfo[3]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart3"	 , model.getValue("/root/temp/terminfo/tplinfo[3]/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==4){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm1", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2" , model.getValue("/root/temp/terminfo/tplinfo[2]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm2", model.getValue("/root/temp/terminfo/tplinfo[2]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"	 , model.getValue("/root/temp/terminfo/tplinfo[2]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd3" , model.getValue("/root/temp/terminfo/tplinfo[3]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm3", model.getValue("/root/temp/terminfo/tplinfo[3]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart3"	 , model.getValue("/root/temp/terminfo/tplinfo[3]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd4" , model.getValue("/root/temp/terminfo/tplinfo[4]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm4", model.getValue("/root/temp/terminfo/tplinfo[4]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart4"	 , model.getValue("/root/temp/terminfo/tplinfo[4]/seqno"));
		        }
		  	}else if(flag =="2"){
		  			setParameter("SPMRT01700_SEARCHDATA", code);
		        setParameter("SPMRT01700_FLAG", "1");
		        modal("SPMRT01700");
		        if(getParameter("SPMRT01700_FLAG") == ""){
		            return;
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==1){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm2", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==2){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm1", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2" , model.getValue("/root/temp/terminfo/tplinfo[2]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm2", model.getValue("/root/temp/terminfo/tplinfo[2]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"	 , model.getValue("/root/temp/terminfo/tplinfo[2]/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==3){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm1", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2" , model.getValue("/root/temp/terminfo/tplinfo[2]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm2", model.getValue("/root/temp/terminfo/tplinfo[2]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"	 , model.getValue("/root/temp/terminfo/tplinfo[2]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd3" , model.getValue("/root/temp/terminfo/tplinfo[3]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm3", model.getValue("/root/temp/terminfo/tplinfo[3]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart3"	 , model.getValue("/root/temp/terminfo/tplinfo[3]/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==4){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm1", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2" , model.getValue("/root/temp/terminfo/tplinfo[2]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm2", model.getValue("/root/temp/terminfo/tplinfo[2]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"	 , model.getValue("/root/temp/terminfo/tplinfo[2]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd3" , model.getValue("/root/temp/terminfo/tplinfo[3]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm3", model.getValue("/root/temp/terminfo/tplinfo[3]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart3"	 , model.getValue("/root/temp/terminfo/tplinfo[3]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd4" , model.getValue("/root/temp/terminfo/tplinfo[4]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm4", model.getValue("/root/temp/terminfo/tplinfo[4]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart4"	 , model.getValue("/root/temp/terminfo/tplinfo[4]/seqno"));
		        }
		  	}else if(flag =="3"){
		  		  setParameter("SPMRT01700_SEARCHDATA", code);
		        setParameter("SPMRT01700_FLAG", "1");
		        modal("SPMRT01700");
		        if(getParameter("SPMRT01700_FLAG") == ""){
		            return;
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==1){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd3" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm3", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart3"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==2){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm1", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2" , model.getValue("/root/temp/terminfo/tplinfo[2]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm2", model.getValue("/root/temp/terminfo/tplinfo[2]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"	 , model.getValue("/root/temp/terminfo/tplinfo[2]/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==3){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm1", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2" , model.getValue("/root/temp/terminfo/tplinfo[2]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm2", model.getValue("/root/temp/terminfo/tplinfo[2]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"	 , model.getValue("/root/temp/terminfo/tplinfo[2]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd3" , model.getValue("/root/temp/terminfo/tplinfo[3]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm3", model.getValue("/root/temp/terminfo/tplinfo[3]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart3"	 , model.getValue("/root/temp/terminfo/tplinfo[3]/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==4){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm1", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2" , model.getValue("/root/temp/terminfo/tplinfo[2]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm2", model.getValue("/root/temp/terminfo/tplinfo[2]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"	 , model.getValue("/root/temp/terminfo/tplinfo[2]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd3" , model.getValue("/root/temp/terminfo/tplinfo[3]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm3", model.getValue("/root/temp/terminfo/tplinfo[3]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart3"	 , model.getValue("/root/temp/terminfo/tplinfo[3]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd4" , model.getValue("/root/temp/terminfo/tplinfo[4]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm4", model.getValue("/root/temp/terminfo/tplinfo[4]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart4"	 , model.getValue("/root/temp/terminfo/tplinfo[4]/seqno"));
		        }
		  	}else if(flag =="4"){
		  		 setParameter("SPMRT01700_SEARCHDATA", code);
		        setParameter("SPMRT01700_FLAG", "1");
		        modal("SPMRT01700");
		        if(getParameter("SPMRT01700_FLAG") == ""){
		            return;
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==1){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd4" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm4", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart4"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==2){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm1", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2" , model.getValue("/root/temp/terminfo/tplinfo[2]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm2", model.getValue("/root/temp/terminfo/tplinfo[2]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"	 , model.getValue("/root/temp/terminfo/tplinfo[2]/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==3){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm1", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2" , model.getValue("/root/temp/terminfo/tplinfo[2]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm2", model.getValue("/root/temp/terminfo/tplinfo[2]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"	 , model.getValue("/root/temp/terminfo/tplinfo[2]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd3" , model.getValue("/root/temp/terminfo/tplinfo[3]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm3", model.getValue("/root/temp/terminfo/tplinfo[3]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart3"	 , model.getValue("/root/temp/terminfo/tplinfo[3]/seqno"));
		        }
		        if(getNodesetCnt(model,"/root/temp/terminfo/tplinfo")==4){
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd1" , model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm1", model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart1"	 , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd2" , model.getValue("/root/temp/terminfo/tplinfo[2]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm2", model.getValue("/root/temp/terminfo/tplinfo[2]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart2"	 , model.getValue("/root/temp/terminfo/tplinfo[2]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd3" , model.getValue("/root/temp/terminfo/tplinfo[3]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm3", model.getValue("/root/temp/terminfo/tplinfo[3]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart3"	 , model.getValue("/root/temp/terminfo/tplinfo[3]/seqno"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartcd4" , model.getValue("/root/temp/terminfo/tplinfo[4]/tophlgcd"));
		            model.setValue( "/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspartnm4", model.getValue("/root/temp/terminfo/tplinfo[4]/engnm"));
		            model.setValue("/root/main/cncrpatrgst/rerntmetstaspart/rerntmetstaspart4"	 , model.getValue("/root/temp/terminfo/tplinfo[4]/seqno"));
		        }
		  	}
		  	model.refresh();
}
/**
 * @desc   : 암환자통계 관리에서 코드 조회조건 팝업과 연계
 * @param  :
 * @return : void
 * @authur : 추가 이창록 2009-01-09
 * @ 기타  :
 * @---------------------------------------------------
 */

function fStsSrchTerm(flag, code, ref, resref, nmref)
{
		clearParameter("SPMRT01700_SEARCHDATA");
    clearParameter("SPMRT01700_FLAG");
    model.removeNodeset("/root/temp/terminfo");
			if(flag =="toph"){
				setParameter("SPMRT01700_SEARCHDATA", code);
			  setParameter("SPMRT01700_FLAG", "1");
			  modal("SPMRT01700");
			  if(getParameter("SPMRT01700_FLAG") == ""){
			  	return;
				}
			  model.setValue(ref 		, model.getValue("/root/temp/terminfo/tplinfo[1]/tophlgcd"));
	      model.setValue(nmref	, model.getValue("/root/temp/terminfo/tplinfo[1]/engnm"));
	      model.setValue(resref , model.getValue("/root/temp/terminfo/tplinfo[1]/seqno"));
			}else if(flag =="morph1"){
				setParameter("SPMRT01700_SEARCHDATA", code);
			  setParameter("SPMRT01700_FLAG", "2");
			  modal("SPMRT01700");
				if(getParameter("SPMRT01700_FLAG") == ""){
			     return;
			  }
				model.setValue(ref 		, model.getValue("/root/temp/terminfo/icdo3info[1]/diagcd"));
	      model.setValue(nmref	, model.getValue("/root/temp/terminfo/icdo3info[1]/diagengnm"));
	      model.setValue(resref , model.getValue("/root/temp/terminfo/icdo3info[1]/seqno"));
			}else if(flag =="icd10"){
				setParameter("SPMRT01700_SEARCHDATA", code);
			  setParameter("SPMRT01700_FLAG", "3");
			  modal("SPMRT01700");
				if(getParameter("SPMRT01700_FLAG") == ""){
			     return;
			  }
				model.setValue(ref 		, model.getValue("/root/temp/terminfo/icd10info[1]/diagcd"));
	      model.setValue(nmref	, model.getValue("/root/temp/terminfo/icd10info[1]/diagengnm"));
	      model.setValue(resref	, model.getValue("/root/temp/terminfo/icd10info[1]/diagengnm"));
			}
		model.refresh();
}

/**
 * @desc   : 암환자등록탭에서 암등록번호 자동 채번 시 이전 상세 정보 reset
 * @param  :
 * @return : void
 * @authur : 주희경 2009-12-16
 * @ 기타  :
 * @---------------------------------------------------
 */
function resetDetailData()
{
	model.resetInstanceNode("/root/main/cncrpatrgst/regstatus/cureopendd");	//치료개시일자
	model.resetInstanceNode("/root/main/cncrpatrgst/regstatus/sickstat");			//등록시 질병상태
	model.resetInstanceNode("/root/main/cncrpatrgst/dethinfo");							//사망정보
	model.resetInstanceNode("/root/main/cncrpatrgst/diaginfo");							//진단정보 
	model.resetInstanceNode("/root/main/cncrpatrgst/rerntmetstaspart");			//원격전이부위
	model.resetInstanceNode("/root/main/cncrpatrgst/cureinfo/chosbfcuremthd");	//내원전치료 그리드
	model.resetInstanceNode("root/main/cncrpatrgst/cureinfo/prmypart");				//원발부위치료방법 그리드
	model.resetInstanceNode("/root/main/cncrpatrgst/cureinfo/metstaspart");				//전이부위치료방법 그리드
	
	model.makeNode("/root/main/cncrpatrgst/cureinfo/chosbfcuremthd");	//내원전치료 그리드
	model.makeNode("root/main/cncrpatrgst/cureinfo/prmypart");				//원발부위치료방법 그리드
	model.makeNode("/root/main/cncrpatrgst/cureinfo/metstaspart");				//전이부위치료방법 그리드
	
	grd_bfiocure.rebuild();
	grd_prmypart.rebuild();
	grd_metstaspart.rebuild();
	model.refresh();
}


/**
 * @desc   : 하드코드 조회
 * @
 * @param  : ref      - reference path
 *           rsltref  - result reference path
 *           hardcd   - 하드코드
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function mmbfGetHardCodeInfo(ref, rsltref, hardcd){
    var mmb_rsltref = "/root/hidden/mmb/hardcd";
    model.removeNode(mmb_rsltref);
    model.makeNode(mmb_rsltref);
    model.removeNode(ref);
    model.makeValue(ref + "/hardcd", hardcd);
    if(submit("TRMMB04103", "false", ref, mmb_rsltref)==true){
        model.copyNode(rsltref, mmb_rsltref);
        model.removeNode(mmb_rsltref);
    }
    model.refresh();
}

/**
 * @group  :
 * @ver    : 2007.04.10
 * @by     : 하재륜
 * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 화면 로드시
 * @param  :  7일
 * @return : 현재날짜에서 -7일한 날짜
 * @--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
*/

function getAddDay(addend){
    var backDate ="";
    var Now = new Date();
    // (오늘날짜의  Time - (하루 * 7))
    Now.setTime(Now.getTime()-(86400000*addend));
    NowYear = Now.getYear();// 년
    NowMonth = Now.getMonth()+1;// 월
    NowDay = Now.getDate(); // 일
    backDate += NowYear ; //년도
    if (NowMonth < 10 ) backDate += "0" + NowMonth ;
    else backDate += (Now.getMonth() + 1);
    if (NowDay < 10 ) backDate += "0" + NowDay ;
    else backDate += (Now.getDate());

    return backDate ;
}