YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SMMMO04200.xjs

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

    외래환자리스트 ( SMMMO04200_외래환자리스트.xfdl - JScript )

  - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩

*/

var arErrorCode = new HashArray();

/**
 * @desc   : 화면 초기화
 * @
 * @param  :
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fInitialize_SMMMO04200() {
	ds_cond.setColumn(0, "orddd", utlf_getCurrentDate());
	
	// 75 당일 선결과 사용 유무조회
    // 95 보호자대진 적용여부
    // 191 진료대상자 외래 마우스 오른쪽 버튼 메뉴 설정을 위한 값 조회
    // 134 20091007 JJE 추가 : 주진료과 의사가 진료지원과의 선택진료의사 선택 여부 조회
    // 135 당일 선결과 사용 유무조회
	lf_gethardcdArrayList(new Array(
                                  "dayaftrcptyn|75", 		
                                  "patprotector|95", 
                                  "menu|191", 
                                  "selspecordyn|134", 
                                  "ordordershow|135",
                                  "hardcd|445"
                                  ),
                        new Array(
                                  "ds_dayaftrcptyn", 
                                  "ds_patprotector",
                                  "ds_menu",
                                  "ds_selspecordyn",
                                  "ds_ordordershow",
                                  "ds_hardcd"
                                  )
                        );
                        
    frmf_createPopupMenuDs("pmn_menu", "pmn_menu_onmenuclick", ds_menu);
	
	appf_getCodeList([{dsNm: "ds_M0062", cdGrpId: "M0062"}
					, {dsNm: "ds_P0008", cdGrpId: "P0008"}
					, {dsNm: "ds_P0021", cdGrpId: "P0021"}
					, {dsNm: "ds_P0022", cdGrpId: "P0022"}
					, {dsNm: "ds_P1059", cdGrpId: "P1059"}
					, {dsNm: "ds_P0341", cdGrpId: "P0341"}
					, {dsNm: "ds_M0525", cdGrpId: "M0525"}
					, {dsNm: "ds_M0623", cdGrpId: "M0623"}], true);
		
	
	var dutplcecd = sysf_getUserInfo("dutplcecd");
	var orddrid   = sysf_getUserInfo("userid");
		
	var reopenflag = parent.parent.ds_reopen.getColumn(0, "reopenflag");   //진료대상자 리스트 open여부
	if(reopenflag == "Y"){	//다시 열린 경우, main에 ordtab의 condlist(화면이 닫힐때 설정된 정보)를 그대로 재설정
		try {
			ds_cond.copyData(parent.parent.ds_reopen_condlist);
			dutplcecd = ds_cond.getColumn(0, "orddeptcd");
			orddrid   = ds_cond.getColumn(0, "orddrid");
		} catch(E) {
		}
		
		parent.parent.ds_reopen.setColumn(0, "reopenflag", "N");
	} else {
		var sUserEnv057 = lf_mmbfGetUserEnvQuestValue("057"); // 진료대상자 외래탭 지연환자 표시여부
		if(sUserEnv057 == "001") { // 지연환자 표시일경우
			var sUserEnv058 = lf_mmbfGetUserEnvQuestValue("058"); // 진료대상자 외래탭 지연환자 지연시간
			var sUserEnv059 = lf_mmbfGetUserEnvQuestValue("059"); // 진료대상자 외래탭 지연환자 지연 제외시간
			
			if(sUserEnv058 == "001")        {   ds_cond.setColumn(0, "delaytime", "10");
			} else if(sUserEnv058 == "002") {   ds_cond.setColumn(0, "delaytime", "20");
			} else if(sUserEnv058 == "003") {   ds_cond.setColumn(0, "delaytime", "30");
			} else if(sUserEnv058 == "004") {   ds_cond.setColumn(0, "delaytime", "40");
			} else if(sUserEnv058 == "005") {   ds_cond.setColumn(0, "delaytime", "50");
			} else if(sUserEnv058 == "006") {   ds_cond.setColumn(0, "delaytime", "60");
			} else                          {   ds_cond.setColumn(0, "delaytime", "30");
			}
			
			if(sUserEnv059 == "001")        {   ds_cond.setColumn(0, "delayexpt", "0");
			} else if(sUserEnv059 == "002") {   ds_cond.setColumn(0, "delayexpt", "10");
			} else if(sUserEnv059 == "003") {   ds_cond.setColumn(0, "delayexpt", "20");
			} else if(sUserEnv059 == "004") {   ds_cond.setColumn(0, "delayexpt", "30");
			} else                          {   ds_cond.setColumn(0, "delayexpt", "10");
			}
		
			ds_cond.setColumn(0, "delayflag"  , "Y");
		} else {
			ds_cond.setColumn(0, "delayflag"  , "N");
		}
	}
	
	setDeptCodeList(dutplcecd);
	setUserList(dutplcecd, orddrid);

	reqOrderInfoOfCol(ds_reqdata1, ds_gridseq, "SMMMO04200", grd_outpatlist); //외래환자리스트 컬럼 조회 및 설정
	
	if(Div00.chk_speedflag.value == "Y")
		fGrdInit();
	
	fReqOutPatList();
}

function setDeptCodeList(sDeptcd, sOrddd){
	lf_mmbfGetDeptCodeComboList(ds_orddept, "O", sOrddd);
	
	if(!utlf_isNull(sDeptcd))
		Div00.cmb_orddeptcd.value = sDeptcd;
}

function setUserList(sOrddeptcd, sUserid, sOrddd){
	lf_mmbfGetUserComboList(ds_userlist, sOrddeptcd, "0330", "", "", sOrddd);
	
	frmf_addComboItem("Div00.cmb_orddrid");	//의사콤보 전체항목 추가
		
	if(utlf_isNull(sUserid)) {
		Div00.cmb_orddrid.index = 1;
		Div00.cmb_orddrid.updateToDataset();
	} else {
		Div00.cmb_orddrid.value = sUserid;
	}
}

/**
 * @desc   : 외래환자 환자 기본정보설정
 * @
 * @param  :
 * @return :
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fReqOutPatPamInfo(){
    var iRow      = ds_outpatlist.rowposition;
    var pid       = ds_outpatlist.getColumn(iRow, "pid");
    var orddd     = ds_outpatlist.getColumn(iRow, "orddd");
    var cretno    = ds_outpatlist.getColumn(iRow, "cretno");
    var instcd    = ds_outpatlist.getColumn(iRow, "instcd");
    
    var param = "O" + "▦" + pid + "▦" + orddd + "▦" + cretno + "▦" + instcd;
    
    return appf_initPatientInfo(param);
}

/**
 * @desc   : (외래)관심환자등록창 호출
 * @
 * @param  :
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fCallWndConcPatRgst(){	
    var currow = ds_outpatlist.rowposition;
    var pid    = ds_outpatlist.getColumn(currow, "pid");
    var hngnm  = ds_outpatlist.getColumn(currow, "hngnm");
    var indd   = ds_outpatlist.getColumn(currow, "orddd");
    var cretno = ds_outpatlist.getColumn(currow, "cretno");
    var seqno  = "";//ds_outpatlist.getColumn(currow, "seqno");
    var instcd = ds_outpatlist.getColumn(currow, "instcd");
    var elbulbodstat = ds_outpatlist.getColumn(currow, "elbulbodstat");
    
    if ( elbulbodstat == "9" ) {
        sysf_messageBox("미접수환자는 진행이 불가능 합니다.","E");
        return;
    }
    
    var param = "I" + "▩" + pid + "▩" + hngnm + "▩" + indd + "▩" + cretno + "▩" + seqno + "▩" + instcd;
    frmf_setParameter("param", param);
	frmf_open("SPMMO08200", "SPMMO08200", null, null, null, null, null, null, null, null, null, null, "M");
	//frmf_modal("SPMMO08200", "SPMMO08200", null, null, null, null, null, null, null, null, null, null, "M");
    //fReqOutPatList();
}

/**
 * @desc   : (외래)주의요망환자창 호출
 * @
 * @param  :
 * @return :
 * @author : 엄영만
 * @---------------------------------------------------
 */
function fCallWndWarnPat(){
	var nCurRow = ds_outpatlist.rowposition;
    var sPid    = ds_outpatlist.getColumn(nCurRow, "pid");
    var sHngnm  = ds_outpatlist.getColumn(nCurRow, "hngnm");
            
    frmf_setParameter("SMMMO19100_warncd", sPid);
    frmf_setParameter("SMMMO19100_warnnm", sHngnm);
        
    frmf_modal("SMMMO19100", "SMMMO19100", null, null, null, null, null, null, null, null, null, null, "M");
    
    frmf_clearParameter("SMMMO19100_warncd");  
    frmf_clearParameter("SMMMO19100_warnnm");  
    
    fReqOutPatList();
}

/**
 * @desc   : 외래환자 조회
 * @
 * @param  :
 * @return :
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fReqOutPatList() {
	parent.parent.ds_cond_outpatlist.copyData(ds_cond);

	ds_reqOutPat.copyData(ds_cond);	
	
    var compsrefcnts  = ds_gridseq.getColumn(0, "compsrefcnts");
    var compssizecnts = ds_gridseq.getColumn(0, "compssizecnts");
    
    if(utlf_isNull(compsrefcnts)) compsrefcnts = "";
    if(utlf_isNull(compssizecnts)) compssizecnts = "";
    
    ds_reqOutPat.addColumn("compsrefcnts", "string", 1024);
    ds_reqOutPat.addColumn("compssizecnts", "string", 1024);
    
    ds_reqOutPat.setColumn(0, "compsrefcnts", compsrefcnts);
    ds_reqOutPat.setColumn(0, "compssizecnts", compssizecnts);

	ds_outpatlist.enableevent = false;
    if(!utlf_isNull(ds_outpatlist.getColumnInfo("sexage")))
		ds_outpatlist.updateColID("sexage", "sa");

    var oParam = {};
		oParam.id      = "TRMMO04201";
		oParam.service = "prcpmngtapp.EtcPrcpMngt";
		oParam.method  = "reqGetOutPatList";
		oParam.inds    = "req=" + "ds_reqOutPat";
		oParam.outds   = "ds_outpatlist=outpatlist" + " ds_hardcode=hardcode" + " ds_totcnt=totcnt";
		oParam.async   = true;
		oParam.callback = "cf_TRMMO04201";

	tranf_submit(oParam);
}

function cf_TRMMO04201(sSvcId, nErrorCode, sErrorMsg) {
	if(!utlf_isNull(ds_outpatlist.getColumnInfo("sa")))
		ds_outpatlist.updateColID("sa", "sexage");
	
	if(nErrorCode > -1) {		
		fProcTreatExpt(); //치료제외 삭제 및 숨김처리
	}
	
	var orderby = ds_cond.getColumn(0, "orderby");
    var sortcol = ds_cond.getColumn(0, "sortcol");

    if(!utlf_isNull(orderby) && !utlf_isNull(sortcol))
        ds_outpatlist.keystring.current  = "S:" + orderby + sortcol;
	
	ds_cond.setColumn(0, "rsltcnt", ds_outpatlist.rowcount);
	ds_cond.setColumn(0, "totcnt", ds_totcnt.getColumn(0, "totcnt"));
	
	ds_outpatlist.enableevent = true;
	
	//치과 장애인센터 질병 정보 추가시 항목 아이콘 보이도록 추가.
	for(var i=0;i<ds_outpatlist.rowcount;i++)
	{
		if(ds_outpatlist.getColumn(i,"handiillness") == "Y")
		{
			ds_outpatlist.setColumn(i,"handidentalimg","IMG::emr\\MR\\tree3.png");
			
		}
	}
}

/**
 * @desc   : 환자 선택 후, 환자 정보 조회 및 기록지 화면 연동
 * @
 * @param  :
 * @return :
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fSelectOutPat(){
	//utlf_startLogCheck("fSelectOutPat");
	var step1Elapsed = 0;  // 외래 환자선택 진행 가능여부 체크 시간
    var step2Elapsed = 0;  // 입원 환자선택 상단정보 설정 시간
    var step3Elapsed = 0;  // 처방+기록+그외 팝업창 처리
    
utlf_addLog("환자 클릭 시간 체크 시작");
    //model.addlog("SPEED CHECK START OF fSelectOutPat()");    
    var nRow = ds_outpatlist.rowposition;
    if(nRow < 0){ return bRtn; }    
    
    var elbulbodstat = ds_outpatlist.getColumn(nRow, "elbulbodstat");
    if ( elbulbodstat == "9" ) {
        sysf_messageBox("미접수환자는 진행이 불가능 합니다.","E");
        return;
    }    

    //var reqptype    = ds_outpatlist.getColumn(nRow, "reqptype");		//  해당 컬럼 없음
    var pid         = ds_outpatlist.getColumn(nRow, "pid");    
	var recflag     = parent.parent.SMMMO04100_getDSMainCond("recflag");
		
	//parent.parent.frmf_setParameter("SMMMO04100_reqptype", reqptype);

    // 진행가능 한지 여부 체크
    //utlf_startLogTempCheck("fSelectOutPat_Step1"); 
    //model.addlog("  SPEED CHECK START OF fCheckBfSelectOutPat()");
utlf_addLog("진행가능 한지 여부 체크 시작, fCheckBfSelectOutPat()");
    if(!fCheckBfSelectOutPat()) { return; }
utlf_addLog("진행가능 한지 여부 체크 종료, fCheckBfSelectOutPat()");
	//step1Elapsed = utlf_endLogTempCheck("fSelectOutPat_Step1");
    //model.addlog("  SPEED CHECK END OF fCheckBfSelectOutPat()");

//20150717	
/*
	//기록&처방화면 로딩						
	this.parent.parent.lf_loadRecAndPrcpWnd();
*/

//20150717 /*

    // 상단정보 설정
	//model.addlog("  SPEED CHECK START OF fReqOutPatPamInfo()");
	//utlf_startLogTempCheck("fSelectOutPat_Step2");
utlf_addLog("상단정보 설정 시작, fReqOutPatPamInfo()"); 
    if(!fReqOutPatPamInfo()) { return; } 
utlf_addLog("상단정보 설정 종료, fReqOutPatPamInfo()");
	//step2Elapsed = utlf_endLogTempCheck("fSelectOutPat_Step2");
	//model.addlog("  SPEED CHECK END OF fReqOutPatPamInfo()");

    // 진료기록, 처방화면 연동
    //model.addlog("  SPEED CHECK START OF fOpenPrcpMainWnd()");
   // utlf_startLogTempCheck("fSelectOutPat_Step3");
utlf_addLog("진료기록, 처방화면 연동 시작");
	parent.parent.fOpenPrcpMainWnd(recflag);
	//step3Elapsed = utlf_endLogTempCheck("fSelectOutPat_Step3");

//20150717	*/    
utlf_addLog("진료기록, 처방화면 연동 종료"); 
    //model.addlog("  SPEED CHECK END OF fOpenPrcpMainWnd()");
utlf_addLog("환자 클릭 시간 체크 종료");

	/*
	if(!utlf_isNull(frmf_findPopup("SMMMO00100"))){
		var sLogParam = "userid:"    + sysf_getUserInfo("userid")                                        + "|"  // item02
                      + "instcd:"    + ds_outpatlist.getColumn(nRow,"instcd")     + "|"  // item03
        		      + "pid:"       + ds_outpatlist.getColumn(nRow,"pid")        + "|"  // item04
        		      + "orddd:"     + ds_outpatlist.getColumn(nRow,"orddd")      + "|"  // item05
        		      + "cretno:"    + ds_outpatlist.getColumn(nRow,"cretno")     + "|"  // item06
        		      + "orddeptcd:" + ds_outpatlist.getColumn(nRow,"orddeptcd")  + "|"  // item07
        		      + "orddrid:"   + ds_outpatlist.getColumn(nRow,"orddrid")    + "|"  // item08
        		      + step1Elapsed + "|"  // 진행가능 한지 여부 체크                                     // item09
        		      + step2Elapsed + "|"  // 상단정보                                                    // item10
        		      + step3Elapsed        // 처방+기록+그외 팝업창 처리                                  // item11
        		      ;        
        utlf_endLogCheck("fSelectOutPat", sLogParam);
	}
	*/
    //model.addlog("SPEED CHECK END OF fSelectOutPat()");
}

/**
 * @desc   : 외래 환자 선택후 진행 가능여부 체크  및 메세지 창 팝업.
 * @
 * @param  :
 * @return :
 * @author : 엄영만 
 * @---------------------------------------------------
 */
function fCheckBfSelectOutPat() {
    var nRow            = ds_outpatlist.rowposition;
    var rsrvflag        = ds_outpatlist.getColumn(nRow, "rsrvflag");
	var etcordflag      = ds_outpatlist.getColumn(nRow, "etcordflag");
	var orddrid         = ds_outpatlist.getColumn(nRow, "orddrid");
	var orddd           = ds_outpatlist.getColumn(nRow, "orddd");
	var pid             = ds_outpatlist.getColumn(nRow, "pid");
    var hngnm           = ds_outpatlist.getColumn(nRow, "hngnm");
    var bfjudgvalue     = ds_outpatlist.getColumn(nRow, "bfjudgvalue");
    var sSameNameMsg    = ds_outpatlist.getColumn(nRow, "samenamemsg");
    var sElbulbodStat   = ds_outpatlist.getColumn(nRow, "elbulbodstat");
    var sOrdStartDt     = ds_outpatlist.getColumn(nRow, "ordstartdt");
	
	if(	sysf_getGlobalVariable("able_sel_patlist", "M") == "N" ) { // 환자 선택 가능 여부 체크 2012.09.03 엄영만
	    sysf_messageBox("현재 로그인한 '"+ sysf_getUserInfo("dutplcenm") +"' 부서는 기록저장 및 처방발행이 불가능한 부서 입니다.\n\n다시 로그인 후 진행 하십시오.","E");
	    return false;
	}
	
	var sUseCommonDr = lf_getHardCDList("Y", 314, 3); // 일반의 진료 사용 여부
	if((orddd >= '20111001') && (sUseCommonDr == "N") && (orddrid == "11111" || orddrid == "EMR") && sysf_getUserId() != "EMR" ){
		sysf_messageBox("일반의사 또는 EⓐR로 접수된 예약은 처방을 입력할 수 없습니다.\n\n진료의사를 변경후 진행 하십시오.","E");
		return false;
	}
	
	var sBfjudgContinue = lf_getHardCDList("Y", 334, 3); // 심사대기 환자선택시 진행 여부(본원:N, 칠곡:Y)
	if(sBfjudgContinue == "N" && bfjudgvalue == "심사대기") { // 사전심사 대기중 일경우 환자 선택 불가능 하도록 수정. 심사실요청(20120707012) 2012.07.30 엄영만
	    sysf_messageBox("사전심사가 진행중인 환자입니다.\n\n심사 완료 후 진행 하십시오.","E");
		return false;
	}

	/* 처방 입력 가능 여부 체크
	-rsrvflag(예약구분)
			S - 슬라이드복사
			P - 시행부서처방/APU
			3 - 진단서
			4 - 진료기록
	-etcordflag(기타구분)
			M - 물리치료
			J - 주사
			N - 가정간호
			E - 실시정산분리
			U - 심층진찰
	*/	
	if(rsrvflag == "S" || rsrvflag == "3" || rsrvflag == "4" || etcordflag == "E"){ // 주사, 물리치료 제외 특례적용을 위해 진단을 수정 해야 하는 경우가 있음.
		sysf_messageBox("진료에서 처방을 입력할 수 없는 예약구분입니다.","E");
		return false;
	}
	
	if( etcordflag == "U" && orddd == utlf_getCurrentDate() && orddrid == sysf_getUserInfo("userid") && sElbulbodStat == "1" && utlf_isNull(sOrdStartDt) ){ // 심층진찰 시작 여부 팝업
		if( "6" != sysf_messageBox("심층진찰 환자입니다. 진료를 시작 하시겠습니까?","Q")) {
		    return false;
	    }
	}

	//처방, CP화면에 modal 또는 modaless가 뜬 경우, 환자 선택 불가
    if(!fChkScrnDisable()){ return false; }

    //CP환자 여부 확인, update시 에러나면 변경 불가
    if(!fChkCPPatValid(nRow)){ return false; }

    // 진료기록에 수정된 사항이 있을 경우 저장할 것인지 묻는 함수 호출 : 2009. 07. 27 김영학    
    var mainobj    = frmf_getMainViewer();
    var mainscrnid = mainobj.frmf_getScreenID(); //메인화면의 기록지 ID    
    if(mainscrnid == "SMMMR00100"){
        var prvIntRecPamInfRtn = mainobj.fPrevInitRecPamInfo();
        if(!prvIntRecPamInfRtn){ return false; } // 기록지에 필수 입력사항을 입력하지 않았을 때 그냥 넘어가 버리는 오류 수정  20100305 LYJ
    }
    
    if(!utlf_isNull(sSameNameMsg)) { // 동명이인 팝업메세지
		var optFont = {size:9}; // {color : "#0000ff", size : 10, type : "bold"};	// 폰트 옵션(색상, 크기, 타입(bold italic)) 추가
		if("6" != sysf_messageBox(sSameNameMsg + "\n\n진행하시겠습니까?", "Q", "", optFont)) {
            return false;
        }
    }
    
	//2011.09.07 엄영만 환자 클릭시 환자정보 체크 SMMMO04100.js 파일 함수 호출 ioflag, pid 인자
	if(!fCheckSelectPatInfo("O", pid)){ return false; } 
	
	return true;
}

/**
 * @desc   : 보호자대진 적용, 취소(외래등록 tbl에 etcordflag설정)
 * @
 * @param  : sEtcOrdFlag - 'F' 보호자대진 적용
 *         :             - '-' 보호자대진 취소
 * @return :
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fUpdtOutPatPamInfo(sEtcOrdFlag){
    var iRow = ds_outpatlist.rowposition;
    if(iRow < 0){
        return;
    }

    //20100127 한재상 수정 - 초진은 보호자대진 적용불가.
    if ( sEtcOrdFlag == "F" &&
        ( ds_outpatlist.getColumn(iRow, "fsexamflag") == "D" ||
          ds_outpatlist.getColumn(iRow, "fsexamflag") == "F" ) ) {
        sysf_messageBox("초진환자는 보호자 대진적용이 불가능합니다.", "C");
        return;
    }
    
    var sPID        = ds_outpatlist.getColumn(iRow, "pid");
    var sOrdDD      = ds_outpatlist.getColumn(iRow, "orddd");
    var sCretNO     = ds_outpatlist.getColumn(iRow, "cretno");
    var sInstCD     = ds_outpatlist.getColumn(iRow, "instcd");
    var sAcptSeqNO  = ds_outpatlist.getColumn(iRow, "acptseqno");
    var sEtcOrdFlag2= ds_outpatlist.getColumn(iRow, "etcordflag");
    var sHngNM      = ds_outpatlist.getColumn(iRow, "hngnm");
    var sUserID     = sysf_getUserInfo("userid");
    var sUserDeptCD = sysf_getUserInfo("dutplcecd");
    var msgstr      = "";

    if(sEtcOrdFlag == "C"){
         sProcFlag = "C"; //진료취소인 경우 sProcFlag C로 처리
    }else if(sEtcOrdFlag == "-"){ //보호자 대진 취소
		 //20200224 : 보호자 대진 취소시 전화진료 적용 취소 불가
		if(sEtcOrdFlag2 == "AA"){
			sysf_messageBox("[" + sHngNM + "]환자는 전화상담•처방을 적용한 환자", "E008");
			return;
		} 
		else if(sEtcOrdFlag2 == "AB"){
			sysf_messageBox("[" + sHngNM + "]환자는 전화상담•처방을 완료한 환자", "E008");
			return;
		} else {
			msgstr = "취소를";
			sProcFlag = "P";
		}
         
         var rtnval = sysf_messageBox("[" + sHngNM + "]환자의 보호자 대진 " + msgstr, "Q004");
         if(rtnval == 7){ //취소 버튼을 클릭한 경우
             return;
         }               
    }else if(sEtcOrdFlag == "F"){ //보호자 대진 적용      
        if(sEtcOrdFlag2 == "F"){
            sysf_messageBox("[" + sHngNM + "]환자는 이미 보호자 대진 적용환자", "E008");
            return;
        }
        //20200224 : 전화 진료 적용 환자는 보호자 대진 적용 불가
		else if(sEtcOrdFlag2 == "AA"){
			sysf_messageBox("[" + sHngNM + "]환자는 전화상담•처방을 적용한 환자", "E008");
			return;
		} 
		else if(sEtcOrdFlag2 == "AB"){
			sysf_messageBox("[" + sHngNM + "]환자는 전화상담•처방을 완료한 환자", "E008");
			return;
		}
        else{
            msgstr = "적용을";
            sProcFlag = "P";
        }
        var rtnval = sysf_messageBox("[" + sHngNM + "]환자의 보호자 대진 " + msgstr, "Q004");
        if(rtnval == 7){ //취소 버튼을 클릭한 경우
            return;
        }
    }
    
    ds_savedata_save.clearData();
    ds_savedata_save.addRow();
    
    ds_savedata_save.setColumn(0, "pid", 		sPID);
    ds_savedata_save.setColumn(0, "orddd", 		sOrdDD);
    ds_savedata_save.setColumn(0, "cretno", 	sCretNO);
    ds_savedata_save.setColumn(0, "instcd", 	sInstCD);
    ds_savedata_save.setColumn(0, "acptseqno", 	sAcptSeqNO);
    ds_savedata_save.setColumn(0, "userid", 	sUserID);
    ds_savedata_save.setColumn(0, "etcordflag", sEtcOrdFlag);
    ds_savedata_save.setColumn(0, "userdeptcd", sUserDeptCD);
    ds_savedata_save.setColumn(0, "procflag", 	sProcFlag);
    ds_savedata_save.setColumn(0, "gubun",    	"DOC");
             
    ds_savedata_req.clearData();
    ds_savedata_req.addRow();
    
    ds_savedata_req.setColumn(0, "orddd", 		 ds_cond.getColumn(0, "orddd"));
    ds_savedata_req.setColumn(0, "pid", 		 ds_cond.getColumn(0, "pid"));
    ds_savedata_req.setColumn(0, "orddeptcd", 	 ds_cond.getColumn(0, "orddeptcd"));    
    ds_savedata_req.setColumn(0, "orddrid", 	 ds_cond.getColumn(0, "orddrid"));
    ds_savedata_req.setColumn(0, "elbulbodstat", ds_cond.getColumn(0, "elbulbodstat"));
	ds_savedata_req.setColumn(0, "srchdd", 		 ds_cond.getColumn(0, "orddd"));
	ds_savedata_req.setColumn(0, "deptflag", 	 ds_cond.getColumn(0, "deptflag"));
    
    ds_outpatlist.enableevent = false;
    if(!utlf_isNull(ds_outpatlist.getColumnInfo("sexage")))
		ds_outpatlist.updateColID("sexage", "sa");
		
    var oParam = {};
		oParam.id      = "TXMMO04201";
		oParam.service = "prcpmngtapp.EtcPrcpMngt";
		oParam.method  = "reqSetOutPatPamInfo";
		oParam.inds    = "save=" + "ds_savedata_save" + " req=" + "ds_savedata_req";
		oParam.outds   = "ds_outpatlist=outpatlist";
		oParam.async   = false;

	tranf_submit(oParam);
	
	if(!utlf_isNull(ds_outpatlist.getColumnInfo("sa")))
		ds_outpatlist.updateColID("sa", "sexage");
	ds_outpatlist.enableevent = true;
}

/**
 * @desc   : 보호자대진 적용
 * @
 * @param  : sEtcOrdFlag - 'F' 보호자대진 적용
 *
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fRgstPatProtector(){
    var currow = ds_outpatlist.rowposition;
    if(currow < 0){
        return;
    }
        
    //마우스 오른쪽버튼 팝업에서 parameter처리가 되지 않아 우선 함수로 나누어 처리, 차후 수정되면 변경예정
    var elbulbodstat = ds_outpatlist.getColumn(currow, "elbulbodstat");
    if ( elbulbodstat == "9" ) {
        sysf_messageBox("미접수환자는 진행이 불가능 합니다.","E");
        return;
    }
    
    fUpdtOutPatPamInfo("F");
}

/**
 * @desc   : 보호자대진 취소
 * @
 * @param  : sEtcOrdFlag - '-' 보호자대진 적용
 *
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fCnclPatProtector(){   
    var currow = ds_outpatlist.rowposition;
    if(currow < 0){
        return;
    }
        
   //마우스 오른쪽버튼 팝업에서 parameter처리가 되지 않아 우선 함수로 나누어 처리, 차후 수정되면 변경예정
    var elbulbodstat = ds_outpatlist.getColumn(currow, "elbulbodstat");
    if ( elbulbodstat == "9" ) {
        sysf_messageBox("미접수환자는 진행이 불가능 합니다.","E");
        return;
    }
   
    fUpdtOutPatPamInfo("-");
}

/**
 * @desc   : 진료취소
 * @
 * @param  : sEtcOrdFlag - 'C' 진료취소 적용
 *           sProcFlag   - 'C' 진료취소 flow
 *
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fPatOrdCncl(){
    var currow = ds_outpatlist.rowposition;
    if(currow < 0){
        return;
    }    
    
    //마우스 오른쪽버튼 팝업에서 parameter처리가 되지 않아 우선 함수로 나누어 처리, 차후 수정되면 변경예정
    var elbulbodstat = ds_outpatlist.getColumn(currow, "elbulbodstat");
    if ( elbulbodstat == "9" ) {
        sysf_messageBox("미접수환자는 진행이 불가능 합니다.","E");
        return;
    }
    
    fUpdtOutPatPamInfo("C");
}

/**
 * @desc   : 일반유형 변경
 * @
 * @return :
 * @author : 엄영만 2017.02.09
 * @---------------------------------------------------
 */
function fChangeInsuKind(){
	var currow = ds_outpatlist.rowposition;
	if(currow < 0){
		return;
	}
    
    var sPid       = ds_outpatlist.getColumn(currow, "pid"); 
    var sOrdDd     = ds_outpatlist.getColumn(currow, "orddd");
    var sCretNo    = ds_outpatlist.getColumn(currow, "cretno");
    var sOrdDeptCd = ds_outpatlist.getColumn(currow, "orddeptcd");
    var sInsuKind  = ds_outpatlist.getColumn(currow, "insukind");
    var sDutplceCd = sysf_getUserInfo("dutplcecd");
    
    if ( sInsuKind == "51" ) {
        sysf_messageBox("보험유형이 일반(51)환자는 진행이 불가능 합니다.","E");
        return;
    }
    
    if (sOrdDeptCd != sDutplceCd) {
        sysf_messageBox("로그인 부서와 진료과가 다르면 일반유형으로 변경할 수", "I004");
        return;
    }
    
    if(!lf_ContainsHardCD("555", sOrdDeptCd)) {
        sysf_messageBox("일반유형으로 변경 기능을 사용할 수 없는 진료과 입니다.", "I999");
        return;
    }
  
  	if("6" == sysf_messageBox("보험유형을 일반(51)로 변경 하시겠습니까?", "Q")) {
      	ds_reqdata.clearData();
    	ds_reqdata.addRow();
    	
    	ds_reqdata.setColumn(0, "pid", 		sPid);
    	ds_reqdata.setColumn(0, "orddd", 	sOrdDd);
    	ds_reqdata.setColumn(0, "cretno", 	sCretNo);
    
    	var oParam = {};
    		oParam.id      = "TXMMO04207";
    		oParam.service = "prcpmngtapp.EtcPrcpMngt";
    		oParam.method  = "reqExeChangeInsukind";
    		oParam.inds    = "req=" + "ds_reqdata";
    		oParam.async   = false;
    		oParam.callback = "cf_TXMMO04207";
    
    	tranf_submit(oParam);  
	}
}

function cf_TXMMO04207(sSvcId, nErrorCode, sErrorMsg) {
	if(nErrorCode > -1)
		fReqOutPatList();
}

/**
 * @desc   : 본인100 보조유형 변경
 * @
 * @return :
 * @author : 엄영만 2017.07.26
 * @---------------------------------------------------
 */
function fChangeSupKind01(){
    trace("fChangeSupKind01");
    fChangeSupKind("01");
}

function fChangeSupKindD6(){
    trace("fChangeSupKindD6");
    fChangeSupKind("D6");
}
 
function fChangeSupKind(sSuppKind){
	var currow = ds_outpatlist.rowposition;
	if(currow < 0){
		return;
	}
	
    var sPid       = ds_outpatlist.getColumn(currow, "pid"); 
    var sOrdDd     = ds_outpatlist.getColumn(currow, "orddd");
    var sCretNo    = ds_outpatlist.getColumn(currow, "cretno");
    var sOrdDeptCd = ds_outpatlist.getColumn(currow, "orddeptcd");
    var sInsuKind  = ds_outpatlist.getColumn(currow, "insukind");
    var sDutplceCd = sysf_getUserInfo("dutplcecd");
    
    if ( (sSuppKind == "01" || sSuppKind == "D6") && sInsuKind != "11" ) { // 전액본인부담, 난임시술 변경시
        sysf_messageBox("보험유형이 건강보험(11) 환자만 진행이 가능 합니다.","E");
        return;
    }
    
    if ( sSuppKind == "D6" && sOrdDeptCd != "2100000000" ) { // 난임시술 변경시 산부인과만
        sysf_messageBox("진료과가 산부인과 환자만 진행이 가능 합니다.","E");
        return;
    }
    
    if (sOrdDeptCd != sDutplceCd) {
        sysf_messageBox("로그인 부서와 진료과가 다르면 진행할 수", "I004");
        return;
    }
    
    var sMsg = "";
    if ( sSuppKind == "01") {
        sMsg = "보조유형을 전액본인부담(01)으로 변경 하시겠습니까?";
    } else if ( sSuppKind == "D6") {
        sMsg = "보조유형을 난임시술(D6)으로 변경 하시겠습니까?";
    }
    
    if("6" == sysf_messageBox(sMsg, "Q")) {
      	ds_reqdata.clearData();
    	ds_reqdata.addRow();
    	
    	ds_reqdata.setColumn(0, "pid", 		sPid);
    	ds_reqdata.setColumn(0, "orddd", 	sOrdDd);
    	ds_reqdata.setColumn(0, "cretno", 	sCretNo);
    	ds_reqdata.setColumn(0, "suppkind", sSuppKind);
    
    	var oParam = {};
    		oParam.id      = "TXMMO04208";
    		oParam.service = "prcpmngtapp.EtcPrcpMngt";
    		oParam.method  = "reqExeChangeSupKind";
    		oParam.inds    = "req=" + "ds_reqdata";
    		oParam.async   = false;
    		oParam.callback = "cf_TXMMO04208";
    
    	tranf_submit(oParam);  
	}
}

function cf_TXMMO04208(sSvcId, nErrorCode, sErrorMsg) {
	if(nErrorCode > -1)
		fReqOutPatList();
}

/**
 * @desc   : 일반유형 가접수 생성
 * @
 * @return :
 * @author : 엄영만 2017.07.26
 * @---------------------------------------------------
 */
function fCreatGenrOtpt(){
	var currow = ds_outpatlist.rowposition;
	if(currow < 0){
		return;
	}
    
    var sPid       = ds_outpatlist.getColumn(currow, "pid"); 
    var sOrdDd     = ds_outpatlist.getColumn(currow, "orddd");
    var sCretNo    = ds_outpatlist.getColumn(currow, "cretno");
    var sOrdDeptCd = ds_outpatlist.getColumn(currow, "orddeptcd");
    var sOrdDrId   = ds_outpatlist.getColumn(currow, "orddrid");
    var sInsuKind  = ds_outpatlist.getColumn(currow, "insukind");
    var sDutplceCd = sysf_getUserInfo("dutplcecd");
    
    if ( sInsuKind == "51" ) {
        sysf_messageBox("보험유형이 일반(51) 환자는 진행이 불가능 합니다.","E");
        return;
    }
    
    if (sOrdDeptCd != sDutplceCd) {
        sysf_messageBox("로그인 부서와 진료과가 다르면 일반유형으로 변경할 수", "I004");
        return;
    }
    
    if("6" == sysf_messageBox("보험유형을 일반(51)로 새로운 외래예약을 생성 하시겠습니까?", "Q")) {
      	ds_reqdata4.clearData();
    	ds_reqdata4.addRow();
    	
    	ds_reqdata4.setColumn(0, "flag", 	        "I");
    	ds_reqdata4.setColumn(0, "otpt_pid", 		sPid);
    	ds_reqdata4.setColumn(0, "otpt_orddd", 	    sOrdDd);
    	ds_reqdata4.setColumn(0, "otpt_cretno", 	sCretNo);
    	ds_reqdata4.setColumn(0, "otpt_orddeptcd", 	sOrdDeptCd);
    	ds_reqdata4.setColumn(0, "otpt_orddrid", 	sOrdDrId);
    	ds_reqdata4.setColumn(0, "otpt_histstat", 	"R");
    	ds_reqdata4.setColumn(0, "otpt_rsrvflag", 	"BB");  // 2017.08.01 보험유형 일반(51) with 이정택
    
    	var oParam = {};
    		oParam.id       = "TRMMO09101";
    		oParam.service  = "prcpmngtapp.PrcpMngt";
    		oParam.method   = "reqExeSetOtptActDeptPrcp";
    		oParam.inds     = "req=ds_reqdata4";
    		oParam.async    = false;
    		oParam.callback = "cf_TRMMO09101";
    
    	tranf_submit(oParam);  
	}
}

function cf_TRMMO09101(sSvcId, nErrorCode, sErrorMsg) {
	if(nErrorCode > -1)
		fReqOutPatList();
}

/**
 * @desc   : 치료제외 삭제 및 숨김처리
 * @
 * @param  :
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fProcTreatExpt(){
	var dutplcecd = sysf_getUserInfo("dutplcecd");
   
	var row = ds_hardcode.findRow("trgtcd", dutplcecd);
   
	if(row == -1) return;
   
	var hardcdno = ds_hardcode.getColumn(row, "hardcdno");
	if(hardcdno == 2){
		var row3 = ds_hardcode.findRow("hardcdno", 3);
		if(row3 != -1)
			ds_hardcode.deleteRow(row3);
		//model.removeNode("/root/main/outpatinfo/hardcode[hardcdno = '" + 3 + "']");
	} else if(hardcdno == 3){
		var row2 = ds_hardcode.findRow("hardcdno", 2);
		if(row2 != -1)
			ds_hardcode.deleteRow(row2);
		//model.removeNode("/root/main/outpatinfo/hardcode[hardcdno = '" + 2 + "']");
	} else{
		Div00.cmb_expt.visible = false;
	}
}

/**
 * @desc   : 그리드 data 엑셀화일로 저장
 * @
 * @param  :
 * @return :
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fSaveGridToExcel(){
   grdf_exportExcel(grd_outpatlist, "외래환자리스트", "외래");
}

/**
 * @desc   : 협진관리 화면 open
 * @
 * @param  :
 * @return :
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fOpenCnstPat(){
    var currow = ds_outpatlist.rowposition;
    if(currow < 0){
        return;
    }

    var elbulbodstat = ds_outpatlist.getColumn(currow, "elbulbodstat");
    if ( elbulbodstat == "9" ) {
        sysf_messageBox("미접수환자는 진행이 불가능 합니다.","E");
        return;
    }
    
    var pid       = ds_outpatlist.getColumn(currow, "pid");
    var hngnm     = ds_outpatlist.getColumn(currow, "hngnm");
    var sa        = ds_outpatlist.getColumn(currow, "sexage");
    var orddeptcd = ds_outpatlist.getColumn(currow, "orddeptcd");
    var orddrid   = ds_outpatlist.getColumn(currow, "orddrid");
    var orddrnm   = ds_outpatlist.getColumn(currow, "orddrnm");
    var orddd     = ds_outpatlist.getColumn(currow, "orddd");
    var cretno    = ds_outpatlist.getColumn(currow, "cretno");
    var coordflag = ds_outpatlist.getColumn(currow, "coordflag");
    var patinfo   = hngnm + "▦" + sa + "▦" + orddeptcd + "▦" + orddrid + "▦" + cretno + "▦" + orddrnm + "▦" + coordflag;

    frmf_setParameter("SPMMO03600_pid", pid);
    frmf_setParameter("SPMMO03600_orddd", orddd);
    frmf_setParameter("SPMMO03600_patinfo", patinfo);
    frmf_setParameter("SPMMO03600_ioflag", "O");
	frmf_modal("SPMMO03600", "SPMMO03600", null, null, null, null, null, null, null, null, null, null, "M");
    
    fReqOutPatList();
}

/**
 * @desc   : 수혜자 선택 화면 open
 * @
 * @param  :
 * @return :
 * @author : 엄영만
 * @---------------------------------------------------
 */
function fOpenRecipient(){
    var currow = ds_outpatlist.rowposition;
    if(currow < 0){
        return;
    }

    var pid         = ds_outpatlist.getColumn(currow, "pid");
    var hngnm       = ds_outpatlist.getColumn(currow, "hngnm");
    var orddd       = ds_outpatlist.getColumn(currow, "orddd");
    var cretno      = ds_outpatlist.getColumn(currow, "cretno");
    var etcordflag  = ds_outpatlist.getColumn(currow, "etcordflag");
    var sa          = ds_outpatlist.getColumn(currow, "sexage");
    var sex         = sa.substr(0, sa.indexOf("/"));
    var age         = sa.substr(sa.indexOf("/")+1, sa.length);
    
    frmf_setParameter("SPMMO09610_paramyn",     "Y");
    frmf_setParameter("SPMMO09610_ordtype",     "O");
    frmf_setParameter("SPMMO09610_etcordflag",  etcordflag);
    frmf_setParameter("SPMMO09610_pid",         pid);
    frmf_setParameter("SPMMO09610_orddd",       orddd);
    frmf_setParameter("SPMMO09610_cretno",      cretno);
    frmf_setParameter("SPMMO09610_hngnm",       hngnm);
    frmf_setParameter("SPMMO09610_sex",         sex);
    frmf_setParameter("SPMMO09610_age",         age);
    
	frmf_modal("SPMMO09610", "SPMMO09610", null, null, null, null, null, null, null, null, null, null, "M");
    
    fReqOutPatList();
}

/**
 * @desc   : CP환자 여부 검사
 * @
 * @param  :
 * @return : 
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fChkCPPatValid(currow){
    var pid       = ds_outpatlist.getColumn(currow, "pid");
    var orddd     = ds_outpatlist.getColumn(currow, "orddd");
    var cretno    = ds_outpatlist.getColumn(currow, "cretno");
    var hngnm     = ds_outpatlist.getColumn(currow, "hngnm");
    var orddeptcd = "";//ds_outpatlist.getColumn(currow, "orddeptcd");
    var ordtype   = "";//ds_outpatlist.getColumn(currow, "ordtype");
    var cpyn	  = ds_outpatlist.getColumn(currow, "cpyn");
    if(utlf_isNull(orddeptcd)) orddeptcd = ds_cond.getColumn(0, "orddeptcd");
    if(utlf_isNull(ordtype))   ordtype   = "O";
    
    ds_reqdata2.clearData();
    ds_reqdata2.addRow();
        
    ds_reqdata2.setColumn(0, "pid"         , pid);
    ds_reqdata2.setColumn(0, "orddd"       , orddd);
    ds_reqdata2.setColumn(0, "cretno"      , cretno);
    ds_reqdata2.setColumn(0, "hngnm"       , hngnm);	//추가(2008.08.25)
    ds_reqdata2.setColumn(0, "prcpgenrflag", ordtype);
    ds_reqdata2.setColumn(0, "srchtabflag" , "O");	//대상자리스트탭 구분
    
    var oParam = {};
		oParam.id      = "TRMMO04303";
		oParam.service = "prcpbaseapp.CpMngt";
		oParam.method  = "reqGePattValidity";
		oParam.inds    = "req=" + "ds_reqdata2";
		oParam.outds   = "ds_rsltgetdata=getdata";
		oParam.async   = false;
		oParam.callback = "cf_TRMMO04303";

	tranf_submit(oParam);
	
	if(arErrorCode.pop("TRMMO04303") < 0)
		return false;
		
	var cppatnode = ds_rsltgetdata.rowcount;//model.instance1.selectNodes("/root/init/rsltgetdata/getdata");
	if(cppatnode < 1){ //cp적용환자 tbl에 유효한 데이터가 없는 경우
		parent.parent.SMMMO04100_setDSRoot("cpflag", "N"); //처방open
		return true;
		
	}else{ //CP적용환자 tbl에 유효한 데이터가 있는 경우
		dsf_setDefaultVal(ds_rsltgetdata, "appyn:Y");
	
		var appyn      = ds_rsltgetdata.getColumn(0, "appyn");
		var appstat    = ds_rsltgetdata.getColumn(0, "appstat");
		var cpgnm      = ds_rsltgetdata.getColumn(0, "cpgnm");
		var cpgappno   = ds_rsltgetdata.getColumn(0, "cpgappno");
		var msgcnts    = ds_rsltgetdata.getColumn(0, "msgcnts");
		var msgflag    = ds_rsltgetdata.getColumn(0, "msgflag");
		var prtlflagcd = ds_rsltgetdata.getColumn(0, "prtlflagcd"); //01:CP,02:CPG
		
		if(appstat == 11){ //CP적용상태가 11인 경우
			var rtnval = sysf_messageBox(msgcnts, msgflag);
			if(rtnval == 6){ //예 선택, CP Main open, CP적용환자 tbl에 appstat 10 진행중
				parent.parent.SMMMO04100_setDSRoot("cpflag", "Y");
				return fUpdtCPPatAppStatVal(10);
					
			}else{ //아니오 선택, 처방 Main open, CP적용환자 tbl에 appstat 50 : CP Drop
				sysf_messageBox(msgcnts, msgflag);
				frmf_setParameter("SMMMO043_cpgappno", cpgappno);	//drop 팝업에서 인식할 수 있는 param
				frmf_setParameter("SMMMO043_drop"    , "N");		//drop 팝업에서 인식할 수 있는 param

				frmf_modal("SPMMP02300", "SPMMP02300", null, null, null, null, null, null, null, null, null, null, "M");	//Drop 팝업 호출
				
				parent.parent.SMMMO04100_setDSRoot("cpflag", "N");
				if(frmf_getParameter("SMMMO043_drop") == "Y" && !utlf_isNull(cpyn)){
					ds_outpatlist.setColumn(currow, "cpyn", "N");
				}else{
					return false;
				}
				
				frmf_clearParameter("SMMMO043_cpgappno");
				frmf_clearParameter("SMMMO043_drop");
				
				return true;
			}
		}else if(appstat == 53){
			parent.parent.SMMMO04100_setDSRoot("cpflag", "X");
			return true;
		}else{ //CP적용상태가 11가 아닌 경우, CP Main창 open
			if( prtlflagcd == "02" && utlf_isNull(appstat) && msgflag == "P" ){ //CPG & 호출flag:Popup & 모니터링구분:대상자탐색 (appyn:평가용여부)
				//CPG적용대상자 알림 팝업 호출 (2009.05.04)
				frmf_setParameter("SMMMO041_hngnm"      , hngnm);
				frmf_setParameter("SMMMO041_pid"        , pid);
				frmf_setParameter("SMMMO041_cretno"     , cretno);
				frmf_setParameter("SMMMO041_orddd"      , orddd);
				frmf_setParameter("SMMMO041_ordtype"    , ordtype);
				frmf_setParameter("SMMMO041_orddeptcd"  , orddeptcd);
				frmf_setParameter("SMMMO041_slipnm"     , msgcnts); //cpgno▦cpghistseq▦cpgnm▦slipno▦slipnm▦valusgeyn▦valunm▦guidedocucnts
				frmf_setParameter("SMMMO041_cpgmntrflag", appstat);	//null, SPMMP03200화면에서 cpgmntrflag(M or S)으로 따짐
				frmf_setParameter("SMMMO041_cpgappno"   , cpgappno); //적용중인 CP가 존재하면 값이 있음
				frmf_setParameter("SMMMO041_cpgnm"      , cpgnm);    //적용중인 CP가 존재하면 값이 있음
				
				frmf_modal("SPMMP03200", "SPMMP03200", null, null, null, null, null, null, null, null, null, null, "P");	//CP대상자 알람 팝업
					
				if( cpgappno > 0 && cpgappno != frmf_getParameter("SPMMP032_cpgappno") && !utlf_isNull(cpyn)){ //진행중인 CP가 있는데 팝업에서 Drop한 경우 CP여부 N으로..
					ds_outpatlist.setColumn(currow, "cpyn", "N");
				}
				if( !isNull(frmf_getParameter("SPMMP032_cpgappno")) && frmf_getParameter("SPMMP032_cpgappno") > 0 ){
					parent.parent.SMMMO04100_setDSRoot("cpflag", "Y");  //CPG적용한 경우, MGPS 호출					
				}else{
					parent.parent.SMMMO04100_setDSRoot("cpflag", "N");  //미적용 시 처방 화면 호출					
				}
				frmf_clearParameter("SPMMP032_cpgappno");
				frmf_clearParameter("SMMMO041_hngnm");
				frmf_clearParameter("SMMMO041_pid");
				frmf_clearParameter("SMMMO041_cretno");
				frmf_clearParameter("SMMMO041_orddd");
				frmf_clearParameter("SMMMO041_ordtype");
				frmf_clearParameter("SMMMO041_orddeptcd");
				frmf_clearParameter("SMMMO041_slipnm");
				frmf_clearParameter("SMMMO041_cpgmntrflag");
				frmf_clearParameter("SMMMO041_cpgappno");
				frmf_clearParameter("SMMMO041_cpgnm");
				
				return true;
			} else{
				parent.parent.SMMMO04100_setDSRoot("cpflag", "Y");
				return true;
			}
		}
	} 	
}

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

/**
 * @desc   : 외래환자 진료상태 대기로 변경
 * @
 * @param  :
 * @return : 
 * @author : 김영학 
 * @---------------------------------------------------
 */
function fSetOutPatBodStat(stat){
	var currow = ds_outpatlist.rowposition;
	if(currow < 0){
		return;
	}
	
	var pid           = ds_outpatlist.getColumn(currow, "pid");
	var orddd         = ds_outpatlist.getColumn(currow, "orddd");
	var cretno        = ds_outpatlist.getColumn(currow, "cretno");
	var elbulbodstat  = ds_outpatlist.getColumn(currow, "elbulbodstat");
	var orddrid       = ds_outpatlist.getColumn(currow, "orddrid");
	var orddeptcd     = ds_outpatlist.getColumn(currow, "orddeptcd");
	
	if (stat =="1") {  
		if(!(elbulbodstat == "0"||elbulbodstat == "-")){ //진료대기로 변경
			sysf_messageBox("구분이 접수인 환자를", "C002");
			return;
		}
	} else if (stat ="0") {
		if(elbulbodstat != "1"){ //진료보류 취소
			sysf_messageBox("구분이 대기인 환자를", "C002");
			return;
		}    
	}

	ds_reqdata.clearData();
	ds_reqdata.addRow();
	
	ds_reqdata.setColumn(0, "pid", 		 pid);
	ds_reqdata.setColumn(0, "orddd", 	 orddd);
	ds_reqdata.setColumn(0, "cretno", 	 cretno);
	ds_reqdata.setColumn(0, "orddeptcd", orddeptcd);
	ds_reqdata.setColumn(0, "orddrid", 	 orddrid);
	
	var bodstat = "a";
	if (stat == "0") {
		ds_reqdata.setColumn(0, "elbulbodstat", "0");
	} else if (stat =="1") {
		ds_reqdata.setColumn(0, "elbulbodstat", "1");
	}
	
	var oParam = {};
		oParam.id      = "TXMMO04203";
		oParam.service = "prcpmngtapp.EtcPrcpMngt";
		oParam.method  = "reqExeBodStat";
		oParam.inds    = "req=" + "ds_reqdata";
		oParam.async   = false;

	if(tranf_submit(oParam)) {
	    fReqOutPatList();
	}
	
}

/**
 * @desc   : 외래환자 진료상태 대기로 변경
 * @
 * @param  :
 * @return : 
 * @author : 김영학 
 * @---------------------------------------------------
 */
function fPatOrdEnd(){
    var currow = ds_outpatlist.rowposition;
    if(currow < 0){
        return;
    }
        
    var elbulbodstat = ds_outpatlist.getColumn(currow, "elbulbodstat");
    if ( elbulbodstat == "9" ) {
        sysf_messageBox("미접수환자는 진행이 불가능 합니다.","E");
        return;
    }    
    
    //2018.04.04 DUR 특정질환 검색 로직 추가 엄영만
	var sPid = ds_outpatlist.getColumn(currow,  "pid" );
	frmf_setParameter("SPMMD00100_ifyn", "Y");
	frmf_setParameter("SPMMD00100_pid",  sPid); 
	
	var argxpt = system.clientToScreenX(this, 0) + 250;
	var argypt = system.clientToScreenY(this, 0) + 20;
	
	//20190910 이돈희 : KIMS 서버가 죽는 경우 하드코드 변경함 
	//                   이 경우 KIMS 감염조회를 안하기 위하여 매번 조회 
	//                   치과의 경우 기존 DUR 사용하면 618번 D 셋팅 필요
	dsf_createDs("ds_hardcd618");
	lf_gethardcdArrayList(new Array("hardcd618|618"), new Array("ds_hardcd618"));
	if(ds_hardcd618.getColumn(0, "hardcd") == "Y") {
		frmf_modal("SPMMO51000", "SPMMO51000", null, false, null, argxpt, argypt, null, null, null, null, null, "M");
	} else if(ds_hardcd618.getColumn(0, "hardcd") == "D") {
		frmf_modal("SPMMD00100", "SPMMD00100", null, false, null, argxpt, argypt, null, null, null, null, null, "M");
	} else {
		//do Nothing
	}
	dsf_deleteDs("ds_hardcd618");
			
    fSetOutPatBodStat("1");
}

/**
 * @desc   : 외래환자 진료상태 접수로 변경
 * @
 * @param  :
 * @return : 
 * @author : 김영학 
 * @---------------------------------------------------
 */
function fPatOrdEndCncl(){
    var currow = ds_outpatlist.rowposition;
    if(currow < 0){
        return;
    }
        
    var elbulbodstat = ds_outpatlist.getColumn(currow, "elbulbodstat");
    if ( elbulbodstat == "9" ) {
        sysf_messageBox("미접수환자는 진행이 불가능 합니다.","E");
        return;
    }    
    
    fSetOutPatBodStat("0");
}

function fGrdInit() {
	if (Div00.chk_speedflag.value == "Y") {
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "centcd"), 		 "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "subdeptcd"), 	 "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "orddrnm"), 	 "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "anodeptyn"), 	 "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "spclflag"), 	 "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "testrslt"), 	 "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "serdiag"), 	 "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "insukind"), 	 "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "trsmrem"), 	 "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "conctypenm"), 	 "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "antidrugflag"), "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "coordflag"), 	 "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "cpyn"), 		 "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "onestop"), 	 "size", 0);
        grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "preworkup"), 	 "size", 0);
		grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "hsctpreday"), 	 "size", 0);
		grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "transtype"), 	 "size", 0);
		grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "hsctday"), 	 "size", 0);
		grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "postcxday"), 	 "size", 0);
		grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "rsrvflag"), 	 "size", 0);
		grd_outpatlist.setFormatColProperty(grd_outpatlist.getBindCellIndex("body", "bfjudgvalue"),  "size", 0);
    } else {
		setOrderInfoOfCol(grd_outpatlist, ds_gridseq); //외래환자리스트 컬럼 설정
    }
}

/**
 * @desc   : 진료대상자 리스트 출력
 * @
 * @param  :
 * @return : 
 * @author : 김영학
 * @---------------------------------------------------
 */
function fPrtPatList() {    
    if(utlf_isNull(ds_cond.getColumnInfo("orddeptnm"))) ds_cond.addColumn("orddeptnm", "string");
	if(utlf_isNull(ds_cond.getColumnInfo("orddrnm"))) ds_cond.addColumn("orddrnm", "string");
	ds_cond.setColumn(0, "orddeptnm", Div00.cmb_orddeptcd.text);
	ds_cond.setColumn(0, "orddrnm", Div00.cmb_orddrid.text);    
    
    var objDOM = rptf_createDOM();														// DOM 객체 설정	
	rptf_setNodeListToDOM(objDOM, "/root/main/outpatinfo/outpatlist", ds_outpatlist);	// 데이터셋 1	
	rptf_setNodeListToDOM(objDOM, "/root/main/cond", ds_cond);							// 데이터셋 2	
	//sysf_trace(objDOM.documentElement.source);	// XML 내용출력
	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;								// 최상의노드 XML 스트링 추출
	var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
	rptf_exeReportPreview30(["RPMMO04102"],[objParam], option);
}

function fChngGrdCellColor(color){
	if(color == undefined || color == "" || color == "ffffff")
		color = "default";
	else
		color = "#" + color;
		
	return color;
}

/**
 * @desc   : 예방접종 0% 적용
  * @param  :
 * @return : 
 * @author : 김영학
 * @---------------------------------------------------
 */
function fPatPreProtect0Appl(){
    fPatEtcOrdinfo("S", "Vacn");
}



function fChngColorOutPatList_Pod(pod) {
    var sColor = "#000000";
	if(!utlf_isNull(pod) && pod != "-"){
	    var nPod = parseInt(pod);
	    if((nPod >= 25 && nPod <= 35) || (nPod >= 175 && nPod <= 185)) { // 수술경과일 1개월, 6개월 글자색 붉은색으로 변경
	        sColor = "#ff0000";
	    }
	}
		
	return sColor;
}

/**
 * @desc   : 예방접종 0% 적용취소 
  * @param  :
 * @return : 
 * @author : 김영학
 * @---------------------------------------------------
 */
function fPatPreProtect0Cncl(){
    fPatEtcOrdinfo("C", "Vacn");    
}

/**
 * @desc   : 진찰료 0% 적용 (사본발행)
  * @param  :
 * @return : 
 * @author : 김영학
 * @---------------------------------------------------
 */
function fPatCopyIss0Appl(){
    fPatEtcOrdinfo("S", "Copy");    
}

/**
 * @desc   : 진찰료 0% 적용 취소 (사본발행)
  * @param  :
 * @return : 
 * @author : 김영학
 * @---------------------------------------------------
 */
function fPatCopyIss0Cncl(){
    fPatEtcOrdinfo("C", "Copy");        
}

/**
 * @desc   : 진찰료 50% 적용 (진단서)
  * @param  :
 * @return : 
 * @author : 김영학
 * @---------------------------------------------------
 */
function fPatProf50Appl(){
    fPatEtcOrdinfo("S", "Diag");        
}

/**
 * @desc   : 진찰료 50% 적용 취소 (진단서)
  * @param  :
 * @return : 
 * @author : 김영학
 * @---------------------------------------------------
 */
function fPatProf50Cncl(){
    fPatEtcOrdinfo("C", "Diag");
}
/**
 * @desc   : 진찰료 50% 적용 (사본발행)
  * @param  :
 * @return : 
 * @author : 김영학
 * @---------------------------------------------------
 */
function fPatCopyIss50Appl(){
    fPatEtcOrdinfo("S", "Copy2");
}

/**
 * @desc   : 진찰료 50% 적용 취소 (사본발행)
  * @param  :
 * @return : 
 * @author : 김영학
 * @---------------------------------------------------
 */
function fPatCopyIss50Cncl(){
    fPatEtcOrdinfo("C", "Copy2");
}

/**
 * @desc   : 진찰료 0% 적용 (제증명)
  * @param  :
 * @return : 
 * @author : 김영학
 * @---------------------------------------------------
 */
function fPatProf0Appl(){
    fPatEtcOrdinfo("S", "Diag2");
}

/**
 * @desc   : 진찰료 0% 적용 취소 (제증명)
  * @param  :
 * @return : 
 * @author : 김영학
 * @---------------------------------------------------
 */
function fPatProf0Cncl(){
    fPatEtcOrdinfo("C", "Diag2");
}

/**
 * @desc   : 진찰료 변경 적용 및 취소 
  * @param  :
 * @return : 
 * @author : 김영학
 * @---------------------------------------------------
 */
function fPatEtcOrdinfo(SetFlag, EtcOrdFlag){	
	var flag = "";
	var iRow = ds_outpatlist.rowposition;; //2010.03.06 JJE
	var etcordflag = ds_outpatlist.getColumn(iRow, "etcordflag");
    var elbulbodstat = ds_outpatlist.getColumn(iRow, "elbulbodstat");
    if ( elbulbodstat == "9" ) {
        sysf_messageBox("미접수환자는 진행이 불가능 합니다.","E");
        return;
    }  

	if(SetFlag == "S"){
        /*	    
		if(etcordflag != "" && etcordflag != "-"){
			messageBox("이미 등록된 내역이 있습니다.", " I");
			return;
		}
		*/
		//등록
		if(EtcOrdFlag == "Diag"){
			flag = "A";
		} else if(EtcOrdFlag == "Copy"){
			flag = "B";
		} else if(EtcOrdFlag == "Vacn"){
			flag = "C";
		} else if(EtcOrdFlag == "Diag2"){
			flag = "D";
		} else if(EtcOrdFlag == "Copy2"){
			flag = "E";			
		}
			
	}else{
		if(etcordflag == "" || etcordflag == "-"){
			sysf_messageBox("취소할 내역이 없습니다.", "I");
			return;
		}
		if(EtcOrdFlag == "Diag" || EtcOrdFlag == "Diag2"){
			if(etcordflag != "G"){
				sysf_messageBox("취소할 수 없습니다.", "I");
				return;
			}
		}else if(EtcOrdFlag == "Copy"){  //Copy: 진찰료 0%(사본발행) 취소
			if(etcordflag != "K"){
				sysf_messageBox("취소할 수 없습니다.", "I");
				return;
			}
		}else if(EtcOrdFlag == "Copy2"){  //Copy2: 진찰료 50%(사본발행) 취소
			if(etcordflag != "D"){
				sysf_messageBox("취소할 수 없습니다.", "I");
				return;
			}
		}else if(EtcOrdFlag == "Vacn"){
			if(etcordflag != "L"){
				sysf_messageBox("취소할 수 없습니다.", "I");
				return;
			}
		}
		flag = "-";			//취소
	}
	
	ds_data.clearData();
	ds_data.addRow();
	
	ds_data.setColumn(0, "flag", flag);
	ds_data.setColumn(0, "otpt_pid", 	ds_outpatlist.getColumn(iRow, "pid"));
	ds_data.setColumn(0, "otpt_orddd", 	ds_outpatlist.getColumn(iRow, "orddd"));
	ds_data.setColumn(0, "otpt_cretno", ds_outpatlist.getColumn(iRow, "cretno"));
	
	var oParam = {};
		oParam.id      = "TXMNO00107";
		oParam.service = "outcareapp.OutCareMngt";
		oParam.method  = "reqSetEtcOrdFlagUpdt";
		oParam.inds    = "req=" + "ds_data";		
		oParam.async   = false;
		oParam.callback = "cf_TXMNO00107";

	tranf_submit(oParam);
}

function cf_TXMNO00107(sSvcId, nErrorCode, sErrorMsg) {
	if(nErrorCode > -1) {
		fReqOutPatList();
	}
}

function fOpenChgDrGrup() {
    div_chgdrinfo.visible = true;
}

function fChgDrInfo() {
    var iRow = ds_outpatlist.rowposition;
    
   // 접수 상태일때만 의사변경 가능하도록 함.
    var elbulbodstat    = ds_outpatlist.getColumn(iRow, "elbulbodstat");    
    var orddeptcd       = ds_cond.getColumn(0, "orddeptcd");
    
    if (elbulbodstat !=  "0" ) {
        sysf_messageBox("환자 접수 상태일때만 의사변경이 가능합니다.", "C") ;
        return;
    }

    // 진료과가 같을 경우만 업데이트 가능하도록 함.
    if (orddeptcd !=  sysf_getUserInfo("dutplcecd")) {
        sysf_messageBox("로그인한 진료과와 환자의 진료과가 같을 경우만 의사 변경이 가능합니다.", "C") ;
        return;
    }
    
    var pid				= ds_outpatlist.getColumn(iRow, "pid");
    var orddd			= ds_outpatlist.getColumn(iRow, "orddd");
    var ordtm			= ds_outpatlist.getColumn(iRow, "ordtm");
    var cretno			= ds_outpatlist.getColumn(iRow, "cretno");
    var subdeptcd		= "";//ds_outpatlist.getColumn(iRow, "subdeptcd");	// 해당 컬럼 없음
    var centcd			= ds_outpatlist.getColumn(iRow, "centcode");
    var orddrid			= ds_outpatlist.getColumn(iRow, "orddrid");
    var rsrvflag		= ds_outpatlist.getColumn(iRow, "rsrvflag");    
    var instcd			= ds_outpatlist.getColumn(iRow, "instcd");
    var fsexamflag		= ds_outpatlist.getColumn(iRow, "fsexamflag");
    var chgorddrid      = ds_cond.getColumn(0, "chgorddrid");
    
    if (ds_userlist.lookup("userid", chgorddrid, "refseq") == "A") {
        sysf_messageBox("선택진료의로 변경은 불가능합니다. 원무팀에서 변경하시기 바랍니다.", "C") ;
        return;        
    }

    if (ds_userlist.lookup("userid", orddrid, "refseq") == "A") {
        sysf_messageBox("선택진료의에서의 변경은 불가능합니다. 원무팀에서 변경하시기 바랍니다.", "C") ;
        return;        
    }
    
    ds_savedata.clearData();
    ds_savedata.addRow();
            
    ds_savedata.setColumn(0, "otpt_workflag"         , "J");
    ds_savedata.setColumn(0, "otpt_pid"              , pid);
    
    ds_savedata.setColumn(0, "otpt_orddd_old"        , orddd);
    ds_savedata.setColumn(0, "otpt_ordtm_old"        , ordtm);
    ds_savedata.setColumn(0, "otpt_cretno_old"       , cretno);
    ds_savedata.setColumn(0, "otpt_orddeptcd_old"    , orddeptcd);
    ds_savedata.setColumn(0, "otpt_subdeptcd_old"    , subdeptcd);
    ds_savedata.setColumn(0, "otpt_centcd_old"       , centcd);
    ds_savedata.setColumn(0, "otpt_orddrid_old"      , orddrid);
    ds_savedata.setColumn(0, "otpt_rsrvflag_old"     , rsrvflag);
    
    ds_savedata.setColumn(0, "otpt_orddd_new"        , orddd);
    ds_savedata.setColumn(0, "otpt_ordtm_new"        , ordtm);
    ds_savedata.setColumn(0, "otpt_cretno_new"       , cretno);
    ds_savedata.setColumn(0, "otpt_orddeptcd_new"    , orddeptcd);
    ds_savedata.setColumn(0, "otpt_subdeptcd_new"    , subdeptcd);
    ds_savedata.setColumn(0, "otpt_centcd_new"       , centcd);
    ds_savedata.setColumn(0, "otpt_orddrid_new"      , chgorddrid);
    ds_savedata.setColumn(0, "otpt_rsrvflag_new"     , rsrvflag);    
    
    ds_savedata.setColumn(0, "otpt_updtcnclresn"     , "");
    ds_savedata.setColumn(0, "otpt_instcd"           , instcd);
    ds_savedata.setColumn(0, "otpt_fsexamflag_old"   , fsexamflag);
    ds_savedata.setColumn(0, "checkfsexamyn"         , "N");
    ds_savedata.setColumn(0, "sess_userid"           , sysf_getUserInfo("userid"));


    // 재조회하기 위한 값을 셋해준다.    
    ds_savedata.setColumn(0, "pid"               , ds_cond.getColumn(0, "pid"));
    ds_savedata.setColumn(0, "orddd"             , ds_cond.getColumn(0, "orddd"));
    ds_savedata.setColumn(0, "orddeptcd"         , ds_cond.getColumn(0, "orddeptcd"));
    ds_savedata.setColumn(0, "orddrid"           , ds_cond.getColumn(0, "orddrid"));
    ds_savedata.setColumn(0, "elbulbodstat"      , ds_cond.getColumn(0, "elbulbodstat"));
    ds_savedata.setColumn(0, "deptflag"          , ds_cond.getColumn(0, "deptflag"));
    ds_savedata.setColumn(0, "chkprcp"           , ds_cond.getColumn(0, "chkprcp"));
    ds_savedata.setColumn(0, "speedflag"         , ds_cond.getColumn(0, "speedflag"));
    
    
	//20191031 이돈희 문제점 : 진료의 변경시 재진환자가 초진환자가 됨
	//                   해결 : 원무에 EMR화면에서 진료의 변경 정보를 전달함
    ds_savedata.setColumn(0, "otpt_emrchangedoc" , "Y");
    
    var oParam = {};
		oParam.id      = "TXMMO04206";
		oParam.service = "prcpmngtapp.EtcPrcpMngt";
		oParam.method  = "reqExeChgPatDrInfo";
		oParam.inds    = "req=" + "ds_savedata";		
		oParam.async   = false;
		oParam.callback = "cf_TXMMO04206";

	tranf_submit(oParam);
}

function cf_TXMMO04206(sSvcId, nErrorCode, sErrorMsg) {
	if(nErrorCode != 0) {
		sysf_messageBox("의사변경에 실패했습니다.", "C");
    }
    
    div_chgdrinfo.visible = false;
    
    fReqOutPatList();
}

/**
 * @desc   : 안전사고 보고 
 * @param  :
 * @return : 
 * @author : 엄영만
 * @---------------------------------------------------
 */
function fPatQi(){
    var currow      = ds_outpatlist.rowposition;
    var pid 		= ds_outpatlist.getColumn(currow, "pid");
	var orddd 		= ds_outpatlist.getColumn(currow, "orddd");
	var cretno 	    = ds_outpatlist.getColumn(currow, "cretno");
	var ordtype     = "O";
	var oprsrvno    = "";
	
	frmf_setParameter("SMMQR00100_PARAM2", pid + "▦" + orddd + "▦" + cretno + "▦" + ordtype+"▦" + oprsrvno);
	frmf_modal("SMMQR00100", "SMMQR00100", null, null, null, null, null, null, null, null, null, null, "M");
}

/**
 * @desc   : 외래예약현황출력
 * @param  :
 * @return : 
 * @author : 엄영만	15.05.20 현행화
 * @---------------------------------------------------
 */
function fPrintOutRsrvState() {
    var sOrdDeptCd = ds_cond.getColumn(0, "orddeptcd");	//model.getValue("root/main/cond/orddeptcd");
    var sOrdDrId   = ds_cond.getColumn(0, "orddrid");	//model.getValue("root/main/cond/orddrid");
    var sOrdDeptNm = ds_orddept.lookup("deptcd", sOrdDeptCd, "depthngnm");	//model.getValue("/root/init/orddept/dept[deptcd='" + sOrdDeptCd + "']/depthngnm");
    var sOrdDrNm   = ds_userlist.lookup("userid", sOrdDrId, "usernm");		//model.getValue("/root/init/userlist/usercombo[userid='" + sOrdDrId + "']/usernm");  

    frmf_setParameter("SPMMO90400_orddeptcd", sOrdDeptCd);
    frmf_setParameter("SPMMO90400_orddeptnm", sOrdDeptNm);
    frmf_setParameter("SPMMO90400_centcd",    "-");
    frmf_setParameter("SPMMO90400_centnm",    "");
    frmf_setParameter("SPMMO90400_orddrid",   sOrdDrId);
    frmf_setParameter("SPMMO90400_orddrnm",   sOrdDrNm);
    
    //frmf_open("SPMMO90400", "SPMMO90400");
    frmf_modal("SPMMO90400", "SPMMO90400");
}

/**
 * @desc   : 환자라벨출력
 * @param  :
 * @return : 
 * @author : 엄영만
 * @---------------------------------------------------
 */
function fPrintPatLabel(){
    var currow      = ds_outpatlist.rowposition;
    var pid 		= ds_outpatlist.getColumn(currow, "pid");
	var patnm 		= ds_outpatlist.getColumn(currow, "hngnm");
	var sexage	    = ds_outpatlist.getColumn(currow, "sexage");
	
	frmf_setParameter("SMMMB00100_scrnid"     , "SMMMO04100");
	frmf_setParameter("SMMMB00100_pid"        , pid);
	frmf_setParameter("SMMMB00100_patnm"      , patnm);
	frmf_setParameter("SMMMB00100_sexage"     , sexage);

	frmf_modal("SMMMB00100", "SMMMB00100", null, null, null, null, null, null, null, null, null, null, "M");
}

function fSendSmsOutPat(){
    fSendSmsPatList(grd_outpatlist, ds_outpatlist);
}


function fChngGrdFontColor(color){
	if(color == undefined || color == "" || color == "ffffff")
		color = "default";
	else
		color = "#" + color;
		
	return color;
}
]]></Script>