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

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

    수술환자리스트 ( SMMMO04500_수술환자리스트.xfdl - JScript )

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

var arErrorCode = new HashArray();

/**
 * @desc   : 화면 초기화
 * @
 * @param  :
 * @return :
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fInitialize_SMMMO04500(){
	ds_cond.setColumn(0, "opcnfmdd", utlf_getCurrentDate());	
	
	lf_gethardcdArrayList(new Array(
									"hardcd|445"
							       ),
						  new Array(
								    "ds_hardcd"
								   )
						  );
	
	appf_getCodeList([{dsNm: "ds_M0014", cdGrpId: "M0014"}
					, {dsNm: "ds_M0015", cdGrpId: "M0015"}
					, {dsNm: "ds_M0017", cdGrpId: "M0017"}
					, {dsNm: "ds_M0623", cdGrpId: "M0623"}
					, {dsNm: "ds_M0808", cdGrpId: "M0808", sortField: "cdnm"}], true);
					
	lf_getHardCDList("N", 18, 0, ds_hardcdno);                      //마취통증의학과 부서코드 조회
    
	//2016.10.11 [수술탭] Popup Menu 서식코드(Formcd)
    lf_getHardCDList("N", 9969, null, ds_pmenu_formcd);
    
    // 2017.01.03 외상환자 전용 수술방 제어
    lf_getHardCDList("N", 9973, null, ds_init_hardcd9973);
    
    lf_reqOpRoomList(ds_cond.getColumn(0, "opcnfmdd"), ds_oproomlist, ds_alloproomlist, "total");
	var nRow = ds_oproomlist.insertRow(0);
	ds_oproomlist.setColumn(nRow, "oproomcd", "0000");				//수술방명 조회
	ds_oproomlist.setColumn(nRow, "oproomnm", "방없음");			//수술방콤보 Item '방없음'추가
	
	ds_oproomlist2.copyData(ds_oproomlist);
	frmf_addComboItem("Div00.cmb_oproomcd");		               	//조회조건 수술방콤보 Item '전체'추가
	Div00.cmb_oproomcd.index = 0;									//수술방 콤보는 default '전체'설정
        
	var dutplcecd  = sysf_getUserInfo("dutplcecd");
	var perfdrid = "-";

	var reopenflag = parent.parent.ds_reopen.getColumn(0, "reopenflag");   //진료대상자 리스트 open여부
	if(reopenflag == "Y"){		//수술환자리스트 다시 열린 경우, 진료대상자 main에 ordtab의 condlist를 복사, condlist는 닫힐때 진료대상자의 정보를 저장함
		try {
			ds_cond.copyData(parent.parent.ds_reopen_condlist);
			dutplcecd = ds_cond.getColumn(0, "perfdeptcd");
			perfdrid  = ds_cond.getColumn(0, "perfdrid");
		} catch(E) {
		}
		parent.parent.ds_reopen.setColumn(0, "reopenflag", "N");		
	}
	
	var jobposcd = sysf_getUserInfo("jobposcd");
	if (jobposcd == "1775" || jobposcd == "1800") {
		perfdrid = "-";							//의사		
	} else {
		perfdrid = sysf_getUserInfo("userid");	//의사
	}

	setDeptCodeList(dutplcecd);	
	setUserList(dutplcecd, perfdrid);
	
	reqOrderInfoOfCol(ds_reqdata1, ds_gridseq, "SMMMO04500", grd_oppatlist); //수술환자리스트 컬럼 조회 및 설정

	if(Div00.cmb_orddept.value == ""){Div00.cmb_orddept.index = 1;}
	if(Div00.cmb_orddrid.value == ""){Div00.cmb_orddrid.index = 1;}
    
    fReqOPPatList();
    
    // 20190408 김현석, 마취 전 평가서 출력은 칠곡만..
    if(sysf_getUserInfo("dutplceinstcd") == "032") {
		btn_anst_print.visible =true;		
	}
	else{
		btn_anst_print.visible =false;
	}	    
		
	// 공통코드를 가져온다.
	dsf_createDs("ds_send");
	dsf_createDs("ds_codelist");
	var pCdrupid  = "'012'";		// 마취통증의학과 부서코드
	var pFromDate = utlf_getCurrentDate(); //조회기준일자
	
	// 간호 하드코드 가져오기.
	fGetNursHardCdInfo(pCdrupid, pFromDate);	
	
	var anstdeptcd = utlf_transNullToEmpty(ds_codelist.getColumn(0, "cdid"));
	// 김현석, 소속부서가 마취통증의학과인 경우에만 마취통증의학과 전달사항 저장 가능
	if (sysf_getUserInfo("dutplcecd") == anstdeptcd) // "2090000000")	
	{
		divAnstDeliveFact.btnSave.visible = true;	
		}
	else
	{
		divAnstDeliveFact.btnSave.visible = false;	
	}
}

function setDeptCodeList(sDeptcd, sOrddd){
	lf_mmbfGetDeptCodeComboList(ds_orddept, "D", sOrddd);	//부서콤보 조회
	
	frmf_addComboItem("Div00.cmb_orddept");     			//부서콤보 Item '전체'추가
	
	if(!utlf_isNull(sDeptcd)) {
		Div00.cmb_orddept.value = sDeptcd;					//진료과
	}
}

function setUserList(sOrddeptcd, sPerfdrid, sOrddd){
	lf_mmbfGetUserComboList(ds_userlist,  sOrddeptcd, "0330", "", "M", sOrddd, "", "P");	//이전 수술환자리스트 화면의 진료과의 의사콤보 조회
	
	frmf_addComboItem("Div00.cmb_orddrid");  //의사콤보 전체항목 추가
	
	if(utlf_isNull(sPerfdrid)){
		Div00.cmb_orddrid.index = 1;
		Div00.cmb_orddrid.updateToDataset();
	}else{
		Div00.cmb_orddrid.value = sPerfdrid;		//의사
	}
}

/**
 * @desc   : 수술환자 선택
 * @
 * @param  :
 * @return :
 * @author : 오지훈 
 * @---------------------------------------------------
 */ 
function fSelectOpPat(){
    var currow     = ds_grd_oppatlist.rowposition;    
    if(currow < 0){
        return;
    }
    
    var dutplcecd  = sysf_getUserInfo("dutplcecd");       //사용자부서
    
    var instcd       = sysf_getUserInfo("dutplceinstcd");
    var opstatcd     = ds_grd_oppatlist.getColumn(currow, "opstatcd");
    var painlessflag = ds_grd_oppatlist.getColumn(currow, "painlessflag");  // 무통마취여부가 N일 경우는 수술마취 확정상태에 따라 Blocking : 2009.02.05 :김영학 (박유미선배 요청)
    var pid          = ds_grd_oppatlist.getColumn(currow, "pid");
    var hngnm        = ds_grd_oppatlist.getColumn(currow, "hngnm");    
    var opcnfmdd     = ds_grd_oppatlist.getColumn(currow, "opcnfmdd");
    var perfdeptcd   = ds_grd_oppatlist.getColumn(currow, "perfdeptcd");
    var perfdrid     = ds_grd_oppatlist.getColumn(currow, "perfdrid");
    var ioflag       = ds_grd_oppatlist.getColumn(currow, "ioflag");
    var srchdd       = ds_cond.getColumn(0, "opcnfmdd");
    if(utlf_isNull(perfdeptcd)) perfdeptcd = ds_cond.getColumn(0, "perfdeptcd");
    if(utlf_isNull(ioflag))     ioflag     = "T";
    
   if(painlessflag == "N") {
        if(opstatcd == "00" || opstatcd == "10"){
            sysf_messageBox("선택된 환자는 수술확정이 되지", "E007");
            return;
        }
    }
    
	if(	sysf_getGlobalVariable("able_sel_patlist", "M") == "N" ) { // 환자 선택 가능 여부 체크 2012.09.03 엄영만
	    sysf_messageBox("현재 로그인한 '"+ sysf_getUserInfo("dutplcenm") +"' 부서는 기록저장 및 처방발행이 불가능한 부서 입니다.\n\n다시 로그인 후 진행 하십시오.","E");
	    return false;
	}
	
	//2016.05.09 마취전평가 및 협진서 미작성 시 마취기록지 사용못하도록 제한
	if((sysf_getUserInfo("dutplcecd") == "2090000000" || sysf_getUserInfo("dutplcecd") == "2090300000")
		&& parent.parent.SMMMO04100_getDSMainCond("ordrecflag") != "Y"){ //사용자부서가 마취통증의학과, 통증클리닉인 경우
		
		// 2017.01.03 외상환자 전용 수술방 제어
		var trpatyn	= ds_grd_oppatlist.getColumnInfo("trpatyn") == null ? "Y" : ds_grd_oppatlist.getColumn(currow, "trpatyn");
		var nTarRow = ds_init_hardcd9973.findRow("hardcd", ds_grd_oppatlist.getColumn(currow, "oproomnm"));
		if( trpatyn != "Y" && nTarRow > -1 ){
			var setDate = utlf_transNullToEmpty(ds_init_hardcd9973.getColumn(nTarRow, "hardcdnm")).split("|")[0];
			if( !utlf_isNull(setDate) && setDate.length == 8 && setDate <= opcnfmdd ){
				sysf_messageBox("선택된 환자 수술방은 외상환자 수술방입니다. 수술방 변경 후 진행하십시오.", "E");
				//return false;
			}
		}
		
		if( lf_TRMMR03714() == false ){
			var rtn = sysf_messageBox("선택된 환자는 마취전평가 및 협진서 작성이 되지않았습니다. 기록 작성 후 진행하십시오.", "E");
			return false;
			/*
			if( rtn == 6 ){
				if( lf_OpAssemRec() == false ){
					return false;
				}
			}else{
				return false;
			}
			*/
		}else if(lf_getHardCDList("Y", 9970, 3, null) == "Y" && lf_OpAssemRecExist("STEP4") == false){	//2016.10.11 [수술탭] 마취유도직전평가서 제어여부
			var rtn = sysf_messageBox("선택된 환자는 마취유도직전평가서 작성이 되지않았습니다. 기록 작성 후 진행하십시오.", "E");
			return false;
		}
	}
	
	//20150717	*	
	ds_reqdata.clearData();
	ds_reqdata.addRow();
	
	ds_reqdata.setColumn(0, "ioflag"   , "T"); //수술환자 ioflag는 T로 설정, 실제로 T는 없으나, 로직처리를 위해 임시로, 실제 ioflag는 patflag
    ds_reqdata.setColumn(0, "pid"      , pid);
    ds_reqdata.setColumn(0, "orddd"    , opcnfmdd);
    ds_reqdata.setColumn(0, "orddeptcd", perfdeptcd);
    ds_reqdata.setColumn(0, "orddrid"  , perfdrid);
    ds_reqdata.setColumn(0, "patflag"  , ioflag); //실제 ioflag는 patflag로 설정
    ds_reqdata.setColumn(0, "instcd"   , instcd); //기관코드
    ds_reqdata.setColumn(0, "srchdd"   , srchdd); //기준일자
    
    var oParam = {};
		oParam.id      = "TRMMO04503";
		oParam.service = "prcpmngtapp.EtcPrcpMngt";
		oParam.method  = "reqGetPamKeyInfo";
		oParam.inds    = "req=" + "ds_reqdata";
		oParam.outds   = "ds_pamkeyinfo=pamkeyinfo";
		oParam.async   = false;
		oParam.callback = "cf_TRMMO04503";		  //수술환자의 원무키 조회

	tranf_submit(oParam);
	
	if(arErrorCode.pop("TRMMO04503") >= 0){
		var cnt = ds_pamkeyinfo.rowcount;
    	if(cnt > 1){
    	    sysf_messageBox("환자의 원무 접수정보가 2건이상 존재 합니다.\n\n처방및 기록을 저장하실 원무 접수 정보를 선택", "I007");
    	    
    	    var objArg = new Object();
			var ds_param = new Dataset();
			ds_param.copyData(ds_pamkeyinfo);			
			objArg.arg_ds_pamkeyinfo = ds_param;	
    	    
    	    frmf_modal("SPMMO18300", "SPMMO18300", objArg, "", "", "", "", "", "", "", "", "", "M");
    		
    		var cretno = frmf_getParameter("SPMMO18300_cretno");
    		if(cretno == "0") {
    		    sysf_messageBox("환자의 원무 접수정보가 선택 되지", "E007");
                return;
    		} else {
				ds_pamkeyinfo.setColumn(0, "cretno", cretno);
    		}
    	}
	} else {
		sysf_messageBox("선택된 환자는 원무 접수 정보가", "E014");
        return;
	}
	//20150717	*/        
	
    //처방, CP화면에 modal 또는 modaless가 뜬 경우, 환자 선택 불가
    if(fChkScrnDisable()==false){
        return;
    }
    
    //CP환자 여부 확인
   if(fChkCPPatValid(currow)==false){
     return;
   }

    // 진료기록에 수정된 사항이 있을 경우 저장할 것인지 묻는 함수 호출 : 2009. 07. 27 김영학    
	var mainobj = frmf_getMainViewer();
	var mainscrnid  = mainobj.frmf_getScreenID(); //메인화면의 기록지 ID    
	if(mainscrnid == "SMMMR00100"){
        var prvIntRecPamInfRtn = mainobj.fPrevInitRecPamInfo();
		if(prvIntRecPamInfRtn  == false){
			return;
		}// 기록지에 필수 입력사항을 입력하지 않았을 때 그냥 넘어가 버리는 오류 수정  20100305 LYJ
    }

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

	//20150717	/* 
	
	// 상단정보 설정
	if(!fReqOpPatPamInfo(currow)) { return; }
	
	// 진료기록, 처방화면 연동
	var recflag = parent.parent.SMMMO04100_getDSMainCond("recflag");        
	parent.parent.fOpenPrcpMainWnd(recflag);
}

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

/**
 * @desc   : 수술환자 기본정보설정
 * @
 * @param  :
 * @return :
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fReqOpPatPamInfo(iRow){
	var ioflag     = "T" // 수술일 경우 ioflag:T
	var pid        = ds_grd_oppatlist.getColumn(iRow, "pid");
	var opcnfmdd   = ds_grd_oppatlist.getColumn(iRow, "opcnfmdd");
	var cretno     = ds_pamkeyinfo.getColumn(0, "cretno");
	var instcd     = ds_grd_oppatlist.getColumn(iRow, "instcd");
	var perfdeptcd = ds_grd_oppatlist.getColumn(iRow, "perfdeptcd");
	var perfdrid   = ds_grd_oppatlist.getColumn(iRow, "perfdrid");
	var patflag    = ds_grd_oppatlist.getColumn(iRow, "ioflag");   
	var procflag   = "F"; // 최초조회:F , 재조회:R
	var cnstopflag = ds_grd_oppatlist.getColumn(iRow, "cnstopflag");
	var oprsrvno   = ds_grd_oppatlist.getColumn(iRow, "oprsrvno");
	var mainoprsrvno   = ds_grd_oppatlist.getColumn(iRow, "mainoprsrvno");
/*  // 협진수술일때 부수술일 경우 주수술의 기록지가 뜨는 로직 삽입  : 2008. 08.27 (박유미 요청)
   if (cnstopflag == "Y") {
       if (mainoprsrvno != "-") {
           oprsrvno = mainoprsrvno;
       }
   }
*/   
	var ophistno   = ds_grd_oppatlist.getColumn(iRow, "ophistno");
	var srchdd     = ds_cond.getColumn(0, "opcnfmdd"); //조회일자
   
	var param      = ioflag     + "▦" + 
                     pid        + "▦" + 
                     opcnfmdd   + "▦" + 
                     cretno     + "▦" +
                     instcd     + "▦" + 
                     perfdeptcd + "▦" + 
                     perfdrid   + "▦" + 
                     patflag    + "▦" + 
                     procflag   + "▦" + 
                     oprsrvno   + "▦" + 
                     ophistno   + "▦" + 
                     srchdd;
                
	return appf_initPatientInfo(param);
}

/**
 * @desc   : 수술환자리스트 조회
 * @
 * @param  :
 * @return :
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fReqOPPatList() {
	parent.parent.ds_cond_oppatlist.copyData(ds_cond);
	
	//마취통증의학과와 조회진료과가 동일한 경우는 전체 조회 처리
    //서버로직으로의 처리는 속도영향이 있음으로 web에서 처리
    //2008. 07. 29. 오지훈    
    ds_reqOpPat.copyData(ds_cond);    
    var anstpaindeptcd = ds_hardcdno.getColumn(0, "hardcd");    
    if(anstpaindeptcd == ds_cond.getColumn(0, "perfdeptcd")){
		ds_reqOpPat.setColumn(0, "perfdeptcd", "-"); //집도과 전체설정
        ds_reqOpPat.setColumn(0, "perfdrid"  , "-"); //집도의 전체설정        
    }
    
    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_reqOpPat.addColumn("compsrefcnts", "string", 1024);
    ds_reqOpPat.addColumn("compssizecnts", "string", 1024);
    
    ds_reqOpPat.setColumn(0, "compsrefcnts", compsrefcnts);
    ds_reqOpPat.setColumn(0, "compssizecnts", compssizecnts);
    
    var oParam = {};
		oParam.id      = "TRMMO04501";
		oParam.service = "prcpmngtapp.EtcPrcpMngt";
		oParam.method  = "reqGetOPPatList";
		oParam.inds    = "req=" + "ds_reqOpPat";
		oParam.outds   = "ds_grd_oppatlist=oppatlist ds_op_count=opanstcount";
		oParam.async   = true;
		oParam.callback = "cf_TRMMO04501";

	tranf_submit(oParam);
}

function cf_TRMMO04501(sSvcId, nErrorCode, sErrorMsg) {
	if(nErrorCode > -1)
		ds_totcnt.setColumn(0, "totcnt", ds_grd_oppatlist.rowcount);
	
    var orderby = ds_cond.getColumn(0, "orderby");
    var sortcol = ds_cond.getColumn(0, "sortcol");
    
    if(!utlf_isNull(orderby) && !utlf_isNull(sortcol))
        ds_grd_oppatlist.keystring.current  = "S:" + orderby + sortcol;
        
	if(ds_op_count.rowcount > 0){
		var sOpCount = "전체 : " + ds_op_count.getColumn(0, "total") + ", " +
						"확정 : " + ds_op_count.getColumn(0, "confirm") + " " +
						"(전신 : " + ds_op_count.getColumn(0, "anst1") + ", " +
						"부위 : " + ds_op_count.getColumn(0, "anst2") + ", " +
						"국소 : " + ds_op_count.getColumn(0, "anst3") + "), " +
						"의뢰 : " + ds_op_count.getColumn(0, "request");
						
		Static_opcount.text = sOpCount;
	}
}

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

/**
 * @desc   : (수술)관심환자등록창 호출
 * @
 * @param  :
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fCallWndConcPatRgst(){
    var currow = ds_grd_oppatlist.rowposition;
    var pid    = ds_grd_oppatlist.getColumn(currow, "pid");
    var hngnm  = ds_grd_oppatlist.getColumn(currow, "hngnm");
    var indd   = ds_grd_oppatlist.getColumn(currow, "opcnfmdd");
    var cretno = ""
    var seqno  = ""
    var instcd = ds_grd_oppatlist.getColumn(currow, "instcd");
    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");
    //fReqOPPatList();
}

/**
 * @desc   : (수술)주의요망환자창 호출
 * @
 * @param  :
 * @return :
 * @author : 엄영만
 * @---------------------------------------------------
 */
function fCallWndWarnPat(){
    var nCurRow = ds_grd_oppatlist.rowposition;
    var sPid    = ds_grd_oppatlist.setColumn(nCurRow, "pid");
    var sHngnm  = ds_grd_oppatlist.setColumn(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");
}

/**
 * @desc   : 수술부위확인 점검표 창 호출
 * @
 * @param  : oprsrvno
 * @return :
 * @author : 손성훈
 * @---------------------------------------------------
 */

function fOpchk(){
	/*	수술부위 확인점검표 칠곡 적용.2012.05.24_손성훈
	var dutplceinstcd = getUserInfo("dutplceinstcd");
	if (dutplceinstcd == "032"){
		//messagebox("준비중 입니다","I");
		return;						
	}
	*/
	var currow 	 = ds_grd_oppatlist.rowposition;
	var oprsrvno = ds_grd_oppatlist.getColumn(currow, "oprsrvno");
	frmf_setParameter("SMMNP00208_PARM_OPRSRVNO", oprsrvno);
	//setParameter("SMMNP00208_PARM_PID", model.getValue("/root/init/HideData/pid"));
	frmf_modal("SMMNP00208", "SMMNP00208", null, null, null, null, null, null, null, null, null, null, "M");
}

/**
 * @desc   : 수술환자 CP적용여부 확인
 * @
 * @param  :
 * @return : 
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fChkCPPatValid(currow){
    var pid   = ds_pamkeyinfo.getColumn(0, "pid");
	var orddd = ds_pamkeyinfo.getColumn(0, "orddd");
	var cretno= ds_pamkeyinfo.getColumn(0, "cretno");
	var ioflag= ds_pamkeyinfo.getColumn(0, "ioflag");
	var hngnm = "";//ds_pamkeyinfo.getColumn(0, "hngnm");
        
    ds_reqPatValid.clearData();
    ds_reqPatValid.addRow();
    ds_reqPatValid.setColumn(0, "pid"         , pid);
    ds_reqPatValid.setColumn(0, "orddd"       , orddd);
    ds_reqPatValid.setColumn(0, "cretno"      , cretno);
    ds_reqPatValid.setColumn(0, "hngnm"       , hngnm);	//추가(2008.08.25)
    ds_reqPatValid.setColumn(0, "prcpgenrflag", ioflag);        
    ds_reqPatValid.setColumn(0, "srchtabflag" , "D");	  //대상자리스트탭(I/D):조회결과orddd,cretno는 외래이력의 수전정보임
    
    var oParam = {};
		oParam.id      = "TRMMO04303";
		oParam.service = "prcpbaseapp.CpMngt";
		oParam.method  = "reqGePattValidity";
		oParam.inds    = "req=" + "ds_reqPatValid";
		oParam.outds   = "ds_rsltgetdata=getdata";
		oParam.async   = false;
		oParam.callback = "cf_TRMMO04303";		//수술환자의 CP적용 여부 확인      

	tranf_submit(oParam);
	
	if(arErrorCode.pop("TRMMO04303") >= 0){
        if(ds_rsltgetdata.rowcount < 1){ //cp적용환자 tbl에 유효한 데이터가 없는 경우      
			parent.parent.SMMMO04100_setDSRoot("cpflag", "N"); //처방open
			return true;
		} else { //CP적용환자 tbl에 유효한 데이터가 있는 경우
			dsf_setDefaultVal(ds_rsltgetdata, "appyn:Y");
		
			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 == 52){
				//case52: 입원장 CP
				var rtnval = sysf_messageBox(msgcnts, msgflag);
				if(rtnval == 6){
					parent.parent.SMMMO04100_setDSRoot("cpflag", "X");		// CP Main open
					return true;
				} else {
					parent.parent.SMMMO04100_setDSRoot("cpflag", "N");
// 					if(fUpdtCPPatAppStatVal(41) != false && !utlf_isNull(ds_grd_oppatlist.getColumn(currow, "cpyn"))){			//41 : CP 취소
// 						ds_grd_oppatlist.setColumn(currow, "cpyn", "N");
// 						return;
// 					} else {
						return false;
//					}
				}
			} else  {
				if( prtlflagcd == "02" && utlf_isNull(appstat) && msgflag == "P" ){ //모니터링구분:대상자탐색 Case. 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"    , ioflag);
					frmf_setParameter("SMMMO041_orddeptcd"  , perfdeptcd);
					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(ds_grd_oppatlist.getColumn(currow, "cpyn"))){ //진행중인 CP가 있는데 팝업에서 Drop한 경우 CP여부 N으로..
// 						ds_grd_oppatlist.setColumn(currow, "cpyn", "N");
// 					}
					if( !utlf_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 {
					//case 12 : D0 ~ D1 CP
					//그외 case : (10 : 진행중...)
					if( !utlf_isNull(msgcnts) && !utlf_isNull(msgflag) ){
						//12: D0 처방일과 == 입원일 -> Drop 유도
						//그외: 오늘날짜 > 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" ){							
							//ds_grd_erpatlist.setColumn(currow, "cpyn", "N");
						}else{
							return false;
						}
						frmf_clearParameter("SMMMO043_cpgappno");
						frmf_clearParameter("SMMMO043_drop");
						return true;
					}
					
					parent.parent.SMMMO04100_setDSRoot("cpflag", "Y");
					return true;
				}
			}
		}
	}
}

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

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");
	if(utlf_isNull(ds_cond.getColumnInfo("oproom"))) ds_cond.addColumn("oproom", "string");
	ds_cond.setColumn(0, "orddeptnm", Div00.cmb_orddept.text);
	ds_cond.setColumn(0, "orddrnm", Div00.cmb_orddept.text);
	ds_cond.setColumn(0, "oproom", Div00.cmb_oproomcd.text);
	
	//20190122 이돈희 : 수술 카운트 출력에 추가
	ds_cond.addColumn("totalcount", "string", 1024);
	ds_cond.addColumn("requestcount", "string", 1024);
	ds_cond.addColumn("confirmcount", "string", 1024);
	ds_cond.addColumn("anst1count", "string", 1024);
	ds_cond.addColumn("anst2count", "string", 1024);
	ds_cond.addColumn("anst3count", "string", 1024);
	
	ds_cond.setColumn(0, "totalcount", ds_op_count.getColumn(0, "total"));
	ds_cond.setColumn(0, "requestcount", ds_op_count.getColumn(0, "request"));
	ds_cond.setColumn(0, "confirmcount", ds_op_count.getColumn(0, "confirm"));
	ds_cond.setColumn(0, "anst1count", ds_op_count.getColumn(0, "anst1"));
	ds_cond.setColumn(0, "anst2count", ds_op_count.getColumn(0, "anst2"));
	ds_cond.setColumn(0, "anst3count", ds_op_count.getColumn(0, "anst3"));

    var objDOM = rptf_createDOM();														// DOM 객체 설정	
	rptf_setNodeListToDOM(objDOM, "/root/main/oppatinfo/oppatlist", ds_grd_oppatlist);	// 데이터셋 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(["RPMMO04105"],[objParam], option);
}

/**
 * @desc   : 안전사고 보고 
 * @param  :
 * @return : 
 * @author : 엄영만
 * @---------------------------------------------------
 */
function fPatQi(){
    var currow      = ds_grd_oppatlist.rowposition
    var pid 		= ds_grd_oppatlist.getColumn(currow, "pid");
	var orddd 		= "";
	var cretno 	    = "";
	var ordtype     = "";
	var oprsrvno    = ds_grd_oppatlist.getColumn(currow, "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");
}

function fSelectOpPat_pamkeyinfo(){

	var currow     = ds_grd_oppatlist.rowposition;    
    if(currow < 0){
        return;
    }
    
    var dutplcecd  = sysf_getUserInfo("dutplcecd");       //사용자부서
    var instcd       = sysf_getUserInfo("dutplceinstcd");
    var opstatcd     = ds_grd_oppatlist.getColumn(currow, "opstatcd");
    var painlessflag = ds_grd_oppatlist.getColumn(currow, "painlessflag");  // 무통마취여부가 N일 경우는 수술마취 확정상태에 따라 Blocking : 2009.02.05 :김영학 (박유미선배 요청)
    var pid          = ds_grd_oppatlist.getColumn(currow, "pid");
    var hngnm        = ds_grd_oppatlist.getColumn(currow, "hngnm");    
    var opcnfmdd     = ds_grd_oppatlist.getColumn(currow, "opcnfmdd");
    var perfdeptcd   = ds_grd_oppatlist.getColumn(currow, "perfdeptcd");
    var perfdrid     = ds_grd_oppatlist.getColumn(currow, "perfdrid");
    var ioflag       = ds_grd_oppatlist.getColumn(currow, "ioflag");
    var srchdd       = ds_cond.getColumn(0, "opcnfmdd");
    if(utlf_isNull(perfdeptcd)) perfdeptcd = ds_cond.getColumn(0, "perfdeptcd");
    if(utlf_isNull(ioflag))     ioflag     = "T";
	
    ds_reqdata.clearData();
	ds_reqdata.addRow();
	
	ds_reqdata.setColumn(0, "ioflag"   , "T"); //수술환자 ioflag는 T로 설정, 실제로 T는 없으나, 로직처리를 위해 임시로, 실제 ioflag는 patflag
    ds_reqdata.setColumn(0, "pid"      , pid);
    ds_reqdata.setColumn(0, "orddd"    , opcnfmdd);
    ds_reqdata.setColumn(0, "orddeptcd", perfdeptcd);
    ds_reqdata.setColumn(0, "orddrid"  , perfdrid);
    ds_reqdata.setColumn(0, "patflag"  , ioflag); //실제 ioflag는 patflag로 설정
    ds_reqdata.setColumn(0, "instcd"   , instcd); //기관코드
    ds_reqdata.setColumn(0, "srchdd"   , srchdd); //기준일자
    
    var oParam = {};
		oParam.id      = "TRMMO04503";
		oParam.service = "prcpmngtapp.EtcPrcpMngt";
		oParam.method  = "reqGetPamKeyInfo";
		oParam.inds    = "req=" + "ds_reqdata";
		oParam.outds   = "ds_pamkeyinfo=pamkeyinfo";
		oParam.async   = false;
		oParam.callback = "cf_TRMMO04503";		  //수술환자의 원무키 조회

	tranf_submit(oParam);
	
	if(arErrorCode.pop("TRMMO04503") >= 0){
		var cnt = ds_pamkeyinfo.rowcount;
    	if(cnt > 1){
    	    sysf_messageBox("환자의 원무 접수정보가 2건이상 존재 합니다.\n\n처방및 기록을 저장하실 원무 접수 정보를 선택", "I007");
    	    
    	    var objArg = new Object();
			var ds_param = new Dataset();
			ds_param.copyData(ds_pamkeyinfo);			
			objArg.arg_ds_pamkeyinfo = ds_param;	
    	    
    	    frmf_modal("SPMMO18300", "SPMMO18300", objArg, "", "", "", "", "", "", "", "", "", "M");
    		
    		var cretno = frmf_getParameter("SPMMO18300_cretno");
    		if(cretno == "0") {
    		    sysf_messageBox("환자의 원무 접수정보가 선택 되지", "E007");
                return;
    		} else {
				ds_pamkeyinfo.setColumn(0, "cretno", cretno);
    		}
    	}
	} else {
		sysf_messageBox("선택된 환자는 원무 접수 정보가", "E014");
        return;
	}
}

/**
 * @desc   : 환자라벨출력
 * @param  :
 * @return : 
 * @author : 엄영만
 * @---------------------------------------------------
 */
function fPrintPatLabel(){
    var currow      = ds_grd_oppatlist.rowposition;
    var pid 		= ds_grd_oppatlist.getColumn(currow, "pid");
	var patnm 		= ds_grd_oppatlist.getColumn(currow, "hngnm");
	var sexage	    = ds_grd_oppatlist.getColumn(currow, "sa");
	
	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 fSendSmsOpPat(){
    fSendSmsPatList(grd_oppatlist, ds_grd_oppatlist);
}

//20190409 이돈희 : 수술환자 탭에 환자분류 추가
function lf_AnstClassify(){
	var iRow       = ds_grd_oppatlist.rowposition; 
	var oprsrvno   = ds_grd_oppatlist.getColumn(iRow, "oprsrvno");
	var ophistno   = ds_grd_oppatlist.getColumn(iRow, "ophistno");
	var anstclassify1 = ds_grd_oppatlist.getColumn(iRow, "anstclassify1");
	var anstclassify2 = ds_grd_oppatlist.getColumn(iRow, "anstclassify2");
	
	frmf_setParameter("SPMMI00600_oprsrvno" , oprsrvno);
    frmf_setParameter("SPMMI00600_ophistno" , ophistno);
    if(!utlf_isNull(anstclassify1)){
		frmf_setParameter("SPMMI00600_anstclassify1" , anstclassify1);
    }
    if(!utlf_isNull(anstclassify2)){
		frmf_setParameter("SPMMI00600_anstclassify2" , anstclassify2);
	}
    
    frmf_modal("SPMMI00600", "SPMMI00600", null, null, null, null, null, null, null, null, null, null, "M");
    
    frmf_clearParameter("SPMMI00600_oprsrvno");
    frmf_clearParameter("SPMMI00600_ophistno");
    frmf_clearParameter("SPMMI00600_anstclassify1");
    frmf_clearParameter("SPMMI00600_anstclassify2");
}
]]></Script>