YNU_JEUS/app_home/himed/xpapps/pam/aftjudgxp/xp/SMPID20300.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[
function fInitialize()
{
	grp_predoculist.cap_grptemp.visible = false;
	grp_predoculist.visible = false;

	ds_list1_cldi.clearData();
	ds_list2_clod.clearData();
	ds_list3_clsp.clearData();
	ds_main_list4_clbs.clearData();
	
	ds_hidden_list2_clodsrch.setColumn(0, "selectedRdoMatrAct", "-");
	ds_hidden_list2_clodsrch.setColumn(0, "selectedRdoPay", "0");
	ds_hidden_list2_clodsrch.setColumn(0, "selectedRdoItem", "-");
	
	ds_hidden_list3.setColumn(0, "selectedUnitFlag", "-");
	
	var arrParam = [{dsNm: "ds_init_P0297", cdGrpId: "P0297"}
				   ,{dsNm: "ds_init_P0111", cdGrpId: "P0111"}
				   ,{dsNm: "ds_init_P0112", cdGrpId: "P0112"}
				   ,{dsNm: "ds_init_P0117", cdGrpId: "P0117"}
				   ,{dsNm: "ds_init_P0127", cdGrpId: "P0127"}
				   ,{dsNm: "ds_init_P0131", cdGrpId: "P0131"}
				   ,{dsNm: "ds_init_P0151", cdGrpId: "P0151"}
				   ,{dsNm: "ds_init_P0291", cdGrpId: "P0291"}
				   ,{dsNm: "ds_init_P0287", cdGrpId: "P0287"}
				   ,{dsNm: "ds_init_P0288", cdGrpId: "P0288"}
				   ,{dsNm: "ds_init_P0322", cdGrpId: "P0322"}
				   ,{dsNm: "ds_init_P0236", cdGrpId: "P0236"}
				   ,{dsNm: "ds_init_P0465", cdGrpId: "P0465"}
				   ,{dsNm: "ds_init_P0466", cdGrpId: "P0466"}
				   ,{dsNm: "ds_init_P0155", cdGrpId: "P0155"}
				   ,{dsNm: "ds_init_P0261", cdGrpId: "P0261"}
				   ,{dsNm: "ds_init_P0110", cdGrpId: "P0110"}]
				   
	appf_getCodeList(arrParam, false, false);
	
	ds_init_P0127.insertRow(0);
	ds_init_P0127.setColumn(0, "cdnm", "조정사유");
	
	ds_init_P0466.insertRow(0);
	ds_init_P0466.setColumn(0, "cdnm", "부제기사유");
	
	ds_init_P0465.insertRow(0);
	ds_init_P0465.setColumn(0, "cdnm", "삭제사유");
	
	var arrParam = new Array();
		arrParam = [ {dsNm: "ds_init_PK043", cdGrpId: "PK043", showValue: false}
					,{dsNm: "ds_init_PK221", cdGrpId: "PK221", showValue: false}
					,{dsNm: "ds_init_PK257list", cdGrpId: "PK257", showValue: false}];
	pamfGetCodeList(arrParam, true, ""); 
	
	ds_main_item1_clbs.setColumn(0, "ioflag", "I");
	
	var oParam = {};
		oParam.id          = "TRPID20309";
		oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
		oParam.method      = "reqGetDeptCDDrID";
		oParam.inds        = "req=ds_main_item1_clbs";
		oParam.outds       = "ds_init_orddeptcd=orddeptcd ds_init_orddeptcd2=orddeptcd2 ds_init_orddrid=orddrid ds_init_orddrid2=orddrid2";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPID20309";

	tranf_submit(oParam);
	
	dsf_createDsRow("ds_cond", [{col: "autogrup" , val: "9999" }  ]);
	
		oParam = {};
		oParam.id          = "TRPIB01401";
		oParam.service     = "insubasecdmngtapp.AutDiagRgst";
		oParam.method      = "reqGetAutMechAndDiagRgst";
		oParam.inds        = "req=ds_cond";
		oParam.outds       = "ds_main_list2_listmech=listmech ds_main_list2_listdiag=listdiag ds_main_list2_listedept=listedept";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIB01401";

	tranf_submit(oParam);
	
	fGetLglydisInfo();
	
	lf_fEdiCheck();
	
	grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
	
	grp_biz.btn_end.style.color = "#cc3333";
	grp_biz.btn_unjudg.style.color = "#cc3333";
	grp_biz.btn_rete.style.color = "#cc3333";
	grp_biz.btn_del.style.color = "#cc3333";
	
	grp_biz.btn_save.style.font = "dotum,9,bold";
	grp_biz.btn_end.style.font = "dotum,9,bold";
	grp_biz.btn_unjudg.style.font = "dotum,9,bold";
	grp_biz.btn_rete.style.font = "dotum,9,bold";
	grp_biz.btn_del.style.font = "dotum,9,bold";
	grp_biz.btn_maininit.style.font = "dotum,9,bold";
	
	frmf_checkAuth("X");
	
	if (frmf_isPopup()) 
	{
		btn_closepredocupopup.visible = true;
		grp_biz.btn_predocu.visible = false;
		
		if (utlf_isNull(ds_send_item1_clbs.getColumn(0, "pid"))) 
		{
			try 
			{
				ds_tmp_clbs.copyData(objDs);		
			} 
			catch(e) 
			{
			}
		}
		
		var objScreenSize = system.getScreenRect(1);
		var nScreenLeft   = objScreenSize.left;
		var nScreenTop    = objScreenSize.top;
		var nScreenRight  = objScreenSize.right;
		var nScreenBottom = objScreenSize.bottom;
		var nScreenWidth  = nScreenRight - nScreenLeft;
		var nScreenHeight = nScreenBottom - nScreenTop;
		
		if(ds_tmp_clbs.rowcount < 1)
		{							
			this.parent.position.left   = 0;
			this.parent.position.top    = opener.getOwnerFrame().form.btn_menuGroup.position.height + 20;
			this.parent.position.width  = nScreenWidth;
			this.parent.position.height = application.mainframe.VFrameSet.position.height - opener.getOwnerFrame().form.btn_menuGroup.position.height - 20;	
			
			var init_clamym = grp_sea00.ipt_clamym.cal_Month.value.toFormatString("%Y%m");

			ds_main_item1_clbs.setColumn(0, "clamym", init_clamym);		
			ds_main_item1_clbs.setColumn(0, "ioflag", "O");
		} 
		
		var clamym   = ds_tmp_clbs.getColumn(0, "clamym");   // 청구년월
		var clamdg   = ds_tmp_clbs.getColumn(0, "clamdg");   // 청구차수
		var pid      = ds_tmp_clbs.getColumn(0, "pid");      // 등록번호
		var pidsn    = ds_tmp_clbs.getColumn(0, "pidsn");    // 등록번호순번
		var ioflag   = ds_tmp_clbs.getColumn(0, "ioflag");   // 등록번호순번
		var judgstat = ds_tmp_clbs.getColumn(0, "judgstat"); // 심사현황판 팝업여부 [2013.04.22] by 김경연 
		var workflag = ds_tmp_clbs.getColumn(0, "workflag");
		
		ds_send_item1_clbs.clearData();
		ds_send_item1_clbs.addRow();
		ds_send_item1_clbs.setColumn(0, "clamym" 	, clamym); 
		ds_send_item1_clbs.setColumn(0, "clamdg" 	, clamdg); 
		ds_send_item1_clbs.setColumn(0, "pid"    	, pid);  
		ds_send_item1_clbs.setColumn(0, "pidsn"  	, pidsn);
		ds_send_item1_clbs.setColumn(0, "ioflag"    , ioflag);
		ds_send_item1_clbs.setColumn(0, "workflag"  , workflag); 
		
		if (clamym && clamdg && pid && pidsn) 
		{
			var oParam = {};
				oParam.id          = "TRPID20301";
				oParam.service     = "aftjudgapp.InAftJudg";
				oParam.method      = "reqGetInAftJudgTrgtMan_xp";
				oParam.inds        = "req=ds_send_item1_clbs";
				oParam.outds       = "ds_main_item1_clbs=clbs";
				oParam.async       = false;
				oParam.callback    = "lf_fSetAftJudgTrgtManSrchData";
				
			tranf_submit(oParam);
		}
	}
	else 
	{
		btn_closepredocupopup.visible = false;
		grp_biz.btn_predocu.visible = true;

		fGetInAftJudgTrgtManPidSrch();
	}

	ds_hidden.setColumn(0, "reselect", "N");
	ds_hidden.setColumn(0, "orgjudgendyn", "");
	
	appf_showValue(ds_init_P0236);
	appf_showValue(ds_init_P0127);
	appf_showValue(ds_init_P0117);
	
	ds_hidden_list2_clodstat.setColumn(0, "cmbAdjtresncd", "");
	ds_main_item1_clbs.setColumn(0, "abdresncd", "");
	grp_biz.cmb_adjtresncd.index = 0;
	grp_biz.cmb_abdresncd.index = 0;
	grp_biz.cmb_docudelresncd.index = 0;
}

/****************************************************************************************
 * Argument			: 
 * Description		: 환경저장 결과 함수
 ****************************************************************************************/
function cf_Uuee_SMPID20300(sSvcId, nErrorCode, sErrorMsg)
{
    if(nErrorCode < 0) return;
    
	var grd_name = ds_hidden_listval_uuee.lookup("compsnm","grd_cldihist","compsnm");
	var refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_cldihist","compscnts");
	var sizedata = ds_hidden_listval_uuee.lookup("compsnm","grd_cldihist","compssizecnts");
	
	var clod_grd_name = ds_hidden_listval_uuee.lookup("compsnm","grd_clodhist","compsnm");
	var clod_refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_clodhist","compscnts");
	var clod_sizedata =  ds_hidden_listval_uuee.lookup("compsnm","grd_clodhist","compssizecnts");
	
	var clop_grd_name = ds_hidden_listval_uuee.lookup("compsnm","grd_oprcphist","compsnm");
	var clop_refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_oprcphist","compscnts");
	var clop_sizedata =  ds_hidden_listval_uuee.lookup("compsnm","grd_oprcphist","compssizecnts");

	var clsp_grd_name = ds_hidden_listval_uuee.lookup("compsnm","grd_clsphist","compsnm");
	var clsp_refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_clsphist","compscnts");
	var clsp_sizedata =  ds_hidden_listval_uuee.lookup("compsnm","grd_clsphist","compssizecnts");

	if (!utlf_isNull(grd_name)) 
	{
		grdf_SetOrderInfoOfCol_format(grp_biz.grd_cldihist,refdata,sizedata);
	}
	
	if (!utlf_isNull(clod_grd_name))
	{
		grdf_SetOrderInfoOfCol_format(grp_biz.grd_clodhist,clod_refdata,clod_sizedata);
	}

	if (!utlf_isNull(clop_grd_name)) 
	{
		grdf_SetOrderInfoOfCol_format(grp_biz.grd_oprcphist,clop_refdata,clop_sizedata);
	}
	
	if (!utlf_isNull(clsp_grd_name)) {
		grdf_SetOrderInfoOfCol_format(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist ,clsp_refdata,clsp_sizedata);
	}
	
	grdf_initGrid(grp_predoculist.grd_predocu);
	grdf_initGrid(grp_biz.grd_oprcphist);
	grdf_initGrid(grp_biz.grd_clodhist);
	
	grdf_setRowTypeIcon(grp_biz.grd_cldihist, 0);
	grdf_setRowTypeIcon(grp_biz.grd_oprcphist, 0);
	grdf_setRowTypeIcon(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist, 0); // 특정내역
	grdf_setRowTypeIcon(grp_biz.grd_clodhist, 0);
	grdf_setRowTypeIcon(grp_predoculist.grd_predocu, 0);
	
	grdf_setToolTipBind(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist); 
	
	lf_grid_band_left(grp_biz.grd_clodhist, 15) 
	
	grp_biz.grd_oprcphist.setCellProperty("body",grp_biz.grd_oprcphist.getBindCellIndex("Body","spclspecyn"), "tooltiptext", "");
	grp_biz.grd_oprcphist.setCellProperty("body",grp_biz.grd_oprcphist.getBindCellIndex("Body","spclspecyn"), "tooltiptext", "bind:lnunitspclspec");
}

function cf_Uuee_SMPID20300_1(sSvcId, nErrorCode, sErrorMsg)
{
    if(nErrorCode < 0) return;
    
	var grd_name = ds_hidden_listval_uuee.lookup("compsnm","grd_cldihist","compsnm");
	var refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_cldihist","compscnts");
	var sizedata = ds_hidden_listval_uuee.lookup("compsnm","grd_cldihist","compssizecnts");
	
	var clod_grd_name = ds_hidden_listval_uuee.lookup("compsnm","grd_clodhist","compsnm");
	var clod_refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_clodhist","compscnts");
	var clod_sizedata =  ds_hidden_listval_uuee.lookup("compsnm","grd_clodhist","compssizecnts");
	
	var clop_grd_name = ds_hidden_listval_uuee.lookup("compsnm","grd_oprcphist","compsnm");
	var clop_refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_oprcphist","compscnts");
	var clop_sizedata =  ds_hidden_listval_uuee.lookup("compsnm","grd_oprcphist","compssizecnts");

	var clsp_grd_name = ds_hidden_listval_uuee.lookup("compsnm","grd_clsphist","compsnm");
	var clsp_refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_clsphist","compscnts");
	var clsp_sizedata =  ds_hidden_listval_uuee.lookup("compsnm","grd_clsphist","compssizecnts");

	if (!utlf_isNull(grd_name)) 
	{
		grdf_SetOrderInfoOfCol_format(grp_biz.grd_cldihist,refdata,sizedata);
	}
	
	if (!utlf_isNull(clod_grd_name))
	{
		grdf_SetOrderInfoOfCol_format(grp_biz.grd_clodhist,clod_refdata,clod_sizedata);
	}
	
	if (!utlf_isNull(clop_grd_name)) 
	{
		grdf_SetOrderInfoOfCol_format(grp_biz.grd_oprcphist,clop_refdata,clop_sizedata);
	}
	
	if (!utlf_isNull(clsp_grd_name)) {
		grdf_SetOrderInfoOfCol_format(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist ,clsp_refdata,clsp_sizedata);
	}
	
	lf_grid_band_left(grp_biz.grd_clodhist, 15) 
	
	grp_biz.grd_oprcphist.setCellProperty("Body",grp_biz.grd_oprcphist.getBindCellIndex("Body","spclspecyn"), "tooltiptext", "");
	grp_biz.grd_oprcphist.setCellProperty("body",grp_biz.grd_oprcphist.getBindCellIndex("Body","spclspecyn"), "tooltiptext", "bind:lnunitspclspec");
}
/****************************************************************************************
 * Argument			: item
 * Description		: 처방 grid 팝업메뉴
 ****************************************************************************************/
function lf_gridclod_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{	
	if(e.id == "lf_fOrderGridInsertRow")
	{
		lf_fOrderGridInsertRow();       // 행추가
	} 
	else if(e.id == "lf_fOrderGridDeleteRow")
	{
		lf_fOrderGridDeleteRow();       // 행삭제
	} 
	else if(e.id == "lf_fAllSetDrugqtyCol")
	{
		lf_fAllSetDrugqtyCol();       // 1회량 일괄수정
	} 
	else if(e.id == "lf_fAllSetTimsCol")
	{
		lf_fAllSetTimsCol();       // 횟수 일괄수정
	} 
	else if(e.id == "lf_fAllSetDaynoCol")
	{
		lf_fAllSetDaynoCol();       // 일수 일괄수정
	} 
	else if(e.id == "lf_fOrderGridInsertCmt")
	{
		lf_fOrderGridInsertCmt();       // 처방주석입력
	}
	else if(e.id == "lf_fOrderGridInsertCnfmCd")
	{
		lf_fOrderGridInsertCnfmCd();       // 확인코드입력
	}
	else if(e.id == "lf_fOrderGridInsertAllCmt")
	{
		lf_fOrderGridInsertAllCmt();       // 일괄처방주석입력
	}
	else if(e.id == "lf_fOrderRsltSrch")
	{
		lf_fOrderRsltSrch();       // 결과조회
	} 
	else if (e.id == "lf_fGetEmrInformation")
	{
		lf_fGetEmrInformation();     // 진료정보
	} 
	else if (e.id == "lf_fOrderInsuRcogBase")
	{
		lf_fOrderInsuRcogBase();     // 보험인정기준
	} 
	else if (e.id == "lf_fOrderCalcScorSrch")
	{
		lf_fOrderCalcScorSrch();     // 수가조회
	} 
	else if (e.id == "lf_fOrderDrugHBook")
	{
		lf_fOrderDrugHBook();     // 약품편람
	}
	else if (e.id == "fOrderCalcDetail")
	{
		fOrderCalcDetail();     // 상세계산내역(수가)
	}
	else if (e.id == "fOrderCalcDetailEDI")
	{
		fOrderCalcDetailEDI();     // 상세계산내역(EDI)
	}
	else if (e.id == "lf_fSetPayflag")
	{
		lf_fSetPayflag();     // 급비변경
	}
	else if (e.id == "lf_fOpenSMPIS00500DetailSnglCD")
	{
		lf_fOpenSMPIS00500DetailSnglCD();     // 처방별환자조회(계산)_수가코드
	}
	else if (e.id == "lf_fOpenSMPIS00500DetailEdicd")
	{
		lf_fOpenSMPIS00500DetailEdicd();     // 처방별환자조회(계산)_EDI코드
	}
	else if (e.id == "lf_fOpenSMPIS00600Detail")
	{
		lf_fOpenSMPIS00600Detail();     // 처방별환자조회(청구/삭감)
	}
	else if (e.id == "lf_fOrderCDCopy")
	{
		lf_fOrderCDCopy();     // CD복사의뢰
	}
	else if (e.id == "lf_fPrcpResnRef")
	{
		lf_fPrcpResnRef();     // 처방사유조회
	}
	else if (e.id == "lf_fPatJudgPatMsgTrsm")
	{
		lf_fPatJudgPatMsgTrsm();   // 환자기준 메세지작성
	} 
	else if (e.id == "lf_fOrderJudgPatMsgTrsm")
	{
		lf_fOrderJudgPatMsgTrsm();         // 처방기준 메세지작성
	} 
	else if ( e.id == "lf_fOrderGridDeleteCancel" )
	{	
		lf_fOrderGridDeleteCancel();       // 삭제 취소
	}
	else if ( e.id == "lf_fOrderGridAddRow" )
	{	
		lf_fOrderGridAddRow();       // 처방 추가
	}
}

/****************************************************************************************
 * Argument			: month 달력
 * Description		: 청구 년월 선택 시 dataset 입력
 ****************************************************************************************/
function fn_Cal()
{	
	var clamym = grp_sea00.ipt_clamym.cal_Month.value.toFormatString("%Y%m");
	
	ds_main_item1_clbs.setColumn(0, "clamym", clamym);
}

/****************************************************************************************
 * Argument			: 
 * Description		: 입원사후심사 대상자 화면 호출
 ****************************************************************************************/
function fGetInAftJudgTrgtManPidSrch()
{
	var trgtManWindow = frmf_getChildWindow("SMPID20200"); 
	var patunitsrch1 = grp_sea00.ipt_pid.value;
	
	if (utlf_isNull(trgtManWindow))
	{
		ds_hidden_smpid20200_cond.setColumn(0, "pid", patunitsrch1);
		ds_hidden_smpid20200_rslt.setColumn(0, "oldPid", patunitsrch1);
		
		var objArg = new Object();
			objArg.arg_ds_send = ds_hidden_smpid20200_cond;
		
		frmf_open("SMPID20200", "SMPID20200", objArg, "", "", "", "", "", "", "", "", "", "M");
	}
	else 
	{
		var oldPid = ds_hidden_smpid20200_rslt.getColumn(0, "oldPid");
		
		ds_hidden_smpid20200_cond.setColumn(0, "pid", patunitsrch1);
		ds_hidden_smpid20200_rslt.setColumn(0, "oldPid", patunitsrch1);
		
		if (utlf_isNull(oldPid))
		{
			if (utlf_isNull(patunitsrch1))
			{
				trgtManWindow.grp_judgmemo.visible = false; 
				
				frmf_setFocusPop("SMPID20200");
			} 
			else 
			{ 
				trgtManWindow.lf_fSetPatUnitSrch1pidSrch(ds_hidden_smpid20200_cond, ds_hidden_smpid20200_rslt);
			}
		} 
		else 
		{
			if (patunitsrch1 != oldPid)
			{
				ds_main_item1_clbs.setColumn(0, "pid", patunitsrch1);
				ds_hidden_smpid20200_cond.setColumn(0, "pid", patunitsrch1);
				trgtManWindow.lf_fSetPatUnitSrch1pidSrch(ds_hidden_smpid20200_cond, ds_hidden_smpid20200_rslt);
			} 
			else 
			{ 
				trgtManWindow.grp_judgmemo.visible = false;
				frmf_setFocusPop("SMPID20200");
			}
		}
	}
}

/****************************************************************************************
 * Argument			: 
 * Description		: 대상자 재 조회 함수
 ****************************************************************************************/
function fGetInAftJudgMngt() 
{
	var popupcallyn = ds_hidden_smpid20200_rslt.getColumn(0, "popupcallyn");
	var clamym = ds_hidden_smpid20200_rslt.getColumn(0, "clamym");
	var clamdg = ds_hidden_smpid20200_rslt.getColumn(0, "clamdg");
	var pid = ds_hidden_smpid20200_rslt.getColumn(0, "pid");
	var pidsn = ds_hidden_smpid20200_rslt.getColumn(0, "pidsn");
	var workflag = ds_hidden_smpid20200_rslt.getColumn(0, "workflag");
	var selectedRow = ds_hidden_smpid20200_rslt.getColumn(0, "selectedRow");
	var cutprcpyn = ds_hidden_smpid20200_rslt.getColumn(0, "cutprcpyn");
	var cretno = ds_hidden_smpid20200_rslt.getColumn(0, "cretno");
	
	if (clamym && clamdg && pid && pidsn) 
	{
		var rslt = lf_fInitSrchData();
		
		if (rslt == false)
		{ 
			return false;
		}
		
		ds_send_item1_clbs.setColumn(0, "clamym", clamym);
		ds_send_item1_clbs.setColumn(0, "clamdg", clamdg);
		ds_send_item1_clbs.setColumn(0, "pid", pid);
		ds_send_item1_clbs.setColumn(0, "pidsn", pidsn);
		ds_send_item1_clbs.setColumn(0, "workflag", workflag);
		ds_send_item1_clbs.setColumn(0, "popupcallyn", popupcallyn);
		ds_send_item1_clbs.setColumn(0, "ioflag", lgv_ioflag);
		ds_hidden_smpid20200_rslt.setColumn(0, "selectedRow", selectedRow);
		
		if(!utlf_isNull(cutprcpyn))
		{
			ds_send_item1_clbs.setColumn(0, "cutviewyn", "Y");
		} 
		else 
		{
			ds_send_item1_clbs.setColumn(0, "cutviewyn", "N");
		}

		dsf_setDefaultVal(ds_send_item1_clbs, "workflag:12,popupcallyn:Y,cutviewyn:N");

		var oParam = {};
			oParam.id          = "TRPID20301";
			oParam.service     = "aftjudgapp.InAftJudg";
			oParam.method      = "reqGetInAftJudgTrgtMan_xp";
			oParam.inds        = "req=ds_send_item1_clbs";
			oParam.outds       = "ds_main_item1_clbs=clbs";
			oParam.async       = false;
			oParam.callback    = "lf_fSetAftJudgTrgtManSrchData";
			
		tranf_submit(oParam);
	}
}

/****************************************************************************************
 * Argument			: 
 * Description		: 대상자조회 이후 처리 함수
 ****************************************************************************************/
function lf_fSetAftJudgTrgtManSrchData(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) 
    {
		alert("[lf_fSetAftJudgTrgtManSrchData]"+sErrorMsg); return; 
	}

	ds_item3_supp.insertRow(0);
	ds_init_P0261.insertRow(0);
	
	var judgenddd = ds_hidden_smpid20200_rslt.getColumn(0, "judgenddd");
	ds_hidden_smpid20200_rslt.setColumn(0, "oldPid", ds_main_item1_clbs.getColumn(0, "pid"));
	ds_hidden_smpid20200_rslt.setColumn(0, "judgenddd", judgenddd);
		
    ds_send_item1_clbs.setColumn(0, "insukind"   , ds_main_item1_clbs.getColumn(0, "insukind"));
	ds_send_item1_clbs.setColumn(0, "suppkind"   , ds_main_item1_clbs.getColumn(0, "suppkind"));
	ds_send_item1_clbs.setColumn(0, "ordtodd"   , ds_main_item1_clbs.getColumn(0, "ordtodd"));
	ds_send_item1_clbs.setColumn(0, "ordfromdd"   , ds_main_item1_clbs.getColumn(0, "ordfromdd"));
	ds_send_item1_clbs.setColumn(0, "ordfildcd"   , ds_main_item1_clbs.getColumn(0, "ordfildcd"));
	ds_send_item1_clbs.setColumn(0, "indd"   , ds_main_item1_clbs.getColumn(0, "indd"));
	ds_send_item1_clbs.setColumn(0, "orddd"   , ds_main_item1_clbs.getColumn(0, "orddd"));
	
	if (!frmf_isPopup()) 
	{ 
		lf_fSetPatPamInfo(ds_main_item1_clbs);
	}
	
	grp_sea00.ipt_clamym.setData(ds_main_item1_clbs.getColumn(0, "clamym"));
	
	ds_hidden_list2_clodsrch.setColumn(0, "selectedRdoMatrAct", "-");
	//이전명세서
	var oParam = {};
		oParam.id          = "TRPID20308";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetAftJudgBtn";
		oParam.inds        = "req=ds_send_item1_clbs";
		oParam.outds       = "ds_rslt_aftjudgbtn=rslt";
		oParam.async       = true;
		oParam.progress	   = false;
		oParam.callback    = "cf_TRPID20308";
	tranf_submit(oParam);
	
		oParam = {};
		oParam.id          = "TRPIJ00340";
		oParam.service     = "bfjudgapp.InHospJudg";
		oParam.method      = "reqGetRareCancerMsg_xp";
		oParam.inds        = "req=ds_main_item1_clbs";
		oParam.outds       = "ds_init_cmb_rarecancermsg=rarecancermsg";
		oParam.async       = true;
		oParam.progress    = false;
		oParam.callback    = "cf_TRPIJ00340";
	tranf_submit(oParam);
	
		oParam = {};
		oParam.id          = "TRPID20320";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetPidmclbt";
		oParam.inds        = "req=ds_send_item1_clbs";
		oParam.outds       = "ds_rslt_clbt=clbt";
		oParam.async       = true;
		oParam.progress	   = false;
		oParam.callback    = "cf_TRPID20320";
	tranf_submit(oParam);
	
		oParam = {};
		oParam.id          = "TRPID20321";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetPidhclspMX999";
		oParam.inds        = "req=ds_send_item1_clbs";
		oParam.outds       = "ds_main_item1_memo=memo";
		oParam.async       = true;
		oParam.progress	   = false;
		oParam.callback    = "cf_TRPID20321";
	tranf_submit(oParam);
	
		oParam = {};
		oParam.id          = "TRPID20322";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetSuppRate";
		oParam.inds        = "req=ds_main_item1_clbs";
		oParam.outds       = "ds_item3_supp=supp";
		oParam.async       = true;
		oParam.progress	   = false;
		oParam.callback    = "cf_TRPID20322";
	tranf_submit(oParam);
	
		oParam = {};
		oParam.id          = "TRPID20324";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetPidhcldi";
		oParam.inds        = "req=ds_send_item1_clbs";
		oParam.outds       = "ds_list1_cldi=cldi";
		oParam.async       = true;
		oParam.progress	   = false;
		oParam.callback    = "cf_TRPID20324";
	tranf_submit(oParam);
	
		oParam = {};
		oParam.id          = "TRPID20325";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetPidhclod";
		oParam.inds        = "req=ds_send_item1_clbs";
		oParam.outds       = "ds_list2_clod=clod ds_list8_clod2=clod2";
		oParam.async       = false;
		oParam.callback    = "cf_TRPID20325";
	tranf_submit(oParam);
	
		oParam = {};
		oParam.id          = "TRPID20326";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetPidhclop";
		oParam.inds        = "req=ds_send_item1_clbs";
		oParam.outds       = "ds_list7_clop=clop";
		oParam.async       = true;
		oParam.progress	   = false;
		oParam.callback    = "cf_TRPID20326";
	tranf_submit(oParam);
	
		oParam = {};
		oParam.id          = "TRPID20327";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetPidhclsp";
		oParam.inds        = "req=ds_send_item1_clbs";
		oParam.outds       = "ds_list3_clsp=clsp";
		oParam.async       = true;
		oParam.progress	   = false;
		oParam.callback    = "cf_TRPID20327";
	tranf_submit(oParam);
	
		oParam = {};
		oParam.id          = "TRPID20318";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetClodMaxSeqno";
		oParam.inds        = "req=ds_main_item1_clbs";
		oParam.outds       = "ds_rslt_maxseqno=clodmax";
		oParam.async       = true;
		oParam.progress	   = false;
		//oParam.callback    = "cf_TRPID20318";
	tranf_submit(oParam);
	
		oParam = {};
		oParam.id          = "TRPID20319";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetClopMaxSeqno";
		oParam.inds        = "req=ds_main_item1_clbs";
		oParam.outds       = "ds_rslt_clopmaxseqno=clopmax";
		oParam.async       = true;
		oParam.progress	   = false;
		//oParam.callback    = "cf_TRPID20319";
	tranf_submit(oParam);
	
// 		oParam = {};
// 		oParam.id          = "TRPID20328";
// 		oParam.service     = "aftjudgapp.InAftJudg";
// 		oParam.method      = "reqGetOrdDiagHistList";
// 		oParam.inds        = "req=ds_send_item1_clbs";
// 		oParam.outds       = "ds_rslt_mmohdiag1=mmohdiag1 ds_rslt_mmohdiag2=mmohdiag2";
// 		oParam.async       = true;
// 		oParam.progress	   = false;
// 		oParam.callback    = "cf_TRPID20328";
// 	tranf_submit(oParam);
	
	if (ds_main_item1_clbs.getColumn(0,"patrrgstno").substring(6, 7) % 2 == 0 ) 
	{
			oParam = {};
			oParam.id          = "TRPID20329";
			oParam.service     = "aftjudgapp.InAftJudg";
			oParam.method      = "reqGetNewBornBabyWeightList";
			oParam.inds        = "req=ds_send_item1_clbs";
			oParam.outds       = "ds_rslt_nbwt=nbwt";
			oParam.async       = true;
			oParam.progress	   = false;
			//oParam.callback    = "TRPID20329";
		tranf_submit(oParam);
	}
	
		oParam = {};
		oParam.id          = "TRPID20330";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetDuplPidChkList";
		oParam.inds        = "req=ds_send_item1_clbs";
		oParam.outds       = "ds_rslt_dupid=dupid";
		oParam.async       = true;
		oParam.progress	   = false;
		oParam.callback    = "cf_TRPID20330";
	tranf_submit(oParam);

		oParam = {};
		oParam.id          = "TRPID20331";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetBfAfAmtDiff";
		oParam.inds        = "req=ds_main_item1_clbs";
		oParam.outds       = "ds_rslt_bfafamtdiff=bfafamtdiff";
		oParam.async       = true;
		oParam.progress	   = false;
		oParam.callback    = "cf_TRPID20331";
	tranf_submit(oParam);

		oParam = {};
		oParam.id          = "TRPID20332";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetTrptInfo";
		oParam.inds        = "req=ds_main_item1_clbs";
		oParam.outds       = "ds_list9_trnpt=trnpt";
		oParam.async       = true;
		oParam.progress	   = false;
		oParam.callback    = "cf_TRPID20332";
	tranf_submit(oParam);

 	lf_fSetJudgStatBtnAuth();
	
	if(ds_main_item1_clbs.getColumn(0, "clamkey"))
	{
		var clamendyn = ds_main_item1_clbs.getColumn(0, "clamendyn");
		var lockyn = ds_main_item1_clbs.getColumn(0, "lockyn");
		
		if (lockyn == "Y") 
		{
			lf_setAlramMessage("잠금설정되어있는 상태입니다. 수정할 수 없습니다."); // / 잠금설정되어있는 상태입니다. 수정할 수 없습니다.
		}
	} 
	else 
	{
		// 해당 심사대상자가 없는 경우
		return;
	}
	
	//lf_fSetOrderData();
	
	if (ds_main_item1_clbs.getColumn(0, "insukindcd") == "41")
	{
		grp_sea00.cmb_ordrsltcd.innerdataset = "ds_init_P0297";
		grp_sea00.cmb_ordrsltcd.datacolumn = "cdnm";
		grp_sea00.cmb_ordrsltcd.codecolumn = "cdid";
	} 
	else 
	{
		grp_sea00.cmb_ordrsltcd.innerdataset = "ds_init_P0110";
		grp_sea00.cmb_ordrsltcd.datacolumn = "cdnm";
		grp_sea00.cmb_ordrsltcd.codecolumn = "cdid";
	}
	
	var dispclsp = ds_main_item1_clbs.getColumn(0, "dispclsp");
	
	if (dispclsp == "S") 
	{
		grp_biz.swt_spclmemo.tabindex = 0;
	} 
	else if (dispclsp == "E") 
	{
		grp_biz.swt_spclmemo.tabindex = 2;
	}
	else if (dispclsp == "U") 
	{
		grp_biz.swt_spclmemo.tabindex = 1;
	}
	
	if (ds_list1_cldi.rowcount == 1) 
	{
		lf_fDiagGridInsertRow("Y", "N");
	}
	
	fGetSelectedUnitFlag();
	
	var fixrateyn = ds_main_item1_clbs.getColumn(0, "fixrateyn");
	
	if (fixrateyn == "7" || fixrateyn == "8") 
	{
		grp_biz.pm_flag.visible = "true";
	}

	lf_getCheckMsg();
}


/****************************************************************************************
 * Argument			: 
 * Description		: 대상자조회 이후 처리 함수
 ****************************************************************************************/
function fGetSelectedUnitFlag() 
{

}

/****************************************************************************************
 * Argument			: function
 * Description		: 처방 심사전 버튼 이벤트 함수
 ****************************************************************************************/
function fBfjudgdocu()
{
	var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
	var clamdg = ds_main_item1_clbs.getColumn(0, "clamdg");
	var pid    = ds_main_item1_clbs.getColumn(0, "pid");
	var pidsn  = ds_main_item1_clbs.getColumn(0, "pidsn");
	var ioflag  = ds_main_item1_clbs.getColumn(0, "ioflag");
	
	if (clamym)
	{
		var preDocuWindow = frmf_getChildWindow("SMPID20300_1");
	
		if (!utlf_isNull(preDocuWindow))
		{
			var rslt = preDocuWindow.lf_fInitSrchData(); // 화면을 초기화한다.			
			
			if (rslt == false)
			{	
				// 수정사항 저장이 완료되지 않아 초기화할 수 없는 경우
				frmf_setFocusPop("SMPID20300_1");
				return false;
			}
			preDocuWindow.close();
		}
			
		if (utlf_isNull(preDocuWindow))
		{
			ds_send_item1_clbs.setColumn(0, "workflag", "11");
			ds_send_item1_clbs.setColumn(0, "clamym"  , clamym);
			ds_send_item1_clbs.setColumn(0, "clamdg"  , clamdg);
			ds_send_item1_clbs.setColumn(0, "pid"     , pid);
			ds_send_item1_clbs.setColumn(0, "pidsn"   , pidsn);
			ds_send_item1_clbs.setColumn(0, "ioflag"  , ioflag);
						
			frmf_open("SMPID20300_1", "SMPID20300", {objDs:ds_send_item1_clbs}, "", "", "", "", "", "", "", "", "", "M"); 							
			
			//ds_main_item1_clbs.setColumn(0, "workflag", ds_tmpsrch_copy.getColumn(0, "workflag"));

		} 
		else 
		{	
			// 이전명세서 용도의 SMPID20500_외래사후심사관리 Popup 화면이 이미 열려있는 경우
			ds_cond_smpid20300.setColumn(0, "workflag", "11");
			ds_cond_smpid20300.setColumn(0, "clamym"  , clamym);
			ds_cond_smpid20300.setColumn(0, "clamdg"  , clamdg);
			ds_cond_smpid20300.setColumn(0, "pid"     , pid);
			ds_cond_smpid20300.setColumn(0, "pidsn"   , pidsn);
			ds_cond_smpid20300.setColumn(0, "ioflag"  , "I");
																															
			preDocuWindow.lf_fActivatePreDocuWindow(ds_cond_smpid20300);
			frmf_setFocusPop("SMPID20300");
		}
	}
}

/****************************************************************************************
 * Argument			: function
 * Description		: KDRG 버튼 이벤트 함수
 ****************************************************************************************/
function fGetKDrgOpenPopup()
{
	var pid = ds_main_item1_clbs.getColumn(0, "pid");
	var pidsn = ds_main_item1_clbs.getColumn(0, "pidsn");
	var clamdg = ds_main_item1_clbs.getColumn(0, "clamdg");
	var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
	var ordrsltcd = ds_main_item1_clbs.getColumn(0, "ordrsltcd");
	
	frmf_setParameter("pid", pid);
	frmf_setParameter("pidsn", pidsn);
	frmf_setParameter("clamdg", clamdg);
	frmf_setParameter("clamym", clamym);
	frmf_setParameter("ordrsltcd", ordrsltcd);
	
	frmf_open("SPPID31000", "SPPID31000", "", "", "", "", "", "", "", "", "", "", "M");
}

/****************************************************************************************
 * Argument			: function
 * Description		: 환경저장 완료 함수
 ****************************************************************************************/
function cf_Cnfm_SMPID20300()
{
}

/****************************************************************************************
 * Argument			: function
 * Description		: 이전명세서 목록 조회
 ****************************************************************************************/
function fSrchPreDocuList()
{
	var clamym = ds_main_item1_clbs.getColumn(0, "clamym");
	
	if (clamym) 
	{
		var refterm = ds_send_list4.getColumn(0, "refterm");
		
		if (refterm == "0") 
		{
			var fromdd = ds_send_list4.getColumn(0, "fromdd");
			var todd = ds_send_list4.getColumn(0, "todd");
			
			if (utlf_isValidDateTime(fromdd))
			{
				if (utlf_isValidDateTime(todd)) 
				{
					var dateDif = utlf_getDateInterval(fromdd, todd);
					
					if (dateDif < 0) 
					{
						sysf_messageBox("검색 시작일자가 종료일자 보다 이후", "E008"); // /검색 시작일자가 종료일자 보다 이후 입니다.
						return;
					}
				}
				else 
				{
					return;
				}
			} 
			else 
			{
				return;
			}
		}
		
		ds_send_list4.setColumn(0, "pid", ds_main_item1_clbs.getColumn(0, "pid"));
		ds_send_list4.setColumn(0, "clamym", ds_main_item1_clbs.getColumn(0, "clamym"));
		
		if(ds_send_list4.getColumn(0, "allordfild") != "Y")
		{
			ds_send_list4.setColumn(0, "ordfildcd", ds_main_item1_clbs.getColumn(0, "ordfildcd"));
		} 
		else 
		{
			ds_send_list4.setColumn(0, "ordfildcd", "");
		}

		dsf_setDefaultVal(ds_send_list4, "allordfild:N,ioflag:I,refterm:3");
		
		var oParam = {};
			oParam.id          = "TRPID20304";
			oParam.service     = "aftjudgapp.InAftJudg";
			oParam.method      = "reqGetInAftJudgPreDocuList";
			oParam.inds        = "req=ds_send_list4";
			oParam.outds       = "ds_list4_clbs=clbs";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPID20304";

		tranf_submit(oParam);
		
// 		for ( var i = 0; i < ds_list4_clbs.rowcount; i++) 
// 		{
// 			if (clamym == ds_list4_clbs.getColumn(i, "clamym"))
// 			{
// // 				grd_predocu.rowStyle(i, "data", "background-color") = "#4d4d4d"; // common.css (input)
// // 				grd_predocu.rowStyle(i, "data", "background-image") = "../../../com/commonweb/images/grid_bg.gif";
// // 				grd_predocu.rowStyle(i, "data", "background-repeat") = "repeat-x";
// // 				i = grd_predocu.rows;
// 			}
// 		}
	}
}

/****************************************************************************************
 * Argument			: function
 * Description		: 상세계산내역 Popup 호출
 ****************************************************************************************/
function fOrderCalcDetail(isAll) 
{
	ds_cond_sppij00400.clearData();
	ds_cond_sppij00400.addRow();
	
	ds_cond_sppij00400.setColumn(0, "pid", ds_main_item1_clbs.getColumn(0, "pid"));
	ds_cond_sppij00400.setColumn(0, "indd", ds_main_item1_clbs.getColumn(0, "indd"));
	ds_cond_sppij00400.setColumn(0, "cretno", ds_main_item1_clbs.getColumn(0, "cretno"));
	ds_cond_sppij00400.setColumn(0, "mskind", ds_main_item1_clbs.getColumn(0, "mskind"));
	ds_cond_sppij00400.setColumn(0, "insukind", ds_main_item1_clbs.getColumn(0, "insukind"));
	ds_cond_sppij00400.setColumn(0, "insukindnm", ds_main_item1_clbs.getColumn(0, "insukindnm"));
	ds_cond_sppij00400.setColumn(0, "suppkind", ds_main_item1_clbs.getColumn(0, "suppkind"));
	ds_cond_sppij00400.setColumn(0, "suppkindnm", ds_main_item1_clbs.getColumn(0, "suppkindnm"));
	ds_cond_sppij00400.setColumn(0, "ownbrate", ds_main_item1_clbs.getColumn(0, "payownbrate"));
	ds_cond_sppij00400.setColumn(0, "ordfromdd", ds_main_item1_clbs.getColumn(0, "ordfromdd"));
	ds_cond_sppij00400.setColumn(0, "ordtodd", ds_main_item1_clbs.getColumn(0, "ordtodd"));
	ds_cond_sppij00400.setColumn(0, "ordtype", ds_main_item1_clbs.getColumn(0, "stsioflag"));
	ds_cond_sppij00400.setColumn(0, "brateflag", ds_main_item1_clbs.getColumn(0, "ioflag"));
	ds_cond_sppij00400.setColumn(0, "insufromdd", ds_main_item1_clbs.getColumn(0, "iphsfromdd"));
	ds_cond_sppij00400.setColumn(0, "insutodd", ds_main_item1_clbs.getColumn(0, "iphstodd"));
	ds_cond_sppij00400.setColumn(0, "age", ds_main_item1_clbs.getColumn(0, "patage"));
	
	ds_cond_sppij00400.setColumn(0, "selectedRdoItem", "");
	ds_cond_sppij00400.setColumn(0, "srchflag", "ALL");
	ds_cond_sppij00400.setColumn(0, "selyn", "Y");
	ds_cond_sppij00400.setColumn(0, "cpyn", ds_main_item1_clbs.getColumn(0, "cpyn"));
	ds_cond_sppij00400.setColumn(0, "ediflag", "N");
	ds_cond_sppij00400.setColumn(0, "edicd", "-");
	
	if(utlf_isNull(isAll) || isAll != true)
	{
		if(ds_list2_clod.getColumn(ds_list2_clod.rowposition, "grupcalcscorcd"))
		{
			ds_cond_sppij00400.setColumn(0, "grupsnglflag", "G");
			ds_cond_sppij00400.setColumn(0, "calcscorcd", ds_list2_clod.getColumn(ds_list2_clod.rowposition, "grupcalcscorcd"));
		} 
		else 
		{
			ds_cond_sppij00400.setColumn(0, "grupsnglflag", "S");
			ds_cond_sppij00400.setColumn(0, "calcscorcd", ds_list2_clod.getColumn(ds_list2_clod.rowposition, "snglcalcscorcd"));
		}
		
		ds_cond_sppij00400.setColumn(0, "ordfromdd", ds_list2_clod.getColumn(ds_list2_clod.rowposition, "ordfromdd"));
		ds_cond_sppij00400.setColumn(0, "ordtodd", ds_list2_clod.getColumn(ds_list2_clod.rowposition, "ordtodd"));
		ds_cond_sppij00400.setColumn(0, "srchflag", "");
	}
	
	var objArg = new Object();
		objArg.arg_ds_send = ds_cond_sppij00400;
		
	frmf_modal("SPPIJ00400", "SPPIJ00400", objArg, "", "", "", "", "", "", "", "", "", "M");
}


/****************************************************************************************
 * Argument			: function
 * Description		: 입원세부계산내역
 ****************************************************************************************/
function fOrderCalcDetailEDI(isAll) 
{
	ds_cond_sppij00400.clearData();
	ds_cond_sppij00400.addRow();
	
	ds_cond_sppij00400.setColumn(0, "pid", ds_main_item1_clbs.getColumn(0, "pid"));
	ds_cond_sppij00400.setColumn(0, "indd", ds_main_item1_clbs.getColumn(0, "indd"));
	ds_cond_sppij00400.setColumn(0, "cretno", ds_main_item1_clbs.getColumn(0, "cretno"));
	ds_cond_sppij00400.setColumn(0, "mskind", ds_main_item1_clbs.getColumn(0, "mskind"));
	ds_cond_sppij00400.setColumn(0, "insukind", ds_main_item1_clbs.getColumn(0, "insukindcd"));
	ds_cond_sppij00400.setColumn(0, "insukindnm", ds_main_item1_clbs.getColumn(0, "insukindnm"));
	ds_cond_sppij00400.setColumn(0, "suppkind", ds_main_item1_clbs.getColumn(0, "suppkindcd"));
	ds_cond_sppij00400.setColumn(0, "suppkindnm", ds_main_item1_clbs.getColumn(0, "suppkindnm"));
	ds_cond_sppij00400.setColumn(0, "ownbrate", ds_main_item1_clbs.getColumn(0, "payownbrate"));
	ds_cond_sppij00400.setColumn(0, "ordfromdd", ds_main_item1_clbs.getColumn(0, "ordfromdd"));
	ds_cond_sppij00400.setColumn(0, "ordtodd", ds_main_item1_clbs.getColumn(0, "ordtodd"));
	ds_cond_sppij00400.setColumn(0, "ordtype", ds_main_item1_clbs.getColumn(0, "stsioflag"));
	ds_cond_sppij00400.setColumn(0, "brateflag", ds_main_item1_clbs.getColumn(0, "ioflag"));
	ds_cond_sppij00400.setColumn(0, "insufromdd", ds_main_item1_clbs.getColumn(0, "iphsfromdd"));
	ds_cond_sppij00400.setColumn(0, "insutodd", ds_main_item1_clbs.getColumn(0, "iphstodd"));
	ds_cond_sppij00400.setColumn(0, "selectedRdoItem", "");
	ds_cond_sppij00400.setColumn(0, "srchflag", "G");
	ds_cond_sppij00400.setColumn(0, "selyn", "Y");
	ds_cond_sppij00400.setColumn(0, "cpyn", ds_main_item1_clbs.getColumn(0, "cpyn"));
	ds_cond_sppij00400.setColumn(0, "ediflag", "Y");
	ds_cond_sppij00400.setColumn(0, "edicd", ds_list2_clod.getColumn(ds_list2_clod.rowposition, "basecd"));
	
	if(utlf_isNull(isAll) || isAll != true)
	{
		if(ds_list2_clod.getColumn(ds_list2_clod.rowposition, "grupcalcscorcd"))
		{
			ds_cond_sppij00400.setColumn(0, "grupsnglflag", "G");
			ds_cond_sppij00400.setColumn(0, "calcscorcd", ds_list2_clod.getColumn(ds_list2_clod.rowposition, "grupcalcscorcd"));
		} 
		else 
		{
			ds_cond_sppij00400.setColumn(0, "grupsnglflag", "S");
			ds_cond_sppij00400.setColumn(0, "calcscorcd", ds_list2_clod.getColumn(ds_list2_clod.rowposition, "snglcalcscorcd"));
		}
		ds_cond_sppij00400.setColumn(0, "ordfromdd", ds_list2_clod.getColumn(ds_list2_clod.rowposition, "ordfromdd"));
		ds_cond_sppij00400.setColumn(0, "ordtodd", ds_list2_clod.getColumn(ds_list2_clod.rowposition, "ordtodd"));
		ds_cond_sppij00400.setColumn(0, "srchflag", "");
	}
	var objArg = new Object();
		objArg.arg_ds_send = ds_cond_sppij00400;
		
	frmf_modal("SPPIJ00400", "SPPIJ00400", objArg, "", "", "", "", "", "", "", "", "", "M");
}


/****************************************************************************************
 * Argument			: function
 * Description		: 정산의뢰등록 화면호출
 ****************************************************************************************/

function fCallReCharge() 
{
	ds_cond_smpir31000.clearData();
	ds_cond_smpir31000.addRow();

	if(ds_main_item1_clbs.getColumn(0, "acptno") != "-")
	{
		ds_cond_smpir31000.setColumn(0, "srchflag", "1");
	} 
	else 
	{
		ds_cond_smpir31000.setColumn(0, "srchflag", "2");
	}
	
	ds_cond_smpir31000.setColumn(0, "acptno", ds_main_item1_clbs.getColumn(0, "acptno"));
	ds_cond_smpir31000.setColumn(0, "judgdg", ds_main_item1_clbs.getColumn(0, "judgdg"));
	ds_cond_smpir31000.setColumn(0, "docuseqno", ds_main_item1_clbs.getColumn(0, "docuseqno"));
	ds_cond_smpir31000.setColumn(0, "clamno", ds_main_item1_clbs.getColumn(0, "clamno"));
		
	frmf_open("SMPIR31000","SMPIR31000", {objDs:ds_cond_smpir31000}, "", "", "", "", "", "", "", "", "", "M");
}


/****************************************************************************************
 * Argument			: function
 * Description		: 하단 우측 화살표 버튼 이벤트 "<<"
 ****************************************************************************************/
function fClickPrevNext(flag)
{
	var trgtManWindow = frmf_findPopup("SMPID20200");

	if (!utlf_isNull(trgtManWindow))
	{
		var selectedRow = trgtManWindow.ds_grid_grd_clbsmast.rowposition;
		
		if(flag == "N")
		{
			selectedRow = selectedRow + 1;
		}
		else
		{
			selectedRow = selectedRow - 1;
		}
		
		var maxRow = trgtManWindow.ds_grid_grd_clbsmast.rowcount;
	
		if (selectedRow > -1 && selectedRow < maxRow) 
		{
			if (grp_biz.btn_save.enable == true || grp_biz.btn_unjudg.enable == true) 
			{
				var judgendyn = ds_main_item1_clbs.getColumn(0, "judgendyn");
				lf_fSetJudgSaveState(judgendyn);
			}
			
			ds_hidden_smpid20200_rslt.setColumn(0, "selectedRow", selectedRow);
			
			var trgtmanclamkey = trgtManWindow.ds_grid_grd_clbsmast.getColumn(selectedRow, "clamkey");
			var trgtmanclamym = trgtManWindow.ds_grid_grd_clbsmast.getColumn(selectedRow, "clamym");
			var trgtmanclamdg = trgtManWindow.ds_grid_grd_clbsmast.getColumn(selectedRow, "clamdg");
			var trgtmanpid = trgtManWindow.ds_grid_grd_clbsmast.getColumn(selectedRow, "pid");
			var trgtmanpidsn = trgtManWindow.ds_grid_grd_clbsmast.getColumn(selectedRow, "pidsn");
			var trgtmanworkflag = trgtManWindow.ds_grid_grd_clbsmast.getColumn(selectedRow, "workflag");
		
			if (trgtmanclamkey) 
			{
				ds_hidden_smpid20200_rslt.setColumn(0, "clamkey", trgtmanclamkey);
				ds_hidden_smpid20200_rslt.setColumn(0, "clamym", trgtmanclamym);
				ds_hidden_smpid20200_rslt.setColumn(0, "clamdg", trgtmanclamdg);
				ds_hidden_smpid20200_rslt.setColumn(0, "pid", trgtmanpid);
				ds_hidden_smpid20200_rslt.setColumn(0, "pidsn", trgtmanpidsn);
				ds_hidden_smpid20200_rslt.setColumn(0, "workflag", trgtmanworkflag);
				ds_hidden_smpid20200_rslt.setColumn(0, "popupcallyn", "Y");
				
				trgtManWindow.ds_grid_grd_clbsmast.rowposition = selectedRow;
				trgtManWindow.ds_grid_grd_clbsmast.clearSelect();
				trgtManWindow.ds_grid_grd_clbsmast.selectRow(selectedRow);
				
				fGetInAftJudgMngt();
			}
			return;
		} 
		else
		{
			if(flag == "N")
			{
				sysf_messageBox("조회된 마지막 심사대상자 입니다. 이후 심사 대상자가", "I004");	///조회된 마지막 심사대상자 입니다. 이후 심사 대상자가 없습니다.
			}
			else
			{
				sysf_messageBox("조회된 첫번째 심사대상자 입니다. 이전 심사 대상자가", "I004");	///조회된 첫번째 심사대상자 입니다. 이전 심사 대상자가 없습니다.
			}
			
			return;
		
		}
	}
	sysf_messageBox("입원사후심사대상자 조회에서 선택된 심사 대상자가", "I004");	///입원사후심사대상자 조회에서 선택된 심사 대상자가 없습니다.
}

/****************************************************************************************
 * Argument			: function
 * Description		: 변경일자를 갱신한다.
 ****************************************************************************************/
function fChkUpdtdd() 
{
	var clbsfromdd = ds_main_item1_clbs.getColumn(0, "ordfromdd");
	var clbstodd = ds_main_item1_clbs.getColumn(0, "ordtodd");
	
	if (utlf_getDateInterval(clbsfromdd) && utlf_getDateInterval(clbstodd)) 
	{
		for ( var i = 0; i < ds_list2_clod.rowcount; i++) 
		{
			var mechfromdd = ds_list2_clod.getColumn(i, "mechfromdd")
			
			if (utlf_isValidDateTime(mechfromdd))
			{
				if (mechfromdd >= clbsfromdd && mechfromdd <= clbstodd) 
				{
					var snglcalcscorcd = ds_list2_clod.getColumn(i, "snglcalcscorcd");
					var ordfromdd = ds_list2_clod.getColumn(i, "ordfromdd");
					
					for ( var j = 0; j < ds_list2_clod.rowcount; j++) 
					{
						var m_fromdd = ds_list2_clod.getColumn(j, "mechfromdd");
						var calcscorcd = ds_list2_clod.getColumn(j, "snglcalcscorcd");
						
						if (snglcalcscorcd == calcscorcd && mechfromdd == m_fromdd) 
						{
							var o_fromdd = ds_list2_clod.getColumn(j, "ordfromdd");
							
							if (ordfromdd > o_fromdd) 
							{
								ordfromdd = o_fromdd;
							}
						}
					}
					for ( var j = 0; j < ds_list2_clod.rowcount; j++) 
					{
						var m_fromdd = ds_list2_clod.getColumn(j, "mechfromdd");
						var calcscorcd = ds_list2_clod.getColumn(j, "snglcalcscorcd");
						var clodordfromdd = ds_list2_clod.getColumn(j, "ordfromdd");
						
						if (snglcalcscorcd == calcscorcd && mechfromdd == m_fromdd) 
						{
							var updtdd = ds_list2_clod.getColumn(j, "updtdd");
						
							if (updtdd != ordfromdd) 
							{
								ds_list2_clod.setColumn(j, "updtdd", clodordfromdd);
								
								//bgcExpr = "EXPR( !utlf_isNull(updtdd) ? '#c8e67b' : 'default')";
								//grp_biz.grd_clodhist.setCellProperty('Body',j, "background" , bgcExpr); // lnunitspclspecyn
								//grp_biz.grd_clodhist.setCellProperty('Body',j, "background2", bgcExpr); // lnunitspclspecyn
								
								var rowstatus = ds_list2_clod.getRowType(j);
								
								if (rowstatus == 2)
								{
								} 
								else 
								{
									ds_list2_clod.updatecontrol = false;
									ds_list2_clod.setRowType(j, "u");
									ds_list2_clod.updatecontrol = true;
								}
							}
						}
					}
				}
			}
		}
	}
}

/****************************************************************************************
 * Argument			: function
 * Description		: 삭제취소 이벤트 함수
 ****************************************************************************************/
function fOrderGridDeleteCancel()
{
	var delclodrow = ds_list6_delclod.rowcount;
	var delseqno = ds_list6_delclod.getColumn(delclodrow, "seqno");
	var delclodCalcscorcd = ds_list6_delclod.getColumn(delclodrow, "snglcalcscorcd");
	var isSpclChange = false; 

	if(ds_list6_delclod.getColumn(delclodrow, "cnfmcd") || ds_list6_delclod.getColumn(delclodrow, "lnunitspclspecyn"))
	{
		var clsprow = ds_list3_clsp.findRow("clodseqno", delseqno);
		
		var arrRow = new Array();
		arrRow[0] = clsprow; 
		grdf_setStatus(grp_biz.swt_spclmemo.case_spclspec.grd_clsphist, "", arrRow);

		isSpclChange = true;
	}
	
	var clsprow = ds_list2_clod.findRow("seqno", delseqno);
	
	var arrRow = new Array();
		arrRow[0] = clsprow; 
		grdf_setStatus(grp_biz.grd_clodhist, "", arrRow);

	lf_fSetOrderLnNo();

	if (isSpclChange)
	{ // 줄단위 특정내역이 입력된 경우 특정내역 줄번호/특정코드에 따라 sorting 작업
		lf_fSortSpclNo();
	}
}

/****************************************************************************************
 * Argument			: function
 * Description		: CD복사의뢰 : ast/examcureweb/xrw/SMAEF00100_필름판독대출신청.xrw
 ****************************************************************************************/
function fOrderCDCopy()
{
	ds_cond_smaef00100.clearData();
	ds_cond_smaef00100.addRow();

	var pid = ds_main_item1_clbs.getColumn(0, "pid");
	
	if (pid) 
	{
		ds_cond_smaef00100.setColumn(0, "gb", "A");
		ds_cond_smaef00100.setColumn(0, "srchdate1", "");
		ds_cond_smaef00100.setColumn(0, "lendapptm", "");
		ds_cond_smaef00100.setColumn(0, "pid", ds_main_item1_clbs.getColumn(0, "pid"));
		ds_cond_smaef00100.setColumn(0, "drid", ds_main_item1_clbs.getColumn(0, "orddrid"));
		ds_cond_smaef00100.setColumn(0, "lendgoal", "05");
		ds_cond_smaef00100.setColumn(0, "modality", "");
		ds_cond_smaef00100.setColumn(0, "deptengabbr", "");
		ds_cond_smaef00100.setColumn(0, "lenddeptcd", "");
		ds_cond_smaef00100.setColumn(0, "lendrid", "");
	}
	
	var objArg = new Object();
		objArg.arg_ds_send_data = ds_cond_smaef00100;
		
	frmf_modal("SMAEF00100", "SMAEF00100", objArg, "", "", "", "", "", "", "", "", "", "M");
}

function cf_TRPID20320(sSvcId, nErrorCode, sErrorMsg)
{
    if(nErrorCode < 0) { alert("["+sSvcId+"]"+sErrorMsg); return; }
	else
	{
		ds_main_item1_clbs.setColumn(0,"clbtworkflag", ds_rslt_clbt.getColumn(0,"workflag"));
		
		var insukind = ds_main_item1_clbs.getColumn(0, "insukindcd");
		var suppkind = ds_main_item1_clbs.getColumn(0, "suppkindcd");
	
		if (insukind == "31") 
		{
			grp_sea00.cap_insdnm.text = "사고일자";
			grp_sea00.cap_certno.text = "접수번호";
		}
		else if (insukind == "41") 
		{
			grp_sea00.cap_insdnm.text = "사고일자";
			grp_sea00.cap_certno.text = "관리번호";
		} 
		else 
		{
			grp_sea00.cap_insdnm.text = "가입자";
			grp_sea00.cap_certno.text = "증번호";
		}
		
		ds_main_item1_clbs.setColumn(0,"clbtworkflag", ds_rslt_clbt.getColumn(0,"workflag"));
		
		if ( ds_main_item1_clbs.getColumn(0,"insukindcd") == "31" && ds_main_item1_clbs.getColumn(0,"suppkindcd") == "18" && ds_rslt_clbt.getColumn(0,"paylimamt") != "0") 
		{
			grp_biz.btn_autolimit.style.backgroundImage = "URL('theme://images/icon_btn_s.gif')";	// 주황색
		} 
		else 
		{
			grp_biz.btn_autolimit.style.backgroundImage = "URL('theme://images/icon_btn.png')";	// 주황색
		}
		
		var judgdifamt = ds_rslt_clbt.getColumn(0, "judgdifamt");
	
		if (Math.abs(judgdifamt) >= 10000 ) 
		{
			//lf_setAlramMessage("심사수정차액( "+grp_biz.grp_aftamt.opt_judgdifamt.value+" )이 10,000원 이상입니다. 확인하십시오.");
			grp_clod00.Static00.text = "심사수정차액( "+grp_biz.grp_aftamt.opt_judgdifamt.value+" )이 10,000원 이상입니다. 확인하십시오.";
		}
	}
}]]></Script>