YNU_JEUS/app_home/himed/xpapps/pam/bfjudgxp/xp/SMPIJ00300.xjs

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

/* --------------------------------------------------------------------------------------------------
  Fucntion Name   		||    Description   
----------------------------------------------------------------------------------------------------- 

	2009.07.23 JHP
	심사화면 환자 메세지 여부확인:							fGetPatMsgYn
	환자기준 전송메세지작성 : 									fPatJudgPatMsgTrsm
    처방기준 전송메세지작성 : 									fOrderJudgPatMsgTrsm
    해당건 환자 전체 메세지 보기 : 							fJudgPatMsgTrsmRef

    2009.08.13 JHP
    처방사유조회 :													fPrcpResnRef
    환자번호 첫자리 문자인경우 환자번호로 인식      fChkPidWordNumber
*/

// 수정이력 :
// 20090811 수정추가 JHP, 변경요청 858 재원심사에서 계산처방 조회시 진료과는 전체로 넘겨야함.  하여 기존 것. 주석, 빈값 넘김으로 수정
// 20090811 수정추가 JHP, 변경요청 858 재원심사에서 계산처방 조회시 진료과는 전체로 넘겨야함.  진료과별 의사를 보기때문에 의사도 일단 전체로 해놓음.
// 20090817 수정추가 JHP, 수정요청 계산처방시행조회 화면 edicd 조회조건에 존재하기에 추가함. 없으면 singlenode 에러남. 
var VAL_today = utlf_getCurrentDate();
var VAL_fromdd = VAL_today.toDate().getAddDate(-6,"M").getDateFormat("YYYYMM");
var VAL_userid = sysf_getUserId();	
var VAL_usernm = sysf_getUserName();

function fOpenSMPIS00500Detail() {	
	dsf_makeValue( ds_hidden_smpis00500_cond, "patunitsrch", "string",  	ds_main_item1_iteminfo.getColumn(0, "pid"));
	dsf_makeValue( ds_hidden_smpis00500_cond, "code", "string",  				grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("snglcalcscorcd")));
	dsf_makeValue( ds_hidden_smpis00500_cond, "datecond", "string",  		"");
	dsf_makeValue( ds_hidden_smpis00500_cond, "fromdd", "string",  			ds_main_item1_iteminfo.getColumn(0, "indd1"));
	dsf_makeValue( ds_hidden_smpis00500_cond, "todd", "string",  				ds_main_item1_iteminfo.getColumn(0, "dschdd"));
	dsf_makeValue( ds_hidden_smpis00500_cond, "ioflag", "string",  				"I");
	dsf_makeValue( ds_hidden_smpis00500_cond, "orddeptcd", "string",  		"");
	dsf_makeValue( ds_hidden_smpis00500_cond, "orddrid", "string",  			"");
	dsf_makeValue( ds_hidden_smpis00500_cond, "codecond", "string",  		"");
	dsf_makeValue( ds_hidden_smpis00500_cond, "judgrid", "string",  			"");
	dsf_makeValue( ds_hidden_smpis00500_cond, "cancer", "string",  			"");
	dsf_makeValue( ds_hidden_smpis00500_cond, "large", "string",  				"");
	dsf_makeValue( ds_hidden_smpis00500_cond, "middle", "string",  			"");
	dsf_makeValue( ds_hidden_smpis00500_cond, "small", "string",  				"");
	dsf_makeValue( ds_hidden_smpis00500_cond, "edicd", "string",  			"");
	frmf_modal("SMPIS00500", "SMPIS00500", "ds_hidden_smpis00500_cond""-"ds_send"", "", "1", "10", "10", "", "", "", "", "", "M");						
}

function fOpenSMPIS00600Detail() {	
	fOpenSMPIS00600Call("false");
}

function fOpenSMPIS00600Detail2() {	
	fOpenSMPIS00600Call("true");
}

function fOpenSMPIS00600Call(cutonly) {	
	dsf_makeValue( ds_hidden_smpis00600_cond, "patunitsrch", "string",  	ds_main_item1_iteminfo.getColumn(0, "pid"));
	dsf_makeValue( ds_hidden_smpis00600_cond, "code", "string",  				grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("snglcalcscorcd")));
	dsf_makeValue( ds_hidden_smpis00600_cond, "clamym", "string",  			"");				
	dsf_makeValue( ds_hidden_smpis00600_cond, "clamymfrom", "string",  	VAL_fromdd);
	dsf_makeValue( ds_hidden_smpis00600_cond, "clamdgfrom", "string",  	"");
	dsf_makeValue( ds_hidden_smpis00600_cond, "clamymto", "string",  		VAL_today);
	dsf_makeValue( ds_hidden_smpis00600_cond, "clamdgto", "string",  		"");
	dsf_makeValue( ds_hidden_smpis00600_cond, "clamflag", "string",  		"");
	dsf_makeValue( ds_hidden_smpis00600_cond, "ioflag", "string",  				"I");
	dsf_makeValue( ds_hidden_smpis00600_cond, "insukind", "string",  		ds_main_item1_iteminfo.getColumn(0, "insukindcd"));
	dsf_makeValue( ds_hidden_smpis00600_cond, "orddeptcd", "string",  		ds_main_item1_iteminfo.getColumn(0, "orddeptcd"));
	dsf_makeValue( ds_hidden_smpis00600_cond, "orddrid", "string",  			ds_main_item1_iteminfo.getColumn(0, "medispclid"));
	dsf_makeValue( ds_hidden_smpis00600_cond, "cutonly", "string",  			cutonly);	
	frmf_modal("SMPIS00600", "SMPIS00600", "ds_hidden_smpis00600_cond""-"ds_send"", "", "1", "10", "10", "", "", "", "", "", "M");
}

//화면 open시(와 초기화 버튼 클릭시) 화면 초기화 기능을 수행한다.
function fInitialize() {
	 // 공통코드를 조회한다.
	 var arrParam = [ {dsNm: "ds_init_P0111list","ds_init_P0110list","ds_init_P0112list","ds_init_P0008list","ds_init_P0010list","ds_init_P0117list","ds_init_P0506list","ds_init_P0551list", 
                  cdGrpId: "P0111","P0110","P0112","P0008","P0010","P0117","P0506","P0551" } ];
appf_getCodeList(arrParam, , false );

	ds_send_listval_uuee.setColumn( 0, "scrnid","SMPIJ00300");

	// 2013.02.19 - 부가코드 원무공통코드조회
	var arrParam = [ {dsNm: "ds_init_PAM_PK029list"
		, 
                  cdGrpId: 
					"PK029"
					 } ];
pamfGetCodeList(arrParam, );

//	if ( submit("TRPIJ00407",false) ) {
var oParam = {};
    oParam.id          = "TRPIJ00407";
    oParam.service     = "bfjudgapp.InHospJudgDetl";
    oParam.method      = "reqGetUuee";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=uuee";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00407";

tranf_submit(oParam);
/*
function cf_TRPIJ00407(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00407(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00407") > -1
arErrorCode.pop("TRPIJ00407") < 0
*/


		var grd_name = ds_hidden_listval_uuee.lookupExpr("compsnm == '" + grd_ordlist + "'", "compsnm");
		var refdata = ds_hidden_listval_uuee.lookupExpr("compsnm == '" + grd_ordlist + "'", "compscnts");
		var sizedata = ds_hidden_listval_uuee.lookupExpr("compsnm == '" + grd_ordlist + "'", "compssizecnts");

		var diag_grd_name = ds_hidden_listval_uuee.lookupExpr("compsnm == '" + grd_diaglist + "'", "compsnm");
		var diag_refdata = ds_hidden_listval_uuee.lookupExpr("compsnm == '" + grd_diaglist + "'", "compscnts");
		var diag_sizedata = ds_hidden_listval_uuee.lookupExpr("compsnm == '" + grd_diaglist + "'", "compssizecnts");

		if (grd_name != "") {
			setOrderInfoOfCol("grd_ordlist",refdata,sizedata);
		}

		if (diag_grd_name != "") {
			setOrderInfoOfCol("grd_diaglist",diag_refdata,diag_sizedata);
		}

	}

	// 
//model.refresh();
 - 불필요해서 제거 - 20080731 박창원

	fSetRdoReset();

	btn_clspcd.selected = true;
	// 20091109 JHP 심사메모버튼으로 변경시 case도 심사메모에 해당하는 것으로 변경해야함.
	model.toggle("case_spclspec");

	ds_send.setColumn( 0, "totalsumflag", "Y");
	ds_send.setColumn( 0, "unitflag", "-");

	btn_attData.attribute("class") = "btn2_letter4"; 

	var indd = ds_main_item1_iteminfo.getColumn(0, "indd"); 
	ds_send.setColumn( 0, "indd",indd);

	ds_send.setColumn( 0, "curdd",VAL_today);

//	submit("TRPIJ00305",false);
var oParam = {};
    oParam.id          = "TRPIJ00305";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqGetDeptList";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=dept";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00305";

tranf_submit(oParam);
/*
function cf_TRPIJ00305(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00305(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00305") > -1
arErrorCode.pop("TRPIJ00305") < 0
*/


	// 코딩을 위하여 임사로 모든 권한을 준다. 
	//ds_hidden_properties.setColumn( 0, "auth", "11100000");

	// (common.js) 현재 로그인한 사용자 번호(ID)
	dsf_makeValue( ds_hidden, "userid", "string", VAL_userid);
	dsf_makeValue( ds_hidden, "usernm", "string", VAL_usernm);		

}

/* 대상자조회에서 대상자 선택하여 넘어올때 메세지 여부 확인, JHP. 2009.07.23 */
function fGetPatMsgYn(){

	var cnt = ds_main_msglist_list.rowcount;
	if(cnt > 0){ 
		img_msg.visible = true;
	}else{
		img_msg.visible = false;
	}

}

/* 환자기준 전송메세지작성, JHP. 2009.07.16 */
function fPatJudgPatMsgTrsm() {
	if (!utlf_isNull(ds_main_item1_iteminfo.getColumn(0, "pid"))) {
		fMsgTrsmMakeNode("P");		
	} else {
		sysf_messageBox("기본정보가 ", "I004");
	}

//model.refresh();

	frmf_modal("SPPIZ01900_심사환자메세지작성", "", "ds_tmp_msgtrsm_info""-"ds_main_patinfo"", "", "", "400", "300", "", "", "", "", "", "M");
	ds_tmp_msgtrsm.clearData();
}

/* 처방기준 전송메세지작성, JHP. 2009.07.16 */
function fOrderJudgPatMsgTrsm() {
	if (!utlf_isNull(ds_main_item1_iteminfo.getColumn(0, "pid"))) {

		if(grd_ordlist.row <= 0){
			return;
		}
		fMsgTrsmMakeNode("O");	
	} else {
		sysf_messageBox("기본정보가 ", "I004");
	}

//model.refresh();

	frmf_modal("SPPIZ01900_심사환자메세지작성", "", "ds_tmp_msgtrsm_info""-"ds_main_patinfo"", "", "", "400", "300", "", "", "", "", "", "M");
	ds_tmp_msgtrsm.clearData();
}

function fMsgTrsmMakeNode(kindflag) {

	// 인스턴스생성
	dsf_makeValue( ds_tmp_msgtrsm_info, "instcd", "string",  "");
	dsf_makeValue( ds_tmp_msgtrsm_info, "msgwrtedd", "string",  VAL_today);
	dsf_makeValue( ds_tmp_msgtrsm_info, "msgwrteno", "string",  "");
	dsf_makeValue( ds_tmp_msgtrsm_info, "msgwrtehistno", "string",  "");
	dsf_makeValue( ds_tmp_msgtrsm_info, "histstat", "string",  "Y");
	dsf_makeValue( ds_tmp_msgtrsm_info, "pid", "string",  ds_main_item1_iteminfo.getColumn(0, "pid"));
	dsf_makeValue( ds_tmp_msgtrsm_info, "orddd", "string",  ds_main_item1_iteminfo.getColumn(0, "indd1"));
	dsf_makeValue( ds_tmp_msgtrsm_info, "cretno", "string",  ds_main_item1_iteminfo.getColumn(0, "cretno"));
	dsf_makeValue( ds_tmp_msgtrsm_info, "mskind", "string",  ds_main_item1_iteminfo.getColumn(0, "mskind"));
	dsf_makeValue( ds_tmp_msgtrsm_info, "orddeptcd", "string",  ds_main_item1_iteminfo.getColumn(0, "orddeptcd"));
	dsf_makeValue( ds_tmp_msgtrsm_info, "orddrid", "string",  ds_main_item1_iteminfo.getColumn(0, "medispclid"));
	dsf_makeValue( ds_tmp_msgtrsm_info, "orddrnm", "string",  ds_main_item1_iteminfo.getColumn(0, "medispclnm"));
	dsf_makeValue( ds_tmp_msgtrsm_info, "ordtype", "string",  "I");
	dsf_makeValue( ds_tmp_msgtrsm_info, "ordqty", "string",  0);
	dsf_makeValue( ds_tmp_msgtrsm_info, "ordtims", "string",  0);
	dsf_makeValue( ds_tmp_msgtrsm_info, "orddays", "string",  0);
	dsf_makeValue( ds_tmp_msgtrsm_info, "rgstrid", "string",  "-");
	dsf_makeValue( ds_tmp_msgtrsm_info, "rgstdd", "string",  "-");
	dsf_makeValue( ds_tmp_msgtrsm_info, "rgsttm", "string",  "-");
	dsf_makeValue( ds_tmp_msgtrsm_info, "sendphone", "string",  "");
	dsf_makeValue( ds_tmp_msgtrsm_info, "anybodyyn", "string",  "N");
	dsf_makeValue( ds_tmp_msgtrsm_info, "sendflag", "string",  "O");
	dsf_makeValue( ds_tmp_msgtrsm_info, "senddate", "string",  "");
	dsf_makeValue( ds_tmp_msgtrsm_info, "sendid", "string",  VAL_userid);
	dsf_makeValue( ds_tmp_msgtrsm_info, "deliveid", "string",  "-");
	dsf_makeValue( ds_tmp_msgtrsm_info, "recvdate", "string",  "");
	dsf_makeValue( ds_tmp_msgtrsm_info, "recvid", "string",  "");
	dsf_makeValue( ds_tmp_msgtrsm_info, "recvcnfmyn", "string",  "N");
	dsf_makeValue( ds_tmp_msgtrsm_info, "recvcnfmid", "string",  VAL_userid);
	dsf_makeValue( ds_tmp_msgtrsm_info, "sendmsg", "string",  "");
	dsf_makeValue( ds_tmp_msgtrsm_info, "recvmsg", "string",  "");
	dsf_makeValue( ds_tmp_msgtrsm_info, "fstrgstrid", "string",  "");
	dsf_makeValue( ds_tmp_msgtrsm_info, "fstrgstdt", "string",  "");
	dsf_makeValue( ds_tmp_msgtrsm_info, "lastupdtrid", "string",  "");
	dsf_makeValue( ds_tmp_msgtrsm_info, "lastupdtdt", "string",  "");

	if (kindflag == "P") {
		dsf_makeValue( ds_tmp_msgtrsm_info, "kindflag", "string",  kindflag);
		dsf_makeValue( ds_tmp_msgtrsm_info, "grupcalcscorcd", "string",  "-");
		dsf_makeValue( ds_tmp_msgtrsm_info, "snglcalcscorcd", "string",  "-");
		dsf_makeValue( ds_tmp_msgtrsm_info, "prcpdd", "string",  "-");
		dsf_makeValue( ds_tmp_msgtrsm_info, "prcpno", "string",  0);
		dsf_makeValue( ds_tmp_msgtrsm_info, "prcppayflag", "string",  "-");
	} else if (kindflag == "O") {
		dsf_makeValue( ds_tmp_msgtrsm_info, "kindflag", "string", 					kindflag); // 처방기준 'O', chk
		dsf_makeValue( ds_tmp_msgtrsm_info, "grupcalcscorcd", "string", 		grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("grupcalcscorcd"))); //chk
		dsf_makeValue( ds_tmp_msgtrsm_info, "snglcalcscorcd", "string", 		grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("snglcalcscorcd")));; //chk
		dsf_makeValue( ds_tmp_msgtrsm_info, "prcpdd", "string", 					"");  // 서버단에서 조회하여 가져와야함. chk(입원만)
		dsf_makeValue( ds_tmp_msgtrsm_info, "prcpno", "string", 					"");  // 서버단에서 조회하여 가져와야함. chk(입원만)
		dsf_makeValue( ds_tmp_msgtrsm_info, "prcppayflag", "string", 			"");  // 서버단에서 조회하여 가져와야함. chk (입원만)
	} 

}

// 환자 전체 메세지 내용 조회하여 하나씩 보기.
function fJudgPatMsgTrsmRef(){
	dsf_makeValue( ds_tmp_msgtrsm_info, "refyn", "string",  "Y");
	dsf_makeValue( ds_tmp_msgtrsm_info, "pid", "string",  ds_main_item1_iteminfo.getColumn(0, "pid"));
	dsf_makeValue( ds_tmp_msgtrsm_info, "orddd", "string",  ds_main_item1_iteminfo.getColumn(0, "indd1"));
	dsf_makeValue( ds_tmp_msgtrsm_info, "cretno", "string",  ds_main_item1_iteminfo.getColumn(0, "cretno"));
	dsf_makeValue( ds_tmp_msgtrsm_info, "mskind", "string",  ds_main_item1_iteminfo.getColumn(0, "mskind"));
	dsf_makeValue( ds_tmp_msgtrsm_info, "orddeptcd", "string",  ds_main_item1_iteminfo.getColumn(0, "orddeptcd"));
	dsf_makeValue( ds_tmp_msgtrsm_info, "orddrid", "string",  ds_main_item1_iteminfo.getColumn(0, "medispclid"));
	dsf_makeValue( ds_tmp_msgtrsm_info, "ordtype", "string",  "I");

	frmf_modal("SMPIJ02600_메세지현황", "", "ds_tmp_msgtrsm_info""-"ds_init_openchk"", "", "", "100", "100", "", "", "", "", "", "M");
	ds_tmp_msgtrsm.clearData();
}

// 처방사유조회
// history.. 진료에 있는화면 기본조건으로 팝업사용..YS(윤샘)요청
function fPrcpResnRef(){
	// 세션값 받기
	dsf_makeValue( ds_tmp_prcpresnref_info, "pid", "string",  			ds_main_item1_iteminfo.getColumn(0, "pid"));	// 등록번호
	dsf_makeValue( ds_tmp_prcpresnref_info, "fromdd", "string", 		ds_main_item1_iteminfo.getColumn(0, "indd1"));	// 처방시작일 default indd
	dsf_makeValue( ds_tmp_prcpresnref_info, "todd", "string", 		ds_main_item1_iteminfo.getColumn(0, "dschdd"));	// 처방종료일 default dschdd
	dsf_makeValue( ds_tmp_prcpresnref_info, "orddeptcd", "string", 	"-");	// 진료과 : 주진료과
	dsf_makeValue( ds_tmp_prcpresnref_info, "orddrid", "string", 		"-");	// 주치의 : default "-"
	dsf_makeValue( ds_tmp_prcpresnref_info, "mainjudgid", "string", 	"-");	// 심사자 : 현재심사자
    dsf_makeValue( ds_tmp_prcpresnref_info, "prcpcd", "string", 		grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("grupcalcscorcd")));	// 수가코드 : 그룹코드
	dsf_makeValue( ds_tmp_prcpresnref_info, "insukind", "string", 		ds_main_item1_iteminfo.getColumn(0, "insukindcd"));	// 보험유형 : 환자보험유형
	dsf_makeValue( ds_tmp_prcpresnref_info, "ioflag", "string", 			"I");	// 내원유형 : default "-"
	dsf_makeValue( ds_tmp_prcpresnref_info, "resncd", "string", 		"FF"); 	// 사유구분 : default "FF" 중복처방
	dsf_makeValue( ds_tmp_prcpresnref_info, "popup", "string", 		"judg"); 	// 팝업사용처구분 : judg(심사)

	frmf_modal("SPMMO19000_중복처방사유조회", "", "ds_tmp_prcpresnref_info""-"ds_tmp_prcpresnref_info"", "", "", "400", "300", "", "", "", "", "", "M");
	ds_tmp_prcpresnref.clearData();

}

// 환자번호 문자 숫자 여부 판단. (isNaN 숫자가아닐경우 true, isFinite 숫자일경우 true)
// 성가환자번호중 첫글자가 문자인경우가 있어서 판단함. 
// 현재 재원메인은 적용안함. 대상자조회만 따로 화면에 적용함.
function fChkPidWordNumber(pid)
{
	if( typeof( this ) == "undefined" ) return false;
	if( this.length == 0 ) return false;

	var thisSting = pid.toString();
	var firstpid = "";

	for( var i=0; i < thisSting.length; i++ ){
		var thisNumber = thisSting.substring( i, i+1 );

		// 숫자가 아니면
		if( isNaN( thisNumber ) ) firstpid = firstpid + 'W';
		// 숫자면 
		if( isNaN( thisNumber ) == false ) firstpid = firstpid + 'N';
		// 공백이면 FALSE 리턴
		if( " " == thisNumber ) firstpid = firstpid + 'L';
	}

	var firstpidYN = firstpid.substring( 0, 2 );

	// 첫번째 두번째 글자 여부
	// 문자숫자, 숫자숫자 :  pid로 판단 : true
	// 문자문자, 숫자문자 :  글자로 판단 : false
	// 그외 : 글자로 판단 : false
	if ( firstpidYN == "WN"){ return true}
	else if ( firstpidYN == "NN"){ return true}
	else if ( firstpidYN == "WW"){ return false}
	else if ( firstpidYN == "NW"){ return false}
	else { return false }
}

//선택된환자 주,부유형에 따른 보험정보 리스트를 갖고 온다. (pmihiphs)
function fGetInsulist(){
	//색상 초기화
	opt_patientinfo.attribute("background-color") = "transparent";
	cmb_itemraremsg.attribute("background-color") = "transparent";

	// 기존 Open 되어 있는 윈도우 중 대상자 조회화면을 제외한 모든 창을 닫는다.
	var judgOpenWindow = getChildWindow("SPPMC02500");		// SPPMC02500_대상자 조회.xrw

	var childCnt = window.children.length;
	childCnt = eval(childCnt) + 1;

	for( var i = childCnt; i > 1; i-- ) {
		var child = window.children.item(i-1);
		if (judgOpenWindow != child) {
			window.children.item(i-1).close();
		}
	}

	ds_main_list1.clearData();
	ds_hidden_sppiz00300_cond.clearData(); ds_hidden_sppiz00300_cond.addRow();			
	ds_hidden_sppiz00300_rslt.clearData(); ds_hidden_sppiz00300_rslt.addRow();
	ds_hidden_smpiz00100_cond.clearData(); ds_hidden_smpiz00100_cond.addRow();			
	ds_hidden_smpiz00100_rslt.clearData(); ds_hidden_smpiz00100_rslt.addRow();

	ds_send.setColumn( 0, "indd1", ds_main_item1_iteminfo.getColumn(0, "indd1"));
	ds_send.setColumn( 0, "curdd",VAL_today);
//	submit("TRPIJ00309",false);
var oParam = {};
    oParam.id          = "TRPIJ00309";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqGetInsuList";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=insulist";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00309";

tranf_submit(oParam);
/*
function cf_TRPIJ00309(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00309(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00309") > -1
arErrorCode.pop("TRPIJ00309") < 0
*/


} 

//대상자 조회에서 선택된환자의 보험정보 리스트를 조회 한 후 최종것을 선택 하여 환자 정보를 자동 조회 환다. 
function fSelectInsulist(getinsukind, getmskind, getflag){
	var nodecnt = ds_main_list1_insulist.rowcount;
	if (nodecnt == 0) {	// 보험내역이 없는겨우
		return;
	}

	var mskind = "";
	var fromdd = "";
	var todd = "";
	var insukind = "";
	var suppkind = "";
	var cretno = "";
	var seqno = "";
	var row = 0;

	// 대상자 조회에서 선택된 내용이 조회되도록 수정 - 박창원
	// 유형이 같은 데이타 중 마지막 데이타 선택
	var personflag = ds_send.getColumn(0, "personflag");
	if (personflag != "9") {
		//주석 처리함. 2007.08.22 박도형
		//위의 로직 수정. 시작일자가 최종일자로 데이터 가져옴 plet2.
		var maxfromdd = model.getXPathValue("max(ds_main_list1_insulist[mskind='"+getmskind+"']_fromdd)");
		mskind = model.getValue("ds_main_list1_insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']_mskind");
		fromdd = model.getValue("ds_main_list1_insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']_fromdd");
		todd = model.getValue("ds_main_list1_insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']_todd");
		insukind = model.getValue("ds_main_list1_insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']_insukind");
		suppkind = model.getValue("ds_main_list1_insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']_suppkind");
		cretno = model.getValue("ds_main_list1_insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']_cretno");
		seqno = model.getValue("ds_main_list1_insulist[mskind='"+getmskind+"' and fromdd='"+maxfromdd+"']_seqno");

		ds_send.setColumn( 0, "mskind",mskind);
		ds_send.setColumn( 0, "fromdd",fromdd);
		ds_send.setColumn( 0, "todd",todd);
		ds_send.setColumn( 0, "ordfromdd",fromdd);
		ds_send.setColumn( 0, "ordtodd",todd);
		ds_send.setColumn( 0, "insukind",insukind);
		ds_send.setColumn( 0, "suppkind",suppkind);
		ds_send.setColumn( 0, "cretno",cretno);
		ds_send.setColumn( 0, "seqno",seqno); 
	}

	// 검색조건 초기화
	ds_hidden_list1_isclcond.setColumn( 0, "matractflag","");
	ds_hidden_list1_isclcond.setColumn( 0, "calcpayflag","");
	ds_hidden_list1_isclcond.setColumn( 0, "snglcalcscorcls","");
	ds_hidden_list1_isclcond.setColumn( 0, "cpflag","");
	ds_hidden_list1_isclcond.setColumn( 0, "edicd","");
	ds_hidden_list1_isclcond.setColumn( 0, "snglcalcscorcd","");
	ds_hidden_list1_isclcond.setColumn( 0, "actingflag","");
	grd_ordlist.attribute("nodeset") = "ds_main_list2_iscllist";

	fGetItemInfo(getflag);

}

// 처방 Grid 마우스 오른쪽 "처방주석입력"
function fOrderGridInsertCmt() {

	var rdounitflag = ds_send.getColumn(0, "unitflag");
	var pid = ds_main_item1_iteminfo.getColumn(0, "pid");
	var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");
	var rows = grd_clcjlist.rows;

	if (rdounitflag == "M") {
		// 줄단위로 셋팅하고 처리
		model.setValue(rdo_unitflag.attribute("ref"), "J");
		grd_clcjlist.attribute("nodeset") = "ds_main_list4_clcjlist[unitflag = 'J']";
		grd_clcjlist.rebuild();

		// 단위에  에 따라 해당 행있는 특정코드 콤보 재설정
		for (var i=1; i< rows; i++) {
			var unitflag =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));
			var status =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("status"));

			if (status != "") {
				grd_clcjlist.rowStatus(i) = status;
			}

			if (unitflag == "M") {
				grd_clcjlist.cellComboNodeset(i,3) = "ds_init_P0117list_P0117[minval = 'M'' and cdid != 'MX999']";	
			} else if (unitflag == "J") {
				grd_clcjlist.cellComboNodeset(i,3) = "ds_init_P0117list_P0117[minval = 'J']";
			}				
		}
	}

	ds_hidden_sppij00500_rslt.clearData();		// SPPIJ00500_특정내역상세관리 에서 선택된 결과가 copyNode되는 경로임
	ds_hidden_sppij00500_cond.clearData();

	for (var k=0; k < grd_ordlist.selectedRows; k++ ) {
		var row = grd_ordlist.selectedRow(k);
		var edicd = grd_ordlist.valueMatrix(row, grd_ordlist.colref("edicd"));
		var calcscorcd = grd_ordlist.valueMatrix(row, grd_ordlist.colref("snglcalcscorcd"));

		if (edicd) {
		} else {
			sysf_messageBox("EDI코드가 없는 경우 해당 줄단위 특정내역이", "I004");	///EDI코드가 없는 경우 해당 줄단위 특정내역이 없습니다.
			return;
		}
	}

	var rowcnt = 1;
	var setrow = 0;

	for (var k=0; k < grd_ordlist.selectedRows; k++ ) {
		var row = grd_ordlist.selectedRow(k);
		var edicd = grd_ordlist.valueMatrix(row, grd_ordlist.colref("edicd"));
		var calcscorcd = grd_ordlist.valueMatrix(row, grd_ordlist.colref("snglcalcscorcd"));

		if (rows == 1) {
			dsf_makeValue( ds_hidden_sppij00500_cond, "pid", "string",  pid);
			dsf_makeValue( ds_hidden_sppij00500_cond, "indd", "string",  indd);
			dsf_makeValue( ds_hidden_sppij00500_cond, "edicd", "string",  edicd);
			dsf_makeValue( ds_hidden_sppij00500_cond, "unitflag", "string", "J");	
			dsf_makeValue( ds_hidden_sppij00500_cond, "flag", "string",  "I");
			dsf_makeValue( ds_hidden_sppij00500_cond, "spclcd", "string",  "JX999");
			dsf_makeValue( ds_hidden_sppij00500_cond, "spclcdnm", "string",  "");
			dsf_makeValue( ds_hidden_sppij00500_cond, "detldesc", "string",  "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
			dsf_makeValue( ds_hidden_sppij00500_cond, "spclspec", "string",  "");
			dsf_makeValue( ds_hidden_sppij00500_cond, "remfact", "string", "X(700)");
			dsf_makeValue( ds_hidden_sppij00500_cond, "rownum", "string",  "");
			dsf_makeValue( ds_hidden_sppij00500_cond, "calcscorcd", "string",  calcscorcd);

		} else if (getNodesetCount(grd_clcjlist.nodeset+"[calcscorcd='"+calcscorcd+"']") == 0) {

			dsf_makeValue( ds_hidden_sppij00500_cond, "pid", "string",  pid);
			dsf_makeValue( ds_hidden_sppij00500_cond, "indd", "string",  indd);
			dsf_makeValue( ds_hidden_sppij00500_cond, "edicd", "string",  edicd);
			dsf_makeValue( ds_hidden_sppij00500_cond, "unitflag", "string", "J");	
			dsf_makeValue( ds_hidden_sppij00500_cond, "flag", "string",  "I");
			dsf_makeValue( ds_hidden_sppij00500_cond, "spclcd", "string",  "JX999");
			dsf_makeValue( ds_hidden_sppij00500_cond, "spclcdnm", "string",  "");
			dsf_makeValue( ds_hidden_sppij00500_cond, "detldesc", "string",  "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
			dsf_makeValue( ds_hidden_sppij00500_cond, "spclspec", "string",  "");
			dsf_makeValue( ds_hidden_sppij00500_cond, "remfact", "string", "X(700)");
			dsf_makeValue( ds_hidden_sppij00500_cond, "rownum", "string",  "");
			dsf_makeValue( ds_hidden_sppij00500_cond, "calcscorcd", "string",  calcscorcd);

			ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "pid", pid);
			ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "indd", indd);
			ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "edicd", edicd);
			ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "unitflag", "J");	
			ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "flag", "I");
			ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclcd", "JX999");
			ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclcdnm", "");
			ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "detldesc", "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
			ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclspec", "");
			ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "remfact", "X(700)");
			ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "rownum", "");
			ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "calcscorcd", calcscorcd);

			rowcnt = rowcnt+1;
		} else {
			for (var i=1; i<rows; i++) {

				var clcjedicd = grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("edicd"));
				var spclcd = grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclcd"));

				if ( edicd == clcjedicd) {
					dsf_makeValue( ds_hidden_sppij00500_cond, "pid", "string",  pid);
					dsf_makeValue( ds_hidden_sppij00500_cond, "indd", "string",  indd);
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "flag", "U");
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "edicd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("edicd")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "detldesc", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("detldesc")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclcd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclcd")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclcdnm", "");
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclspec", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclspec")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "remfact", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("remfact")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "rownum", i);
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "unitflag", "J")
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "oldspclcd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclcd")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "oldspclspec", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclspec")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "calcscorcd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("calcscorcd")));

					rowcnt = rowcnt+1;

					// 특정내역 상세 화면에 보여줄 특정내역 선택
					setrow = i;

				} 

				dsf_makeValue( ds_hidden_sppij00500_cond, "edicd", "string",  edicd);
				dsf_makeValue( ds_hidden_sppij00500_cond, "unitflag", "string", "J");	

				if ( ds_main_list4_clcjlist.getColumn(setrow, "spclcd")) == "JX999" ) {
					dsf_makeValue( ds_hidden_sppij00500_cond, "pid", "string",  pid);
					dsf_makeValue( ds_hidden_sppij00500_cond, "indd", "string",  indd);
					dsf_makeValue( ds_hidden_sppij00500_cond, "flag", "string",  "U");
					dsf_makeValue( ds_hidden_sppij00500_cond, "spclcd", "string",  grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("spclcd")));
					dsf_makeValue( ds_hidden_sppij00500_cond, "spclcdnm", "string",  "");
					dsf_makeValue( ds_hidden_sppij00500_cond, "detldesc", "string",  grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("detldesc")));
					dsf_makeValue( ds_hidden_sppij00500_cond, "spclspec", "string",  grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("spclspec")));
					dsf_makeValue( ds_hidden_sppij00500_cond, "remfact", "string",  grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("remfact")));
					dsf_makeValue( ds_hidden_sppij00500_cond, "rownum", "string",  setrow);
					dsf_makeValue( ds_hidden_sppij00500_cond, "calcscorcd", "string",  grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("calcscorcd")));

				} else {
					dsf_makeValue( ds_hidden_sppij00500_cond, "pid", "string",  pid);
					dsf_makeValue( ds_hidden_sppij00500_cond, "indd", "string",  indd);
					dsf_makeValue( ds_hidden_sppij00500_cond, "flag", "string",  "I");
					dsf_makeValue( ds_hidden_sppij00500_cond, "spclcd", "string",  "JX999");
					dsf_makeValue( ds_hidden_sppij00500_cond, "spclcdnm", "string",  "");
					dsf_makeValue( ds_hidden_sppij00500_cond, "detldesc", "string",  "특정내역의 구분코드가 없는 경우에는 기타 줄번호(확장 번호)단위의 기타내역에 기재");
					dsf_makeValue( ds_hidden_sppij00500_cond, "spclspec", "string",  "");
					dsf_makeValue( ds_hidden_sppij00500_cond, "remfact", "string", "X(700)");
					dsf_makeValue( ds_hidden_sppij00500_cond, "rownum", "string",  "");
					dsf_makeValue( ds_hidden_sppij00500_cond, "calcscorcd", "string",  calcscorcd);
				}

			}

		}
	}

	ds_hidden_sppij00500_rslt.clearData();
	frmf_modal("SPPIJ00500", "SPPIJ00500", "ds_hidden_sppij00500""-"ds_hidden_clcj"", "", "", "10", "10", "", "", "", "", "", "M");	// SPPIJ00500_특정내역상세관리.xrw

	var rsltcnt = ds_hidden_sppij00500_rslt_list.rowcount;

	// 처리 건수 
	if (rsltcnt > 0) {

		for(var i=rsltcnt; i>0; i--) {	

			var flag = ds_hidden_sppij00500_rslt_list.getColumn(i, "flag");
			var rownum = ds_hidden_sppij00500_rslt_list.getColumn(i, "rownum");
			var edicd = ds_hidden_sppij00500_rslt_list.getColumn(i, "edicd");
			var newspclcd = ds_hidden_sppij00500_rslt_list.getColumn(i, "spclcd");
			var newspclcdnm = ds_hidden_sppij00500_rslt_list.getColumn(i, "spclcdnm");
			var newspclspec = ds_hidden_sppij00500_rslt_list.getColumn(i, "spclspec");
			var newremfact  = model.getValue("ds_hidden_sppij00500_rslt_list["+ i +"]_remfact ");
			var newdetldesc = ds_hidden_sppij00500_rslt_list.getColumn(i, "detldesc");
			var newdcalcscorcd = ds_hidden_sppij00500_rslt_list.getColumn(i, "calcscorcd");
			var oldspclcd = ds_hidden_sppij00500_rslt_list.getColumn(i, "oldspclcd");
			var oldspclspec = ds_hidden_sppij00500_rslt_list.getColumn(i, "oldspclspec");

			// 특정코드 추가인 경우
			if (flag == "I") {

				var clcjrow = grd_clcjlist.rows - 1;	// 특정내역 Grid 가장 마지막 줄에 추가한다. 
				grd_clcjlist.insertRow(clcjrow++, true,false,false);

				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("pid")) =  ds_send.getColumn(0, "pid");
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("indd")) =  ds_send.getColumn(0, "indd");
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("cretno")) =  ds_send.getColumn(0, "cretno");
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("fromdd")) =  ds_send.getColumn(0, "fromdd");
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("mskind")) =  ds_send.getColumn(0, "mskind");
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("unitflag")) = "J";
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("edicd")) = edicd;
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclcd")) = newspclcd;
				//grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclspec")) = newspclspec;
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("remfact")) = newremfact;
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("detldesc")) = newdetldesc;
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("calcscorcd")) = newdcalcscorcd
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclmemoflag")) = "E";
				grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("status")) = "3";

				// 처방Grid에서도 해당 줄단위 특정내역의 'T' 컬럼의 "*" 를 표시한다.
				var rowcnt =  ds_main_list2_iscllist.rowcount;		// 필터
				rowcnt = eval(rowcnt) + 1;	
				for (var j = 1; j < rowcnt; j++) {
				//for (var j = 1; j < grd_ordlist.rows; j++) {
					var clcjedicd = ds_main_list2_iscllist.getColumn(j, "edicd");
					if (edicd == clcjedicd) {
						ds_main_list2.setColumn( j , "text", "*");
						//
//model.refresh();
 최적화 문제로 변경 - 20080731 박창원
						//model.refreshpart("ds_main_list2_iscllist_text");
					}
				}

			// 특정코드  변경인 경우	
			} else if (flag == "U") {

				grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcd")) = newspclcd;
				//grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
				grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclspec")) = newspclspec;
				grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("remfact")) = newremfact;
				grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("detldesc")) = newdetldesc;
				grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("calcscorcd")) = newdcalcscorcd;

				if ( grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) != "3") {
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "0";
				}

				//
//model.refresh();
 최적화 문제로 변경 - 20080731 박창원
				model.refreshpart("ds_main_list4_clcjlist");
				// 특정코드, 특정내역이 변경되었거나 삭제된 특정코드를 조회하여 "확인"을 선택한 경우
				if (oldspclcd != newspclcd || oldspclspec != newspclspec || grd_clcjlist.rowstatus(row) == 4) {
					var rowstatus = grd_clcjlist.rowstatus(rownum);
					if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
					} else {
						grd_clcjlist.rowstatus(rownum) = 2;		// 2 : update 상태로 stat를 변경한다.
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "2";
					}
				}

				// 처방Grid에서도 해당 줄단위 특정내역의 'T' 컬럼의 "*" 를 표시한다.
				var rowcnt =  ds_main_list2_iscllist.rowcount;		// 필터
				rowcnt = eval(rowcnt) + 1;
				for (var j = 1; j < rowcnt; j++) {
				//for (var j = 1; j < grd_ordlist.rows; j++) {
					var clcjedicd = ds_main_list2_iscllist.getColumn(j, "edicd");
					if (edicd == clcjedicd) {
						ds_main_list2.setColumn( j , "text", "*");
						//
//model.refresh();
 최적화 문제로 변경 - 20080731 박창원
						model.refreshpart("ds_main_list2_iscllist_text");
					}
				}
				ds_hidden_item1.setColumn( 0, "message", "특정코드 - "+ newspclcd +" / 특정내역 : "+ newspclspec +" / 기재형식 : "+ newremfact);
				model.refreshpart("ds_hidden_item1_message");

			// 특정코드 삭제인 경우	
			} else if (flag == "D" && rownum != "" ) {

				var cnt = 0;

				for (var j = 1; j < grd_clcjlist.rows; j++) {
					var clcjedicd = ds_main_list4_clcjlist.getColumn(j, "edicd");
					if (edicd == clcjedicd) {
						if (grd_clcjlist.rowstatus(j) != 4) {
							cnt++;
						}
					}
				}

				if (cnt > 0) {
				} else {
					grd_ordlist.valueMatrix(row, grd_ordlist.colref("text")) = "";
					//model.resetInstanceNode("ds_main_list2_iscllist["+ row +"]_text");
				}

				// 특정내역 Grid에서 삭제
				var rowstatus = grd_clcjlist.rowstatus(rownum);
				if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
					grd_clcjlist.deleteRow(rownum, false);		// 해당 라인을 Grid에서 삭제한다.
				} else {							// 0 : new, 2 : update
					grd_clcjlist.rowstatus(rownum) = 4;		// 4 : delete 상태로 stat를 변경한다.
				}
				grd_clcjlist.row = rownum;

				var rowcnt =  ds_main_list2_iscllist.rowcount;		// 필터
				rowcnt = eval(rowcnt) + 1;
				for (var j = 1; j < rowcnt; j++) {
				//for (var j = 1; j < grd_ordlist.rows; j++) {
					var clcjedicd = ds_main_list2_iscllist.getColumn(j, "edicd");
					if (edicd == clcjedicd) {
						ds_main_list2.setColumn( j , "text", "");
						//
//model.refresh();
 최적화 문제로 변경 - 20080731 박창원
						model.refreshpart("ds_main_list2_iscllist_text");
					}
				}

			} // 특정 코드 상태 따른 if end
		} // for end

		var rdounitflag = ds_send.getColumn(0, "unitflag");

		if (rdounitflag == "-") {
			for (var i=1; i<grd_clcjlist.rows; i++) {
				var delstatus = grd_clcjlist.rowStatus(i);
				var delspclspec = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec"));
				if (delstatus == 1 || delstatus == 3) { 	// 0 : new, 3 : insert & new
					if (delspclspec == "") {
						grd_clcjlist.deleteItem(i);
					}
				}
			}

			// 입력행 추가
			fSpclGridInsertRow();

		} else if (rdounitflag == "M") {							
			grd_clcjlist.attribute("nodeset") = "ds_main_list4_clcjlist[unitflag = 'M']";
			grd_clcjlist.rebuild();
		} else if (rdounitflag == "J") {						
			grd_clcjlist.attribute("nodeset") = "ds_main_list4_clcjlist[unitflag = 'J']";
			grd_clcjlist.rebuild();
		}

		for (var i=1; i<grd_clcjlist.rows; i++) {
			var unitflag =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));
			var status =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("status"));

			if (status != "") {
				grd_clcjlist.rowStatus(i) = status;
			}

			if (unitflag == "M") {
				grd_clcjlist.cellComboNodeset(i,3) = "ds_init_P0117list_P0117[minval = 'M' and cdid != 'MX999']";	
			} else if (unitflag == "J") {
				grd_clcjlist.cellComboNodeset(i,3) = "ds_init_P0117list_P0117[minval = 'J']";
			}

		}	
		//fSaveClcjList();
	} // 처리 건수  if end

	//
//model.refresh();
 최적화 문제로 변경 - 20080731 박창원

}

//재원심사 인적사항, 보험내역, 상병, 금액내역을 갖고 온다. 
function fGetItemInfo(paramFlag){
	group9.visible = false;

	btn_attData.attribute("class") = "btn2_letter4"; 
	btn_drginfo.visible = "hidden";

	// NST 관련버튼 초기화(2015.11.16 LEJ)
	btn_nst.enable = false;
	btn_nst.attribute("class") = "btn2_letter8";
	btn_nst.attribute("text") = "NST";

	// 읽기전용을 위한 변수
	var readonly = ds_send.getColumn(0, "readonly");
	// 오픈일자를 가져옴 - 하드코딩 제거 20090302 박창원, 의정부,여의도,성가,빈센트를 위해서 예외작업함 나중에 제거필요
	var opendd = ds_main_item1_iteminfo.getColumn(0, "opendd");

	if(ipt_pid.text.length >0)
	{
		ds_main_item1_iteminfo.clearData(); ds_main_item1_iteminfo.addRow();
		ds_main_item18_cnstinfo.clearData(); ds_main_item18_cnstinfo.addRow();
		ds_main_list1_insulist.clearData();
		ds_main_list3_diaglist.clearData();
		ds_main_list2_iscllist.clearData();
		ds_hidden_item1.setColumn( 0, "vcode","");

//grd_ordlist.refresh();

		ds_send.setColumn( 0, "curdd",VAL_today);
		dsf_makeValue( ds_send, "paramflag", "string", paramFlag);

		asyncSend("TRPIJ00322", "ds_send", "ds_chklist_goso", "responseHandlerTRPIJ00322");

//		if(!submit("TRPIJ00301")){
var oParam = {};
    oParam.id          = "TRPIJ00301";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqGetInHospJudgInfo";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=iteminfo ds_=insulist ds_=iscllist ds_=diaglist ds_=clcjlist ds_=itemcalc ds_=insu ds_=inddlist ds_=patdnorinfo ds_=ownbmaxamt ds_=rareessc ds_=rooa ds_=emrdiagpamdiag ds_=spcldrug ds_=msglist ds_=operstat ds_=outrateinsusuppflag ds_=vcode ds_=drginfo ds_=nbwt ds_=clcjnbwt ds_=rarecancermsg ds_=obgydiag ds_=cnstinfo";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00301";

tranf_submit(oParam);
/*
function cf_TRPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00301") > -1
arErrorCode.pop("TRPIJ00301") < 0
*/


			sysf_messageBox("선택된 환자가","I004");
			return;
		}
		//
//model.refresh();

		// 20091109 JHP 빈센트 병원 오류확인, fGetItemInfo에서 상단정보는 환자 정보 조회후에 바로 상단정보셋팅되게 바꾸게 요청함. 
		// 하여 delPatientInfos(), fSetOutPatPamInfo()를 상단쪽 환자정보조회 이후로 이동시킴. 와 윤영옥, 정승우, 박창원.
		// 상단에 환자정보 초기화하고 기입하기 (이미 퇴원환자는 제외)
		delPatientInfos();
		fSetOutPatPamInfo();

		//처방조회조건부분 클리어
		fSetRdoReset();
		fGetSelectedOrderData();	

		// 처방내역을 갖고 온다. 
		fGetIsclList(paramFlag);

		// 2009.07.27 기존 상단에 제목줄 무조건 히든.
		// grd_insuhistory.rowhidden(0)=true; 
		// 2009.07.27 4건이상이면 안없애고 4건이하면 없앤다. 
		var nodecnt = ds_main_list1_insulist.rowcount;
		if(nodecnt < 4) {
			grd_insuhistory.rowhidden(0)=true; 
		} 

		// 수정추가, 2009.07.27 유형정보가 많을경우 스크롤바 생겨서 일수가 안보이기때문에 버튼을 두어서 많이 보게끔했다. 
		// 다른거 손대면 일이커지니깡. ㅋㅋ
		// 일단 먼저 버튼에 초기화형식으로 모두 숨김해놓는다. 
		btn_insuhistoryup.visible =  false;
		btn_insuhistorydown.visible =  false;
		grd_insuhistory.attribute("height") = "77";

		// 유형갯수에 따라서 버튼보여주고 길이체크한다. 
		var nodecnt = ds_main_list1_insulist.rowcount;
		if(nodecnt >= 4) {
			btn_insuhistorydown.visible =  true;
		} 

		//상병이 한건도 없는경우 자동으로 처방상병을 갱신한다. 
		if(grd_diaglist.rows < 2)
		{
			if(grd_diaglist.rows == 1){
				var chkdiag = ds_main_list3_diaglist.getColumn(1, "diagcd");
				if(!chkdiag){
					fRefreshDiag();		
				}
			}
		}

		fSpclGridInsertRow();
		// 20080811 자동으로 상병줄추가 제외하기로함
		fDiagGridInsertRow();

		var lastjudgendid = ds_main_item1_iteminfo.getColumn(0, "lastjudgendid");
		var lastjudgendnm = ds_main_item1_iteminfo.getColumn(0, "lastjudgendnm");
		var opyn = ds_main_item1_iteminfo.getColumn(0, "opflag");
		var age = ds_main_item1_iteminfo.getColumn(0, "age");					
		ds_send.setColumn( 0, "age",age);

		var userid  = ds_hidden.getColumn(0, "userid");

		btn_save.enable = true;
		//상세화면 저장버튼 처리를 위해 넣어 놓는다.   - 2007-11.29 박도형
		ds_hidden_item1.setColumn( 0, "chksave","N");
		btn_recalc.enable = true;
		btn_sugicalc.enable = true;
		btn_dclrtclose.enable = true;
		btn_dschclose.enable = true;
		btn_totjudgclose.enable = true;
		btn_dschclosecancel.enable = true;
		btn_midregist.enable = true;
		btn_midregistyn.enable = true;

	}else
	{
		sysf_messageBox("환자번호를","C001");
		return;
	}
	// 수술심사상태를 가져온다. -- 수술심사상태는  수술이 있는 사람만 가져온다. - 20080922  박창원
	//if (opyn == "Y") {
	//	fGetOperStat();
	//}

	// 외래 필수 심사 품목 조회를 위해 요율 칼럼을 불러온다! (2012.06.01 LEJ)                              
	var brateflag = ds_main_item1_iteminfo.getColumn(0, "brateflag");
	ds_send.setColumn( 0, "brateflag",brateflag);

	fGetPatMsgYn();

	// 진료비 계산내역을 갖고 온다.
	//fGetCalc();
	//항목별소계
	//fSetItemSubTotal();				
	// 특정내역 중 MT015, MT016 정보가 입력된 환자인지를 확인한다.
	fCheckSpclSpecData();
	// 2008. 01. 27 박지욱 추가 (처방 색깔 항 구분에 따라 흰색-회색 구분되도록 처리)
	//fSetOrderColorByEdiitem();
	//범례 색깔을 표시한다.
	//fSetColorSpclJudgOrder();
	//특정내역이 있는 처방에 'T'필드에 *표를 해준다. 
	//fSetOrdSpclTxt();
	//중간청구 등록여부, 심사 마감상태, 문제환자여부를 체크하여 버튼의 색상을 셋팅해준다.
	fSetItemInfoSetting();

	// 마이그레이션된 중간청구등록이 되지 않은 데이터에 대하여 일괄적으로 중간청구 등록일을 20081003 으로 한다. - 20081003 박창원
	var midcflag = ds_main_item1_iteminfo.getColumn(0, "midcflag");
	var indd =  ds_main_item1_iteminfo.getColumn(0, "indd1");
	var fromdd =  ds_main_item1_iteminfo.getColumn(0, "fromdd");

	if (midcflag == "N" && indd < opendd && fromdd == opendd) {
		ds_main_item1_iteminfo.setColumn( 0, "lastmdlclamdd",opendd);
	}

	// 하단의 희귀난치성 산정특례환자의 등록번호 함수로 대체함. 20091020 JHP (추가작업발생)############################################# 시작
//	// 희귀난치성 산정특례환자의 등록번호를 보여준다. - 20090622 박창원
//	var raremsg = ds_main_item1_iteminfo.getColumn(0, "raremsg");
//	
//	if (raremsg != '-') {
//		ds_main_item1_iteminfo.setColumn( 0, "itemmsg",raremsg);
//		
//model.refresh();

//	}
	// 중증번호, 희귀난치번호 보여주는 방법 변경에 따른 수정.
	fItemRareMsg();
	// 하단의 희귀난치성 산정특례환자의 등록번호 함수로 대체함. 20091020 JHP (추가작업발생)############################################# 끝

	// 희귀난치여부 표시 - 20080811 박창원 추가
	var rareyn = ds_main_item1_iteminfo.getColumn(0, "rareyn");
	cap_rare.visible= false;
	cap_tb.visible= false;
	cap_g1.visible = false;
	cap_c1c.visible= false;
	cap_c2e.visible= false;
	cap_c2f.visible= false;
	cap_cp.visible= false;

	if (rareyn == "Y") {
		cap_rare.visible= true;
	}else if(rareyn == "T") {
		cap_tb.visible= true;
	}
	// 차상위 표시
	var cfe = 	ds_main_item1_iteminfo.getColumn(0, "cfe");
	var dcuc = 	ds_main_item1_iteminfo.getColumn(0, "dcuc");
	if (cfe == "C") {
		cap_c1c.visible= true;
	} else if (cfe == "E") {
		cap_c2e.visible= true;
	} else if (cfe == "F") {
		cap_c2f.visible= true;
	} else if (dcuc =="G") {
		cap_g1.visible = true;
	}
	// 완화의료 시범사업...20091228 정승우 환자구분추가
	pm_flag.visible=false;
	var calcscorrecalflag = 	ds_main_item1_iteminfo.getColumn(0, "calcscorrecalflag");
	if (calcscorrecalflag == "7" || calcscorrecalflag == "8") {
		pm_flag.visible=true;
	}

	var cpflag = ds_main_item1_iteminfo.getColumn(0, "cpyn");

	if (cpflag == "Y") {
		cap_cp.visible=true;
	}

	//메세지 클리어
	ds_hidden_item1.setColumn( 0, "message","");

	// 20091109 JHP 심사메모버튼으로 변경시 case도 심사메모에 해당하는 것으로 변경해야함.
	var sixtimyn = ds_main_item1_iteminfo.getColumn(0, "sixtimyn");
	if (sixtimyn == "Y"){
		btn_clspcd.selected = true;
		model.toggle("case_spclspec");
	} else {
		btn_judgrmk.selected = true;
		model.toggle("case_judgrmemo");
	}

	ds_hidden_item1.setColumn( 0, "snglcalcscorcd", "");
	ds_hidden_item1.setColumn( 0, "edicd", "");

	//분만정보 체크
	fCheckBorn();
	//수술여부 체크
	fCheckOper();
	//퇴원메모여부 체크
	fCheckDschMemo();
	//공여자 수혜자 체크
	fCheckDnorPat();

	// 수정추가 20090813 외래요율환자 일경우 보험, 보조유형 정보가 맞는지 확인하여 체크
	fOutRateInsuSuppflag();

	// 특이환자 버튼 설정 - 20080923 박창원
	if (ds_main_item1_iteminfo.getColumn(0, "pamprobjudgflag") == "Y") {
		btn_patspcfyn.attribute("background-image") = "../../.._com_commonweb_images_icon_btn_s.gif";		// 주황색
	} else {
		btn_patspcfyn.attribute("background-image") = "../../.._com_commonweb_images_icon_btn.gif";		// 파란색
	}
	// 자보한도액 초과자 체크 : 자보환자일때만 자보발생금액 버튼 활성화 초과자는 자보발생금액 버튼 색깔변경 - 20080923 박창원
	var insukind = ds_main_item1_iteminfo.getColumn(0, "insukindcd");
	var suppkind = ds_main_item1_iteminfo.getColumn(0, "suppkindcd");
	var suppkindflag = ds_main_item1_iteminfo.getColumn(0, "suppkindcd");				
	if ( insukind == "31" && suppkind == "18") {
		var paylimityn = ds_main_item1_iteminfo.getColumn(0, "paylimityn");
		// 자보발생금액 버튼 설정
		if (paylimityn == "Y") {
			btn_autolimit.attribute("background-image") = "../../.._com_commonweb_images_icon_btn_s.gif";	// 주황색
		} else {
			btn_autolimit.attribute("background-image") = "../../.._com_commonweb_images_icon_btn.gif";		// 파란색
		}
	} else { // 자보자손이 아닐경우 파란색으로 - 20081108 박창원
		btn_autolimit.attribute("background-image") = "../../.._com_commonweb_images_icon_btn.gif";		// 파란색
	}

	// 20091016 JHP 요청번호8558 진료상병과심사상병체크 ############################################################################################ 시작
	fCheckEmrDiagPamDiag();
	// 20091016 JHP 요청번호8558 진료상병과심사상병체크 ############################################################################################ 끝

	// 사망환자 메세지 20090602 박창원
	var dethdt = ds_main_item1_iteminfo.getColumn(0, "dethdt");
	var maxexecdd = ds_main_item1_iteminfo.getColumn(0, "maxexecddt");
	var dethdd = dethdt.substr(0,8);

	if (dethdt != '-') {
		if (maxexecdd > dethdd) {
			sysf_messageBox("사망일자 이후 실시처방이 있습니다. 정리 후 ","C003");
		}
		else {
			sysf_messageBox("사망환자[사망시간 "+ dethdt.substr(0,4) + ":" + dethdt.substr(4,2) + ":" + dethdt.substr(6,2) + "  " + dethdt.substr(8,2) + ":" + dethdt.substr(10,2) + "]", "I005");

			// 20090921 수정추가 : JHP inpt 사망정보 존재하면  진료결과의 값을 사망으로바꾸어서 저장할때 저장되게끔한다..
			var dschdd  = ds_main_item1_iteminfo.getColumn(0, "dschdd");
			var ordrslt = ds_main_item1_iteminfo.getColumn(0, "ordrslt");
			// 퇴원일자와 사망일자가 동일할 때만 진료결과 체크한다. 
			if(dethdd == dschdd && ordrslt != "4"){   
				ds_main_item1_iteminfo.setColumn( 0, "ordrslt","4");
			}
		}
	}
	// 당일외래진료후 입원환자 및 덤프된 원내,원외 약제 체크 알럿 - 20090616 박창원
	var todayoutyn = ds_main_item1_iteminfo.getColumn(0, "todayoutyn");
	var dumpinyn = ds_main_item1_iteminfo.getColumn(0, "dumpinyn");
	var dumpoutyn = ds_main_item1_iteminfo.getColumn(0, "dumpoutyn");
	var lastjudgdt = ds_main_item1_iteminfo.getColumn(0, "lastjudgdt");
	var dumpclamkeyexistyn = ds_main_item1_iteminfo.getColumn(0, "dumpclamkeyexistyn");
	var serdiagfromdd = ds_main_item1_iteminfo.getColumn(0, "serdiagfromdd"); //중증시작일자

	if (todayoutyn == "Y" && lastjudgdt == "-") {
		if (dumpinyn == "N" && dumpoutyn == "N") {
			sysf_messageBox("당일 외래진료 후 입원처리된", "I005");
		} else if (dumpinyn == "Y" && dumpoutyn == "N") {
			sysf_messageBox("당일 외래진료 후 입원처리되고 원내 약제 덤프처방이 있는", "I005");
		} else if (dumpinyn == "N" && dumpoutyn == "Y") {
			sysf_messageBox("당일 외래진료 후 입원처리되고 원외 약제 덤프처방이 있는", "I005");
		}else if (dumpinyn == "Y" && dumpoutyn == "Y") {
			sysf_messageBox("당일 외래진료 후 입원처리되고 원내_원외 약제 덤프처방이 있는", "I005");
		}
	}

	// 6시간미만여부체크 - 20080722 박창원
	var sixtimyn = ds_main_item1_iteminfo.getColumn(0, "sixtimyn");
	if (sixtimyn == "Y" && indd < serdiagfromdd) {
		sysf_messageBox("중증등록일과 입원일자가 다르므로 재원 이력 분리 후 중증 적용 바랍니다", "I005");
	}
	// 본인부담상한제 대상자체크 - 200800808 박창원
	var ownbmaxyn = ds_main_item8_ownbmaxamt.getColumn(0, "ownbmaxyn");
	if (ownbmaxyn == "Y") {
		sysf_messageBox("본인부담상한제 대상", "I005");
	}

	var ownbmaxgradeflag 	= ds_main_item1_iteminfo.getColumn(0, "ownbmaxgradeflag");
	var ownlimmitamt 	    = ds_main_item1_iteminfo.getColumn(0, "ownlimmitamt");      // 본인부담 상한 구분에 따른 상한기준액  
	var suppkindflag		= ds_main_item1_iteminfo.getColumn(0, "suppkindcd");
	var ownbmaxgrade 	    = ds_main_item1_iteminfo.getColumn(0, "ownbmaxgrade");      // 보험유형과 재원이력의 본인부담 상한 구분 비교   

	// 수정추가 : 20090820 : JHP : 상한제 차등구분(iphs의 ownbmaxgradeflag)을 확인하여 보조유형 차상위 환자에 대해서는 상한제 차등구분이 200만원 코드인 3인지 확인한다.
	// 2011.01.17 경북대병원 차상위 상한금액구분 메시지 삭제요청
	/*

	if(suppkindflag  == '32' ||suppkindflag  == '33' ||suppkindflag  == '34' ||suppkindflag  == '35' ||suppkindflag  == '36' ||suppkindflag  == '37' ||suppkindflag  == '38' ||suppkindflag  == '39' ||
	   suppkindflag  == '40' ||suppkindflag  == '41' ||suppkindflag  == '42' ||suppkindflag  == '43' ||suppkindflag  == '44' ||suppkindflag  == '45' ||suppkindflag  == '46'){
	   	if(ownbmaxgradeflag != "3"){
	   		sysf_messageBox("차상위 환자입니다. 현재 상한제금액구분이 200만원이 아니므로 \n원무팀에 요청하시어 상한제금액구분을 변경","I008");
	   	}
	}
	*/

	// 응급실을 통하여 소아과로 입원한 6세미만 환자는 유형을 변경할 것인지 알럿을 띄워준다.
	// 현재과(PD),입원경로(응급실),6세미만, 보험유형은 보험과 보호만, 재원중인 환자로 보조유형이 6세미만이 아닌 환자를 조건으로함 - 20081007 박창원
	// 입원경로 조건을 없앰 - 20081013 박창원
	// 신생아 추가 - 20081013 박창원
	var age = parseInt(ds_main_item1_iteminfo.getColumn(0, "age"));
	var inpath = ds_main_item1_iteminfo.getColumn(0, "inpath");
	var orddeptcd = ds_main_item1_iteminfo.getColumn(0, "orddeptcd");
	var rrgstno = ds_main_item1_iteminfo.getColumn(0, "rrgstno");
	var canceryn = "N"; // 6세미만과 등록암이 공존하지 못하도록 20090602 박창원
	var indschacptstat = ds_main_item1_iteminfo.getColumn(0, "indschacptstat");

	var babyyn ="N";
	var end6yn = "N";
	var brthdd = "20" + rrgstno.substr(0,6);
	var cfe = ds_main_item1_iteminfo.getColumn(0, "cfe");
	// 신생아를 구별지음

	if (indschacptstat != 'D' && dumpclamkeyexistyn == "Y") {
		sysf_messageBox("외래 자료 수집이 된 재원 내 실시처방이 있습니다. 외래 사후 자료를 생성 삭제한 후 Dump처리","I008");
	}

	//응급실 관리료 여부 체크
	var nog3reasnyn = ds_main_item1_iteminfo.getColumn(0, "nog3reasnyn");
	if (nog3reasnyn == "Y") {
		sysf_messageBox("응급 의료관리료 미발생  환자입니다.","I007");
	}

	if (rrgstno.substr(7,1) == "3" || rrgstno.substr(7,1) == "4" || rrgstno.substr(7,1) == "7" || rrgstno.substr(7,1) == "8" && (cfe != "E" && cfe != "F")) {
		var interval = utlf_getDateInterval(brthdd,indd);
		if (interval <  "28") {
			babyyn = "Y";
		}
	}
	// 6세미만 생일 여부를 판단함
	if ((rrgstno.substr(7,1) == "3" || rrgstno.substr(7,1) == "4" || rrgstno.substr(7,1) == "7" || rrgstno.substr(7,1) == "8") && age <= 6) {
		var curdd = VAL_today.substr(2,6);
		brthdd = brthdd.substr(2,6);
		if (age == 6) {
			if (brthdd >= curdd) {
				end6yn = "N";
			} else if (brthdd < curdd) {
				end6yn = "Y";
			}
		} else if(age < 6) {
			end6yn = "N";
		} else if (age > 6) {
			end6yn ="Y";
		} 
	}

	//35세 이상 고위험 임신부 관련 메세지 (2015.07.29 LEJ)
	if (orddeptcd == "2100000000" && age >= 35 ){
		if (ds_main_item17_obgydiag.getColumn(0, "obgydiagyn") == "Y"){   //임신 상병 체크 추가 (2015.10.05 LEJ)
			sysf_messageBox("35세 이상 고위험 임신부 입원진료 내역입니다!!","I007");
		}
	}

	if ( (insukind == "11" || insukind == "21" || insukind == "22") && suppkind != "31" && !(insukind == "22" && suppkind == "08") ){  //20100318 정승우 신생아유형은 메세지 뜨지 않도록 적용하고 버튼도 보이지 않도록
		//산정특례여부 체크
		fCheckEssc();
		//산정특례 + 정상요율 + 퇴원확정인 경우는 메시지t처리 한다. 
		var chkBtn = "False";
		if(btn_esscdiag.visible){
			chkBtn = "True";
		}else{
			chkBtn = "False";
		}

		// 희귀난치성 산정특례 체크 - 20090622 박창원
		var rareesscyn = ds_main_item12_rareessc.getColumn(0, "rareesscyn");

		//20100318 정승우 메세지 정리 보조유형이 50이면 띄우지 않는다. 					
		//if (chkBtn == "True" && rareesscyn == "Y" && suppkindflag != "50") {
		//	sysf_messageBox("희귀난치성 산정특례", "I005");
			// 희귀난치성 산정특례 환자의 경우 메세지후 return때문에 진행안되는 부분 comment 처리 - 20100221 박창원
			//return;
		//}
		var rare = ds_main_list1_insulist.lookupExpr("rare == 'H'", "rare");
		if (rare.length > 0 && (indschacptstat == 'A' || indschacptstat == 'T') ){
			sysf_messageBox("희귀대불 환자입니다. 자격", "I007");
		}

		if (insukind == "11") {

			if (ownbmaxgrade == 'Y') {
				 sysf_messageBox("환자의 본인부담 상한구분이 보험유형 기준자료의 상한구분과 일치하지 않습니다. ", "I007");
			}
			else {

				// 연도별 분리 안 된 이력 중 본인부담 상한액 초과 환자 메세지 발생
				var todd = ds_main_item1_iteminfo.getColumn(0, "todd");
			    var dschnotidt = ds_main_item1_iteminfo.getColumn(0, "dschnotidt");
				var curyear = VAL_today.substr(0,4);
				var fromyear = fromdd.substr(0,4);
				var toyear = todd.substr(0,4);
				if ( todd == "99991231" ) {
					if ( dschnotidt.substr(0,8) == "99991231" || dschnotidt.substr(0,8) == "" ) {
						toyear = curyear ;
					}
					else {
						toyear = dschnotidt.substr(0,4) ;
					}
				}
				if ( fromyear != toyear && cfe != 'F' ) {
					if(parseInt(ds_main_item2_itemcalc.getColumn(0, "ownbpayamt")) > ownlimmitamt) {
						 sysf_messageBox("연도별 분리 되지 않은 본인부담상한제 환자입니다. \n재원 분리 ", "I007");
					}
				}
				else {
					//본임부담상한제 체크 : 기준 금액 이상이면 메시지 발생.
					if ((indschacptstat == 'A' || indschacptstat == 'T')) {
						if(parseInt(ds_main_item2_itemcalc.getColumn(0, "ownbpayamt")) > ownlimmitamt) {
							 sysf_messageBox("본인부담상한제 환자", "I009");
						}
					}
				}
			}
		}

		// 중증수술 처방이 있을경우 상병이 맞지 않으면 Alert - 20080908 박창원
		var chkSuppkind = ds_main_item1_iteminfo.getColumn(0, "suppkindcd");
		var insukind = ds_main_item1_iteminfo.getColumn(0, "insukindcd");
		var v191prcpyn = ds_main_item1_iteminfo.getColumn(0, "v191prcpyn");
		var v192prcpyn = ds_main_item1_iteminfo.getColumn(0, "v192prcpyn");
		var v191diagyn = ds_main_item1_iteminfo.getColumn(0, "v191diagyn");
		var v192diagyn = ds_main_item1_iteminfo.getColumn(0, "v192diagyn");
		var vcode = ds_hidden_item1.getColumn(0, "vcode");
		// 20090602  개심개두는 입원요율만 적용되게
		var sixtimyn = ds_main_item1_iteminfo.getColumn(0, "sixtimyn");
		// 개심개두 상병 메세지  통합 - 20081010 박창원
		var opmessageyn = "N";

		if (v191prcpyn == "Y" && chkSuppkind != "05" && chkSuppkind != "32" && chkSuppkind != "34" && sixtimyn == "N") { // 20090325 차상위 2종추가
			//if (v191diagyn == "N") {                              // 개심_개두 수술인 경우 상병과 상관없이 보조유형 적용 안 되면 메세지 띄움 (2015.02.10 LEJ)
				sysf_messageBox("중증해당 수술이 있습니다. 상병을", "I007");
				opmessageyn = "Y";
			//}
		}
		if (v192prcpyn == "Y" && chkSuppkind != "05" && chkSuppkind != "32" && chkSuppkind != "34") { // 20090325 차상위 2종추가
			//if (v192diagyn == "N" && opmessageyn == "N") {        // 개심_개두 수술인 경우 상병과 상관없이 보조유형 적용 안 되면 메세지 띄움 (2015.02.10 LEJ)
				sysf_messageBox("중증해당 수술이 있습니다. 상병을", "I007");
			//}
		} 
		// 개두술 관련 적용 약제 추가에 따른 재원심사 알림 메세지 [입퇴 + 외퇴] : (해당 약제 + 해당 상병)이면서 보조유형이 개두술이 아닌 경우 메세지 (2015.02.10 LEJ)
		if (v191prcpyn == "D" && v191diagyn == "Y" && chkSuppkind != "05" && chkSuppkind != "39") {
			sysf_messageBox("개심_개두 관련 약제가 있습니다. 보조 유형을", "I007");
			opmessageyn = "Y";
		}
		// 개심술 관련 적용 약제 추가에 따른 재원심사 알림 메세지 [입퇴 + 외퇴] : (해당 약제 + 해당 상병)이면서 보조유형이 개심술이 아닌 경우 메세지 (2015.02.10 LEJ)
		if (v192prcpyn == "D" && v192diagyn == "Y" && chkSuppkind != "05" && chkSuppkind != "39") {
			sysf_messageBox("개심_개두 관련 약제가 있습니다. 보조 유형을", "I007");
			opmessageyn = "Y";
		}

		if(insukind == "11" && chkBtn == "True" && chkSuppkind != "05" && chkSuppkind != "06" && chkSuppkind != "32" && chkSuppkind != "39" && cfe != "C"  && chkSuppkind != "40"  && chkSuppkind != "50" ){ //20090325 차상위 2종추가 
			sysf_messageBox("중증정보가 존재하는", "I005");
			canceryn = "Y";
		}
		if( (insukind == "21" || insukind == "22")  && chkBtn == "True" && chkSuppkind != "05" && chkSuppkind != "06" && chkSuppkind != "32" && cfe != "C" && chkSuppkind != "39" && chkSuppkind != "40"  && chkSuppkind != "50" ){ //20090325 차상위 2종추가
			if (!(sixtimyn == "N" && end6yn == "N"  && babyyn == "N" && age <= 6))  {
				sysf_messageBox("중증정보가 존재하는", "I005");
			}
		} 
	} else {
		btn_esscdiag.visible= false;
	}

	// 6시간 미만여부 추가 - 20081105 박창원
	// 진료과 제한 조건 삭제 - 20090219 박창원
	// 조건 삭제 20091008 JHP 박창원 요청.( insukind == "21" || insukind == "22" )
	if (sixtimyn == "N" && babyyn == "Y" &&age == 0 && indd >= "20080101"  && (insukind == "11")  && suppkind != "31" && cfe != "C" && readonly != "Y") {
		var msg = sysf_messageBox("입원한 신생아 입니다. 신생아 유형을 적용","S001");
		if (msg == 6) { // 신생아 요율을 적용한다.
			Insuchange("31");
		}
	}

	// 6시간 미만여부 추가 - 20081105 박창원
	// 진료과 제한조건 삭제 - 20080219 박창원 
	// 희귀난치일때 6세미만 메세지 적용안함 - 20100630 박창원
	if (insukind == "11") {
		var opchkyn =  ds_main_item11_drginfo.getColumn(0, "opchkyn");
		var drgmchkyn = ds_main_item11_drginfo.getColumn(0, "drgmchkyn");
		var fromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
		var dschjudgprcsstat 	= ds_main_item1_iteminfo.getColumn(0, "dschjudgprcsstat");
		var indaycnt = parseInt(ds_main_list1_insulist.lookupExpr("fromdd == '" + fromdd + "'", "indaycnt"));

		if (opchkyn == "Y" && indaycnt <= 30 ) {
			btn_drginfo.visible = true;
		} else {
			btn_drginfo.visible = "hidden";
		}

		if (opchkyn == "Y" && (indschacptstat == 'A' || indschacptstat == 'T') && indaycnt <= 30 ) {
			sysf_messageBox("DRG 대상입니다.","I");
		} else if ( opchkyn == "Y" && (indschacptstat == 'A' || indschacptstat == 'T') && indaycnt > 30 ) {
			sysf_messageBox("DRG 대상입니다만 재원일수 초과 입니다.","I");
		}
		var zdiagcd =  ds_main_list3_diaglist.lookupExpr("diagcd == '" + Z201 + "'", "seqno");
		if (suppkind == "00" && zdiagcd != "") {
			sysf_messageBox("잠복결핵 대상입니다.","I");
		}

		if (sixtimyn == "N" && end6yn == "N"  && canceryn == "N"  && babyyn == "N" && age <= 6   && suppkind != "08"  && suppkind != "41" && suppkind != "06" 
		    && cfe != "C" && suppkind != "40"  && readonly != "Y"
		    && suppkind != "46"  && suppkind != "50" && suppkind != "51" && dschjudgprcsstat != "C") {
	         	var msg = sysf_messageBox("6세미만 환자입니다. 6세미만 유형을 적용","S001");
			if (msg == 6) { // 6세미만 요율을 적용한다.
				var cfe = ds_main_item1_iteminfo.getColumn(0, "cfe");
				if (cfe == "E" || cfe == "F") {
					var suppkind = "41";
				} else {
					var suppkind = "08";
				}
				Insuchange(suppkind);
			}
		 }
	}
	if (insukind == "21" || insukind == "22"){
		if (sixtimyn == "N" && end6yn == "N"  && babyyn == "N" && age <= 6   && suppkind != "08"  && suppkind != "41" && readonly != "Y" ) {
	          var msg = sysf_messageBox("6세미만 환자입니다. 6세미만 유형을 적용","S001");
			if (msg == 6) { // 6세미만 요율을 적용한다.
				var cfe = ds_main_item1_iteminfo.getColumn(0, "cfe");
				var suppkind = "08";
				if (cfe == "E" || cfe == "F") {
					suppkind = "41";
				}

				Insuchange(suppkind);
			}
		 }
	} 
	if (insukind == "31"){
		var paygrntyn = ds_main_item1_iteminfo.getColumn(0, "paygrntyn");

		if (paygrntyn != "Y") {
			sysf_messageBox("자동차보험 지급보증번호 누락입니다.","I007");
		}
	}
	//진료결과 체크		- 중간청구인경우 : 계속, 퇴원인경우 : 퇴원
	var dschnotiyn = ds_main_item1_iteminfo.getColumn(0, "dschnotiyn");
	var ordrslt = ds_main_item1_iteminfo.getColumn(0, "ordrslt");

	if(dschnotiyn == "Y"){
		if(ordrslt == "" || ordrslt == "-" || ordrslt == "1"){
			if(ordrslt != "4"){
				ds_main_item1_iteminfo.setColumn( 0, "ordrslt","9");
			}
		}
	}else{
		if(ordrslt == "" || ordrslt == "-"){
			ds_main_item1_iteminfo.setColumn( 0, "ordrslt","1");
		}
	}

	//응급 6시간 미만 체크를 위하여 넣어 둔다. 
	var ordtype = ds_main_item1_iteminfo.getColumn(0, "ordtype");
	var brateflag = ds_main_item1_iteminfo.getColumn(0, "brateflag");

	ds_send.setColumn( 0, "ordtype",ordtype);
	ds_send.setColumn( 0, "brateflag",brateflag);

	//본인부담율이 20%가 아닌 경우 상단정보에 보조유형정보를  붉은 색으로 표시해준다. 
	var insukind = ds_main_item1_iteminfo.getColumn(0, "insukindcd");
	var payownbrate = ds_main_item1_iteminfo.getColumn(0, "ownrate");

	//보험인경우 본인부담율 20%가 아니면 붉은색으로 표시해준다.
	if(insukind == "11"){
		if(payownbrate == "20"){
			opt_suppkind.attribute("class") = "output_fix";
			cmb_suppkind.attribute("class") = "combo_default";
			opt_ownrate.attribute("class") = "output_fix";
		}else{
			opt_suppkind.attribute("color") = "#ff0066";
			cmb_suppkind.attribute("color") = "#ff0066";			
			opt_ownrate.attribute("color") = "#ff0066";		
		}
	//보호 2종인경우 본인부담율 15%가 아니면 붉은색으로 표시해준다.
	}else if(insukind == "22"){
		if(payownbrate == "15"){
			opt_suppkind.attribute("class") = "output_fix";
			cmb_suppkind.attribute("class") = "combo_default";
			opt_ownrate.attribute("class") = "output_fix";
		}else{
			opt_suppkind.attribute("color") = "#ff0066";
			cmb_suppkind.attribute("color") = "#ff0066";			
			opt_ownrate.attribute("color") = "#ff0066";		
		}
	//나머지는 정상 색깔로 표시해 준다. 
	}else{
		opt_suppkind.attribute("class") = "output_fix";
		cmb_suppkind.attribute("class") = "combo_default";
		opt_ownrate.attribute("class") = "output_fix";
	}

	// 마이그레이션 환자는 조회만 되게 한다. - 20080819 박창원
	var mig = ds_main_item1_iteminfo.getColumn(0, "mig");
	var dschjudgprcsstat = ds_main_item1_iteminfo.getColumn(0, "dschjudgprcsstat");
	var indschacptstat = ds_main_item1_iteminfo.getColumn(0, "indschacptstat");
	var dschnotiyn = ds_main_item1_iteminfo.getColumn(0, "dschnotiyn");
	var dschdclrtyn = ds_main_item1_iteminfo.getColumn(0, "dschdclrtyn");

	// NST 상태 표시 추가 ( 2015.11.16 LEJ)
	btn_nst.enable = false;
	btn_nst.attribute("class") = "btn2_letter8";
	btn_nst.attribute("text") = "NST";

	var cnststat = ds_main_item18_cnstinfo.getColumn(0, "cnststat");
	var nstcnt = ds_main_item18_cnstinfo.getColumn(0, "nstcnt");
	if (cnststat != "-" && cnststat != ""){
		btn_nst.enable = true;
		if (nstcnt >= "2" && nstcnt != ""){
			btn_nst.attribute("text") = "NST : " + cnststat + "(" + nstcnt + ")" ;
		} else {
			btn_nst.attribute("text") = "NST : " + cnststat;
		}
		if (cnststat == "회신" || cnststat == "회신확정"){ 
			btn_nst.attribute("color") = "#ff0066";
		}
	}

	// 심사중
	if (readonly == "Y") {
	      btn_save.enable = false;
	      btn_recalc.enable = false;
		  btn_sugicalc.enable = false; 
		  btn_dclrtclose.enable = false; 
	      btn_dschclose.enable = false;
	      btn_totjudgclose.enable = false;
	      btn_dschclosecancel.enable = false;
	      btn_midregist.enable = false;
	      btn_midregistyn.enable = false;
	      //상세화면 저장버튼 처리를 위해 넣어 놓는다.   - 2007-11.29 박도형
	      ds_hidden_item1.setColumn( 0, "chksave","Y");
	}else if (indschacptstat  == "D") { // 퇴원이 완료되면 세부계산내역 저장이 안되게 20080911
	      sysf_messageBox("퇴원 처리된 환자입니다. 요율변경 및 계산내역 수정은", "E001");
	      btn_save.enable = false;
	      btn_recalc.enable = false;
		  btn_sugicalc.enable = false; 
		  btn_dclrtclose.enable = false; 
	      btn_dschclose.enable = false;
	      btn_totjudgclose.enable = false;
	      btn_dschclosecancel.enable = false;
	      btn_midregist.enable = false;
	      btn_midregistyn.enable = false;
	      //상세화면 저장버튼 처리를 위해 넣어 놓는다.   - 2007-11.29 박도형
	      ds_hidden_item1.setColumn( 0, "chksave","Y");
	} else if (indschacptstat  == "T" && (dschjudgprcsstat == "C"  || dschjudgprcsstat == "E" || dschjudgprcsstat == "G" )  ) { // 가퇴원 일단추가 가퇴원은 재 판단해서 블로킹 로직을 만든다. - 20081005 박창원
	      sysf_messageBox("가퇴원 처리가된 마감 환자입니다. 요율변경 및 계산내역 수정은", "E001");
	      btn_save.enable = false;
	      btn_recalc.enable = false;
		  btn_sugicalc.enable = false;  
		  btn_dclrtclose.enable = false;  
	      btn_dschclose.enable = false;
	      btn_totjudgclose.enable = false;
	      btn_dschclosecancel.enable = true;
	      btn_midregist.enable = false;
	      btn_midregistyn.enable = false;
	      //상세화면 저장버튼 처리를 위해 넣어 놓는다.   - 2007-11.29 박도형
	      ds_hidden_item1.setColumn( 0, "chksave","Y");
    } else if (dschjudgprcsstat == "B" ) {
		if ( lastjudgendid != userid ) {
			sysf_messageBox(lastjudgendnm + "님이 퇴원심사 진행중입니다. 저장은", "E001");
			btn_save.enable = false;
			btn_recalc.enable = false;
			btn_sugicalc.enable = false;  
			btn_dclrtclose.enable = false;
			btn_dschclose.enable = false;
			btn_totjudgclose.enable = false;
			btn_dschclosecancel.enable = false;
			btn_midregist.enable = false;
			btn_midregistyn.enable = false;
			//상세화면 저장버튼 처리를 위해 넣어 놓는다.   - 2007-11.29 박도형
			ds_hidden_item1.setColumn( 0, "chksave","Y");
		} else {
			btn_dschclosecancel.enable = false;
			if (dschnotiyn == "Y") {				// 퇴원확정인 경우 예고 심사 비활성
				btn_dclrtclose.enable = false;
			} else if (dschdclrtyn == "Y" && dschnotiyn == "N") {  // 퇴원예고인 경우 퇴원마감, 통합마감 비활성
				btn_dschclose.enable = false;
				btn_totjudgclose.enable = false;
			}
		}
	// 심사완료, 통합심사완료
	} else if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E" || dschjudgprcsstat == "G" ) {
		sysf_messageBox("퇴원마감이나 통합심사마감 처리가된 환자입니다. 요율변경 및 계산내역 수정은", "E001");
		btn_save.enable = false;
		btn_recalc.enable = false;
		btn_sugicalc.enable = false;  
		btn_dclrtclose.enable = false;  
		btn_dschclose.enable = false;
		btn_totjudgclose.enable = false;
		btn_midregist.enable = false;
		btn_midregistyn.enable = false;
		btn_dschclosecancel.enable = true;
		//상세화면 저장버튼 처리를 위해 넣어 놓는다.   - 2007-11.29 박도형
		ds_hidden_item1.setColumn( 0, "chksave","Y");
	} else if (dschjudgprcsstat == "A" && dschnotiyn == "N") {
		btn_dschclose.enable = false;
		btn_totjudgclose.enable = false;
		btn_dschclosecancel.enable = false;
		if (dschdclrtyn == "N") {				// 퇴원예고 안 된 경우 예고심사 비활성
			btn_dclrtclose.enable = false;
		}
	} else if (dschjudgprcsstat == "A" && dschnotiyn == "Y") {
		btn_dschclosecancel.enable = false;
		btn_dclrtclose.enable = false;
	//} else if (orddeptcd == "2280000000"  && dschnotiyn == "Y" && sixtimyn == "Y" ) { // 응급실환자의 경고 alert 추가 - 20081003 박창원
		// 20091019 JHP 번호가 하드코딩되어있어서 삭제함 기존("... 응급수납 T.1813으로 연락후...") 번호삭제 - 이미숙 요청
	//	var msg = sysf_messageBox("수납이 가능한 상태입니다.(응급실은 무심사 퇴원 가능함),처방수정을 하시려면 반드시 응급수납으로 연락후 처리하시기 바랍니다. 처방 검색만 하시려면(수정불가)","S001");
	//       if (msg == 6) {
	//	    btn_save.enable = false;
	//		btn_recalc.enable = false;
	//		btn_sugicalc.enable = false;  
	//		btn_dschclose.enable = false;
	//		btn_totjudgclose.enable = false;
	//		btn_midregist.enable = false;
	//		btn_midregistyn.enable = false;
	//		btn_dschclosecancel.enable = true;
			//상세화면 저장버튼 처리를 위해 넣어 놓는다.   - 2007-11.29 박도형
	//		ds_hidden_item1.setColumn( 0, "chksave","Y");
	//       }
	 } 
	//if (indschacptstat  == "T" && (dschjudgprcsstat == "A" || dschjudgprcsstat == "B" || dschjudgprcsstat == "F") ) { // 가퇴원 메세지 추가 - 20081005 박창원
	//	sysf_messageBox("가퇴원 환자","I009");
	//}

	// AS-IS 데이터가 비정상적인 액팅이 되었을때 alert - 20081013 박창원 - 한시적 루틴
	var abnormalactingyn = ds_main_item1_iteminfo.getColumn(0, "abnormalactingyn");
	var abnormalexip = ds_main_item1_iteminfo.getColumn(0, "abnormalexip");
	var abnormaliscl = ds_main_item1_iteminfo.getColumn(0, "abnormaliscl");
	var indate = ds_main_item1_iteminfo.getColumn(0, "indd1");
	var spcdrugyn = ds_main_item1_iteminfo.getColumn(0, "spcdrugyn") ;
	var dcuc = 	ds_main_item1_iteminfo.getColumn(0, "dcuc");
	var jinyn = ds_main_item1_iteminfo.getColumn(0, "jinyn");
	var erjinyn = ds_main_item1_iteminfo.getColumn(0, "erjinyn");

	if (abnormalactingyn == "Y" &&  indate < opendd) {
		sysf_messageBox("AS-IS 처방이 비정상적으로 TO-BE 기간에 시행된 처방이 있습니다.","I007");
	}
	// 특수조제료 발생 처방이 있는데 주사제무균조제료가 발생하지 않았을 경우 메세지 - 20081108 박창원
	// 계산내역에 IJ0041 <> ast.adbmdrug - pcldrug ='D'
	//                  IJ0042 <> ast.adbmdrug - pcldrug in ('B','T')
	//                  IJ0043 <> ast.adbmdrug - pcldrug ='C'             계산내역에 주사무균조제료 갯수와 처방갯수가 틀리면 메시지 처리
	if (spcdrugyn == "Y" && dschnotiyn == "Y") {
		sysf_messageBox("주사제 무균조제료 발생 오류입니다.","I007");
	}
	// 실시처방과 계산내역이 맞지 않을경우 Alert - 20081110 박창원
	if ( (abnormaliscl == "Y" || abnormalexip == "Y") && dschnotiyn == "Y")
	{
		sysf_messageBox("실시내역과 계산내역이 일치하지 않습니다. 재계산 후.","I007");
	}
	// 미시행 처방이 있을 경우 alert - 20081013 박창원 
	if (dschnotiyn == "Y"  && fChkClose() == false) {
		sysf_messageBox("미 시행된 처방이 있습니다.","I007");
	}

	if (dcuc == "G") {
		sysf_messageBox("긴급지원 대상자 입니다.","I007");
	}

	// 동일과 내 1회 이상 진찰료(응급 전문의진찰료 포함) 발생 시 메세지 (2016.01.14 LEJ)	 	
	if (jinyn == "Y") {
		sysf_messageBox("동일과 내 1회 이상 진찰료(응급 전문의진찰료 포함)가 발생했습니다.","I007");
	}

	// KTAS 4,5등급 환자에 응급 전문의진찰료  발생 시 메세지 (2016.01.14 LEJ)	 	
	if (erjinyn == "Y") {
		sysf_messageBox("KTAS 4,5등급 환자에 응급 전문의진찰료가 발생했습니다.","I007");
	}

	// 명단위, 줄단위에 따라 특정코드 콤보 리스트 변경 및 특정코드에 해당하는 상세설명 적용
	var p0117list = instance1.selectSingleNode("ds_init_P0117list");
	for (var i=0; i<grd_clcjlist.rows; i++) {
		var unitflag = ds_main_list4_clcjlist.getColumn(i, "unitflag");
		var spclcd = ds_main_list4_clcjlist.getColumn(i, "spclcd");

		if (unitflag == "M") {
			if (p0117list != null) {
				var p0117 = p0117list.childNodes;
				for (var j = 1; j <= p0117.length; j++) {
					var cdid = ds_init_P0117list_P0117.getColumn(j, "cdid");
					if (cdid == spclcd) {
						ds_main_list4.setColumn( i , "detldesc", ds_init_P0117list_P0117.getColumn(j, "detldesc"));
						j = p0117.length + 1;
					}
				}
			}	
			grd_clcjlist.cellComboNodeset(i,3) = "ds_init_P0117list_P0117[minval = 'M' and cdid != 'MX999']";		
		} else if (unitflag == "J") {
			if (p0117list != null) {
				var p0117 = p0117list.childNodes;
				for (var j = 1; j <= p0117.length; j++) {
					var cdid = ds_init_P0117list_P0117.getColumn(j, "cdid");
					if (cdid == spclcd) {
						ds_main_list4.setColumn( i , "detldesc", ds_init_P0117list_P0117.getColumn(j, "detldesc"));
						j = p0117.length + 1;
					}
				}
			}
			grd_clcjlist.cellComboNodeset(i,3) = "ds_init_P0117list_P0117[minval = 'J']";

		}
	}
	// 최적화 문제로 추가 - 20081015 박창원

//grd_clcjlist.refresh();

	var orddeptcd = ds_main_item1_iteminfo.getColumn(0, "orddeptcd");
	var erorddeptcd = ds_main_item1_iteminfo.getColumn(0, "erorddeptcd");				

	// 의료급여 정신과정액인경우 보조유형 메시지 처리
	if ((insukind == "21" || insukind == "22") 
	  && (suppkind != "14") 
	  && (orddeptcd == "2030000000" || erorddeptcd == "2030000000"))  {
		sysf_messageBox("의료급여 정신과정액환자입니다. 보조유형을 14. 보호정신과정액으로 변경하세요.","I007");
	}

//model.refresh();

}

// 처방 색깔 항 구분에 따라 흰색-회색 구분되도록 처리한다.
function fSetOrderColorByEdiitem() {
	var rowcnt =  grd_ordlist.rows;
	var ediitem2 = "";			
	var color = "#f4f4f4";	

	for (var i = 0; i < rowcnt; i++) {	// Grid 필터링 이후  Grid 상에 표시된 처방 개수만큼 돌면서				
	//for (var i = 1; i < grd_ordlist.rows; i++) {	// Grid 필터링 이후  Grid 상에 표시된 처방 개수만큼 돌면서
		//Color 표시 범례
		//1. 문제처방 : #fcd2c1
		//2. 선별심사 : #ffe79d
		//3. 선별심사 + 문제처방 : #7BE6B7
		//4. 야간, 공휴가산 : #ffff00(밝은노랑)

		var status = grd_ordlist.rowHidden(i);
		if (status == false) {
			var ediitem1 = grd_ordlist.valueMatrix(i, grd_ordlist.colRef("item1"));
			if (ediitem1.length > 0) {
				if (ediitem1 == ediitem2) {
					grd_ordlist.rowStyle(i,"data","background-color") = color;
				} else {
					ediitem2 = ediitem1;
					if (color == "#ffffff") {
						grd_ordlist.setCellProprty("body", i, "background", "#f4f4f4"); grd_ordlist.setCellProperty("body", i, "background2", "#f4f4f4");
						color = "#f4f4f4";

					} else {
						grd_ordlist.setCellProprty("body", i, "background", "#ffffff"); grd_ordlist.setCellProperty("body", i, "background2", "#ffffff");
						color = "#ffffff";
					}
				}
			}
		}
	}
}

// 상단에 환자정보 기입하기
// 수정추가 : 20091006 JHP 상단정보로 파라미터 값 넘길때 기존엔 param 에 첫번재 값이 기준없이 무조건 I였는데 .응급기준을 확인하여 응급일때는 E로 나머지는 I로 셋팅한다. 
function fSetOutPatPamInfo() {
	 var pid       	= ds_main_item1_iteminfo.getColumn(0, "pid");
	 var indd     	= ds_main_item1_iteminfo.getColumn(0, "indd1");
	 var cretno    	= ds_main_item1_iteminfo.getColumn(0, "cretno");
	 var instcd    	= ds_main_item1_iteminfo.getColumn(0, "instcd");
		 var ordtype    	= ds_main_item1_iteminfo.getColumn(0, "ordtype");

	 // 수정추가 퇴원환자일경우 상단정보 파라미터에 srchdd를 퇴원일자로 넣어주고 아니면 현재일자를 넣어준다. 20090916, JHP,(현대김영학 참조)
	 var indschacptstat = ds_main_item1_iteminfo.getColumn(0, "indschacptstat");
	 var dschdd = ds_main_item1_iteminfo.getColumn(0, "dschdd");

	 if(indschacptstat == "D" || indschacptstat == "T"){
	 	var srchdd = dschdd;
	 }else{
	 	var srchdd = VAL_today;
	 }

	 // param 첫번째 붙는 값은 외래 : O, 입원 : I, 지원부서 : S, 수술 : T, 응급 : E, 의뢰 : C 
	 //var param = "I" + "▦" + pid + "▦" + indd + "▦" + cretno + "▦" + instcd + "▦" + srchdd; 
	 if(ordtype == "E"){
	 	var param = "E" + "▦" + pid + "▦" + indd + "▦" + cretno + "▦" + instcd + "▦" + srchdd; 
	 }else{
	 	var param = "I" + "▦" + pid + "▦" + indd + "▦" + cretno + "▦" + instcd + "▦" + srchdd; 
	 }

	 frmf_setParameter("condparam", param);
	 frmf_setParameter("errflag", "Y");
	 frmf_modal("SPMMO08900", "", ""-"", "", "1", "0", "0", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden", "", "", "M");
	 var useyn = frmf_getParameter("SPMMO08900_rtn_useyn");
	 if(useyn == "Y") {
	 	frmf_setParameter("SPMMO08900_rtn_useyn", "");
	 }else{
	 }
}

function fGetOperStat() {
//	submit("TRPIJ00314",false);
var oParam = {};
    oParam.id          = "TRPIJ00314";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqGetOperStat";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=operstat";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00314";

tranf_submit(oParam);
/*
function cf_TRPIJ00314(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00314(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00314") > -1
arErrorCode.pop("TRPIJ00314") < 0
*/


}

// 처방내역을 갖고 온다. 
function fGetIsclList(paramFlag){

	// 수정추가 paramFlag에따라서 조회조건 놔둔다. 20090728 JHP
	if(paramFlag == "IPHS"){
		// 재원심사메인화면 우측상단 유형에서 더블클릭햇을때...JHP 20090728
		// 더블클릭시 값 지정하기에 따로 값셋팅안한다. ...JHP 20090728
	}else if(paramFlag == "Srch"){
		// 대상자조회에서 퇴원모드시 조회조건의 값이 있으면 이걸로 셋팅한다. ...JHP 20090728

		// 수정추가 JHP 20090427 퇴원모드조회조건 추가.. 신규 시작
		var dschmodesrch 	= ds_send.getColumn(0, "dschmodesrch");                          // 퇴원모드 조회 조건
		var indschacptstat 	= ds_main_item1_iteminfo.getColumn(0, "indschacpstat");      // 입퇴원진행상태
		var lastjudgdt 		= ds_main_item1_iteminfo.getColumn(0, "lastjudgdt");            // 최종심사일시
		var lastmdlclamdd 	= ds_main_item1_iteminfo.getColumn(0, "lastmdlclamdd");     // 최종중간청구일시
		var indd 			= ds_main_item1_iteminfo.getColumn(0, "indd1");		    // 입원일
		var lastjudgdt2 		= "";
		var lastmdlclamdd2 	= "";

		if (lastjudgdt != "" && lastjudgdt != "-") {
			// 수정, 최종심사일 다음날이 아니라 해당일부터여서 하루 더하는거 뺌. 20090729 JHP(yyy)요청
			lastjudgdt2 = lastjudgdt.toDate("YYYYMMDD");
			//lastjudgdt2 = lastjudgdt2.getAddDate(1);
			lastjudgdt2 = lastjudgdt2.getDateFormat();
		}
		// lastmdlclamdd 에 하루를 더한다.(중간청구 일자가 있으면)
		if (lastmdlclamdd != "" && lastmdlclamdd != "-" && lastmdlclamdd == null) {
			lastmdlclamdd2 = lastmdlclamdd.toDate("YYYYMMDD");
				lastmdlclamdd2 = lastmdlclamdd2.getAddDate(1);
				lastmdlclamdd2 = lastmdlclamdd2.getDateFormat();
		}

		if(dschmodesrch == "1"){
			if (lastmdlclamdd != "" && lastmdlclamdd != "-" && lastmdlclamdd == null) {
				if(lastmdlclamdd2 >= VAL_today){
					ds_send.setColumn( 0, "ordfromdd",VAL_today);
				} else {
					ds_send.setColumn( 0, "ordfromdd",lastmdlclamdd2);
				}
				ds_send.setColumn( 0, "ordtodd",VAL_today);	
			} else {
				ds_send.setColumn( 0, "ordfromdd", indd);
				ds_send.setColumn( 0, "ordtodd", VAL_today);
			}

		}else if(dschmodesrch == "2"){
			if(lastjudgdt != "" && lastjudgdt != "-"){
				if(lastjudgdt2 >= VAL_today){
					ds_send.setColumn( 0, "ordfromdd",VAL_today);
				} else {
					ds_send.setColumn( 0, "ordfromdd",lastjudgdt2);
				}
				ds_send.setColumn( 0, "ordtodd",VAL_today);
			}else{
				ds_send.setColumn( 0, "ordfromdd", indd);
				ds_send.setColumn( 0, "ordtodd", VAL_today);
			}

		}else{
			// 아무것도 아닐때는 (퇴원모드조건아니면...) 처방구분 아무것도 아닌거하고 같다. 
			//ds_send.setColumn( 0, "ordfromdd", fromdd);
			//ds_send.setColumn( 0, "ordtodd", todd);

			var ordfromdd = ds_send.getColumn(0, "fromdd");
			var ordtodd = ds_send.getColumn(0, "todd");
			var maxhopedd = ds_main_item1_iteminfo.getColumn(0, "maxhopedd");
			var tmp = ds_main_item1_iteminfo.getColumn(0, "lastjudgdt");
			var lastjudgdt = tmp.substr(0,4) + tmp.substr(4,2) + tmp.substr(6,2);
			var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");
			var dschdd = ds_main_item1_iteminfo.getColumn(0, "dschdd");
			var dschnotiyn = ds_main_item1_iteminfo.getColumn(0, "dschnotiyn");
			var indschacptstat = ds_main_item1_iteminfo.getColumn(0, "indschacptstat");
			var lastmdlclamdd = ds_main_item1_iteminfo.getColumn(0, "lastmdlclamdd");

			// ordfromdd는 기본적으로 입원일로
			ordfromdd = indd;
			// ordtodd가 99991231이면 현재일로 set
			if (ordtodd == "99991231") {
				ordtodd = VAL_today;
			}

			// maxhopedd가 있는 경우에는 ordtodd를 maxhopedd로 set
			if (maxhopedd != "") {
				ordtodd = maxhopedd
			}

			// 최종심사일자가 있는 경우 최종심사일로 부터 시작일을 설정
			if (lastjudgdt != "" && lastjudgdt != "-") {
				ordfromdd = lastjudgdt;
			}

			// 퇴원환자 처리
			if (indschacptstat == "D") {
				ordfromdd = indd;
				ordtodd = dschdd;
			/*	if (lastmdlclamdd != "") {
					ordfromdd = lastmdlclamdd;
				} */			
			} else if (dschnotiyn == "Y") { // 퇴원확정환자는 디폴트로 입원일부터 중간청구 발생자는 중간청구 이후로
				ordfromdd = indd;
				if (lastmdlclamdd != "" && lastmdlclamdd != "-") {
					ordfromdd = lastmdlclamdd;
				}
			}

			// 시작일이 종료일보다 큰경우 종료일을 시작일과 동일하게 맞추어 준다.
			if (ordfromdd > ordtodd) {
				ordtodd = ordfromdd;
			}
			var opendd = ds_main_item1_iteminfo.getColumn(0, "opendd");
			if (ordfromdd < opendd) {
				ordfromdd = opendd;
			}

			ds_send.setColumn( 0, "ordfromdd", ordfromdd);
			ds_send.setColumn( 0, "ordtodd", ordtodd);
		}
		// 수정추가 JHP 20090427 퇴원모드조회조건 추가.. 신규 끝
	}else{
		// 기타는 값을 넣지 않아서 기본적으로 원래것을 타게 한다. ...JHP 20090728

		// 날짜 조회 전면 수정함 - 20081111 박창원
		/* [재원조회기간]

		1-1. 재원심사 (재원퇴원심사 불문하고)
		default  심사일자~max hopdd(없으면 현재일)까지 조회
		심사중에 조회기간을 조정시 상세내역 닫힌 후에도 그 환자를 저장하고 나가기 전까지는 그 조회기간으로 조회
		상세에서 기간을 조회하면 메인화면도 조정됨

		1-2. 체크박스 체크시(메인화면에서)
		default  입원시작일~max hopdd
		중간청구시작일~오늘일자(중간청구한 환자-청구생성완료)
		심사중에 조회기간을 조정시 상세내역 닫힌 후에도 그 환자를 저장하고 나가기 전까지는 그 조회기간으로 조회
		상세에서 기간을 조회하면 메인화면도 조정됨

		2. 퇴원 완료된 환자 조회시
		입원일~퇴원일
		중간청구시작일~오늘일자(중간청구한 환자-청구생성완료) */

		var ordfromdd = ds_send.getColumn(0, "fromdd");
		var ordtodd = ds_send.getColumn(0, "todd");
		var maxhopedd = ds_main_item1_iteminfo.getColumn(0, "maxhopedd");
		var tmp = ds_main_item1_iteminfo.getColumn(0, "lastjudgdt");
		var lastjudgdt = tmp.substr(0,4) + tmp.substr(4,2) + tmp.substr(6,2);
		var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");
		var dschdd = ds_main_item1_iteminfo.getColumn(0, "dschdd");
		var dschnotiyn = ds_main_item1_iteminfo.getColumn(0, "dschnotiyn");
		var indschacptstat = ds_main_item1_iteminfo.getColumn(0, "indschacptstat");
		var lastmdlclamdd = ds_main_item1_iteminfo.getColumn(0, "lastmdlclamdd");

		// ordfromdd는 기본적으로 입원일로
		ordfromdd = indd;
		// ordtodd가 99991231이면 현재일로 set
		if (ordtodd == "99991231") {
			ordtodd = VAL_today;
		}

		// maxhopedd가 있는 경우에는 ordtodd를 maxhopedd로 set
		if (maxhopedd != "") {
			ordtodd = maxhopedd
		}

		// 최종심사일자가 있는 경우 최종심사일로 부터 시작일을 설정
		if (lastjudgdt != "" && lastjudgdt != "-") {
			ordfromdd = lastjudgdt;
		}

		// 퇴원환자 처리
		if (indschacptstat == "D") {
			ordfromdd = indd;
			ordtodd = dschdd;
		/*	if (lastmdlclamdd != "") {
				ordfromdd = lastmdlclamdd;
			} */			
		} else if (dschnotiyn == "Y") { // 퇴원확정환자는 디폴트로 입원일부터 중간청구 발생자는 중간청구 이후로
			ordfromdd = indd;
			if (lastmdlclamdd != "" && lastmdlclamdd != "-") {
				ordfromdd = lastmdlclamdd;
			}
		}

		// 시작일이 종료일보다 큰경우 종료일을 시작일과 동일하게 맞추어 준다.
		if (ordfromdd > ordtodd) {
			ordtodd = ordfromdd;
		}
		var opendd = ds_main_item1_iteminfo.getColumn(0, "opendd");
		if (ordfromdd < opendd) {
			ordfromdd = opendd;
		}

		ds_send.setColumn( 0, "ordfromdd", ordfromdd);
		ds_send.setColumn( 0, "ordtodd", ordtodd);
	}

	ds_send.setColumn( 0, "mig", ds_main_item1_iteminfo.getColumn(0, "mig"));

//model.refresh();

	//처방조회 옵션에 항목구분에 처방이 있는 것만 Bold로 보여준다. 
	fSetItemBold();

	// 20091126 수정추가 JHP 요청번호 8496, 주사제 4항1목, 마취제 5항 1목에 대해 1회량이 20이 넘으면 메세지 처리요청 ####################시작
	fChkinjanstmsg();		

}

// 처방내역을 갖고 온다. 
function fGetIsclList_FromTo(){
	//ds_send.clearData(); ds_send.addRow();
	var ordfromdd = ds_send.getColumn(0, "ordfromdd");
	var ordtodd = ds_send.getColumn(0, "ordtodd");

	//처방조회 시작일자와 종료일자가 없는 경우 보험내역 시작 종료일로 셋팅해 준다. 				
	if(ordfromdd == ""){
		ds_send.setColumn( 0, "ordfromdd", ds_send.getColumn(0, "fromdd"));
	}
	if(ordtodd == ""){
		ds_send.setColumn( 0, "ordtodd", ds_send.getColumn(0, "todd"));
	}

	if(ipt_pid.text.length >0) {
		var row  = grd_ordlist.row;
		ds_main_list2_iscllist.clearData();

//grd_ordlist.refresh();

//		submit("TRPIJ00302");		
var oParam = {};
    oParam.id          = "TRPIJ00302";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqGetInHospJudgIscl";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=iscllist";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00302";

tranf_submit(oParam);
/*
function cf_TRPIJ00302(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00302(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00302") > -1
arErrorCode.pop("TRPIJ00302") < 0
*/


		//
//model.refresh();
 최적화 문제로 대체
		//model.refreshpart("ds_main_list2_iscllist");
		grd_ordlist.row = row;
		grd_ordlist.topRow = row - 3;

		//처방조회 옵션에 항목구분에 처방이 있는 것만 Bold로 보여준다. 	
		fSetItemBold();

	} else {
		sysf_messageBox("환자번호를","C001");
		return;
	}
}

// 진료비 계산내역을 갖고 온다. 
function fGetCalc(){
	if(ipt_pid.text.length >0)
	{
		ds_main_item2_itemcalc.clearData(); ds_main_item2_itemcalc.addRow();
		var totalsumflag = ds_send.getColumn(0, "totalsumflag");
		if(!totalsumflag){
			ds_send.setColumn( 0, "totalsumflag","N");
		}

//		submit("TRPIJ00303");
var oParam = {};
    oParam.id          = "TRPIJ00303";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqGetInHospJudgCalc";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=itemcalc";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00303";

tranf_submit(oParam);
/*
function cf_TRPIJ00303(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00303(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00303") > -1
arErrorCode.pop("TRPIJ00303") < 0
*/


		if(!totalsumflag){
			ds_send.setColumn( 0, "totalsumflag","");
		}

	}else
	{
		//sysf_messageBox("환자번호를","C001");
		return;

	}
}

//중간청구 등록여부, 심사 마감상태, 문제환자여부, dump 유무 를 체크하여 버튼의 색상을 셋팅해준다. 
function fSetItemInfoSetting(){
	//중간청구 등록 여부
	var midcflag = ds_main_item1_iteminfo.getColumn(0, "midcflag");
	//분할 제외 대상자 여부
	var midregistyn = ds_main_item1_iteminfo.getColumn(0, "midregistyn");

	if(midcflag == "Y"){
		btn_midregist.attribute("class") = "btn2_letter6";
		btn_midregist.attribute("color") = "#ff0066";	
		btn_midregist.enable = true;
		btn_midregistyn.enable = false;
		btn_midcomplete.enable = true;
		btn_midcancel.enable = true;
	} else {
		btn_midregist.attribute("class") = "btn2_letter6";
		btn_midregistyn.enable = true;
		btn_midcomplete.enable = false;
		btn_midcancel.enable = false;
		// 분할 제외 대상자 인 경우
		if (midregistyn == "Y") {
			btn_midregistyn.attribute("class") = "btn2_letter6";
			btn_midregistyn.attribute("color") = "#ff0066";	
			btn_midregist.enable = false;
		} else {
			btn_midregistyn.attribute("class") = "btn2_letter6";
			//btn_midregistyn.attribute("class") = "btn2_letter6";
			btn_midregist.enable = true;
		}
	}

	//퇴원심사 상태
	var dschjudgprcsstat = ds_main_item1_iteminfo.getColumn(0, "dschjudgprcsstat");
	if(dschjudgprcsstat == "C" ){ //퇴원마감
		btn_dschclose.attribute("class") = "btn5_letter6";
		btn_dschclose.attribute("color") = "#ff0066";	
		btn_totjudgclose.attribute("class") = "btn2_letter6";
		btn_midcancel.visible = true;
	}else if(dschjudgprcsstat == "E" ){ //통합심사마감
		btn_totjudgclose.attribute("class") = "btn5_letter6";
		btn_totjudgclose.attribute("color") = "#ff0066";	
		btn_dschclose.attribute("class") = "btn2_letter6";
	}else{
		btn_dschclose.attribute("class") = "btn2_letter6";
		btn_totjudgclose.attribute("class") = "btn2_letter6";
		btn_midcancel.visible = false;
	}

	//문제환자 여부
	var probjudgflag = ds_main_item1_iteminfo.getColumn(0, "probjudgflag");
	if(probjudgflag == "G"){
		ds_hidden_item1.setColumn( 0, "probpatgreen","Y");		
		ds_hidden_item1.setColumn( 0, "probpatred","");
	}else if(probjudgflag == "R"){
		ds_hidden_item1.setColumn( 0, "probpatred","Y");
		ds_hidden_item1.setColumn( 0, "probpatgreen","");		
	}else{
		ds_hidden_item1.setColumn( 0, "probpatgreen","");
		ds_hidden_item1.setColumn( 0, "probpatred","");		
	}

	//dump 유무 : 버튼 빨간색 표기
	var dumpexistyn = ds_main_item1_iteminfo.getColumn(0, "dumpexistyn");				
	if(dumpexistyn == "Y"){
		btn_dump.attribute("class") = "btn2_letter6";
		btn_dump.attribute("color") = "#ff0066";	
		btn_dump.enable = true;
	}else{
		btn_dump.attribute("class") = "btn2_letter6";
	}

	var recalcyn = ds_main_item1_iteminfo.getColumn(0, "recalcyn");
	if(recalcyn == "Y"){
		btn_recalc.attribute("class") = "btn2_letter6";
		btn_recalc.attribute("color") = "#ff0066";	
		btn_recalc.enable = true;
	}else{
		btn_recalc.attribute("class") = "btn2_letter6";
	}

}

//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//상병처리 관련 코딩 시작																	    //
//////////////////////////////////////////////////////////////////////////////////////////////////////////////

// 상병 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "상병순서 위로"
function fDiagSeqUp() {

	var rowstatus = grd_diaglist.rowstatus(grd_diaglist.row);
	if (rowstatus == 4) {		// 4 : delete
		return;
	}
	var diagseq = parseInt(ds_main_list3_diaglist.getColumn(grd_diaglist.row, "seqno")));	// 선택된 줄의 NO
	if (diagseq > 1) {	// 첫번째 줄이 아닌 경우
		ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_seqno", --diagseq);
		if (rowstatus == 0 || rowstatus == 2) {
			grd_diaglist.rowstatus(grd_diaglist.row) = 2;	// 2 : update
		}
		// 바로 위 상병순서와 중복되는 경우
		var nextrow = grd_diaglist.row - 1;
		var nextdiagseq = ds_main_list3_diaglist.getColumn(nextrow, "seqno"));
		if (diagseq == nextdiagseq) {
			ds_main_list3.setColumn( nextrow , "seqno", ++diagseq);
//			rowstatus = grd_diaglist.rowstatus(nextrow);
//			if (rowstatus == 0 || rowstatus == 2) {
//				grd_diaglist.rowstatus(nextrow) = 2;		// 2 : update
//			}
		}
		fSortDiagNo();
	}
}

// 상병 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "상병순서 아래로"
function fDiagSeqDown() {
	var rowstatus = grd_diaglist.rowstatus(grd_diaglist.row);
	if (rowstatus == 4) {		// 4 : delete
		return;
	}
	// 삭제 상태가 아닌 마지막 줄을 찾는다.
	var lastRow = grd_diaglist.rows - 1;
	for (var i = 1; i < grd_diaglist.rows; i++) {
		if (grd_diaglist.rowstatus(i) == 4) {	// delete
			lastRow = i - 1;
			i = grd_diaglist.rows;
		}
	}
	var diagseq = parseInt(ds_main_list3_diaglist.getColumn(grd_diaglist.row, "seqno")));	// 선택된 줄의 NO
	if (diagseq < lastRow) {	// 마지막 줄이 아닌 경우
		ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_seqno", ++diagseq);
		if (rowstatus == 0 || rowstatus == 2) {
			grd_diaglist.rowstatus(grd_diaglist.row) = 2;	// 2 : update
		}
		// 바로 아래 상병순서와 중복되는 경우
		var nextrow = grd_diaglist.row + 1;
		var nextdiagseq = ds_main_list3_diaglist.getColumn(nextrow, "seqno"));
		if (diagseq == nextdiagseq) {
			ds_main_list3.setColumn( nextrow , "seqno", --diagseq);
		}
		fSortDiagNo();
	}
}
// "상병순서 위로_아래로" 순서 변경 후에 상병 순서 NO에 따라 sorting 작업
function fSortDiag() {
	var maxRow = parseInt(grd_diaglist.rows) - 1;	// rows는 타이틀부분 부터 개수를 센다
	grd_diaglist.sort(1, 1, maxRow, 1) = "asc";		// 타이틀을 제외한 data 부분의 첫 줄의 row = 1
	// 
//model.refresh();
 최적화문제로 대체 20080731 박창원
	model.refreshpart("ds_main_list3_diaglist");
	// Sort 된 Grid 상의 Data 순서와 Instance Node 상의 Data 순서를 동일하게 맞춰준다.
	grd_diaglist.gridToInstance();
}

// "상병순서 위로_아래로" 순서 변경 후에 상병 순서 NO에 따라 sorting 작업
function fSortDiagNo2() {

	var delcnt = 0;

	for (var i = 1; i < grd_diaglist.rows; i++) {
		grd_diaglist.rowHidden(i) = false;		
	}

	var cldino = 1;								
	for (var i = 1; i < grd_diaglist.rows; i++) {									
		ds_main_list3.setColumn( i , "seqno", i);
		rowstatus = grd_diaglist.rowstatus(i);
	}
	var maxRow = parseInt(grd_diaglist.rows) - 1;	// rows는 타이틀부분 부터 개수를 센다
	grd_diaglist.sort(1, grd_diaglist.colRef("seqno"), maxRow , grd_diaglist.colRef("seqno")) = "asc";		// 타이틀을 제외한 data 부분의 첫 줄의 row = 1 / col = 3 : no

	if (delcnt > 0) {
		grd_diaglist.sort(1, grd_diaglist.colRef("seqno"), maxRow - delcnt, grd_diaglist.colRef("seqno")) = "asc";		// 타이틀을 제외한 data 부분의 첫 줄의 row = 1 / col = 3 : no
	}

	// Sort 된 Grid 상의 Data 순서와 Instance Node 상의 Data 순서를 동일하게 맞춰준다.
	grd_diaglist.gridToInstance();

	var rowstatus;
	for (var i = 1; i < grd_diaglist.rows; i++) {
		rowstatus = grd_diaglist.rowstatus(i);
		if (rowstatus > 3) {		// 삭제상태
			grd_diaglist.rowHidden(i) = true;
		} else {
			grd_diaglist.rowHidden(i) = false;
		}
	}		
}			

function fSortDiagNo() {

	var maxRow = parseInt(grd_diaglist.rows) - 1;	// rows는 타이틀부분 부터 개수를 센다
	grd_diaglist.sort(1, 1, maxRow, 1) = "asc";		// 타이틀을 제외한 data 부분의 첫 줄의 row = 1

	// 
//model.refresh();
 최적화문제로 대체 20080731 박창원
	model.refreshpart("ds_main_list3");

	// Sort 된 Grid 상의 Data 순서와 Instance Node 상의 Data 순서를 동일하게 맞춰준다.
	grd_diaglist.gridToInstance();

	//루핑을 돌면서 순번을 맞춰주고, 모두 insert모드로 바꿔준다.
	//상병은 History를 남기지 않고 그냥 모두 삭제 후 다시 insert로 처리한다.
	//상병 순번이 key라서 update로 하면 바뀐 seq입력시 기존것이 아직 안바뀌었으면 Dup에러 발생함으로.
	for(i =1; i<grd_diaglist.rows;i++){
		ds_main_list3.setColumn( i , "seqno", i);
		grd_diaglist.rowstatus(i) = 1;

	}
}	

function fDiagGridAddRow(addyn, selectyn) {

	var iInsertRow = 0;		
	if (grd_diaglist.rows == 1 || addyn == "Y") {
		iInsertRow = grd_diaglist.row;					
		grd_diaglist.addRow(false, false);
	} else {

		iInsertRow = grd_diaglist.row;
		grd_diaglist.insertRow(iInsertRow, "below", false,false);
	}

	var nowRow = 0;
	nowRow = grd_diaglist.row;		

	ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_seqno", grd_diaglist.row);
	// 청구과, 진료개시일은 주상병을 기준으로 부여한다.
	var clamdeptcd = ds_main_list3_diaglist.getColumn(0, "orddeptcd");
	if (clamdeptcd == "") {	// 주상병의 진료과가 입력되지 않은 경우 인적사항의 청구과를 입력한다.
		clamdeptcd = ds_main_item1_iteminfo.getColumn(0, "orddeptcd");
	}
	ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_orddeptcd", clamdeptcd);

	var ordfromdd = model.getValue("ds_main_list3//diaglist_ordfromdd");
	if (ordfromdd) {
		ds_main.setColumn( 0, "list3//diaglist["+ grd_diaglist.row +"]_ordfromdd", ordfromdd);
	} else {
		ds_main.setColumn( 0, "list3//diaglist["+ grd_diaglist.row +"]_ordfromdd", ds_main_item1_iteminfo.getColumn(0, "indd"));
	}
	ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_toot", "-");

	// 상병이력조회에서 호출된 경우가 아니면
	if (selectyn != "Y") {
		fSortDiagNo2(true);
	}

	// edit mode 설정위한것임 절대 지우지 말것.

//grd_diaglist.refresh();

	if (addyn != "Y") {
		grd_diaglist.row = nowRow;		
		grd_diaglist.col = grd_diaglist.colRef("diagcd");		
		grd_diaglist.dispatch("onentercell");
	}

}

// 상병 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 추가"
function fDiagGridInsertRow() {

	// 2008.03.06 박지욱 추가 (상병의 진료개시일은 중간청구최종시작일자, 중간청구등록이 없으면 입원일자 세팅)
	ds_hidden_mdlclamrgst.clearData();
	dsf_makeValue( ds_hidden, "mdlclamrgst", "string", "" );

	var indd = ds_main_item1_iteminfo.getColumn(0, "indd"); 
	var deptcd = ds_main_item1_iteminfo.getColumn(0, "orddeptcd");

	//속도개선 plet2 상병리스트에서 마지막 날짜를 가져오도록.	      				      
	//submit("TRPIJ00313");
	var fromdd = model.getXPathValue("ds_main_list3_diaglist[last()]_ordfromdd");
	if (fromdd == "") {
		var indd = ds_send.getColumn(0, "ordfromdd");
		fromdd = indd; 
	}

	// 삭제 상태가 아닌 마지막 줄을 찾는다.
	var diagrow = grd_diaglist.rows - grd_diaglist.fixedRows;	// 상병 Grid 가장 마지막 줄에 추가한다.
	grd_diaglist.insertRow(diagrow++, true,false,false);
	ds_main_list3.setColumn( diagrow , "seqno", 		diagrow);
	ds_main_list3.setColumn( diagrow , "ordfromdd", 	fromdd);		// 진료개시일
	ds_main_list3.setColumn( diagrow , "orddeptcd",	deptcd);		// 진료과

	fSortDiagNo();	

	// 행추가 시 맨 밑에 행이 보일 수 있드록 추가 ( 2007.10.09 김건기 )
	grd_diaglist.bottomRow = grd_diaglist.rows;

	// 행추가 후 상병코드 컬럼으로 포커스 이동 ( 2007.10.09 김건기 )
	grd_diaglist.setFocus();

	// edit mode 설정위한것임 절대 지우지 말것.

//grd_diaglist.refresh();

	grd_diaglist.row = diagrow;
	grd_diaglist.col = grd_diaglist.colref("diagcd");
	//grd_diaglist.dispatch("onentercell");
	//grd_diaglist.editCell();

}
// 상병 다섯줄 추가
function fDiagGridInsertRow5() { // 20080826 박창원 추가
	// 2008.03.06 박지욱 추가 (상병의 진료개시일은 중간청구최종시작일자, 중간청구등록이 없으면 입원일자 세팅)
	ds_hidden_mdlclamrgst.clearData();
	dsf_makeValue( ds_hidden, "mdlclamrgst", "string", "" );

	var indd = ds_main_item1_iteminfo.getColumn(0, "indd"); 
	var deptcd = ds_main_item1_iteminfo.getColumn(0, "orddeptcd");

	var fromdd = model.getXPathValue("ds_main_list3_diaglist[last()]_ordfromdd");
	if (fromdd == "") {
		var indd = ds_send.getColumn(0, "ordfromdd");
		fromdd = indd; 
	}

	for (var i = 1; i <= 5; i++) {
		var lastRow = grd_diaglist.rows - 1;
		var diagrow = lastRow;	// 상병 Grid 가장 마지막 줄에 추가한다.
		grd_diaglist.insertRow(diagrow++, true,false,false);
		ds_main_list3.setColumn( diagrow , "seqno", 		diagrow);
		ds_main_list3.setColumn( diagrow , "ordfromdd", 	fromdd);		// 진료개시일
		ds_main_list3.setColumn( diagrow , "orddeptcd",	deptcd);		// 진료과
	}
	 fSortDiagNo();	
	// 행추가 시 맨 밑에 행이 보일 수 있드록 추가 ( 2007.10.09 김건기 )
	grd_diaglist.topRow = grd_diaglist.rows - 6;

	// 행추가 후 상병코드 컬럼으로 포커스 이동 ( 2007.10.09 김건기 )
	grd_diaglist.setFocus();
	grd_diaglist.row = diagrow - 5;
	grd_diaglist.col = grd_diaglist.colref("diagcd");
	grd_diaglist.dispatch("onentercell");
	grd_diaglist.editCell();

}
// 상병 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 삭제"
function fDiagGridDeleteRow() {
	//상병은 삭제시 무조건 삭제를 날려 버린다. 
	for( var i = 0; i < grd_diaglist.selectedRows; i++ ){
		var cRrow = grd_diaglist.selectedRow(i);
		grd_diaglist.rowstatus(cRrow) = 4;		// 4 : delete 상태로 stat를 변경한다.
	}
	var tmp = grd_diaglist.rows;
	for(var k = tmp; k >= 0;k--){
		if(grd_diaglist.rowstatus(k) == "4"){
			grd_diaglist.deleteRow(k, false);
		}
	}
	//
//model.refresh();
 최적회 때문에 20080731 박창원
	model.refreshpart("ds_main_list3_diaglist");
	fSortDiagNo();
}

// 상병코드 조회 팝업
function fSearchDiageCode() {

	var row = grd_diaglist.row;
	var diagcd = ds_main_list3_diaglist.getColumn(row, "diagcd"));

	ds_hidden_sppiz00400_rslt.clearData();
	// 상병 Data가 2007년 이후로 설정되어 있으므로 임시로 현재 날짜를 넘긴다.
	//dsf_makeValue( ds_hidden_sppiz00400_cond, "basedd", "string",  ds_main_item1_clbs.getColumn(0, "clamdd"));
	ds_hidden_sppiz00400_cond.clearData(); ds_hidden_sppiz00400_cond.addRow();
	dsf_makeValue( ds_hidden_sppiz00400_cond, "basedd", "string",  VAL_today);	// (dateHelper.js) 현재날짜 반환
	dsf_makeValue( ds_hidden_sppiz00400_cond, "diagcd", "string",  diagcd);
	dsf_makeValue( ds_hidden_sppiz00400_cond, "diagnm", "string", "" );
	dsf_makeValue( ds_hidden_sppiz00400_cond, "selectedrdodiagkind", "string", "1");

	if(diagcd){

//		submit("TRPIJ00308",false);		// 입력된 상병코드로 emr.mrtmicd10 테이블을 조회한다.
var oParam = {};
    oParam.id          = "TRPIJ00308";
    oParam.service     = "aftjudgapp.OutAftJudg";
    oParam.method      = "reqGetSickAndWounded";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=rslt";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00308";

tranf_submit(oParam);
/*
function cf_TRPIJ00308(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00308(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00308") > -1
arErrorCode.pop("TRPIJ00308") < 0
*/



		var rsltList = instance1.selectSingleNode("ds_hidden_sppiz00400");
		if (rsltList != null && rsltList.childNodes.length == 1) {
			// 조회된 결과가 1건이면
			fSetDiagCdNm();
		} else {
			// 조회된 결과가 없거나 여러 건이면
			// 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출한다.
			fSearchSPPIZ00400();
		}
	} else {
		// 상병코드 입력 없이 상병명 선택 시
		fSearchSPPIZ00400();
	}

}

// 상병코드 조회를 위해 SPPIZ00400_상병코드조회.xrw 를 호출한다.
function fSearchSPPIZ00400() {
	ds_hidden_sppiz00400_rslt.clearData();
	dsf_makeValue( ds_hidden_sppiz00400_rslt, "diagcd", "string", "" );
	dsf_makeValue( ds_hidden_sppiz00400_rslt, "diaghngnm", "string", "" );
	dsf_makeValue( ds_hidden_sppiz00400_rslt, "diagengnm", "string", "" );

	ds_hidden_sppiz00400_cond.clearData(); ds_hidden_sppiz00400_cond.addRow();
	dsf_makeValue( ds_hidden_sppiz00400_cond, "basedd", "string",  VAL_today);	// (dateHelper.js) 현재날짜 반환
	dsf_makeValue( ds_hidden_sppiz00400_cond, "diagcd", "string",  ds_main_list3_diaglist.getColumn(grd_diaglist.row, "diagcd")));
	dsf_makeValue( ds_hidden_sppiz00400_cond, "diagnm", "string", "" );
	dsf_makeValue( ds_hidden_sppiz00400_cond, "selectedrdodiagkind", "string", "3");		// 사용자가 직접검색하여 입력 할수 있도록 임의의 값(3)을 넣어줌
	frmf_modal("SPPIZ00400", "SPPIZ00400", "ds_hidden_sppiz00400_cond""-"ds_init"", "", "", "10", "10", "", "", "", "", "", "M");	// SPPIZ00400_상병코드조회.xrw
}	

// [SPPIZ00400_상병코드조회.xrw 에서 호출] 상병조회 팝업에서 상병을 더블클릭 했을경우 상병 그리드에 반영
function fSetDiagCdNm() {
	var diagcd = ds_hidden_sppiz00400_rslt.getColumn(0, "diagcd");
	var diaghngnm = ds_hidden_sppiz00400_rslt.getColumn(0, "diaghngnm");
	var diagengnm = ds_hidden_sppiz00400_rslt.getColumn(0, "diagengnm");
	var spclcd = ds_hidden_sppiz00400_rslt.getColumn(0, "spclcd");
	var currRow = grd_diaglist.row;

	//20090810 JHP 수정추가. 상병 조회팝업에서  상병조회 후 적용하려고 할때 인스턴스 증가(행추가)하여 적용시킨다. 
	if(grd_diaglist.row <= 0){
		fDiagGridInsertRow();
		grd_diaglist.endEditCell();
	}else{
		var chkdiagcd = ds_main_list3_diaglist.getColumn(currRow, "diagcd"));
		var chkdiagnm = ds_main_list3_diaglist.getColumn(currRow, "diagnm"));
		if((chkdiagcd != "" || chkdiagcd != " " || chkdiagcd != null) && 
		   (chkdiagnm == "" || chkdiagnm == " " || chkdiagnm == null)){
			;
		}else if((chkdiagcd != "" || chkdiagcd != " " || chkdiagcd != null) && 
			           (chkdiagnm != "" || chkdiagnm != " " || chkdiagnm != null)){
		   	;
		}else{
			fDiagGridInsertRow();
			grd_diaglist.endEditCell();
		}
	}

	if (diagcd) {
		grd_diaglist.endEditCell();
		ds_main_list3.setColumn( currRow , "diagcd", diagcd);
	}
	if (diaghngnm) {
		ds_main_list3.setColumn( currRow , "diagnm", diaghngnm);
	}
	if(diagengnm){
		ds_main_list3.setColumn( currRow , "diagengnm", diagengnm);
	}
	if(spclcd){
		ds_main_list3.setColumn( currRow , "vcode", spclcd);
	}

	var chk_key = ds_main_list3_diaglist.getColumn(currRow, "pid"));

	//신규로 불러온 입력되는 경우는 Insert시 key값이 없으므로 기본 정보에서 읽어다 넣어 준다. 
	if(chk_key){
		return;
	}else{
		//Pid
		ds_main_list3.setColumn( currRow , "pid",ds_send.getColumn(0, "pid"));
		//Indd
		ds_main_list3.setColumn( currRow , "indd",ds_send.getColumn(0, "indd"));
		//Cretno
		ds_main_list3.setColumn( currRow , "cretno",ds_send.getColumn(0, "cretno"));
		//fromdd
		ds_main_list3.setColumn( currRow , "fromdd",ds_send.getColumn(0, "fromdd"));
		//mskind
		ds_main_list3.setColumn( currRow , "mskind",ds_send.getColumn(0, "mskind"));
		//drinptyn
		ds_main_list3.setColumn( currRow , "drinptyn","N");
		//addflag
		ds_main_list3.setColumn( currRow , "addflag","Y");
		if(grd_diaglist.row >1){
			//orddeptcd
			ds_main_list3.setColumn( currRow , "orddeptcd",ds_main_list3_diaglist.getColumn(1, "orddeptcd"));
			//ordfromdd
			ds_main_list3.setColumn( currRow , "ordfromdd",ds_main_list3_diaglist.getColumn(1, "ordfromdd"));
		}

		//저장후 빈행을 추가해 준다. 
		//20080811 자동으로 줄추가 되는 기능 제외
		fDiagGridInsertRow();
	}

	// 
//model.refresh();
 최적화 문제로 대체 20080731 박창원
	model.refreshpart("ds_main_list3_diaglist");
}

function fChangeRate() {
	grp_changeownbrate.visible = true;
}

function fUpdDiag() {
	var chk = ds_main_item1_iteminfo.getColumn(0, "patnm");
	if(chk){
		//fGetIsclList
		fRefreshDiag();		// 특정 환자에 대한 전상병 내역을 조회한다.
		// 20080811 제외하기로함(상병줄추가(자동)
		//fDiagGridInsertRow();
	}
}

function fChangeRate1() {
	// 6시간 미만 환자는 입원에만 해당하는 요율을 적용할 수 없다. - 20081105 박창원
	var suppkind = cmb_suppkindlist.value;
	var sixtimyn = ds_main_item1_iteminfo.getColumn(0, "sixtimyn");
	var suppkindcd = ds_main_item1_iteminfo.getColumn(0, "suppkindcd");

	//20090325 차상위 2종추가	- 박창원
	if (sixtimyn == "Y" && (suppkind == "05" || suppkind == "08" || suppkind == "09" || suppkind == "31" || suppkind == "39" || suppkind == "41" || suppkind == "42" || suppkind == "43")) {
		sysf_messageBox("6시간 미만환자는 입원에만 적용되는 보조유형으로 변경을","E001");
		grp_changeownbrate.visible = false;
		return;
	}

	// 6세미만, 신생아는 조건에 맞지 않으면 Block - 20090103 박창원
	if (suppkind == "08" || suppkind == "31" || suppkind == "41")
		var age = parseInt(ds_main_item1_iteminfo.getColumn(0, "age"));
		var indd =  ds_main_item1_iteminfo.getColumn(0, "indd1");
		var insukindcd = ds_main_item1_iteminfo.getColumn(0, "insukindcd");
		var inpath = ds_main_item1_iteminfo.getColumn(0, "inpath");
		var orddeptcd = ds_main_item1_iteminfo.getColumn(0, "orddeptcd");
		var rrgstno = ds_main_item1_iteminfo.getColumn(0, "rrgstno");
		var sixtimyn = ds_main_item1_iteminfo.getColumn(0, "sixtimyn");
		var babyyn ="N";
		var end6yn = "N";
		var brthdd = "20" + rrgstno.substr(0,6);
		var readonly = ds_send.getColumn(0, "readonly");

		// 신생아를 구별지음
		if (rrgstno.substr(7,1) == "3" || rrgstno.substr(7,1) == "4" || rrgstno.substr(7,1) == "7" || rrgstno.substr(7,1) == "8") {
			var interval = utlf_getDateInterval(brthdd,indd);
			if (interval <  "28") {
				babyyn = "Y";
			}
		}
		// 6세미만 생일 여부를 판단함
		if ((rrgstno.substr(7,1) == "3" || rrgstno.substr(7,1) == "4") && age <= 6) {
			if (age == 6) {
				if (brthdd >= VAL_today) {
					end6yn = "Y";
				}
			} else if (age == 6){
				if (brthdd < VAL_today) {
					end6yn = "N";
				}
			} else if(age < 6) {
				end6yn = "Y";
			} else if (age > 6) {
				end6yn ="N";
			} 
		}

		var reqdeptno = model.getValue("ds_hidden_list2_dept[deptcd='"+orddeptcd+"']reqdeptno");
		if (sixtimyn == "N" && babyyn == "Y" &&age == 0 && indd >= "20080101" && reqdeptno == "11" && (insukindcd == "11" || insukindcd == "21" || insukindcd == "22")) {
			if (suppkind != "31") {
				sysf_messageBox("신생아 조건에 맞지 않아 변경을","E001");
				grp_changeownbrate.visible = false;
				return;
			}
		}

		if (sixtimyn == "N" && end6yn == "Y" && babyyn == "N" && age <= 6 && reqdeptno == "11" && (insukindcd == "11" || insukindcd == "21" || insukindcd == "22")) {
			if (suppkind != "08" && suppkind != "41") { // 20090325 차상위 2종 조건 추가 - 박창원
				if (suppkind != "31") {
				sysf_messageBox("6세미만 조건에 맞지 않아 변경을","E001");
				grp_changeownbrate.visible = false;
				return;
			}
		}
	}

	var msg = sysf_messageBox("선택하신 요율을 적용","S001");
	if(msg !=6){
		return;
	}else{
		Insuchange(suppkind);
	}
}
//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//상병조회버튼에 대한 처리 																     //
//////////////////////////////////////////////////////////////////////////////////////////////////////////////	

// 수가 조회
function fSetSrchCalcScorCdPop(){
	ds_hidden_smpic00100_cond.setColumn( 0, "calcscorcd", grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("snglcalcscorcd")));
	ds_hidden_smpic00100_cond.setColumn( 0, "judgflag", "Y");
	frmf_modal("SMPIC00100", "SMPIC00100", "ds_hidden_smpic00100_cond""-"ds_temp_item6"", "", "1", "150", "150", "", "", "", "", "", "M");
}

// 보험인정기준관리 화면 호출 20091105 수정추가 JHP 요청번호 : 5874
function fSetSrchInsuRcogBaseMngt(){
	var calcscorcd = grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("snglcalcscorcd"));
	ds_hidden_sppiz01600_cond.setColumn( 0, "calcscorcd", calcscorcd);
	// SPPIZ01600_보험인정기준조회 팝업 연결 (선택된 row의 처방코드를 넘겨준다.)
	frmf_modal("SPPIZ01600", "SPPIZ01600", "ds_hidden_sppiz01600_cond_calcscorcd""-"ds_send_item3_calcscorcd"", "", "1", "150", "150", "", "", "", "", "", "M");
}
// 보험인정기준관리 화면 호출 20091105 수정추가 JHP 요청번호 : 5874 호출함수. -  미사용
function getOpenInsuRcogBaseMngtChk(){
	var temp = getChildWindow("ddd");
	var nodecnt = 0;
	var xPathFunction = "count(ds_main_h_limi_limi)";
	while (nodecnt == 0)
	{
		nodecnt =  temp.model.getXPathValue(xPathFunction); 
		if (nodecnt >= 500){
			temp.sysf_messageBox("해당코드 인정기준을 확인합니다.","I002");
			temp.ds_main_right_h_limt_limt.setColumn( 0, "limt_calcscorcd" ,grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colRef("snglcalcscorcd")));
			temp.ipt_calcscorcd.dispatch("onkeypress");

//temp.model.refresh();

	  		break;
		}
	} 
}

// 약품편람 호출 - 20080930 박창원
function fOpenDrugDic() {
	frmf_open("SMADB01900", "bbb", ""-"", "", "", "", "", "", "", "", "", "", "M");
	var temp = getChildWindow("bbb");
	// 필터링 할 경우 row값을 제대로 못 가져와서 valueMatrix로 변경함. 2012.02.16 LEJ
	temp.ds_hidden_receivedata.setColumn( 0, "srchdrugcd", grd_ordlist.valueMatrix(grd_ordlist.row,grd_ordlist.colRef("snglcalcscorcd")));
}

// 의약품정보 호출 - 20080930 박창원
function fOpenDruginfo() {
	frmf_open("SMADB00100", "ccc", ""-"", "", "", "", "", "", "", "", "", "", "M");
	var temp = getChildWindow("ccc");
	temp.ds_send_srchinfo.setColumn( 0, "srchcd", grd_ordlist.valueMatrix(grd_ordlist.row,grd_ordlist.colRef("snglcalcscorcd")));
}
// 환자단위 메시지 전송
function fSendMsgPat() {
	dsf_makeValue( ds_temp, "opentab", "string",  "pmsg");
	zmifOpenMessagePopup("ds_temp");						// root_temp_opentab 에 receivemsg (받은메세지함) 값을 주고 오픈한다.
}

// 처방단위 메시지 전송
function fSendMsgOrder() {
	dsf_makeValue( ds_temp, "opentab", "string",  "pmsg");
	zmifOpenMessagePopup("ds_temp");						// root_temp_opentab 에 pmsg (환자메세지작성창) 값을 주고 오픈한다.
}

// 처방상병을 끌고 온다. 
function fRefreshDiag() {
	if(ds_main_item1_iteminfo.getColumn(0, "patnm")){
		// 심사대상자의 등록번호를 조건으로 하여 전체 상병이력을 조회한다.

		var cnt = grd_diaglist.rows;
//		submit("TRPIJ00306");
var oParam = {};
    oParam.id          = "TRPIJ00306";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqGetDiagRefresh";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=diaglist";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00306";

tranf_submit(oParam);
/*
function cf_TRPIJ00306(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00306(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00306") > -1
arErrorCode.pop("TRPIJ00306") < 0
*/


		// 
//model.refresh();
 최적화문제로 주석처리 - 20081015 박창원

		for(var i = 1; i < grd_diaglist.rows; i++) {
			var chkflag = ds_main_list3_diaglist.getColumn(i, "chkflag");

			if(chkflag == "2"){
				grd_diaglist.rowstatus(i) = 1;	
			}

		}
	}
}

// 특정 환자에 대한 청구상병을 조회한다.
function fGetClamDiagHistList() {
	if(ds_main_item1_iteminfo.getColumn(0, "patnm")){
		// 심사대상자의 등록번호를 조건으로 하여 전체 청구 상병이력을 조회한다.
		ds_hidden_smpiz00100_cond.setColumn( 0, "pid", ds_main_item1_iteminfo.getColumn(0, "pid")); 
		ds_hidden_smpiz00100_cond.setColumn( 0, "ordfromdd", ds_main_item1_iteminfo.getColumn(0, "indd")); 
		ds_hidden_smpiz00100_cond.setColumn( 0, "ordtodd", ds_main_item1_iteminfo.getColumn(0, "dschdd")); 
		ds_hidden_smpiz00100_cond.setColumn( 0, "srchflag", "pam");	// 검색구분 Radio : 청구
		frmf_modal("SMPIZ00100", "SMPIZ00100", "ds_hidden_smpiz00100_cond""-"ds_init"", "", "", "10", "10", "", "", "", "", "", "M");	// SMPIZ00100_외래입원상병이력조회.xrw
		// 
//model.refresh();
 최적화 문제로  20080731 박창원

		var rsltNode = instance1.selectSingleNode("ds_hidden_smpiz00100_rslt");
		var originpid = ds_main_item1_iteminfo.getColumn(0, "pid");

		if (rsltNode != null) {
			for (var i = 1; i <= rsltNode.childNodes.length; i++) {

				var diagcd = ds_hidden_smpiz00100_rslt_diag.getColumn(i, "diagcd");
				var isSame = false;
				for (var j = grd_diaglist.fixedRows; j < grd_diaglist.rows; j++) {
					if (diagcd == ds_main_list3_diaglist.getColumn(j, "diagcd")) {
						// 동일한 상병이 존재하는 경우
						isSame = true;
						j = grd_diaglist.rows;
					}
				}
				// 동일한 상병이 없는 경우
				if (isSame == false) {
					grd_diaglist.addRow(false,true);
					var pid = ds_main_item1_iteminfo.getColumn(0, "pid");
					var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");
					var cretno = ds_main_item1_iteminfo.getColumn(0, "cretno");
					var fromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
					var mskind = ds_main_item1_iteminfo.getColumn(0, "mskind");

					var ruleoutyn = ds_hidden_smpiz00100_rslt_diag.getColumn(i, "diagkindcd");
					if(ruleoutyn == "C"){
						ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_ruleoutyn", "false");
					}else{
						ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_ruleoutyn", "true");
					}
					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_pid", pid);
					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_indd", indd);
					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_cretno", cretno);
					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_fromdd", fromdd);
					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_mskind", mskind);
					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_addflag", "Y");
					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_drinptyn", "N");

					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_seqno", grd_diaglist.row);
					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_diagcd", ds_hidden_smpiz00100_rslt_diag.getColumn(i, "diagcd"));
					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_diagnm", ds_hidden_smpiz00100_rslt_diag.getColumn(i, "diaghngnm"));
					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_diagengnm", ds_hidden_smpiz00100_rslt_diag.getColumn(i, "diagengnm"));
					// 청구과, 진료개시일은 주상병을 기준으로 부여한다.
					var clamdeptcd = ds_main_list3_diaglist.getColumn(0, "orddeptcd");
					if (clamdeptcd == "") {	// 주상병의 진료과가 입력되지 않은 경우 인적사항의 진료과를 입력한다.
						clamdeptcd = ds_main_item1_iteminfo.getColumn(0, "orddeptcd");
					}
					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_orddeptcd", clamdeptcd);
					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_ordfromdd", ds_main_list3_diaglist.getColumn(0, "ordfromdd"));
					ds_main_list3.setColumn( 0, "diaglist["+ grd_diaglist.row +"]_toot", "-");
				}
			}
			fSortDiagNo(true);
		}

	}
}

//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//상병처리 관련 코딩 끝 																	     //
//////////////////////////////////////////////////////////////////////////////////////////////////////////////	

//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//처장 Filter 관련 코딩  																	     //
//////////////////////////////////////////////////////////////////////////////////////////////////////////////	

// 처방 조회부 - 재행_급여_항목구분 Radio 선택에 따라 처방 내역을 보여준다.
function fGetSelectedOrderData() {

	var matractflag = ds_hidden_list1_isclcond.getColumn(0, "matractflag");
	var calcpayflag = ds_hidden_list1_isclcond.getColumn(0, "calcpayflag");
	var snglcalcscorcls = ds_hidden_list1_isclcond.getColumn(0, "snglcalcscorcls");
	var cpflag	= ds_hidden_list1_isclcond.getColumn(0, "cpflag");
	var edicd = ds_hidden_list1_isclcond.getColumn(0, "edicd");
	var snglcalcscorcd  = ds_hidden_list1_isclcond.getColumn(0, "snglcalcscorcd");
	var actingflag = ds_hidden_list1_isclcond.getColumn(0, "actingflag");
	var calcamtflag = ds_hidden_list1_isclcond.getColumn(0, "calcamtflag");

	var tmp = "ds_main_list2_iscllist["
	var chk = "0";
	//재료행위 구분
	if(matractflag){
		tmp = tmp + matractflag;
		chk = "1";
	}

	//급여구분
	if(calcpayflag){
		if(chk == "1"){
			tmp = tmp + " and " +  calcpayflag;	
		}else{
			tmp = tmp + calcpayflag;	
			chk = "1";
		}
	}

	//항목구분
	if(snglcalcscorcls)	{
		if(chk == "1"){
			tmp = tmp + " and (" +  snglcalcscorcls + ")";	
		}else{
			tmp = tmp + "(" + snglcalcscorcls + ")";	
			chk = "1";
		}
	}

	// 시행구분 여부
	if(actingflag)	{
		if(chk == "1"){
			tmp = tmp + " and " +  actingflag;	
		}else{
			tmp = tmp + actingflag;	
			chk = "1";
		}
	}

	//CP여부
	if(cpflag)	{
		if(chk == "1"){
			tmp = tmp + " and " +  cpflag;	
		}else{
			tmp = tmp + cpflag;	
			chk = "1";
		}
	}

	//수가코드
	if(snglcalcscorcd)	{
		if(chk == "1"){
			tmp = tmp + " and  " +  snglcalcscorcd;	
		}else{
			tmp = tmp + snglcalcscorcd;	
			chk = "1";
		}
	}

	//항목구분
	if(edicd)	{
		if(chk == "1"){
			tmp = tmp + " and " +  edicd;	
		}else{
			tmp = tmp + edicd;	
			chk = "1";
		}
	}
	//zero 수가 제외구분
	if(calcamtflag)	{
		if(chk == "1"){
			tmp = tmp + " and " +  calcamtflag;	
		}else{
			tmp = tmp + calcamtflag;	
			chk = "1";
		}
	}

	if(chk == "0")
	{
		tmp = "ds_main_list2_iscllist";
	}else{
		tmp = tmp + "]";
	}

	grd_ordlist.attribute("nodeset") = tmp ;
	grd_ordlist.rebuild();
	grd_ordlist.resizeCells();
	//grd_ordlist.gridToInstance();				
	grd_ordlist.row = 0; // 그리드의 첫줄부터 표시되도록 포커스를 0으로 설정한다.

	// 2008. 01. 27 박지욱 추가 (처방 색깔 항 구분에 따라 흰색-회색 구분되도록 처리)
	//fSetOrderColorByEdiitem();

	//항목별소계
	fSetItemSubTotal();

	// 처방 Grid의 내용이 변경된 경우, 선별심사 처방 색깔 구분을 다시 처리한다.
	fSetColorSpclJudgOrder();

	//fSetOrdSpclTxt();
	// 
//model.refresh();
 최적화 문제로 대체 20080731 박창원
	model.refreshpart("ds_main_list2_iscllist");
}

// 처방조회부, 처방 Grid용 Group의 컨트롤 크기를 설정한다.
function fSetOrderControlSize() {

	if(grp_calc.attribute("top") == "305"){
		//기존위치에 +200한 위치, 처방그리드는 사이즈 +200
		grp_calc.attribute("top") = "105";
		grp_calc.attribute("height") = "640";
		grd_ordlist.attribute("height") = "518";
		cap_paylimamt.attribute("top") = "595";
		opt_paylimamt.attribute("top") = "620";
		swt_spclmemo.visible = "false";
		grd_diaglist.visible = "false";
	}else{
		grp_calc.attribute("top") = "305";
		grp_calc.attribute("height") = "440";
		grd_ordlist.attribute("height") = "318";

		cap_paylimamt.attribute("top") = "395";
		opt_paylimamt.attribute("top") = "420";
		swt_spclmemo.visible = "true";

		grd_diaglist.visible = "true";
	}
}
//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//처장 Filter 관련 코딩  끝																	     //
//////////////////////////////////////////////////////////////////////////////////////////////////////////////	

//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//특정내역 관련 코딩  																	     //
//////////////////////////////////////////////////////////////////////////////////////////////////////////////	

// 특정 환자에 대해 그동안 작성된 심사자메모, 청구메모 내역을 조회한다.
function fGetMemoHistList() {
	if(ds_main_item1_iteminfo.getColumn(0, "patnm")){
		ds_hidden_sppiz00300_rslt.clearData();
		dsf_makeValue( ds_hidden_sppiz00300_cond, "pid", "string",  ds_main_item1_iteminfo.getColumn(0, "pid"));
		dsf_makeValue( ds_hidden_sppiz00300_cond, "orddeptcd", "string",  ds_main_item1_iteminfo.getColumn(0, "orddeptcd"));
		dsf_makeValue( ds_hidden_sppiz00300_cond, "ioflag", "string",  "I");
		dsf_makeValue( ds_hidden_sppiz00300_cond, "refterm", "string",  "2");
		dsf_makeValue( ds_hidden_sppiz00300_cond, "anofildinclyn", "string",  "Y");
		dsf_makeValue( ds_hidden_sppiz00300_cond, "fromdd", "string",  "");
		dsf_makeValue( ds_hidden_sppiz00300_cond, "todd", "string",  "");

		frmf_modal("SPPIZ00300", "SPPIZ00300", "ds_hidden_sppiz00300_cond""-"ds_init"", "", "", "10", "10", "", "", "", "", "", "M");	// SPPIZ00300_메모이력조회.xrw

		var SelectMemo = instance1.selectSingleNode("ds_hidden_sppiz00300_rslt");
		if (SelectMemo != null) {
			var choimemo = ds_hidden_sppiz00300_rslt.getColumn(0, "choimemo").getTrim();	// (stringHelper.js) 문자열 앞뒤에 있는 공백 제거
			var choiedicd = ds_hidden_sppiz00300_rslt.getColumn(0, "edicd");

			if (choimemo) {
				ds_hidden_sppiz00300_rslt.setColumn( 0, "choimemo", choimemo);
				var destRef = ds_hidden_sppiz00300_rslt.getColumn(0, "destRef");
				if (destRef == "judgmemo") {	// 심사메모로 전달
					var judgmemo = ds_main_item1_iteminfo.getColumn(0, "judgrmk");
					if (judgmemo) {		// 기존 심사메모가 공백이 아닌 경우 선택된 메모를 심사화면 메모 뒤에 덧붙인다.
						ds_main_item1_iteminfo.setColumn( 0, "judgrmk", judgmemo +" \n"+ choimemo);
					} else {
						if (choiedicd) {		// 처방별 메모를 전달하는 경우임
							// 동일한 EDI 코드가 있을 경우만 추가
							var rowcnt =  ds_main_list2_iscllist.rowcount; // 필터
							rowcnt = eval(rowcnt) + 1;								
							//for (var j = 1; j < grd_ordlist.rows; j++) {
							for (var j = 1; j < rowcnt; j++) {
								var clodedicd = ds_main_list2_iscllist.getColumn(j, "edicd");
								if (choiedicd == clodedicd) {
									ds_main_item1_iteminfo.setColumn( 0, "judgrmk", choimemo);
									j = grd_ordlist.rows;
								}
							}
						} else {
							ds_main_item1_iteminfo.setColumn( 0, "judgrmk", choimemo);
						}
					}
					model.toggle("case_judgrmemo");	// 해당 tab 으로 토글시킨다.
				}
				else if (destRef == "edimemo") {	// 청구메모로 전달
					var edimemo = ds_main_item1_iteminfo.getColumn(0, "edirmk");
					if (edimemo) {				// 기존 청구메모가 공백이 아닌 경우 선택된 메모를 심사화면 메모 뒤에 덧붙인다.
						ds_main_item1_iteminfo.setColumn( 0, "edirmk", edimemo +" \n"+ choimemo);
					} else {
						if (choiedicd) {		// 처방별 메모를 전달하는 경우임
							// 동일한 EDI 코드가 있을 경우 * 표시
							var rowcnt =  ds_main_list2_iscllist.rowcount; // 필터
							rowcnt = eval(rowcnt) + 1;									
							//for (var j = 1; j < grd_ordlist.rows; j++) {
							for (var j = 1; j < rowcnt; j++) {
								var clodedicd = ds_main_list2_iscllist.getColumn(j, "edicd");
								if (choiedicd == clodedicd) {
									ds_main_item1_iteminfo.setColumn( 0, "edirmk", choimemo);
									//j = grd_ordlist.rows;
									j = rowcnt;
								}
							}
						} else {
							ds_main_item1_iteminfo.setColumn( 0, "edirmk", choimemo);
						}
					}
					model.toggle("case_ediclammemo");	// 해당 tab 으로 토글시킨다.
				}
				else if (destRef == "prcpmemo") {	// 처방별 주석로 전달

					// 동일한 EDI 코드가 있을 경우 * 표시
					var rowcnt =  ds_main_list2_iscllist.rowcount;		// 필터
					rowcnt = eval(rowcnt) + 1;
					for (var j = 1; j < rowcnt; j++) {
					//for (var j = 1; j < grd_ordlist.rows; j++) {
						var iscledicd = ds_main_list2_iscllist.getColumn(j, "edicd");
						if (choiedicd == iscledicd) {
							ds_main_list2.setColumn( j , "text", "*");
						}
					}

					for (var i=1; i<grd_clcjlist.rows; i++) {

						var edicd = ds_main_list4_clcjlist.getColumn(i, "edicd");
						var spclspec = ds_main_list4_clcjlist.getColumn(i, "spclspec");

						if (choiedicd == edicd) {
							var ans = sysf_messageBox("등록된 메모가 있습니다. 기존 내역에 추가할 경우 예(Yes)\n 새로운 내역으로 변경하시려면 아니오(No) 선택하여 주십시요", "S003");	///수정사항이 있습니다. 저장하시려면 예(Yes)\n변경하시려면 아니오(No)
							if (ans == 6) {	// 6: yes

								// 'JX999'  코드를 추가한다.
								fSpclGridInsertRow();			// 특정내역 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 추가"
								var clsprow = grd_ordlist.row;

								ds_main_list4.setColumn( clsprow , "unitflag", "J");
								ds_main_list4.setColumn( clsprow , "edicd", choiedicd);
								ds_main_list4.setColumn( clsprow , "spclcd", "JX999");
								ds_main_list4.setColumn( clsprow , "spclcdnm", "JX999 기타내역");
								ds_main_list4.setColumn( clsprow , "spclspec", spclspec + "\n"+ choimemo);
								ds_main_list4.setColumn( clsprow , "remfact", "X(700)");

								return;
							}
							else if (ans == 7) {	// 7:no
								ds_main_list4.setColumn( i , "spclspec", choimemo);								
								return ;
							}
							else if (ans == 2) {	// 2:cancel							
								return ;
							}
						}
					}

					// 신규로 특정 내역을 추가하는 경우
					var rowcnt =  ds_main_list2_iscllist.rowcount;		// 필터
					rowcnt = eval(rowcnt) + 1;
					for (var j = 1; j < rowcnt; j++) {
					//for (var j = 1; j < grd_ordlist.rows; j++) {
						var iscledicd = ds_main_list2_iscllist.getColumn(j, "edicd");
						if (choiedicd == iscledicd) {
							// 'JX999'  코드를 추가한다.
							fSpclGridInsertRow();			// 특정내역 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 추가"
							var clsprow = grd_clsphist.row;

							ds_main_list4.setColumn( clsprow , "unitflag", "J");
							ds_main_list4.setColumn( clsprow , "edicd", choiedicd);
							ds_main_list4.setColumn( clsprow , "spclcd", "JX999");
							ds_main_list4.setColumn( clsprow , "spclcdnm", "JX999 기타내역");
							ds_main_list4.setColumn( clsprow , "spclspec", spclspec + "\n"+ choimemo);
							ds_main_list4.setColumn( clsprow , "remfact", "X(700)");

							return;
						}
					}						
				}

//model.refresh();

			}
		}

	}
}

// 특정내역 중 MT015, MT016 내역을 조회하여 "소명자료" Btn (첨부물 자료관리) Popup 화면에 표시한다.
function fGetAttachedDataList() {
	if(ds_main_item1_iteminfo.getColumn(0, "patnm")){
		//ds_hidden_sppiz00200_cond_clsp.clearData();
		ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "rowstat","");
		ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "unitflag","");
		ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "spclcd","");
		ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "spclspec", "");
		ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "initedilnno", "");
		ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "calcscorcd", "");
		ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "seqno", "");
		ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "spclformat","");

		// 특정내역 Grid에서 "행 삭제"한 경우 MT015 / MT016 자료를 표시하지 않도록 하는 기능 필요함
		// (작성할 것!!!!!!!!!!!!!!!!!!!!!!!)

		for (var i = 1; i < grd_clcjlist.rows; i++) {
			var tmp =  ds_main_list4_clcjlist.getColumn(i, "spclcd");
			if(tmp == "MT015" || tmp == "MT016"){
				ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "rowstat","-");
				ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "unitflag","M");
				ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "spclcd", ds_main_list4_clcjlist.getColumn(i, "spclcd"));
				ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "spclspec", ds_main_list4_clcjlist.getColumn(i, "spclspec"));
				ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "initedilnno", grd_clcjlist.row);
				ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "calcscorcd", ds_main_list4_clcjlist.getColumn(i, "edicd"));
				ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "seqno", "1");
				ds_hidden_sppiz00200_cond_clsp.setColumn( 0, "spclformat", ds_main_list4_clcjlist.getColumn(i, "remfact"));
			}
		}

		frmf_modal("SPPIZ00200", "SPPIZ00200", ""-"", "", "", "10", "10", "", "", "", "", "", "M");	// SPPIZ00200_첨부물자료관리.xrw
		fDisplayAttachedDataList()
		fCheckSpclSpecData();
	}
}

// "소명자료" Btn (첨부물 자료관리) Popup 화면에서 특정내역 중 MT015, MT016 정보가 입력된 환자인지를 확인한다.
// 특정내역 MT004가 입력된 환자인지 체크한다. 
function fDisplayAttachedDataList() {
	var isAttachedDataList = false;
	var cSrcNode = instance1.selectSingleNode("ds_hidden_sppiz00200_rslt_clsp");
	if (cSrcNode == null) {	// 특정내역이 없는 경우임
		return;
	}
	if (ds_hidden_sppiz00200_rslt_clsp.getColumn(0, "unitflag") == "") {	// "취소" 선택시에 버튼 색이 변경되지 않도록
		return;
	}
	var cSrcChildNodeList = cSrcNode.childNodes;
	for (var i = 1; i <= cSrcChildNodeList.length; i++) {
		var spclcd = ds_hidden_sppiz00200_rslt_clsp.getColumn(i, "spclcd");
		if (spclcd == "MT015" || spclcd == "MT016") {
			var rowstat = ds_hidden_sppiz00200_rslt_clsp.getColumn(i, "rowstat")
			if (rowstat != 'D') {
				var spclspec = ds_hidden_sppiz00200_rslt_clsp.getColumn(i, "spclspec");
				if (spclspec) {
					isAttachedDataList = true;
				}
				// 특정내역 Grid 에서 해당 내용을 삽입 또는 수정한다.
				if (rowstat == "I") {	// 삽입
					fSpclGridInsertRow();
					ds_main_list4.setColumn( 0, "clcjlist[" + grd_clcjlist.row + "]_spclcd", spclcd);
					ds_main_list4.setColumn( 0, "clcjlist[" + grd_clcjlist.row + "]_spclspec", spclspec);
					if (spclcd == "MT015") {
						ds_main_list4.setColumn( 0, "clcjlist[" + grd_clcjlist.row + "]_remfact", "X(2)");
					} else {
						ds_main_list4.setColumn( 0, "clcjlist[" + grd_clcjlist.row + "]_remfact", "X(200)");
					}
				} else if (rowstat == "U") {		// 수정
					for (var j = 1; j < grd_clcjlist.rows; j++) {
						var gridspclcd = ds_main_list4_clcjlist.getColumn(j, "spclcd");
						var gridspclspec = ds_main_list4_clcjlist.getColumn(j, "spclspec");
						var gridrowstatus = grd_clcjlist.rowstatus(j);
						if (gridspclcd == spclcd) {
							ds_main_list4.setColumn( j , "spclspec", spclspec);
							if (gridrowstatus == 1 || gridrowstatus == 3) {	// 1 : insert, 3 : insert & new
							} else {
								grd_clcjlist.rowstatus(j) = 2;			// 2 : update 상태로 stat를 변경한다.
							}
						}
					}
				}
			} else {	// 삭제
				// 특정내역 Grid 에서 해당 내용을 삭제한다.
				for (var j = 1; j < grd_clcjlist.rows; j++) {
					var gridspclcd = ds_main_list4_clcjlist.getColumn(j, "spclcd");
					var gridspclspec = ds_main_list4_clcjlist.getColumn(j, "spclspec");
					var gridrowstatus = grd_clcjlist.rowstatus(j);
					if (gridspclcd == spclcd) {
						if (gridrowstatus == 1 || gridrowstatus == 3) {	// 1 : insert, 3 : insert & new
							grd_clcjlist.deleteRow(j, false);			// 해당 라인을 Grid에서 삭제한다.
						} else {								// 0 : new, 2 : update
							grd_clcjlist.rowstatus(j) = 4;			// 4 : delete 상태로 stat를 변경한다.
						}
					}
				}
			}
		}			
	}
	if (isAttachedDataList) {
		btn_attData.attribute("class") = "btn5_letter4";
		btn_attData.attribute("color") = "#cc3333";
	} else {
		btn_attData.attribute("class") = "btn2_letter4"; 
	}
}

// DB에서 조회한 특정내역 중 MT015, MT016 정보가 입력된 환자인지를 확인한다.
// 특정내역 MT004가 입력된 환자인지 체크한다. 
function fCheckSpclSpecData() {
	var cSrcNode = instance1.selectSingleNode("ds_main_list4_clcjlist");
	if (cSrcNode == null) {	// 특정내역이 없는 경우임
		return;
	}
	//var cSrcChildNodeList = cSrcNode.childNodes;
//	for (var i = 1; i <= cSrcChildNodeList.length; i++) {
	var spclcdMT015 = model.getValue("ds_main_list4_clcjlist[spclcd='MT015' or spclcd='MT016']_spclcd");
	var spclcdMT004 = ds_main_list4_clcjlist.lookupExpr("spclcd == '" + MT004 + "'", "spclcd");
		if (spclcdMT015.length > 0) {
			btn_attData.attribute("class") = "btn5_letter4";
			btn_attData.attribute("color") = "#ff0066";
		} else {
			btn_attData.attribute("class") = "btn2_letter4";
		}

		if(spclcdMT004 == "MT004") {
			btn_mt004.attribute("class") = "btn5_letter4";
			btn_mt004.attribute("color") = "#ff0066";
		} else {
			btn_mt004.attribute("class") = "btn2_letter4";
		}
//	}

}

//줄단위 추가
function fSpclGridInsertRow() {
	// 특정내역 Grid 상에서 직접 행을 추가하는 경우 : 명세서단위 특정내역만을 추가할 수 있다.
	// 줄단위 특정내역의 경우, 처방 Grid에서 'T' 컬럼을 더블클릭하여 특정내역 상세관리 Popup을 통해 입력한다.

	var clcjrow = 0;

	if(grd_clcjlist.rows > 1){
		clcjrow = grd_clcjlist.rows - 1;	// 특정내역 Grid 가장 마지막 줄에 추가한다.

		var chkdata = ds_main_list4_clcjlist.getColumn(clcjrow, "spclcd"));

		if(chkdata == ""){
			return;
		}
	}

	grd_clcjlist.insertRow(clcjrow++, true,false,false);
	grd_clcjlist.cellComboNodeset(clcjrow,3) = "ds_init_P0117list_P0117[minval = 'M' and cdid != 'MX999']";

	ds_main_list4.setColumn( 0, "clcjlist[" + (grd_clcjlist.rows - 1) + "]_pid", ds_send.getColumn(0, "pid"));
	ds_main_list4.setColumn( 0, "clcjlist[" + (grd_clcjlist.rows - 1) + "]_indd", ds_send.getColumn(0, "indd"));
	ds_main_list4.setColumn( 0, "clcjlist[" + (grd_clcjlist.rows - 1) + "]_cretno", ds_send.getColumn(0, "cretno") );
	ds_main_list4.setColumn( 0, "clcjlist[" + (grd_clcjlist.rows - 1) + "]_fromdd", ds_send.getColumn(0, "fromdd"));
	ds_main_list4.setColumn( 0, "clcjlist[" + (grd_clcjlist.rows - 1) + "]_mskind", ds_send.getColumn(0, "mskind"));
	ds_main_list4.setColumn( 0, "clcjlist[" + (grd_clcjlist.rows - 1) + "]_unitflag", "M");
	ds_main_list4.setColumn( 0, "clcjlist[" + (grd_clcjlist.rows - 1) + "]_spclmemoflag","E" );
	ds_main_list4.setColumn( 0, "clcjlist[" + (grd_clcjlist.rows - 1) + "]_status", "3");

	grd_clcjlist.row = grd_clcjlist.rows;
	grd_clcjlist.rowstatus(grd_clcjlist.row) = 1;	
	// grd_clcjlist.gridToInstance(); 최적화문제로 주석처리 - 20081015 박창원
}

// 특정내역 Grid 마우스 오른쪽 버튼 클릭시 팝업 메뉴 "행 삭제"
function fSpclGridDeleteRow() {
	var rowstatus = grd_clcjlist.rowstatus(grd_clcjlist.row);
	for( var i = grd_clcjlist.selectedRows; i >= 0 ; i-- ){
		var cRrow = grd_clcjlist.selectedRow(i);
		if (rowstatus == 4) {		// 4 : delete
			return;
		}
		else if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
			grd_clcjlist.deleteRow(cRrow, false);		// 해당 라인을 Grid에서 삭제한다.
		} else {							// 0 : new, 2 : update
			ds_main_list4.setColumn( 0, "clcjlist[" + grd_clcjlist.row + "]_status", 4);
			grd_clcjlist.rowstatus(cRrow) = 4;		// 4 : delete 상태로 stat를 변경한다.
		}
	}

	fCheckSpclSpecData();
	//특정내역이 있는 처방에 'T'필드에 *표를 해준다. 
	//fSetOrdSpclTxt();
	//
//model.refresh();
 최적화 문제로 대체 20080731 박창원
	model.refreshpart("ds_main_list2_iscllist");
	model.refreshpart("ds_main_list4_clcjlist");
}

// 특정내역 Grid 에서 선택한 줄단위 특정내역을 조회하고, 명세서단위 특정내역을 수정_입력한다.
function fSetDocRefLnSpclSpec(){
	ds_hidden_sppij00500_rslt.clearData();		// SPPIJ00500_특정내역상세관리 에서 선택된 결과가 copyNode되는 경로임
	ds_hidden_sppij00500_cond_list.clearData();

	ds_hidden_sppij00500_cond.clearData(); ds_hidden_sppij00500_cond.addRow();

	var row = grd_clcjlist.row;
	var rows = grd_clcjlist.rows;

	var edicd = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("edicd"));
	var oldspclcd = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("spclcd"));
	var oldspclcdnm = "";
	var oldspclspec = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("spclspec"));
	var oldremfact = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("remfact"));
	var olddetldesc = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("detldesc"));
	//줄단위 명단위 특정내역 구분. 
	var unitflag = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("unitflag"));
	var calcscorcd = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("calcscorcd"));

	// pid,indd추가 결과조회 팝업호출을 위하여 - 20080922 박창원
	var pid = ds_main_item1_iteminfo.getColumn(0, "pid");
	var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");

	var rowcnt = 1;
	var setrow  =0 ;

	if(unitflag == "J"){
		if (edicd ) {
			for (var i=1; i<rows; i++) {

				var grdedicd = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("edicd"));

				if ( edicd ==  grdedicd) {
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "pid", pid);
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "indd", indd);
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "flag", "U");
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "edicd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("edicd")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclcd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclcdnm", "");
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclspec", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "detldesc", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("detldesc")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "remfact", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("remfact")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "unitflag", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "rownum", i);
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "oldspclcd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "oldspclspec", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "calcscorcd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("calcscorcd")));

					if (row == i) {
						setrow = i;
					}
					rowcnt = rowcnt+1;
				}
			}

			ds_hidden_sppij00500_cond.setColumn( 0, "pid", pid);	
			ds_hidden_sppij00500_cond.setColumn( 0, "indd", indd);	
			ds_hidden_sppij00500_cond.setColumn( 0, "flag", "U");				
			ds_hidden_sppij00500_cond.setColumn( 0, "edicd", edicd);
			ds_hidden_sppij00500_cond.setColumn( 0, "spclcd", oldspclcd);
			ds_hidden_sppij00500_cond.setColumn( 0, "spclcdnm", oldspclcdnm);
			ds_hidden_sppij00500_cond.setColumn( 0, "detldesc", olddetldesc);
			ds_hidden_sppij00500_cond.setColumn( 0, "spclspec", oldspclspec);
			ds_hidden_sppij00500_cond.setColumn( 0, "remfact", oldremfact);
			ds_hidden_sppij00500_cond.setColumn( 0, "rownum", setrow);
			ds_hidden_sppij00500_cond.setColumn( 0, "unitflag", "J");
			ds_hidden_sppij00500_cond.setColumn( 0, "calcscorcd", calcscorcd);

			//var unitflag = ds_main_list4_clcjlist.getColumn(row, "unitflag"));

			var unitflag = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("unitflag"))

			// 삭제상태인 경우 처방Grid에서 입력,수정은 가능하지만 특정내역Grid에서는 편집할 수 없다.
			var rowstatus = grd_clcjlist.rowstatus(row);
			if (rowstatus == 4) {	// 4 : delete
				sysf_messageBox("삭제된 특정내역은 수정할 수", "I004");	///삭제된 특정내역은 수정할 수 없습니다.
				return;
			}
			frmf_modal("SPPIJ00500", "SPPIJ00500", "ds_hidden_sppij00500""-"ds_hidden_clcj"", "", "", "10", "10", "", "", "", "", "", "M");	// SPPIJ00500_특정내역상세관리.xrw

			var rsltcnt = ds_hidden_sppij00500_rslt_list.rowcount;

			// 처리 건수 
			if (rsltcnt > 0) {

				for(var i=rsltcnt; i>0; i--) {	

					var flag = ds_hidden_sppij00500_rslt_list.getColumn(i, "flag");
					var rownum = ds_hidden_sppij00500_rslt_list.getColumn(i, "rownum");
					var edicd = ds_hidden_sppij00500_rslt_list.getColumn(i, "edicd");
					var newspclcd = ds_hidden_sppij00500_rslt_list.getColumn(i, "spclcd");
					var newspclcdnm  = ds_hidden_sppij00500_rslt_list.getColumn(i, "spclcdnm");
					var newspclspec = ds_hidden_sppij00500_rslt_list.getColumn(i, "spclspec");
					var newremfact  = ds_hidden_sppij00500_rslt_list.getColumn(i, "remfact");
					var newdetldesc  = ds_hidden_sppij00500_rslt_list.getColumn(i, "detldesc");

					oldspclcd = ds_hidden_sppij00500_rslt_list.getColumn(i, "oldspclcd");
					oldspclspec = ds_hidden_sppij00500_rslt_list.getColumn(i, "oldspclspec");

					// 특정코드 추가인 경우
					if (flag == "I") {

						var clsprow = grd_clcjlist.rows - 1;	// 특정내역 Grid 가장 마지막 줄에 추가한다. 
						grd_clcjlist.insertRow(clsprow++, true,false,false);

						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("unitflag")) = unitflag;
						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclcd")) = newspclcd;
						//grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclspec")) = newspclspec;
						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("remfact")) = newremfact;
						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("detldesc")) = newdetldesc;
						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("edicd")) = edicd;
						grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("status")) = "3";

					// 특정코드  변경인 경우	
					} else if (flag == "U") {

						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("unitflag")) = unitflag;
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcd")) = newspclcd;
						//grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclspec")) = newspclspec;
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("remfact")) = newremfact;
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("detldesc")) = newdetldesc;
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("edicd")) = edicd;

						if ( grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) != "3") {
							grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "0";
						}

//model.refresh();

						// 특정코드, 특정내역이 변경되었거나 삭제된 특정코드를 조회하여 "확인"을 선택한 경우
						if (oldspclcd != newspclcd || oldspclspec != newspclspec || grd_clcjlist.rowstatus(row) == 4) {
							var rowstatus = grd_clcjlist.rowstatus(rownum);
							if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
							} else {
								grd_clcjlist.rowstatus(rownum) = 2;		// 2 : update 상태로 stat를 변경한다.
								grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "2";
							}
						}

						// 처방Grid에서도 해당 줄단위 특정내역의 'T' 컬럼의 "*" 를 표시한다.
						var rowcnt =  ds_main_list2_iscllist.rowcount;		// 필터
						rowcnt = eval(rowcnt) + 1;
						for (var j = 1; j < rowcnt; j++) {
						//for (var j = 1; j < grd_ordlist.rows; j++) {
							var clcjedicd = ds_main_list2_iscllist.getColumn(j, "edicd");
							if (edicd == clcjedicd) {
								if(newspclcd == "JX999"){
									ds_main_list2.setColumn( j , "text", "#");
								}else{
									ds_main_list2.setColumn( j , "text", "*");
								}

								//
//model.refresh();
 최적화 문제로 대체 20080731 박창원
								model.refreshpart("ds_main_list2_iscllist");
							}
						}
						ds_hidden_item1.setColumn( 0, "message", "특정코드 - "+ newspclcd +" / 특정내역 : "+ newspclspec +" / 기재형식 : "+ newremfact);

					// 특정코드 삭제인 경우	
					} else if (flag == "D" && rownum != "" ) {

						// 특정내역 Grid에서 삭제
						if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
							grd_clcjlist.deleteRow(rownum, false);		// 해당 라인을 Grid에서 삭제한다.
						} else {							// 0 : new, 2 : update
							grd_clcjlist.rowstatus(rownum) = 4;		// 4 : delete 상태로 stat를 변경한다.
						}

						// 처방Grid에서도 해당 줄단위 특정내역의 삭제 처리를 한다.
						// 줄번호가 부여된 줄단위 특정내역이 삭제된 경우, 처방Grid의 'T' 컬럼의 "*" 를 삭제한다.
						//var clcjedicd = ds_main_list4_clcjlist.getColumn(rownum, "edicd")); 	//root_main_list4_clcjlist_edicd
						var clcjedicd = grd_clcjlist.valueMatrix( rownum,grd_clcjlist.colRef("edicd"));

						if (clcjedicd) {
							var isSameLn = false;
							for (var j = 1; j < grd_clcjlist.rows; j++) {
								if (grd_clcjlist.rowstatus(j) != 4) {
										isSameLn = true;		// 같은 줄번호에 여러개의 특정내역이 있는 경우임
									}
								}
							}
							if (isSameLn == false) {		// 동일한 줄번호의 특정내역이 없는 경우
								var rowcnt =  ds_main_list2_iscllist.rowcount;		// 필터
								rowcnt = eval(rowcnt) + 1;										
								for (var j = 1; j < rowcnt; j++) {
								//for (var j = 1; j < grd_ordlist.rows; j++) {
									var iscldicd = ds_main_list2_iscllist.getColumn(j, "edicd");
									if (clcjedicd == iscldicd) {
										model.resetInstanceNode("ds_main_list2_iscllist["+ j +"]_text");
										//
//model.refresh();
 최적화 문제로 대체 20080731 박창원
										model.refreshpart("ds_main_list2_iscllist");
									}
								}
							}
						} // 특정코드 비교 if
					} // end for

					var rdounitflag = ds_send.getColumn(0, "unitflag");

					if (rdounitflag == "-") {
						for (var i=1; i<grd_clcjlist.rows; i++) {
							var delstatus = grd_clcjlist.rowStatus(i);
							var delspclspec = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec"));
							if (delstatus == 1 || delstatus == 3) { 	// 0 : new, 3 : insert & new
								if (delspclspec == "") {
									grd_clcjlist.deleteItem(i);
								}
							}
						}

						// 입력행 추가
						fSpclGridInsertRow();

					} else if (rdounitflag == "M") {							
						grd_clcjlist.attribute("nodeset") = "ds_main_list4_clcjlist[unitflag = 'M']";
						grd_clcjlist.rebuild();

					} else if (rdounitflag == "J") {						
						grd_clcjlist.attribute("nodeset") = "ds_main_list4_clcjlist[unitflag = 'J']";
						grd_clcjlist.rebuild();
					}

					for (var i=1; i<grd_clcjlist.rows; i++) {
						var unitflag =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));
						var status =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("status"));

						if (status != "") {
							grd_clcjlist.rowStatus(i) = status;
						}

						if (unitflag == "M") {
							grd_clcjlist.cellComboNodeset(i,3) = "ds_init_P0117list_P0117[minval = 'M'and cdid != 'MX999']";	
						} else if (unitflag == "J") {
							grd_clcjlist.cellComboNodeset(i,3) = "ds_init_P0117list_P0117[minval = 'J' ]";
						}

					}							
				} // 처리 건수
			} else {
				sysf_messageBox("EDI코드가 없는 경우 해당 줄단위 특정내역이", "I004");	///EDI코드가 없는 경우  해당 줄단위 특정내역이 없습니다.
			}
	//명단위 특정내역으르 클릭한경우(unitflag =="M") 또는 빈칸을 클릭한경우는 명단위 특정내역으로 구분한다. 2007.09.23 박도형
	}else{
		ds_hidden_sppij00500_rslt.clearData();		// SPPIZ00500_특정내역상세관리 에서 선택된 결과가 copyNode되는 경로임
		ds_hidden_sppij00500_cond.clearData(); ds_hidden_sppij00500_cond.addRow();

		var edicd = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("edicd"));
		var spclcd = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("spclcd"));
		var spclcdnm = "";
		var spclspec = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("spclspec"));
		var remfact = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("remfact"));
		var detldesc = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("detldesc"));
		//줄단위 명단위 특정내역 구분. 
		var unitflag = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("unitflag"));	
		var calcscorcd = grd_clcjlist.valueMatrix(row, grd_clcjlist.colRef("calcscorcd"));

		ds_hidden_sppij00500_cond.setColumn( 0, "pid", pid);
		ds_hidden_sppij00500_cond.setColumn( 0, "indd", indd);
		ds_hidden_sppij00500_cond.setColumn( 0, "edicd", edicd);
		ds_hidden_sppij00500_cond.setColumn( 0, "spclcd", spclcd);
		ds_hidden_sppij00500_cond.setColumn( 0, "spclcdnm", spclcdnm);
		ds_hidden_sppij00500_cond.setColumn( 0, "remfact", remfact);
		ds_hidden_sppij00500_cond.setColumn( 0, "spclspec", spclspec);
		dsf_makeValue( ds_hidden_sppij00500_cond, "unitflag", "string",  "M");	
		dsf_makeValue( ds_hidden_sppij00500_cond, "calcscorcd", "string",  calcscorcd);	

		// 명단위도 기존 입력된 내역까지 다 보낸다. 2008.01.04 박지욱
		var rowcnt = 1;
		for (var i=1; i<grd_clcjlist.rows; i++) {

			var unitflag = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));
			var spclcd = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd"));

			if (unitflag == "M" && grd_clcjlist.rowstatus(i) != 4 && spclcd != "") {
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "pid", pid);
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "indd", indd);
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "flag", "U");
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "edicd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("edicd")));
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclcd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd")));
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclcdnm", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcdnm")));
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclspec", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec")));
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "detldesc", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("detldesc")));
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "remfact", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("remfact")));
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "unitflag", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag")));
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "rownum", i);
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "oldspclcd", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd")));
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "oldspclspec", grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec")));
				ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "calcscorcd", calcscorcd);

				if (row == i) {
					setrow = i;
				}
				rowcnt = rowcnt+1;
			}
		}

		frmf_modal("SPPIJ00500", "SPPIJ00500", "ds_hidden_sppij00500""-"ds_hidden_clcj"", "", "", "10", "10", "", "", "", "", "", "M");

		var rsltcnt = ds_hidden_sppij00500_rslt_list.rowcount;

		// 처리 건수 
		if (rsltcnt > 0) {				

			for(var i=rsltcnt; i>0; i--) {	

				var flag = ds_hidden_sppij00500_rslt_list.getColumn(i, "flag");
				var rownum = ds_hidden_sppij00500_rslt_list.getColumn(i, "rownum");
				var edicd = ds_hidden_sppij00500_rslt_list.getColumn(i, "edicd");
				var newspclcd = ds_hidden_sppij00500_rslt_list.getColumn(i, "spclcd");
				var newspclcdnm  = ds_hidden_sppij00500_rslt_list.getColumn(i, "spclcdnm");
				var newspclspec = ds_hidden_sppij00500_rslt_list.getColumn(i, "spclspec");
				var newremfact  = ds_hidden_sppij00500_rslt_list.getColumn(i, "remfact");
				var newdetldesc  = ds_hidden_sppij00500_rslt_list.getColumn(i, "detldesc");

				// 특정코드 추가인 경우
				if (flag == "I") {

					var clsprow = grd_clcjlist.rows - 1;	// 특정내역 Grid 가장 마지막 줄에 추가한다. 
					grd_clcjlist.insertRow(clsprow++, true,false,false);

					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("unitflag")) = unitflag;
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclcd")) = newspclcd;
					//grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclspec")) = newspclspec;
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("remfact")) = newremfact;
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("detldesc")) = newdetldesc;
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("edicd")) = edicd;
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("status")) = "3";

					// pid, indd, cretno, fromdd, mskind, spclmemoflag, seqno 세팅
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("pid")) = ds_send.getColumn(0, "pid");
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("indd")) = ds_send.getColumn(0, "indd");
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("cretno")) = ds_send.getColumn(0, "cretno");
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("fromdd")) = ds_send.getColumn(0, "fromdd");
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("mskind")) = ds_send.getColumn(0, "mskind");
					grd_clcjlist.valueMatrix(clsprow, grd_clcjlist.colRef("spclmemoflag")) = "E";

				// 특정코드  변경인 경우	
				} else if (flag == "U") {

					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("unitflag")) = unitflag;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcd")) = newspclcd;
					//grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclspec")) = newspclspec;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("remfact")) = newremfact;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("detldesc")) = newdetldesc;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("edicd")) = edicd;

					if ( grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) != "3") {
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "0";
					}

					ds_hidden_item1.setColumn( 0, "message", "특정코드 - "+ newspclcd +" / 특정내역 : "+ newspclspec +" / 기재형식 : "+ newremfact);

				// 특정코드 삭제인 경우	
				} else if (flag == "D" && rownum != "" ) {

					// 특정내역 Grid에서 삭제
					if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
						grd_clcjlist.deleteRow(rownum, false);		// 해당 라인을 Grid에서 삭제한다.
					} else {							// 0 : new, 2 : update
						grd_clcjlist.rowstatus(rownum) = 4;		// 4 : delete 상태로 stat를 변경한다.
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "4";
					}
				} 
			}
			// 그리드 정렬 & 한줄추가
			//fSortSpclNo();
			//fSaveClcjList();
		} // 처리건수
	}								
}

// 처방 행 삭제 or 삭제취소 후에 특정내역 sorting 작업
function fSortSpclNo() {
	// 빈 줄을 삭제한다.
	for (var i = 1; i < grd_clcjlist.rows; i++) {
		var rowstatus = grd_clcjlist.rowstatus(i);
		var spclcd = ds_main_list4_clcjlist.getColumn(i, "spclcd");
		if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
			if (spclcd == "") {
				// 줄을 삭제한다.
				grd_clcjlist.deleteRow(i, false);
				i--;
			}
		}
	}

	// JS010(특정코드:야간가산)의 hhmm이 야간(18~09시)가 아니면 특정내역 Grid에 빨간색으로 표시 	
	for(var i = 1; i < grd_clcjlist.rows; i++) {
		grd_clcjlist.rowStyle(i, "data", "color") = "#000000";				
		var spclcd = ds_main_list4_clcjlist.getColumn(i, "spclcd");
		var spclspec = ds_main_list4_clcjlist.getColumn(i, "spclspec");
		if (spclcd == "JS010") {	
			var js010chk = false;
			if (spclspec.length >= 12) {				
				var ccyymmddhhmm = spclspec.substr(0, 12);
				if (utlf_isValidDateTime(ccyymmddhhmm, "YYYYMMDDhhmm")) {	// (dateHelper.js) 유효한 날짜, 시간 인지 점검
					var hhmm = parseInt(spclspec.substr(8, 4), 10);	// '09' 와 같은 형식으로 입력한 경우 -> 9로 처리
					if (hhmm >= 1800 || hhmm < 900) {
						js010chk = true;
					}
				}
			}
			if (js010chk == false) {
				grd_clcjlist.rowStyle(i, "data", "color") = "#ff3333";		// ff3333=붉은색
			}	
		}						
	}

	grd_clcjlist.colsort(grd_clcjlist.colRef("unitflag")) = "desc";
	grd_clcjlist.colsort(grd_clcjlist.colRef("edicd")) = "asc";
	grd_clcjlist.colsort(grd_clcjlist.colRef("spclcd")) = "asc";
	grd_clcjlist.colsort(grd_clcjlist.colRef("status")) = "desc";
	var maxRow = parseInt(grd_clcjlist.rows) - 1;		// rows는 타이틀부분 부터 개수를 센다.
	var maxCol = parseInt(grd_clcjlist.cols) - 1;
	grd_clcjlist.sort(grd_clcjlist.fixedRows, grd_clcjlist.fixedCols, maxRow, maxCol) = "usersort";
	// Sort 된 Grid 상의 Data 순서와 Instance Node 상의 Data 순서를 동일하게 맞춰준다.
	grd_clcjlist.gridToInstance();

	// 빈줄 추가
	fSpclGridInsertRow();
}

function fSetLnUnitSpclcjec() {		// 'T' 필드 더블클릭시 호출한다.

	var rdounitflag = ds_send.getColumn(0, "unitflag");
	// pid,indd추가 결과조회 팝업호출을 위하여 - 20080922 박창원
	var pid = ds_main_item1_iteminfo.getColumn(0, "pid");
	var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");

	if (rdounitflag == "M") {
		// 줄단위로 셋팅하고 처리
		rdo_unitflag.value = "J";

		grd_clcjlist.attribute("nodeset") = "ds_main_list4_clcjlist[unitflag = 'J']";
		grd_clcjlist.rebuild();

		// 단위에 필터에 따라 해당 행있는 특정코드 콤보 재설정
		for (var i=1; i<grd_clcjlist.rows; i++) {
			var unitflag =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));
			var status =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("status"));

			if (status != "") {
				grd_clcjlist.rowStatus(i) = status;
			}

			if (unitflag == "M") {
				grd_clcjlist.cellComboNodeset(i,3) = "ds_init_P0117list_P0117[minval = 'M'' and cdid != 'MX999']";	
			} else if (unitflag == "J") {
				grd_clcjlist.cellComboNodeset(i,3) = "ds_init_P0117list_P0117[minval = 'J']";
			}				
		}
	}

	var row = grd_ordlist.row;
	var rows = grd_clcjlist.rows;

	ds_hidden_sppij00500_rslt.clearData();		// SPPIJ00500_특정내역상세관리 에서 선택된 결과가 copyNode되는 경로임
	ds_hidden_sppij00500_cond.clearData();

	// 처방 Grid에서 줄번호가 부여된 경우
	//var edicd = ds_main_list2_iscllist.getColumn(row, "edicd"));
	var edicd = grd_ordlist.valueMatrix(row, grd_ordlist.colref("edicd"));
	var calcscorcd = grd_ordlist.valueMatrix(row, grd_ordlist.colref("snglcalcscorcd")); // 수정추가 JHP 특정내역에 수가코드 추가하기. 20090423
	var rowcnt = 1;
	var setrow = 0;

	if (edicd) {
		if (rows == 1) {
			dsf_makeValue( ds_hidden_sppij00500_cond, "calcscorcd", "string",  calcscorcd); // 수정추가 JHP 특정내역에 수가코드 추가하기. 20090423
			dsf_makeValue( ds_hidden_sppij00500_cond, "edicd", "string",  edicd);
			dsf_makeValue( ds_hidden_sppij00500_cond, "pid", "string",  pid);
			dsf_makeValue( ds_hidden_sppij00500_cond, "pid", "string",  indd);
			dsf_makeValue( ds_hidden_sppij00500_cond, "unitflag", "string", "J");	
			dsf_makeValue( ds_hidden_sppij00500_cond, "flag", "string",  "I");
			dsf_makeValue( ds_hidden_sppij00500_cond, "spclcd", "string",  "JX999");
			dsf_makeValue( ds_hidden_sppij00500_cond, "spclcdnm", "string",  "");
			dsf_makeValue( ds_hidden_sppij00500_cond, "detldesc", "string",  "");
			dsf_makeValue( ds_hidden_sppij00500_cond, "spclspec", "string",  "");
			dsf_makeValue( ds_hidden_sppij00500_cond, "remfact", "string", "");
			dsf_makeValue( ds_hidden_sppij00500_cond, "rownum", "string",  "");

		} else {

			for (var i=1; i<rows; i++) {

				var clcjcalcscorcd = grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("calcscorcd"));
				var clcjedicd = grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("edicd"));
				var spclcd = grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclcd"));

				if ( edicd == clcjedicd) {

					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "flag", "U");
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "calcscorcd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("calcscorcd"))); // 수정추가 JHP 특정내역에 수가코드 추가하기. 20090423
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "edicd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("edicd")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "detldesc", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("detldesc")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclcd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclcd")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclcdnm", "");
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "spclspec", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclspec")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "remfact", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("remfact")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "rownum", i);
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "unitflag", "J")
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "oldspclcd", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclcd")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "oldspclspec", grd_clcjlist.valueMatrix( i,grd_clcjlist.colRef("spclspec")));
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "pid", pid);
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "indd", indd);
					ds_hidden_sppij00500_cond_list.setColumn( rowcnt, "calcscorcd", "");

					rowcnt = rowcnt+1;

					// 특정내역 상세 화면에 보여줄 특정내역 선택
					setrow = i;

				}

				dsf_makeValue( ds_hidden_sppij00500_cond, "calcscorcd", "string",  calcscorcd);				
				dsf_makeValue( ds_hidden_sppij00500_cond, "edicd", "string",  edicd);
				dsf_makeValue( ds_hidden_sppij00500_cond, "unitflag", "string", "J");	

				if ( setrow != 0 ) {
					dsf_makeValue( ds_hidden_sppij00500_cond, "pid", "string",  pid);
					dsf_makeValue( ds_hidden_sppij00500_cond, "indd", "string",  indd);
					dsf_makeValue( ds_hidden_sppij00500_cond, "flag", "string",  "U");
					dsf_makeValue( ds_hidden_sppij00500_cond, "spclcd", "string",  grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("spclcd")));
					dsf_makeValue( ds_hidden_sppij00500_cond, "spclcdnm", "string",  "");
					dsf_makeValue( ds_hidden_sppij00500_cond, "detldesc", "string",  grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("detldesc")));
					dsf_makeValue( ds_hidden_sppij00500_cond, "spclspec", "string",  grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("spclspec")));
					dsf_makeValue( ds_hidden_sppij00500_cond, "remfact", "string",  grd_clcjlist.valueMatrix(setrow,grd_clcjlist.colRef("remfact")));
					dsf_makeValue( ds_hidden_sppij00500_cond, "rownum", "string",  setrow);
					dsf_makeValue( ds_hidden_sppij00500_cond, "calcscorcd", "string",  "");

				} else {
					dsf_makeValue( ds_hidden_sppij00500_cond, "pid", "string",  pid);
					dsf_makeValue( ds_hidden_sppij00500_cond, "indd", "string",  indd);
					dsf_makeValue( ds_hidden_sppij00500_cond, "flag", "string",  "I");
					dsf_makeValue( ds_hidden_sppij00500_cond, "spclcd", "string",  "JX999");
					dsf_makeValue( ds_hidden_sppij00500_cond, "spclcdnm", "string",  "");
					dsf_makeValue( ds_hidden_sppij00500_cond, "detldesc", "string",  "");
					dsf_makeValue( ds_hidden_sppij00500_cond, "spclspec", "string",  "");
					dsf_makeValue( ds_hidden_sppij00500_cond, "remfact", "string", "");
					dsf_makeValue( ds_hidden_sppij00500_cond, "rownum", "string",  "");
					dsf_makeValue( ds_hidden_sppij00500_cond, "calcscorcd", "string",  "");
				}

			}
		}

		ds_hidden_sppij00500_rslt.clearData();
		frmf_modal("SPPIJ00500", "SPPIJ00500", "ds_hidden_sppij00500""-"ds_hidden_clcj"", "", "", "10", "10", "", "", "", "", "", "M");	// SPPIJ00500_특정내역상세관리.xrw

		var rsltcnt = ds_hidden_sppij00500_rslt_list.rowcount;

		// 처리 건수 
		if (rsltcnt > 0) {

			for(var i=rsltcnt; i>0; i--) {	

				var flag = ds_hidden_sppij00500_rslt_list.getColumn(i, "flag");
				var rownum = ds_hidden_sppij00500_rslt_list.getColumn(i, "rownum");
				var calcscorcd = ds_hidden_sppij00500_rslt_list.getColumn(i, "calcscorcd");
				var edicd = ds_hidden_sppij00500_rslt_list.getColumn(i, "edicd");
				var newspclcd = ds_hidden_sppij00500_rslt_list.getColumn(i, "spclcd");
				var newspclcdnm = ds_hidden_sppij00500_rslt_list.getColumn(i, "spclcdnm");
				var newspclspec = ds_hidden_sppij00500_rslt_list.getColumn(i, "spclspec");
				var newremfact  = model.getValue("ds_hidden_sppij00500_rslt_list["+ i +"]_remfact ");
				var newdetldesc = ds_hidden_sppij00500_rslt_list.getColumn(i, "detldesc");
				var oldspclcd = ds_hidden_sppij00500_rslt_list.getColumn(i, "oldspclcd");
				var oldspclspec = ds_hidden_sppij00500_rslt_list.getColumn(i, "oldspclspec");

				// 특정코드 추가인 경우
				if (flag == "I") {

					var clcjrow = grd_clcjlist.rows - 1;	// 특정내역 Grid 가장 마지막 줄에 추가한다. 
					grd_clcjlist.insertRow(clcjrow++, true,false,false);

					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("pid")) =  ds_send.getColumn(0, "pid");
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("indd")) =  ds_send.getColumn(0, "indd");
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("cretno")) =  ds_send.getColumn(0, "cretno");
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("fromdd")) =  ds_send.getColumn(0, "fromdd");
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("mskind")) =  ds_send.getColumn(0, "mskind");
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("unitflag")) = "J";
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("calcscorcd"))  = calcscorcd;
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("edicd")) = edicd;
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclcd")) = newspclcd;
					//grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclspec")) = newspclspec;
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("remfact")) = newremfact;
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("detldesc")) = newdetldesc;
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("spclmemoflag")) = "E";
					grd_clcjlist.valueMatrix(clcjrow, grd_clcjlist.colRef("status")) = "3";

					// 처방Grid에서도 해당 줄단위 특정내역의 'T' 컬럼의 "*" 를 표시한다.
					var rowcnt =  ds_main_list2_iscllist.rowcount;		// 필터
					rowcnt = eval(rowcnt) + 1;	
					for (var j = 1; j < rowcnt; j++) {
					//for (var j = 1; j < grd_ordlist.rows; j++) {
						var clcjedicd = ds_main_list2_iscllist.getColumn(j, "edicd");
						if (edicd == clcjedicd) {
							ds_main_list2.setColumn( j , "text", "*");
							//
//model.refresh();
  최적화 문제로 20080731 박창원
						}
					}

				// 특정코드  변경인 경우	
				} else if (flag == "U") {

					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcd")) = newspclcd;
					//grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclcdnm")) = newspclcdnm;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("spclspec")) = newspclspec;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("remfact")) = newremfact;
					grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("detldesc")) = newdetldesc;

					if ( grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) != "3") {
						grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "0";
					}

//model.refresh();

					// 특정코드, 특정내역이 변경되었거나 삭제된 특정코드를 조회하여 "확인"을 선택한 경우
					if (oldspclcd != newspclcd || oldspclspec != newspclspec || grd_clcjlist.rowstatus(row) == 4) {
						var rowstatus = grd_clcjlist.rowstatus(rownum);
						if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
						} else {
							grd_clcjlist.rowstatus(rownum) = 2;		// 2 : update 상태로 stat를 변경한다.
							grd_clcjlist.valueMatrix(rownum, grd_clcjlist.colRef("status")) = "2";
						}
					}

					// 처방Grid에서도 해당 줄단위 특정내역의 'T' 컬럼의 "*" 를 표시한다.
					var rowcnt =  ds_main_list2_iscllist.rowcount;		// 필터
					rowcnt = eval(rowcnt) + 1;
					for (var j = 1; j < rowcnt; j++) {
					//for (var j = 1; j < grd_ordlist.rows; j++) {
						var clcjedicd = ds_main_list2_iscllist.getColumn(j, "edicd");
						if (edicd == clcjedicd) {
							ds_main_list2.setColumn( j , "text", "*");
							//
//model.refresh();
 최적화 문제로 20080731 박창원
						}
					}
					ds_hidden_item1.setColumn( 0, "message", "특정코드 - "+ newspclcd +" / 특정내역 : "+ newspclspec +" / 기재형식 : "+ newremfact);

				// 특정코드 삭제인 경우	
				} else if (flag == "D" && rownum != "" ) {

					var cnt = 0;

					for (var j = 1; j < grd_clcjlist.rows; j++) {
						var clcjedicd = ds_main_list4_clcjlist.getColumn(j, "edicd");
						if (edicd == clcjedicd) {
							if (grd_clcjlist.rowstatus(j) != 4) {
								cnt++;
							}
						}
					}

					if (cnt > 0) {
					} else {
						grd_ordlist.valueMatrix(row, grd_ordlist.colref("text")) = "";
						//model.resetInstanceNode("ds_main_list2_iscllist["+ row +"]_text");
					}

					// 특정내역 Grid에서 삭제
					var rowstatus = grd_clcjlist.rowstatus(rownum);
					if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
						grd_clcjlist.deleteRow(rownum, false);		// 해당 라인을 Grid에서 삭제한다.
					} else {							// 0 : new, 2 : update
						grd_clcjlist.rowstatus(rownum) = 4;		// 4 : delete 상태로 stat를 변경한다.
					}
					grd_clcjlist.row = rownum;

					var rowcnt =  ds_main_list2_iscllist.rowcount;		// 필터
					rowcnt = eval(rowcnt) + 1;
					for (var j = 1; j < rowcnt; j++) {
					//for (var j = 1; j < grd_ordlist.rows; j++) {
						var clcjedicd = ds_main_list2_iscllist.getColumn(j, "edicd");
						if (edicd == clcjedicd) {
							ds_main_list2.setColumn( j , "text", "");
							//
//model.refresh();
 최적화 문제로 20080731 박창원
						}
					}

				} // 특정 코드 상태 따른 if end
			} // for end

			var rdounitflag = ds_send.getColumn(0, "unitflag");

			if (rdounitflag == "-") {
				for (var i=1; i<grd_clcjlist.rows; i++) {
					var delstatus = grd_clcjlist.rowStatus(i);
					var delspclspec = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec"));
					if (delstatus == 1 || delstatus == 3) { 	// 0 : new, 3 : insert & new
						if (delspclspec == "") {
							grd_clcjlist.deleteItem(i);
						}
					}
				}

				// 입력행 추가
				fSpclGridInsertRow();

			} else if (rdounitflag == "M") {							
				grd_clcjlist.attribute("nodeset") = "ds_main_list4_clcjlist[unitflag = 'M']";
				grd_clcjlist.rebuild();
			} else if (rdounitflag == "J") {						
				grd_clcjlist.attribute("nodeset") = "ds_main_list4_clcjlist[unitflag = 'J']";
				grd_clcjlist.rebuild();
			}

			for (var i=1; i<grd_clcjlist.rows; i++) {
				var unitflag =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));
				var status =  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("status"));

				if (status != "") {
					grd_clcjlist.rowStatus(i) = status;
				}

				if (unitflag == "M") {
					grd_clcjlist.cellComboNodeset(i,3) = "ds_init_P0117list_P0117[minval = 'M' and cdid != 'MX999']";	
				} else if (unitflag == "J") {
					grd_clcjlist.cellComboNodeset(i,3) = "ds_init_P0117list_P0117[minval = 'J']";
				}

			}	

		} // 처리 건수  if end

		//
//model.refresh();
 최적화 문제로 대체 20080731 박창원
		model.refreshpart("ds_main_list2_iscllist");
		model.refreshpart("ds_main_list4_clcjlist");

	} else {
		sysf_messageBox("EDI코드가 없는 경우 해당 줄단위 특정내역이", "I004");	///EDI코드가 없는 경우 해당 줄단위 특정내역이 없습니다.
	}
}

function fGetStageTNM(){
	ds_hidden_smpij02000_rslt.clearData();		// SMPIZ02000_환자별암병기분류조회 에서 선택된 결과가 copyNode되는 경로임
	ds_hidden_smpij02000_cond.clearData(); ds_hidden_smpij02000_cond.addRow();

	ds_hidden_smpij02000_cond.setColumn( 0, "pid", ds_main_item1_iteminfo.getColumn(0, "pid"));
	ds_hidden_smpij02000_cond.setColumn( 0, "insuflag", "");

	frmf_modal("SMPIJ02000", "SMPIJ02000", "ds_hidden_smpij02000_cond""-"ds_send_list01"", "", "", "10", "10", "", "", "", "", "", "M");
}

//심사자 메모 팝업 갱신
function fSetJudgMemoRefresh(){

//model.refresh();

	var memo = ds_hidden_sppiz00700_rslt.getColumn(0, "memo");
	var tmp = ds_main_item1_iteminfo.getColumn(0, "judgrmk");
	if(tmp){
		tmp = tmp + " ";
	}
	ds_main_item1_iteminfo.setColumn( 0, "judgrmk",tmp + memo);
	//
//model.refresh();
 최적화 문제로 대체 20080731 박창원

//model.refresh();

}

//EDI 메모 팝업 갱신
function fSetEdiMemoRefresh(){
	var memo = ds_hidden_sppiz00700_rslt.getColumn(0, "memo");
	var tmp = ds_main_item1_iteminfo.getColumn(0, "edirmk");
	if(tmp){
		tmp = tmp + " ";
	}
	ds_main_item1_iteminfo.setColumn( 0, "edirmk",tmp + memo);
	//
//model.refresh();
 최적화 문제로 대체 20080731 박창원

//model.refresh();

}

//확인코드(JT001) 줄단위 특정내역 입력
function fCnfmCdInsert(){
	var trgtManWindow = getChildWindow("SPPIJ00500");
	//var edicd =  ds_main_list2_iscllist.getColumn(grd_ordlist.row, "edicd"));
	var edicd =  grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colref("edicd"));

	var selectededicd  = "";
	var row = 0;
	ds_hidden_sppij00500_rslt.clearData();		// SPPIZ00500_특정내역상세관리 에서 선택된 결과가 copyNode되는 경로임
	ds_hidden_sppij00500_cond.clearData(); ds_hidden_sppij00500_cond.addRow();

	if(edicd){
		for (var i = 1; i < grd_clcjlist.rows; i++) {
			if(edicd == ds_main_list4_clcjlist.getColumn(i, "edicd")){
				ds_hidden_sppij00500_cond.setColumn( 0, "edicd", ds_main_list4_clcjlist.getColumn(i, "edicd"));
				ds_hidden_sppij00500_cond.setColumn( 0, "spclcd", ds_main_list4_clcjlist.getColumn(i, "spclcd"));
				ds_hidden_sppij00500_cond.setColumn( 0, "remfact", ds_main_list4_clcjlist.getColumn(i, "remfact"));
				ds_hidden_sppij00500_cond.setColumn( 0, "spclspec", ds_main_list4_clcjlist.getColumn(i, "spclspec"));
				ds_hidden_sppij00500_cond.setColumn( 0, "row", i);
				selectededicd = edicd;
				row = i;
			}
		}
		//이미 등록된 확인코드가 있는경우
		if(selectededicd){
			ds_hidden_sppij00500_cond.setColumn( 0, "unitflag", "J");		

			var chk = ds_hidden_sppij00500_cond.getColumn(0, "spclcd");
			if(chk == "JT001"){
				ds_hidden_sppiz01100_rslt.clearData();
				dsf_makeValue( ds_hidden_sppiz01100_cond, "code", "string",  ds_hidden_sppij00500_cond.getColumn(0, "spclspec"));
				dsf_makeValue( ds_hidden_sppiz01100, "edicd", "string",  edicd);
				frmf_modal("SPPIZ01100", "SPPIZ01100", "ds_hidden_sppiz01100""-"ds_init_sppiz01100"", "", "", "10", "10", "", "", "", "", "", "M");		// SPPIZ01100_확인코드조회
				if (instance1.selectSingleNode("ds_hidden_sppiz01100_rslt")) {
					ds_main_list4.setColumn( row , "spclspec", ds_hidden_sppiz01100_rslt.getColumn(0, "code"));
					//Combo 줄단위 코드로 셋팅
					grd_clcjlist.cellComboNodeset(row,3) = "ds_init_P0117list_P0117[minval = 'J']";
					grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colref("cnfmcd")) = ds_hidden_sppiz01100_rslt.getColumn(0, "code");

//model.refresh();

					fSpclGridInsertRow() ;
				}
			}
		//등록된 확인코드가 없으면 신규로 발생시켜준다. 
		}else{

			ds_hidden_sppiz01100_rslt.clearData();
			dsf_makeValue( ds_hidden_sppiz01100_cond, "code", "string",  "");
			frmf_modal("SPPIZ01100", "SPPIZ01100", "ds_hidden_sppiz01100""-"ds_init_sppiz01100"", "", "", "10", "10", "", "", "", "", "", "M");		// SPPIZ01100_확인코드조회

			if (instance1.selectSingleNode("ds_hidden_sppiz01100_rslt")) {
					fSpclGridInsertRow() ;

					var row = grd_clcjlist.rows - 1;
					//Combo 줄단위 코드로 셋팅
					grd_clcjlist.cellComboNodeset(row,3) = "ds_init_P0117list_P0117[minval = 'J']";

					ds_main_list4.setColumn( row , "edicd", edicd);
					ds_main_list4.setColumn( row , "spclcd", "JT001");
					ds_main_list4.setColumn( row , "unitflag","J");
					ds_main_list4.setColumn( row , "spclmemoflag","E" );
					ds_main_list4.setColumn( row , "remfact", "X(5)");
					ds_main_list4.setColumn( row , "spclspec", ds_hidden_sppiz01100_rslt.getColumn(0, "code"));

					grd_ordlist.valueMatrix(grd_ordlist.row, grd_ordlist.colref("cnfmcd")) = ds_hidden_sppiz01100_rslt.getColumn(0, "code");
					//ds_main_list2.setColumn( 0, "iscllist[" + grd_ordlist.row + "]_cnfmcd",ds_hidden_sppiz01100_rslt.getColumn(0, "code"));
					fSpclGridInsertRow() ;
			}
		}
		//특정내역이 있는 처방에 'T'필드에 *표를 해준다. 
		//fSetOrdSpclTxt();
	}

}
///////////////////////////////////////////////////////////////////////////
//특정내역 관련 코딩 종료										    //
///////////////////////////////////////////////////////////////////////////

///////////////////////////////////////////////////////////////////////////
// 조합기호(ipt_cmpyno)를 입력하면 해당 조합명칭을 조회한다.
function fGetCmpyNm() {
	/*var rrgstno = ds_main_item1_iteminfo.getColumn(0, "rrgstno");
	rrgstno = rrgstno.replace("-","");

	//보험증번호 조회(보험자격조회)
	var parm = rrgstno + "▦" + //주민번호
	    	        ds_main_item1_iteminfo.getColumn(0, "patnm") + "▦" + //이름
	    	        ds_main_item1_iteminfo.getColumn(0, "indd") + "▦";//진료일자

	frmf_setParameter("SPPMC03700_PARM",parm);
	frmf_setParameter("SPPMC03700_RTN","");

	frmf_modal("SPPMC03700", "SPPMC03700", ""-"", "", "1", "400", "400", "", "", "", "", "", "M"); */

}

//보조유형이 바뀌는경우 
function fSetPatSuppRate() {
	// 보조유형ID과 요율%로 combo 의 value 
	// 보조유형NM과 요율%로 combo 의 label
	//cmb_suppkind.choices.itemset.attribute("nodeset") = "ds_main_item4_insu[suppkind = '"+ cmb_suppkind.value +"']";
	var suppkindcd = ds_main_item4_insu.getColumn(0, "suppkind");
	var payownbrate = ds_main_item4_insu.getColumn(0, "ownbrate");
	ds_main_item1_iteminfo.setColumn( 0, "suppkindcd", suppkindcd);
	ds_main_item1_iteminfo.setColumn( 0, "ownrate", payownbrate);

	if(payownbrate == "20"){
		opt_suppkind.attribute("class") = "output_fix";
	}else{
		opt_suppkind.attribute("color") = "#ff0066";			
	}
	//
//model.refresh();
 최적화 문제로 대체 20080731 박창원
	model.refreshpart("ds_main_item1_iteminfo");
}

///////////////////////////////////////////////////////////////////////////
//처방 관련 코딩 시작										    //
///////////////////////////////////////////////////////////////////////////

//처방조회 옵션에 항목구분에 처방이 있는 것만 Bold로 보여준다. 
//이건 처음에 로드했을때 한번만 도는것이라서 따로 분리하여 만듬. 2007.09.09 박도형
// 최적화 문제로 else if를 사용하여 수정 - 20081017 박창원
function fSetItemBold(){
	rdo_ordfilflag.item(0).attribute("font-weight") = "bold"; // "전체" 항목은 default 로 굵게 표시한다.
	//우선 초기화를 한다. 
	rdo_ordfilflag.item(1).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(2).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(3).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(4).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(5).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(6).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(7).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(8).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(9).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(10).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(11).attribute("font-weight") = "normal"; 
	rdo_ordfilflag.item(12).attribute("font-weight") = "normal"; 

	// 처방 조회부 항목구분 Radio에서 해당 처방이 있는 item을 굵게 표시한다.
	var item1 = ds_main_list2_iscllist.lookupExpr("item1 == '" + 01 + "'", "item1"); //항목구분 에 Bold처리하기 위한 체크
	var item2 = ds_main_list2_iscllist.lookupExpr("item1 == '" + 02 + "'", "item1");
	var item3 = ds_main_list2_iscllist.lookupExpr("item1 == '" + 03 + "'", "item1");
	var item4 = ds_main_list2_iscllist.lookupExpr("item1 == '" + 04 + "'", "item1");
	var item5 = ds_main_list2_iscllist.lookupExpr("item1 == '" + 05 + "'", "item1");
	var item6 = ds_main_list2_iscllist.lookupExpr("item1 == '" + 06 + "'", "item1");
	var item7 = ds_main_list2_iscllist.lookupExpr("item1 == '" + 07 + "'", "item1");
	var item8 = ds_main_list2_iscllist.lookupExpr("item1 == '" + 08 + "'", "item1");
	var item9 = ds_main_list2_iscllist.lookupExpr("item1 == '" + 09 + "'", "item1");
	var item10 = ds_main_list2_iscllist.lookupExpr("item1 == '" + 10 + "'", "item1");
	var itemSS = ds_main_list2_iscllist.lookupExpr("item1 == '" + SS + "'", "item1");
	var itemAA = ds_main_list2_iscllist.lookupExpr("item1 == '" + AA + "'", "item1");
	var itemBB = ds_main_list2_iscllist.lookupExpr("item1 == '" + BB + "'", "item1");

	if (item1 == "01") {
		rdo_ordfilflag.item(1).attribute("font-weight") = "bold"; 
	}
	if (item2 == "02") {
		rdo_ordfilflag.item(2).attribute("font-weight") = "bold"; 
	}
	if (item3 == "03") {
		rdo_ordfilflag.item(3).attribute("font-weight") = "bold"; 
	}
	if (item4 == "04") {
		rdo_ordfilflag.item(4).attribute("font-weight") = "bold"; 
	}
	if (item5 == "05") {
		rdo_ordfilflag.item(5).attribute("font-weight") = "bold"; 
	}
	if (item6 == "06") {
		rdo_ordfilflag.item(6).attribute("font-weight") = "bold"; 
	}
	if (item7 == "07") {
		rdo_ordfilflag.item(7).attribute("font-weight") = "bold"; 
	}
	if (item8 == "08") {
		rdo_ordfilflag.item(8).attribute("font-weight") = "bold"; 
	}
	if (item9 == "09") {
		rdo_ordfilflag.item(9).attribute("font-weight") = "bold"; 
	}
	if (item10 == "10") {
		rdo_ordfilflag.item(10).attribute("font-weight") = "bold"; 
	}
	if (itemSS == "SS") {
		rdo_ordfilflag.item(11).attribute("font-weight") = "bold"; 
	}
	if (itemAA == "AA" || itemBB == "BB" ) {
		rdo_ordfilflag.item(12).attribute("font-weight") = "bold"; 
	}	
}

// 20091126 수정추가 JHP 요청번호 8496, 주사제 4항1목, 마취제 5항 1목에 대해 1회량이 20이 넘으면 메세지 처리요청 ####################시작
function fChkinjanstmsg(){
	var visualcalcscorcd = "-";
	// SNGLEARNCLS - > 05, 04, 09 (처방분류에서 주사제_내분비대사/ Insulin&Antidiabetics 제외) 구현해야함.
	// 20091130 JHP snglearncls값 확인하여 050409값일때는 메세지 처리 제외한다. 
	// 처방for 로직 수정 속도개선 plet2 
	var nodelist  = model.instances(0).selectNodes("ds_main_list2_iscllist[item1='04' and item2='01' and calcqty>= 20 and snglearncls!='050409']_snglcalcscorcd");
	if (nodelist.length > 0) {
		var i=0;
		while(nodelist.nextNode()){
			visualcalcscorcd = visualcalcscorcd + ', ' + nodelist.item(i).value;
			++i;
		}
	}

	if(visualcalcscorcd != "-"){
		sysf_messageBox("1회량 20이상인 주사제가 존재합니다.(인슐린제외) \n\n(" + visualcalcscorcd + ")\n\n","I007");
	}
}

// 항목별소계
function fSetItemSubTotal() {
	grd_ordlist.rebuildStyle();
	grd_ordlist.rebuild();

	// ****************************************************************************************************************
	// 항목별 소계 subtotal   김상진 20101122								
	// ****************************************************************************************************************
	// #ffff0|		밝은노랑
	// #d9e3fe 	옅은파랑
	// #eeddff	옅은보라
	// #b9fcf8	밝은하늘
	// #cefcfa	옅은하늘
	var grdobj = document.controls.item("grd_ordlist");
	if (model.getValue(chk_showsubtotal.attribute("ref")) == "Y") {
		var col_hngnm = grdobj.colRef("hngnm");
		var col_item1 = grdobj.colRef("item1");
		var subtot_style = "background-color:#cefcfa; color:#0000ff;font-weight:bold;"
		var subtot_fromat = "format:(-)#,###; roundmode:round; roundposition:0"
		grdobj.subtotalposition= "below";					
		grdobj.subtotal("sum", col_item1, grdobj.colRef("hospaddamt"),subtot_fromat, subtot_style, col_hngnm, col_hngnm, true);
		grdobj.subtotal("sum", col_item1, grdobj.colRef("specamt"),subtot_fromat, subtot_style, col_hngnm, col_hngnm, true);				
		grdobj.subtotal("sum", col_item1, grdobj.colRef("totordamt"),subtot_fromat, subtot_style, col_hngnm, col_hngnm, true);
		grdobj.subtotal("sum", col_item1, grdobj.colRef("calcamt"),subtot_fromat, subtot_style, col_hngnm, col_hngnm, true);

		var srchnm = "";
		var fild1 = "0";
		var rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_item1, true, true);
		while( rowno > 0){
			var fild1 = "0";
			fild1 = grd_ordlist.valueMatrix(rowno, col_hngnm);
			if(fild1 == "01"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "진찰료 소계";
			}else if(fild1== "02"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "입원료 소계";
			}else if(fild1 == "03"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "투약료 소계";
			}else if(fild1 == "04"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "주사료 소계";
			}else if(fild1 == "05"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "마취료 소계";
			}else if(fild1 == "06"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "이학료 소계";
			}else if(fild1 == "07"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "정신료 소계";
			}else if(fild1 == "08"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "수술료 소계";
			}else if(fild1 == "09"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "검사료 소계";
			}else if(fild1 == "10"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "방사선 소계";
			}else if(fild1 == "SS"){
				grd_ordlist.valueMatrix(rowno, col_hngnm) = "특수 소계";
			} 
			rowno = grdobj.findRow(srchnm, rowno + 1,col_item1,true,true);
		}
	}
}

//범례 색깔을 표시한다.
function fSetColorSpclJudgOrder() {
	//일단 수정변경 : 20090915 : JHP 필터기능으로 숨김기능이 제어가 되어서 for문을 돌릴때 i의 제어가 어렵다 하여 datagrid의 rows로 for문을 돌리는걸로 변경한다. 										
	if (model.getValue(chk_showitemcoloryn.attribute("ref")) == "Y") {
		fSetOrderColorByEdiitem();
	}
	//Color 표시 범례
	//1. 문제처방 : #fcd2c1
	//2. 선별심사 : #ffe79d
	//3. 선별심사 + 문제처방 : #7BE6B7
	//4. 야간, 공휴가산 : #ffff00(밝은노랑)
	//선별심사, 문제처방 체크 (기왕증, CP보다 우선시 한다. -심사자가 기왕증 ,CP여부를 확인하고 문제처방을 한경우 임으로)	
	var grdobj = document.controls.item("grd_ordlist");
	var col_hngnm = grdobj.colRef("hngnm");

	var col_probordyn = grdobj.colRef("probordyn");
	var srchnm = "Y";
	var spcljudgyn = "";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_probordyn, true, true);
	while( rowno > 0){
		grd_ordlist.setCellProprty("body", rowno, "background", "#fcd2c1"); grd_ordlist.setCellProperty("body", rowno, "background2", "#fcd2c1");
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_probordyn, true, true);
	}

	var col_spcljudgyn = grdobj.colRef("spcljudgyn");
	var probordyn = "";
	var rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_spcljudgyn, true, true);
	while( rowno > 0){
		grd_ordlist.setCellProprty("body", rowno, "background", "#ffe79d"); grd_ordlist.setCellProperty("body", rowno, "background2", "#ffe79d");
		probordyn = grdobj.valueMatrix(rowno, col_probordyn);
		if (probordyn == "Y"){ //둘다 체크된경우
			grd_ordlist.setCellProprty("body", rowno, "background", "#7BE6B7"); grd_ordlist.setCellProperty("body", rowno, "background2", "#7BE6B7");
		} 
		rowno =  grdobj.findRow(srchnm,rowno + 1 ,col_spcljudgyn, true, true);
	}

	// 야간가산(산정의미 두번째 "1'), 공휴가산(산정의미 두번째자리 "5")
	var col_estmmeancd = grdobj.colRef("estmmeancd");
	var col_pay100 = grdobj.colRef("pay100");
	srchnm = "1";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_estmmeancd, false, false);
	while( rowno > 0){
		if ( grdobj.valueMatrix(rowno,col_estmmeancd).substr(1, 1) == srchnm ){
			grdobj.cellStyle("background-color", rowno, col_estmmeancd, rowno, col_pay100) = "#ffff00";
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_estmmeancd, false, false);
	}
	// 야간가산(산정의미 두번째 "1'), 공휴가산(산정의미 두번째자리 "5")

	srchnm = "5";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_estmmeancd, false, false);
	while( rowno > 0){
		if ( grdobj.valueMatrix(rowno,col_estmmeancd).substr(1, 1) == srchnm ){
			grdobj.cellStyle("background-color", rowno, col_estmmeancd, rowno, col_pay100) = "#ffff00";
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_estmmeancd, false, false);
	}

	//응급가산 ( '2','3','P','Q' ) 
	var erindt = ds_main_item1_iteminfo.getColumn(0, "erindt");
	var eroutdt = ds_main_item1_iteminfo.getColumn(0, "eroutdt");
	var outdate = eroutdt.toDate("YYYYMMDDhhmm").getDateFormat("YYYYMMDDhhmm");
	var in24date = erindt.toDate("YYYYMMDDhhmm").getAddDate(24,"h").getDateFormat("YYYYMMDDhhmm");
	var basedate = "";
	var execddtm = "";

	if (outdate < in24date ) {
		basedate = outdate;
	} else {
		basedate = in24date;
	}

	srchnm = "2";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_estmmeancd, false, false);
	while( rowno > 0){
		if ( grdobj.valueMatrix(rowno,col_estmmeancd).substr(1, 1) == srchnm ){
			execddtm =grdobj.valueMatrix(rowno,grdobj.colRef("execddtm")).toDate("YYYYMMDDhhmm").getDateFormat("YYYYMMDDhhmm") ;
			if (execddtm > basedate) {
				grdobj.cellStyle("background-color", rowno, col_estmmeancd, rowno, col_pay100) = "#ffff00";
			}
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_estmmeancd, false, false);
	}

	srchnm = "3";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_estmmeancd, false, false);
	while( rowno > 0){
		if ( grdobj.valueMatrix(rowno,col_estmmeancd).substr(1, 1) == srchnm ){
			execddtm =grdobj.valueMatrix(rowno,grdobj.colRef("execddtm")).toDate("YYYYMMDDhhmm").getDateFormat("YYYYMMDDhhmm") ;
			if (execddtm > basedate) {
				grdobj.cellStyle("background-color", rowno, col_estmmeancd, rowno, col_pay100) = "#ffff00";
			}
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_estmmeancd, false, false);
	}

	srchnm = "P";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_estmmeancd, false, false);
	while( rowno > 0){
		if ( grdobj.valueMatrix(rowno,col_estmmeancd).substr(1, 1) == srchnm ){
			execddtm =grdobj.valueMatrix(rowno,grdobj.colRef("execddtm")).toDate("YYYYMMDDhhmm").getDateFormat("YYYYMMDDhhmm") ;
			if (execddtm > basedate) {
				grdobj.cellStyle("background-color", rowno, col_estmmeancd, rowno, col_pay100) = "#ffff00";
			}
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_estmmeancd, false, false);
	}

	srchnm = "Q";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_estmmeancd, false, false);
	while( rowno > 0){
		if ( grdobj.valueMatrix(rowno,col_estmmeancd).substr(1, 1) == srchnm ){
			execddtm =grdobj.valueMatrix(rowno,grdobj.colRef("execddtm")).toDate("YYYYMMDDhhmm").getDateFormat("YYYYMMDDhhmm") ;
			if (execddtm > basedate) {
				grdobj.cellStyle("background-color", rowno, col_estmmeancd, rowno, col_pay100) = "#ffff00";
			}
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_estmmeancd, false, false);
	}

	//DRG 수술구분
	var col_drgopyn = grdobj.colRef("drgopyn");
	srchnm = "Y";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_drgopyn, true, true);
	while( rowno > 0){
		grdobj.cellStyle("background-color", rowno, col_pay100, rowno, col_pay100) = "#fec34d";
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_drgopyn, true, true);
	}

	// 급여구분 본인부담, 일반  색깔구분
	var col_calcpayflag = grdobj.colRef("calcpayflag");
	srchnm = "1";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_calcpayflag, true, true);
	while( rowno > 0){
		grdobj.cellStyle("background-color", rowno, col_calcpayflag, rowno, col_calcpayflag) = "#00ff00";
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_calcpayflag, true, true);
	}
	srchnm = "2";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_calcpayflag, true, true);
	while( rowno > 0){
		var pynpy = grdobj.valueMatrix(rowno,grdobj.colRef("pynpy"));
		if (pynpy != 0) {
			grdobj.cellStyle("background-color", rowno, col_calcpayflag, rowno, col_calcpayflag) = "#ccccff";
		} else {
			grdobj.cellStyle("background-color", rowno, col_calcpayflag, rowno, col_calcpayflag) = "#ff99cc";
		}
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_calcpayflag, true, true);
	}

	// 외래 필수심사 품목 표기
	var col_bfjudgyn = grdobj.colRef("bfjudgyn");
	srchnm = "Y";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_bfjudgyn, true, true);
	while( rowno > 0){
		grdobj.cellStyle("background-color", rowno, col_hngnm, rowno, col_hngnm) = "#f7a08b";
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_bfjudgyn, true, true);
	}

	// 응급수가 표기 : 별표1 (2015.12.30.LEJ)
	var col_pordarcptyn = grdobj.colRef("pordarcptyn");
	srchnm = "1";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_pordarcptyn, true, true);
	while( rowno > 0){
		grdobj.cellStyle("background-color", rowno, col_pordarcptyn, rowno, col_pordarcptyn) = "#66CCFF";
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_pordarcptyn, true, true);
	}

	// 응급수가 표기 : 별표2 (2015.12.30.LEJ)
	var col_pordarcptyn = grdobj.colRef("pordarcptyn");
	srchnm = "2";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_pordarcptyn, true, true);
	while( rowno > 0){
		grdobj.cellStyle("background-color", rowno, col_pordarcptyn, rowno, col_pordarcptyn) = "#FF66FF";
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_pordarcptyn, true, true);
	}

	// 응급수가 표기 : 별표3 (2015.12.30.LEJ)
	var col_pordarcptyn = grdobj.colRef("pordarcptyn");
	srchnm = "3";
	rowno = grdobj.findRow(srchnm,grdobj.fixedrows ,col_pordarcptyn, true, true);
	while( rowno > 0){
		grdobj.cellStyle("background-color", rowno, col_pordarcptyn, rowno, col_pordarcptyn) = "#339933";
		rowno = grdobj.findRow(srchnm,rowno + 1 ,col_pordarcptyn, true, true);
	}

	var spclcnt = grd_clcjlist.rows;
	var col_edicd = grdobj.colRef("edicd");
	var spclcd = "";
	var spclspec = "";
	var spcledicd = "";
	var spclunitflag = "";
	for (var i = 0; i < spclcnt; i++) {
		spclcd = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd"));
		spclspec = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclspec"));
		spcledicd = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("edicd"));
		spclunitflag = grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("unitflag"));

		if (spclunitflag == 'J') {  // 줄단위 특정내역인 경우만 적용한다. (2015.03.30 LEJ)
			rowno = grdobj.findRow(spcledicd,grdobj.fixedrows ,col_edicd, true, true);
			while( rowno > 0){
				if(spclcd == "JT001"){						
					grdobj.valueMatrix(rowno,grdobj.colRef("cnfmcd")) =  spclspec;
				}else{
					grdobj.valueMatrix(rowno,grdobj.colRef("text")) =  "*";
				}
				rowno = grdobj.findRow(spcledicd,rowno + 1 ,col_edicd, true, true);
			}
		}
	}
}

//특정내역이 있는 처방에 'T'필드에 *표를 해준다. 
function fSetOrdSpclTxt(){
	var cSrcNode = instance1.selectSingleNode("ds_main_list2_iscllist");
	if (cSrcNode == null) {	// 특정내역이 없는 경우임
		return;
	}

	var rowcnt =  ds_main_list2_iscllist.rowcount;
	rowcnt = eval(rowcnt) + 1;

	// grd_clcjlist.findRow 로 변경(최적화문제) - 20081017 박창원
	for (var i = 1; i < rowcnt ; i++) {	// Grid 필터링 이후  Grid 상에 표시된 처방 개수만큼 돌면서				
		var edicd = ds_main_list2_iscllist.getColumn(i, "edicd");
		var spcl = grd_clcjlist.rows;
		ds_main_list2.setColumn( i , "text", "");
		if(spcl > 0){

			if (edicd != "") {
				var row = grd_clcjlist.findRow(edicd, 0, grd_clcjlist.colRef("edicd"), false, true);

				if ( row > 0 ) {

					var spclcd = ds_main_list4_clcjlist.getColumn(row, "spclcd"));
					var spclspec = ds_main_list4_clcjlist.getColumn(row, "spclspec"));
					var spcledicd = ds_main_list4_clcjlist.getColumn(row, "spcledicd"));

					if(edicd == spcledicd){
						if(spclcd == "JT001"){						
							ds_main_list2.setColumn( i , "cnfmcd", spclspec);
						}else{
							ds_main_list2.setColumn( i , "text", "*");
						}
					}				
				}						
			}
		}
	}				

//grd_ordlist.refresh();

}

// 처방 치식 입력
function fOrderToothInput() {
	var row = grd_ordlist.mouseRow;
	ds_hidden_sppiz00600_cond.setColumn( 0, "pid", ds_main_item1_clbs.getColumn(0, "pid"));
	ds_hidden_sppiz00600_cond.setColumn( 0, "toot", ds_main_list2_clod.getColumn(row, "toot")));
	ds_hidden_sppiz00600_rslt.clearData();	// SPPIZ00600_상병및처방별치식 에서 선택된 결과가 copyNode되는 경로임
	frmf_modal("SPPIZ00600", "SPPIZ00600", "ds_hidden_sppiz00600_cond""-"ds_hidden_cond"", "", "", "10", "10", "", "", "", "", "", "M");	// SPPIZ00600_상병및처방별치식.xrw
	var tootSelect = instance1.selectSingleNode("ds_hidden_sppiz00600_rslt");
	if (tootSelect != null) {	// 취소를 누른 경우를 제외시킴
		var toot = ds_hidden_sppiz00600_rslt.getColumn(0, "toot");
		ds_main_list3.setColumn( row , "toothYN", ds_hidden_sppiz00600_rslt.getColumn(0, "toothYN"));
		ds_main_list3.setColumn( row , "toot", toot);

//model.refresh();

		if (ds_hidden_sppiz00600_cond.getColumn(0, "toot") != toot) {	// 치식번호가 변경된 경우
			var diagstatus = grd_diaglist.rowstatus(row);
			if (diagstatus == 0 || diagstatus == 2) {		// 0 : new, 2 : update
				grd_diaglist.rowstatus(row) = 2;		// 2 : update
			}	
		}
	}
}

///////////////////////////////////////////////////////////////////////////
//처방 관련 코딩 끝										    //
///////////////////////////////////////////////////////////////////////////

///////////////////////////////////////////////////////////////////////////
//저장로직 관련 코딩 시작										    //
///////////////////////////////////////////////////////////////////////////
//저장로직
function fSaveMain(flag){

	// 1. 기본적인 누락정보를 확인한다.
	if (fCheckSave()){
	} else {
		return false;
	}

	fSaveAll();

	//fGetItemInfo();
	//보험, 급여환자인경우는 중증여부를 체크한다. 
	var chkInsukind = ds_main_item1_iteminfo.getColumn(0, "insukindcd");
	if(chkInsukind == "11" || chkInsukind == "21" || chkInsukind == "22"){
		if (flag != "P") {
		//1. 중증, 산정특례 변경 여부 체크
		fUpdtCheckEssc(flag);
		}
	}
	return true;
}

function fSaveAll(){

	ds_send_item1.setColumn( 0, "iteminfo",getNodeListCSV(instance1.selectNodes("ds_main_item1_iteminfo")));

	//상병은 전체 삭제 날리고 다시 insert시킨다. 
	//빈데이터를 삭제한다.
	var rowcnt  = grd_diaglist.rows;
	for (var i = rowcnt; i > 0; i--) {	// Grid 필터링 이후  Grid 상에 표시된 처방 개수만큼 돌면서
		var diagcd = ds_main_list3_diaglist.getColumn(i, "diagcd");
		if(diagcd == ""){
			grd_diaglist.deleteRow(i, false);					
		}else{
			grd_diaglist.rowstatus(i) = 3;
		}
	}
	var updtdiag = getGridUpdateData(grd_diaglist);

	if(updtdiag) {
		ds_send.setColumn( 0, "diaglist",grd_diaglist.getUpdateData());
	}

	if (btn_save.disabled == false) {
		//빈데이터를 삭제한다.  				
		for (var i = 1; i < grd_clcjlist.rows; i++) {	// Grid 필터링 이후  Grid 상에 표시된 특정내역 개수만큼 돌면서
			var spclcd = ds_main_list4_clcjlist.getColumn(i, "spclcd");

			if(spclcd == ""){
				var rowstatus = grd_clcjlist.rowstatus(i);
				if (rowstatus == 4) {		// 4 : delete
					return;
				}
				else if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
					grd_clcjlist.deleteRow(i, false);		// 해당 라인을 Grid에서 삭제한다.
				} else {							// 0 : new, 2 : update
					grd_clcjlist.rowstatus(i) = 4;		// 4 : delete 상태로 stat를 변경한다.
				}
			}

		}

		var updtclcj = getGridUpdateData(grd_clcjlist);
		if(updtclcj) {
			ds_send.setColumn( 0, "clcjlist",grd_clcjlist.getUpdateData());
			//if ( submit("TXPIJ00303") ) {
				//삭제였던 특정내역은 그리드에서 지워 버린다. 

				for (var d = grd_clcjlist.rows; d > 0 ; d--) {
					var delstatus = grd_clcjlist.rowstatus(d);
					if(delstatus ==  4){
						grd_clcjlist.deleteRow(d, false);		// 해당 라인을 Grid에서 삭제한다.
					}
				}
				grd_clcjlist.clearStatus();
		//	}
		}

		//저장후 빈행을 추가해 준다. 
		fSpclGridInsertRow() ;
	}

	//특정내역 처리 
	var judgrmk = ds_main_item1_iteminfo.getColumn(0, "judgrmk");
	var edirmk = ds_main_item1_iteminfo.getColumn(0, "edirmk");
	var tstrmk = ds_main_item1_iteminfo.getColumn(0, "tstrmk");
	var dumprmk = ds_main_item1_iteminfo.getColumn(0, "dumprmk");
//	var tmpedirmk = strTrim(edirmk);
	ds_main_list5.clearData();	

	if(judgrmk){
		fSetJudgEDIMemo(judgrmk, "Y");
	}

	if(edirmk){
		fSetJudgEDIMemo(edirmk, "N");
	}

	if(tstrmk){
		fSetJudgEDIMemo(tstrmk, "T");
	}
	if(dumprmk){
		fSetJudgEDIMemo(dumprmk, "D");
	}
	ds_send.setColumn( 0, "spclspec",getNodeListCSV(instance1.selectNodes("ds_main_list5_judgrmk")));

//	submit("TXPIJ00309",false);
var oParam = {};
    oParam.id          = "TXPIJ00309";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveAll";
    oParam.inds        = "req=ds_ diagreq=ds_ clcjreq=ds_ spclreq=ds_";
    oParam.outds       = "ds_=vcode ds_=rareessc ds_=chkesscedi ds_=getdschcalccheck ds_=drginfo";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00309";

tranf_submit(oParam);
/*
function cf_TXPIJ00309(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00309(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00309") > -1
arErrorCode.pop("TXPIJ00309") < 0
*/



}
//저장전 데이터 유효성을 점검한다. 
function fCheckSave(){

	var bfmonth6 = VAL_today.toDate().getAddDate(-180,'D');
	var brthdd = ds_main_item1_iteminfo.getColumn(0, "brthdd").toDate();
	var snglcalcscorcls0210 = model.getValue("ds_main_list2_iscllist[snglcalcscorcls='0210' and calcpayflag='0' and snglcalcscorcd != 'Z9000' and snglcalcscorcd != 'Z9000-1' and snglcalcscorcd != 'Q9140001' and snglcalcscorcd != 'Q9140002']_snglcalcscorcls");
	var snglcalcscorcls0211 = model.getValue("ds_main_list2_iscllist[snglcalcscorcls='0211' and calcpayflag='0' and snglcalcscorcd != 'Z9000' and snglcalcscorcd != 'Z9000-1' and snglcalcscorcd != 'Q9140001' and snglcalcscorcd != 'Q9140002']_snglcalcscorcls");

	if ((bfmonth6 <= brthdd ) &&  (snglcalcscorcls0210 !=  "" || snglcalcscorcls0211 !=  "") ) {
		if (sysf_messageBox("6개월 미만 소아환자에게 식이 청구되었습니다. 확인바랍니다. 저장","S001") == 6) {
			return true;
		} else {
			return false;
		}
	} else {
		return true;
	}
}

//상병리스트를 저장한다. 
function fSaveDiagList(){
	//상병은 전체 삭제 날리고 다시 insert시킨다. 
	//빈데이터를 삭제한다.
	var rowcnt  = grd_diaglist.rows;
	for (var i = rowcnt; i > 0; i--) {	// Grid 필터링 이후  Grid 상에 표시된 처방 개수만큼 돌면서
		var diagcd = ds_main_list3_diaglist.getColumn(i, "diagcd");
		if(diagcd == ""){
			grd_diaglist.deleteRow(i, false);					
		}else{
			grd_diaglist.rowstatus(i) = 3;
		}
	}
	var updtdiag = getGridUpdateData(grd_diaglist);

	if(updtdiag) {
		ds_send.setColumn( 0, "diaglist",grd_diaglist.getUpdateData());
//		if ( submit("TXPIJ00302",false) ) {
var oParam = {};
    oParam.id          = "TXPIJ00302";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveDiag";
    oParam.inds        = "req=ds_ iteminfo=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00302";

tranf_submit(oParam);
/*
function cf_TXPIJ00302(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00302(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00302") > -1
arErrorCode.pop("TXPIJ00302") < 0
*/


		}
	}

	model.refreshpart("ds_main_list3_diaglist");
}

//특정내역을 저장 한다.
function fSaveClcjList(){
	if (btn_save.disabled == false) {
		//빈데이터를 삭제한다.  				
		for (var i = 1; i < grd_clcjlist.rows; i++) {	// Grid 필터링 이후  Grid 상에 표시된 특정내역 개수만큼 돌면서
			var spclcd = ds_main_list4_clcjlist.getColumn(i, "spclcd");

			if(spclcd == ""){
				var rowstatus = grd_clcjlist.rowstatus(i);
				if (rowstatus == 4) {		// 4 : delete
					return;
				}
				else if (rowstatus == 1 || rowstatus == 3) {	// 1 : insert, 3 : insert & new
					grd_clcjlist.deleteRow(i, false);		// 해당 라인을 Grid에서 삭제한다.
				} else {							// 0 : new, 2 : update
					grd_clcjlist.rowstatus(i) = 4;		// 4 : delete 상태로 stat를 변경한다.
				}
			}

		}

		var updtclcj = getGridUpdateData(grd_clcjlist);
		if(updtclcj) {
			ds_send.setColumn( 0, "clcjlist",grd_clcjlist.getUpdateData());
//			if ( submit("TXPIJ00303",false) ) {
var oParam = {};
    oParam.id          = "TXPIJ00303";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveClcj";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00303";

tranf_submit(oParam);
/*
function cf_TXPIJ00303(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00303(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00303") > -1
arErrorCode.pop("TXPIJ00303") < 0
*/


				//삭제였던 특정내역은 그리드에서 지워 버린다. 

				for (var d = grd_clcjlist.rows; d > 0 ; d--) {
					var delstatus = grd_clcjlist.rowstatus(d);
					if(delstatus ==  4){
						grd_clcjlist.deleteRow(d, false);		// 해당 라인을 Grid에서 삭제한다.
					}
				}
				grd_clcjlist.clearStatus();
			}
		}

		//저장후 빈행을 추가해 준다. 
		fSpclGridInsertRow() ;
	}
}

//인적사항 저장
function fSaveItemInfo(){
//	submit("TXPIJ00301",false);
var oParam = {};
    oParam.id          = "TXPIJ00301";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveInpt";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00301";

tranf_submit(oParam);
/*
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00301") > -1
arErrorCode.pop("TXPIJ00301") < 0
*/


}

function strTrim(str){
    return str.replace(/(^\s*)|(\s*$)_g, "");
}
//심사제 메모를 저장한다. 
function fSaveJudgrmk(){
	//특정내역 처리 
	var judgrmk = ds_main_item1_iteminfo.getColumn(0, "judgrmk");
	var edirmk = ds_main_item1_iteminfo.getColumn(0, "edirmk");
	var tstrmk = ds_main_item1_iteminfo.getColumn(0, "tstrmk");
//	var tmpedirmk = strTrim(edirmk);
	ds_main_list5.clearData();	

	if(judgrmk){
		fSetJudgEDIMemo(judgrmk, "Y");
	}

	//if(edirmk){
		fSetJudgEDIMemo(edirmk, "N");
	//}

	if(tstrmk){
		fSetJudgEDIMemo(tstrmk, "T");
	}

	ds_main_item1_iteminfo.setColumn( 0, "judgrmk_orign",judgrmk);
	ds_main_item1_iteminfo.setColumn( 0, "edirmk_orign",edirmk);
	ds_main_item1_iteminfo.setColumn( 0, "tstrmk_orign",tstrmk);

//	submit("TXPIJ00304",false);
var oParam = {};
    oParam.id          = "TXPIJ00304";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveJudgrmk";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00304";

tranf_submit(oParam);
/*
function cf_TXPIJ00304(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00304(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00304") > -1
arErrorCode.pop("TXPIJ00304") < 0
*/



}

//원무 계산서를 작성한다. 
function  fSaveCalcAmt(flag){

	var cnt = 1;
	var pid = ds_send.getColumn(0, "pid");
	var indd = ds_send.getColumn(0, "indd");
	var futureinsuyn = ds_main_item1_iteminfo.getColumn(0, "futureinsuyn");

	ds_send_insulist.clearData(); ds_send_insulist.addRow();
	var instcd = ds_main_item1_iteminfo.getColumn(0, "instcd");

	dsf_makeValue( ds_send, "insu", "string", "" );
	ds_send_insu.copyData(ds_main_list1);

	var nodecnt = ds_send_insu_insulist.rowcount;

	// 배열 생성
	var insuArray = new Array(nodecnt);
	for (var i = 0; i<nodecnt; i++) {
		insuArray[i] = new Array(grd_insuhistory.colref("indd"));
	}

	var row = 1;

	for (var i = 0; i<nodecnt; i++) {

		insuArray[i][0] = ds_send_insu_insulist.getColumn(row, "insukind"));
		insuArray[i][1] = ds_send_insu_insulist.getColumn(row, "suppkind"));
		insuArray[i][2] = ds_send_insu_insulist.getColumn(row, "mskind"));
		insuArray[i][3] = ds_send_insu_insulist.getColumn(row, "fromdd"));
		insuArray[i][4] = ds_send_insu_insulist.getColumn(row, "todd"));
		insuArray[i][5] = ds_send_insu_insulist.getColumn(row, "cretno"));
		insuArray[i][6] = ds_send_insu_insulist.getColumn(row, "seqno"));
		insuArray[i][7] = ds_send_insu_insulist.getColumn(row, "pid"));
		insuArray[i][8] = ds_send_insu_insulist.getColumn(row, "indd"));
		insuArray[i][9] = ds_send_insu_insulist.getColumn(row, "dschnotidt"));
		insuArray[i][10] = flag;
		//할인계정 추가
		insuArray[i][11] = ds_send_insu_insulist.getColumn(row, "disccd"));
		insuArray[i][12] = ds_send_insu_insulist.getColumn(row, "todd"));
		insuArray[i][13] = ds_send_insu_insulist.getColumn(row, "ownbmaxgradeflag"));   // 본인부담상한 구분 추가 20140320 LEJ
//		insuArray[i][13] = ds_send_insu_insulist.getColumn(row, "maxynm")); // 최종유형 날짜 처리를 위해서 20080924 박창원
//		insuArray[i][14] = ds_send_insu_insulist.getColumn(row, "maxyns")); // 최종유형 날짜 처리를 위해서 20080924 박창원
		row++;
	}

	// 종료일 기준으로 sort	
	for (var i = 0; i<nodecnt; i++) {

		for (var j = i+1; j<nodecnt; j++) {

			var oldtodd  = eval(insuArray[i][4]);
			var newtodd = eval(insuArray[j][4]);

			if (oldtodd > newtodd) {

				var tempinsukind = insuArray[j][0];
				var tempsuppkind = insuArray[j][1];
				var tempmskind = insuArray[j][2];
				var tempfromdd = insuArray[j][3];
				var temptodd = insuArray[j][4];
				var tempcretno = insuArray[j][5];
				var tempseqno = insuArray[j][6];
				var temppid = insuArray[j][7];
				var tempindd = insuArray[j][8];
				var tempdschnotidt = insuArray[j][9];
				var tempflag = insuArray[j][10];
				var tempdisccd = insuArray[j][11];
				var temporgtodd = insuArray[i][12];
				var tempownbmaxgradeflag = insuArray[i][13];

				insuArray[j][0] = insuArray[i][0];
				insuArray[j][1] = insuArray[i][1];
				insuArray[j][2] = insuArray[i][2]; 
				insuArray[j][3] = insuArray[i][3];
				insuArray[j][4] = insuArray[i][4]; 
				insuArray[j][5] = insuArray[i][5]; 
				insuArray[j][6] = insuArray[i][6]; 
				insuArray[j][7] = insuArray[i][7]; 
				insuArray[j][8] = insuArray[i][8]; 
				insuArray[j][9] = insuArray[i][9]; 
				insuArray[j][10]= insuArray[i][10];
				insuArray[j][11]= insuArray[i][11];
				insuArray[j][12]= insuArray[i][12];
				insuArray[j][13]= insuArray[i][13];

				insuArray[i][0] = tempinsukind;       
				insuArray[i][1] = tempsuppkind;       
				insuArray[i][2] = tempmskind;         
				insuArray[i][3] = tempfromdd;         
				insuArray[i][4] = temptodd;           
				insuArray[i][5] = tempcretno;         
				insuArray[i][6] = tempseqno;          
				insuArray[i][7] = temppid;            
				insuArray[i][8] = tempindd;           
				insuArray[i][9] = tempdschnotidt;
				insuArray[i][10]= tempflag;       
				insuArray[i][11]= tempdisccd;
				insuArray[i][12]= temporgtodd;      
				insuArray[i][13]= tempownbmaxgradeflag;      

			}
		}	
	}	

	// 배열에 있는 데이타를 node로 다시 copy
	ds_send_insu.clearData();

	row = 1;

	var mskind = ds_send.getColumn(0, "mskind");

	for (var i = 0; i<nodecnt; i++) {

		var mskind_calc = insuArray[i][2];

		if(mskind == mskind_calc){
			ds_send_insu_insulist.setColumn( row, "insukind", insuArray[i][0]);
			ds_send_insu_insulist.setColumn( row, "suppkind", insuArray[i][1]);
			ds_send_insu_insulist.setColumn( row, "mskind", insuArray[i][2]);
			ds_send_insu_insulist.setColumn( row, "fromdd", insuArray[i][3]);

			// 마지막 데이타의 종료일자가 '99991231'일 경우 퇴원 통보일시로 변경
			// 종료일자만 체크 - 20080924 
			if (insuArray[i][4] == "99991231"  || insuArray[i][4] == "") {
				ds_send_insu_insulist.setColumn( row, "todd", insuArray[i][9]);	
				ds_send_insu_insulist.setColumn( row, "orgtodd", "99991231");
			} else {
				// 미래유형이 있는경우 처리한다. 미래유형이 있는경우 마지막 데이터는 종료일이 99991231이 아님
				// 미래유형이 있는 경우 종료일을 퇴원통보일로 맞춰주고 orgtodd는 99991231로 set 한다.
				if (futureinsuyn == "Y" && row == nodecnt) {
					ds_send_insu_insulist.setColumn( row, "todd", insuArray[i][9]);	
					ds_send_insu_insulist.setColumn( row, "orgtodd", "99991231");	
				}
				ds_send_insu_insulist.setColumn( row, "todd", insuArray[i][4]);	
				ds_send_insu_insulist.setColumn( row, "orgtodd", insuArray[i][12]);					
			}
			ds_send_insu_insulist.setColumn( row, "cretno", insuArray[i][5]);
			ds_send_insu_insulist.setColumn( row, "seqno", insuArray[i][6]);
			ds_send_insu_insulist.setColumn( row, "pid", insuArray[i][7]);
			ds_send_insu_insulist.setColumn( row, "indd", insuArray[i][8]);
			ds_send_insu_insulist.setColumn( row, "dschnotidt", insuArray[i][9]);
			ds_send_insu_insulist.setColumn( row, "instcd", instcd);
			ds_send_insu_insulist.setColumn( row, "flag", insuArray[i][10]);
			ds_send_insu_insulist.setColumn( row, "disccd", insuArray[i][11]);
			ds_send_insu_insulist.setColumn( row, "ownbmaxgradeflag", insuArray[i][13]);

			row++;
		}
	}

//	if (submit("TXPIJ00306", false)) {
var oParam = {};
    oParam.id          = "TXPIJ00306";
    oParam.service     = "inordamtmngtapp.InHospUncoAmt";
    oParam.method      = "reqInsOutCalcIss";
    oParam.inds        = "insulist=ds_";
    oParam.outds       = "ds_=result";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00306";

tranf_submit(oParam);
/*
function cf_TXPIJ00306(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00306(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00306") > -1
arErrorCode.pop("TXPIJ00306") < 0
*/


		return 1;
	} else {
		return 0;
	}
}

// 심사자메모, EDI청구메모를 특정내역 형식에 맞춰 설정한다.
function fSetJudgEDIMemo(spclmemo, usermemoyn) {
	var item5Path = "";
	var item5Node = "";

	if (usermemoyn == "Y") {
		item5Path = "ds_main_list5_judgrmk[";
		item5Node = "U";
	} else if(usermemoyn == "N"){
		item5Path = "ds_main_list5_judgrmk[";
		item5Node = "E";
	} else if(usermemoyn == "D"){
		item5Path = "ds_main_list5_judgrmk[";
		item5Node = "D";
	}  else{
		item5Path = "ds_main_list5_judgrmk[";
		item5Node = "T";
	}

	var iSpclCdCnt = 0;
	var spclcnt = instance1.selectSingleNode("ds_main_list5");
	if(spclcnt != null){ 
		var spcllist = spclcnt.childNodes;
		iSpclCdCnt = spcllist.length ; // DB에 저장될 MX999 코드 개수
	}

	var iSpclCdTotLength = getStringLength(spclmemo);		// (stringHelper.js) 문자열의 길이를 구한다.

	// 수정추가 JHP 20090811 심사메모 4000byte초과시 alert메세지 띄우면서 안되게끔... 일단... clob으로 안되기때문에....
	if (iSpclCdTotLength > 4000){
		sysf_messageBox("심사_EDI메모내용이 너무길어 저장을 ","E001");
		return false;
	}

	var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");

	if (iSpclCdTotLength > 1333) {	// 새로 입력된 특정코드가 700byte를 넘는다.
		// 영문(700자), 한글(350자) 길이로 잘라서 n개의 특정코드를 만든다.
		var iLen = 0;			// 특정내역 길이가 700 byte가 되었는지 계산
		var iStartInx = 0;		// 특정내역 시작 index
		var iCharCnt = 0;		// 몇글자로 구성되는지 계산

		for (var i=0; i < spclmemo.length; i++) {
			var sBit = spclmemo.charAt(i);
			iCharCnt++;
			if (escape(sBit).length > 4) {
				iLen = iLen + 2;
			} else {
				iLen = iLen + 1;
			}
			if (iLen == 1333 || iLen > 1333) {		// 영문(700자), 한글(350자)
				iSpclCdCnt++;

				//model.makeValue(item5Path + iSpclCdCnt + "]/" + item5Node + "usermemoyn", usermemoyn);
				if (iLen == 350) {		// 700byte로 길이가 끝난 경우
					model.makeValue(item5Path + iSpclCdCnt + "]_spclspec", spclmemo.substr(iStartInx, iCharCnt));
					model.makeValue(item5Path + iSpclCdCnt + "]_spclmemoflag", item5Node);
					model.makeValue(item5Path + iSpclCdCnt + "]_m", "i");
					model.makeValue(item5Path + iSpclCdCnt + "]_unitflag", "M");
					model.makeValue(item5Path + iSpclCdCnt + "]_spclcd", "MX999");
					model.makeValue(item5Path + iSpclCdCnt + "]_seqno", iSpclCdCnt);
					model.makeValue(item5Path + iSpclCdCnt + "]_pid", ds_main_item1_iteminfo.getColumn(0, "pid"));
					model.makeValue(item5Path + iSpclCdCnt + "]_indd",indd);
					model.makeValue(item5Path + iSpclCdCnt + "]_mskind", ds_main_item1_iteminfo.getColumn(0, "mskind"));
					model.makeValue(item5Path + iSpclCdCnt + "]_cretno", ds_main_item1_iteminfo.getColumn(0, "cretno"));
					model.makeValue(item5Path + iSpclCdCnt + "]_fromdd", ds_main_item1_iteminfo.getColumn(0, "fromdd"));
					model.makeValue(item5Path + iSpclCdCnt + "]_instcd", "");
					model.makeValue(item5Path + iSpclCdCnt + "]_lastupdtrid", "");

					iStartInx += iCharCnt;
				}
				else if (iLen > 350) {	// 영문(700자), 한글(350자)를 넘는 경우
					model.makeValue(item5Path + iSpclCdCnt + "]_spclspec", spclmemo.substr(iStartInx,  iCharCnt - 1));
					model.makeValue(item5Path + iSpclCdCnt + "]_spclmemoflag", item5Node);
					model.makeValue(item5Path + iSpclCdCnt + "]_m", "i");
					model.makeValue(item5Path + iSpclCdCnt + "]_unitflag", "M");
					model.makeValue(item5Path + iSpclCdCnt + "]_spclcd", "MX999");
					model.makeValue(item5Path + iSpclCdCnt + "]_seqno", iSpclCdCnt);
					model.makeValue(item5Path + iSpclCdCnt + "]_pid", ds_main_item1_iteminfo.getColumn(0, "pid"));
					model.makeValue(item5Path + iSpclCdCnt + "]_indd", indd);
					model.makeValue(item5Path + iSpclCdCnt + "]_mskind", ds_main_item1_iteminfo.getColumn(0, "mskind"));
					model.makeValue(item5Path + iSpclCdCnt + "]_cretno", ds_main_item1_iteminfo.getColumn(0, "cretno"));
					model.makeValue(item5Path + iSpclCdCnt + "]_fromdd", ds_main_item1_iteminfo.getColumn(0, "fromdd"));
					model.makeValue(item5Path + iSpclCdCnt + "]_instcd", "");
					model.makeValue(item5Path + iSpclCdCnt + "]_lastupdtrid", "");

					iStartInx += (iCharCnt - 1);
				}

				iCharCnt = 0;
				iLen = 0;
				if (parseInt(iSpclCdTotLength / 1333) ==  iSpclCdCnt) {
					i = spclmemo.length;
					if ((iSpclCdTotLength % 1333) != 0) {		// 700Byte 씩 자르고 남은 길이가 있는 경우
						iSpclCdCnt++;
						//model.makeValue(item5Path + iSpclCdCnt + "]/" + item5Node + "usermemoyn", usermemoyn);
						model.makeValue(item5Path + iSpclCdCnt + "]_spclspec", spclmemo.substring(iStartInx,  spclmemo.length));
						model.makeValue(item5Path + iSpclCdCnt + "]_spclmemoflag", item5Node);
						model.makeValue(item5Path + iSpclCdCnt + "]_m", "i");
						model.makeValue(item5Path + iSpclCdCnt + "]_unitflag", "M");
						model.makeValue(item5Path + iSpclCdCnt + "]_spclcd", "MX999");
						model.makeValue(item5Path + iSpclCdCnt + "]_seqno", iSpclCdCnt);
						model.makeValue(item5Path + iSpclCdCnt + "]_pid", ds_main_item1_iteminfo.getColumn(0, "pid"));
						model.makeValue(item5Path + iSpclCdCnt + "]_indd", indd);
						model.makeValue(item5Path + iSpclCdCnt + "]_mskind", ds_main_item1_iteminfo.getColumn(0, "mskind"));
						model.makeValue(item5Path + iSpclCdCnt + "]_cretno", ds_main_item1_iteminfo.getColumn(0, "cretno"));
						model.makeValue(item5Path + iSpclCdCnt + "]_fromdd", ds_main_item1_iteminfo.getColumn(0, "fromdd"));
						model.makeValue(item5Path + iSpclCdCnt + "]_instcd", "");
						model.makeValue(item5Path + iSpclCdCnt + "]_lastupdtrid", "");

					} 
				} 
			}
		}			
	} else {	// 새로 입력된 특정코드는 700byte를 넘지 않는다.
		//if (iSpclCdTotLength > 0) {	// 새로 추가된 내용이 있다.
		iSpclCdCnt++;
		//model.makeValue(item5Path + iSpclCdCnt + "]/" + item5Node + "usermemoyn", usermemoyn);
		model.makeValue(item5Path + iSpclCdCnt + "]_spclspec", spclmemo);
		model.makeValue(item5Path + iSpclCdCnt + "]_spclmemoflag", item5Node);
		model.makeValue(item5Path + iSpclCdCnt + "]_m", "i");
		model.makeValue(item5Path + iSpclCdCnt + "]_unitflag", "M");
		model.makeValue(item5Path + iSpclCdCnt + "]_spclcd", "MX999");
		model.makeValue(item5Path + iSpclCdCnt + "]_seqno", "1");
		model.makeValue(item5Path + iSpclCdCnt + "]_pid", ds_main_item1_iteminfo.getColumn(0, "pid"));
		model.makeValue(item5Path + iSpclCdCnt + "]_indd", indd);
		model.makeValue(item5Path + iSpclCdCnt + "]_mskind", ds_main_item1_iteminfo.getColumn(0, "mskind"));
		model.makeValue(item5Path + iSpclCdCnt + "]_cretno", ds_main_item1_iteminfo.getColumn(0, "cretno"));
		model.makeValue(item5Path + iSpclCdCnt + "]_fromdd", ds_main_item1_iteminfo.getColumn(0, "fromdd"));
		model.makeValue(item5Path + iSpclCdCnt + "]_instcd", "");
		model.makeValue(item5Path + iSpclCdCnt + "]_lastupdtrid", "");

		//}
	}
}			

// 미래유형 정리 및 퇴원시 현황으로 HISTORY 유지하면서 inpt,iphs변경

//심사 완료 처리 
function  fJudgEnd(){
	ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat","C");
	var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");

	dsf_makeValue( ds_main_item1_iteminfo, "indd1", "string",  indd);
//	if(submit("TXPIJ00301",false)) { //심사완료전 저장이 제대로 처리되지 않았을 경우네는 E70을 발생시키지 않게 한다. 20080908 박창원
var oParam = {};
    oParam.id          = "TXPIJ00301";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveInpt";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00301";

tranf_submit(oParam);
/*
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00301") > -1
arErrorCode.pop("TXPIJ00301") < 0
*/


		fSaveCalcAmt("I");
		fSetItemInfoSetting();
		return 1;
	}else {
		ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat","B");
		fSetItemInfoSetting();
		return 0;			
	}
}

//통합심사 완료 처리
function  fJudgAllEnd(){
	ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat","E");

	var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");

	dsf_makeValue( ds_main_item1_iteminfo, "indd1", "string",  indd);
//	if(submit("TXPIJ00301",false)) { //심사완료전 저장이 제대로 처리되지 않았을 경우네는 E70을 발생시키지 않게 한다. 20080908 박창원
var oParam = {};
    oParam.id          = "TXPIJ00301";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveInpt";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00301";

tranf_submit(oParam);
/*
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00301") > -1
arErrorCode.pop("TXPIJ00301") < 0
*/


		fSaveCalcAmt("I");
		fSetItemInfoSetting();
		return 1;
	} else {
		ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat","B");
		fSetItemInfoSetting();
		return 0;
	}
}

//퇴원마감 취소 처리
function  fJudgEndCancel(){
	ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat","A");

//	if (submit("TXPIJ00301",false)) {
var oParam = {};
    oParam.id          = "TXPIJ00301";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveInpt";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00301";

tranf_submit(oParam);
/*
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00301") > -1
arErrorCode.pop("TXPIJ00301") < 0
*/


//		submit("TXPIJ03203",false);
var oParam = {};
    oParam.id          = "TXPIJ03203";
    oParam.service     = "bfjudgapp.DRGJudgList";
    oParam.method      = "reqExeDelDrgCreateMasterInfo";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ03203";

tranf_submit(oParam);
/*
function cf_TXPIJ03203(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ03203(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ03203") > -1
arErrorCode.pop("TXPIJ03203") < 0
*/


		fSetItemInfoSetting();
		return 1;
	} else {
		ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat","B");
		fSetItemInfoSetting();
		return 0;
	}
}

//예고심사 완료 처리
function  fJudgDclrtEnd(){
	ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat","G");

	var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");

	dsf_makeValue( ds_main_item1_iteminfo, "indd1", "string",  indd);
//	if(submit("TXPIJ00301",false)) { //심사완료전 저장이 제대로 처리되지 않았을 경우네는 E70을 발생시키지 않게 한다. 20080908 박창원
var oParam = {};
    oParam.id          = "TXPIJ00301";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveInpt";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00301";

tranf_submit(oParam);
/*
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00301") > -1
arErrorCode.pop("TXPIJ00301") < 0
*/


		fSaveCalcAmt("I");
		fSetItemInfoSetting();
		return 1;
	} else {
		ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat","B");
		fSetItemInfoSetting();
		return 0;
	}
}

///////////////////////////////////////////////////////////////////////////
//저장로직 관련 코딩 종료										    //
///////////////////////////////////////////////////////////////////////////

///////////////////////////////////////////////////////////////////////////
//체크로직 관련 코딩 종료
//1. 중증, 산정특례 여부 체크
//2. 분만여부 체크
//3. 수술여부 체크
///////////////////////////////////////////////////////////////////////////

//1. 중증, 산정특례 여부 체크
// 기존로직이 보험 암환자의 경우 입원일 기준으로만 적용되게 되어있어 수정함 - 20081105 박창원
function fCheckEssc(){
	var chk = ds_main_item1_iteminfo.getColumn(0, "patnm");
	var pid = ds_main_item1_iteminfo.getColumn(0, "pid");
	var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");
	var mskind = ds_main_item1_iteminfo.getColumn(0, "mskind");
	var insukind = ds_main_item1_iteminfo.getColumn(0, "insukindcd");
	var suppkind = ds_main_item1_iteminfo.getColumn(0, "suppkindcd");
	var cretno = ds_main_item1_iteminfo.getColumn(0, "cretno");
	var fromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
	var insuflag = "";
	// 새로운기준적용을 위해 여기서부터 변수추가 - 20081105 박창원
	var dschdd = ds_main_item1_iteminfo.getColumn(0, "dschdd");

	btn_esscdiag.visible = false;

	// 희귀난치 산정특례 처리  - 20090622 박창원, 7월1일부터 적용, H환자는 제외외어야함
	var rareesscyn = ds_main_item12_rareessc.getColumn(0, "rareesscyn");

	if (insukind == "11" && suppkind != "32" && rareesscyn == "Y" && suppkind != "01" && fromdd >= "20090701") {
		// 20090930 JHP 희귀난치 등록여부 확인위해 추가함.   -- 시작
		var anohosprgstflag 	= ds_main_item13_rooa.getColumn(0, "anohosprgstflag");
		var rareobstno 		= ds_main_item13_rooa.getColumn(0, "rareobstno");
		var rareobstfromdd 	= ds_main_item13_rooa.getColumn(0, "rareobstfromdd");
		var rareobsttodd 	= ds_main_item13_rooa.getColumn(0, "rareobsttodd");
		var signyn 		= ds_main_item13_rooa.getColumn(0, "signyn");	

		//20091109 JHP 희귀난치 메세지는 상병에 R_O 상병일 경우는 메세지 제외함.
		var ruleoutyn = ds_main_list3_diaglist.getColumn(1, "ruleoutyn");
		if(ruleoutyn == 'true'){
			// 주상병 R_O일때에는 희귀난치 메세지 처리 안함.
		}else{
			if (fromdd >= "20091001") { // 10월1일 이후에는 등록번호가 반드시 있어야한다. - 추가코딩필요
				// 타병원등록 여부 , Y:타병원,N:우리병원
				if(anohosprgstflag == "Y"){
					// 희귀난치 번호여부
					if(rareobstno == null || rareobstno == '-'){
						sysf_messageBox("## 희귀난치정보 ## : 타병원등록이나 희귀난치번호가 ","I004");
					} else {
						btn_esscdiag.visible = true;
						btn_esscdiag.attribute("class") = "btn5_letter4";
						btn_esscdiag.attribute("color") = "#ff0066";
						return;
					}
				} else if(anohosprgstflag == "N"){
					// 희귀난치 번호여부
					if(rareobstno == null || rareobstno == '-'){
						if(signyn  == "Y"){
							btn_esscdiag.visible = true;
							btn_esscdiag.attribute("class") = "btn5_letter4";
							btn_esscdiag.attribute("color") = "#ff0066";
							return;
						} else {
							sysf_messageBox("## 희귀난치정보 ## : 재원병원등록이나 등록번호 및 서명정보가 ","I004");
						}
					} else{
						btn_esscdiag.visible = true;
						btn_esscdiag.attribute("class") = "btn5_letter4";
						btn_esscdiag.attribute("color") = "#ff0066";
						return;
					}
				} else {
					// 희귀난치 data(mmohrooa)에 정보없음.
					sysf_messageBox("## 희귀난치정보 ## : 등록번호 및 서명정보가 ","I004");
				}
			} else {
				btn_esscdiag.visible = true;
				btn_esscdiag.attribute("class") = "btn5_letter4";
				btn_esscdiag.attribute("color") = "#ff0066";
				return;
			}
		}
	}

        if  (insukind > "22" || suppkind == "01" ) {
        	return;
        }

	if(chk){
			var isEsscV193 = false;
			var isEsscV191 = false;
			var isEsscVisible = true;

			var cEsscCnt = ds_main_chkessc.rowcount;
			if (cEsscCnt == 0 && rareesscyn != "Y" ) {	// 특정내역이 없는 경우임
				return;
			} else {
				var chkspclcd = model.getValue("ds_main_chkessc_chkessc[vcode='V191' or vcode='V192']_vcode");
				var spclcd = ds_main_chkessc_chkessc.lookupExpr("vcode == '" + V193 + "'", "vcode");
				if (chkspclcd.length > 0) {
					isEsscV191 = true;
					//이미 체크된건이 V193인경우 V193으로 처리 한다. 
					var chk = ds_hidden_item1.getColumn(0, "vcode");
					if(chk == "V193"){
						ds_hidden_item1.setColumn( 0, "vcode","V193");
					}else{
						ds_hidden_item1.setColumn( 0, "vcode",chkspclcd);
					}
				}
				if(spclcd == "V193" && suppkind != "32") { // 차상위는 중증등록버튼이 활성화되지 않게한다. 20090227 박창원
					ds_hidden_item1.setColumn( 0, "vcode",spclcd);
					var suppkindcd = ds_main_item1_iteminfo.getColumn(0, "suppkindcd");

					isEsscV193 = true;
					// V193인경우 이미 적용하면 끝이기때문에 일부로 보여지지 않도록 했었지만
					// 사용자 요구사항으로 그냥 버튼 살아 있게 한다. 2007.12.07 박도형
					//if (suppkindcd == "06") {
					//	isEsscVisible = false;
					//}
				}
			}

			// 데이타 변경 후 중증 질환 체크 변경 유무 확인을 위한 flag 값 추가 : 2007.10.08 김건기 => fUpdtCheckEssc()에서 사용
			ds_hidden_updtchkessc.setColumn( 0, "esscV193",isEsscV193);
			ds_hidden_updtchkessc.setColumn( 0, "esscV191",isEsscV191);

			if (isEsscV191) {
				if (isEsscVisible) {
					btn_esscdiag.visible = true;
				} else {
					btn_esscdiag.visible = false;
				}

				btn_esscdiag.attribute("class") = "btn5_letter4";
				btn_esscdiag.attribute("color") = "#ff0066";
			} else {
				btn_esscdiag.attribute("class") = "btn2_letter4";
				btn_esscdiag.visible = false;
				if (isEsscV193) {
					if (isEsscVisible) {
						btn_esscdiag.visible = true;
					} else {
						btn_esscdiag.visible = false;
					}
					btn_esscdiag.attribute("class") = "btn5_letter4";
					btn_esscdiag.attribute("color") = "#ff0066";
				} else {
					btn_esscdiag.attribute("class") = "btn2_letter4";
					btn_esscdiag.visible = false;
				}
			}
	}
}

//2. 분만여부 체크
function fCheckBorn(){
	var cBorn = instance1.selectSingleNode("ds_main_item1_iteminfo");
	if (cBorn == null) {	// 출산정보가 없는경우임.
		btn_babymother.attribute("class") = "btn5_letter4";
		btn_babymother.visible = false;
		return;
	}else{
		var cBornbaby = ds_main_item1_iteminfo.getColumn(0, "bornbaby");
		if(cBornbaby == "Y"){
			btn_babymother.visible = true;
			btn_babymother.attribute("class") = "btn5_letter4";
			btn_babymother.attribute("color") = "#ff0066";
		}else{
			btn_babymother.attribute("class") = "btn5_letter4";
			btn_babymother.visible = false;
		}

	}
}

//3. 수술여부체크
function fCheckOper(){
	var cOper = instance1.selectSingleNode("ds_main_item1_iteminfo");
	if (cOper == null) {	// 출산정보가 없는경우임.
		btn_operdiag.attribute("class") = "btn5_letter4";
		btn_operdiag.visible = false;
		return;
	}else{
		var cOperDiag = ds_main_item1_iteminfo.getColumn(0, "opflag");
		if(cOperDiag == "Y"){
			btn_operdiag.visible = true;
			btn_operdiag.attribute("class") = "btn5_letter4";
			btn_operdiag.attribute("color") = "#ff0066";

			// 수술심사상태에 따른 캡션변경
			//미심
			var cnt1 = ds_main_item10_operstat.getColumn(0, "cnt1");
			//보류
			var cnt2 = ds_main_item10_operstat.getColumn(0, "cnt2");
			//완료
			var cnt3 = ds_main_item10_operstat.getColumn(0, "cnt3");
			// 수술이 추가되었을때 - 수술심사테이블에 데이터가 들어가지 않은 경우는 미심이 포함되어 있어 미심이다. - 20071014 박창원
			var nonpijhoper = ds_main_item10_operstat.getColumn(0, "nonpijhoper");

			if (cnt1 > "0" || nonpijhoper == "Y") {
				btn_operdiag.attribute("text")= "수술(미)";
				return;
			}
		       if (cnt1 < "1" && cnt2 > "0") {
		       	       btn_operdiag.attribute("text")= "수술(보)";
		       }
		       if (cnt1 < "1" && cnt2 < "1" && cnt3 > "0") {
		       		btn_operdiag.attribute("text")= "수술(완)";
		       }
		       if (cnt1 < "1" && cnt2 < "1" && cnt3 < "1") {
		       		btn_operdiag.attribute("text")= "수술(미)";
		       }

		}else{
			btn_operdiag.attribute("class") = "btn5_letter4";
			btn_operdiag.visible = false;
		}
	}
}	

//4. 퇴원메모 체크
function fCheckDschMemo(){
	var cDschMemo = instance1.selectSingleNode("ds_main_item1_iteminfo");
	if (cDschMemo == null) {	
		btn_dschmemo.attribute("class") = "btn5_letter4";
		btn_dschmemo.visible = false;
		return;
	}else{
		var cDschMemo = ds_main_item1_iteminfo.getColumn(0, "dschnotiyn");
		if(cDschMemo == "Y"){
			btn_dschmemo.visible = true;
			btn_dschmemo.attribute("class") = "btn5_letter4";
			btn_dschmemo.attribute("color") = "#ff0066";
		}else{
			btn_dschmemo.attribute("class") = "btn5_letter4";
			btn_dschmemo.visible = false;
		}
	}
}

// 5.공여수혜자 여부 체크
function fCheckDnorPat(){
	var cDnorPat = instance1.selectSingleNode("ds_main_item8_patdnorinfo");
	if (cDnorPat == null) {
		btn_patdnor.attribute("class") = "btn5_letter3";
		btn_patdnor.visible = false;
		return;
	}else{
		var cDnorPID = ds_main_item8.getColumn(0, "patdnorflag");
		var cPatDnorFlag = ds_main_item8_patdnorinfo.getColumn(0, "patdnorflag");
		//if(cDschMemo == "D"){
		if(cPatDnorFlag == "D"){
			btn_patdnor.visible = true;
			btn_patdnor.attribute("text")= "수혜자"
			btn_patdnor.attribute("class") = "btn5_letter3";
			btn_patdnor.attribute("color") = "#ff0066";
		//}else if (cDschMemo == "P"){
		}else if (cPatDnorFlag == "P"){
			btn_patdnor.visible = true;
			btn_patdnor.attribute("text")= "공여자"
			btn_patdnor.attribute("class") = "btn5_letter3";
			btn_patdnor.attribute("color") = "#ff0066";
		}else{
			btn_dschmemo.attribute("class") = "btn5_letter4";
			btn_dschmemo.visible = false;
		}
	}
}

// 20091019 JHP 진료상병 심사상병 체크로직 추가  (** 10_9 보험팀장 정례회의 결정사항임)
// 재원심사시 혹은 퇴원심사시 진료 주상병과 심사 주상병이 상이 한 경우 
// [진료 주상병과 심사 주상병이 다릅니다.확인하시고 진료에 수정요청 하십시요 
// ( 퇴원시 외래 FU검사의 요율에 오류가 있을 수 있습니다)]   라는 알럿을 주도록 함.
// 1. 적용대상 : 보험유형 11, 21, 22 
// 단 보조유형 00정상, 01전액본인부담, 입원에만 존재하는 보조유형  제외
// 2. 조회시 ICD10 색인 분류 상 상위 구분 (영문 1자리와 숫자 2자리)으로 비교 하도록 함 
// -> 진료 D619 상병과 심사 D618은 알럿 팝업 안뜨도록 함.
//for문 속도개선 plet2
function fCheckEmrDiagPamDiag(){
	var insukind = ds_main_item14_emrdiagpamdiag.getColumn(0, "insukind");
	var suppkind = ds_main_item14_emrdiagpamdiag.getColumn(0, "suppkind");
	var notsuppkind = ds_main_item14_emrdiagpamdiag.getColumn(0, "notsuppkind");
	var emrmaindiag = ds_main_item14_emrdiagpamdiag.getColumn(0, "emrmaindiag");
	var pammaindiag = ds_main_item14_emrdiagpamdiag.getColumn(0, "pammaindiag");
	var notsuppkindchk = model.getXPathValue("contains(ds_main_item14_emrdiagpamdiag_notsuppkind,'"+suppkind+"')");

	var fstemrdiag2 = emrmaindiag.substring(0, 3);
	var fstpamdiag2 = pammaindiag.substring(0, 3);

	var fstemrdiag3 = emrmaindiag.substring(0, 4);
	var fstpamdiag3 = pammaindiag.substring(0, 4);

	// 입원제외 보조유형 배열과 보조유형 체크
	var suppchk = "N";
	if(notsuppkindchk == true){
		suppchk = "Y";
	}

	// 1. 보험유형 11, 21, 22 이면 알럿
	if(insukind == "11" || insukind == "21" || insukind == "22"){
		// 00, 01, suppchk(입원제외보조유형)이 아니면 알럿
		if(suppkind == "00" || suppkind =="01" || suppchk == "Y"){
		}else{
			// 둘다 null 이 아니면 알럿(원래는 NULL인데 글자수로 잘라서 NUL임)
			if(fstemrdiag2 == 'NUL' || fstpamdiag2 == 'NUL'){
			}else{
				// 진료상병 심사상병 다르면 알럿
				if(fstemrdiag2 != fstpamdiag2){
					sysf_messageBox("[진료 주상병(" + fstemrdiag2 +"-)과 심사 주상병(" + fstpamdiag2 + "-)이 다릅니다. 확인하시고 진료에 수정요청 하십시요.\n( 퇴원시 외래 FU검사의 요율에 오류가 있을 수 있습니다)]\n","I007");
				}
			}
		}
	}
}

function fItemRareMsg(){
	var srchrslt = "";
	var itemmsg = ds_main_item1_iteminfo.getColumn(0, "itemmsg");
	var raremsg = ds_main_item1_iteminfo.getColumn(0, "raremsg");
	var serdiagfromdd = ds_main_item1_iteminfo.getColumn(0, "serdiagfromdd"); //중증시작일자
	var serdiagtodd = ds_main_item1_iteminfo.getColumn(0, "serdiagtodd"); //중증종료일자
	var rareobstfromdd = ds_main_item1_iteminfo.getColumn(0, "rareobstfromdd"); //희귀시작일자
	var rareobsttodd = ds_main_item1_iteminfo.getColumn(0, "rareobsttodd"); //희귀종료일자
	var dschnotidt = ds_main_item1_iteminfo.getColumn(0, "dschnotidt"); //퇴원일자
	dschnotidt = (dschnotidt.length > 0  ? dschnotidt.substring(0 , 8) : "");
	var suppkind = ds_main_item1_iteminfo.getColumn(0, "suppkindcd");
	var rooamsgcnt = dsds_main_rarecancermsglist_rarecancermsg.filter("cd!='" + 00 + "'").rowcount ;
	var sdoamsgcnt = dsds_main_rarecancermsglist_rarecancermsg.filter("cd='" + 00 + "'").rowcount ;
	var rooamsg = model.getXPathValue("ds_main_rarecancermsglist_rarecancermsg[cd!='00']_nm");
	var sdoamsg = model.getXPathValue("ds_main_rarecancermsglist_rarecancermsg[cd='00']_nm");
	var rooamsgtooth = model.getXPathValue("ds_main_rarecancermsglist_rarecancermsg[cd!='00' and cd!='01']_nm");
	var rooamsgcd = model.getXPathValue("ds_main_rarecancermsglist_rarecancermsg[cd!='00']_cd");
	var sdoamsgcd = model.getXPathValue("ds_main_rarecancermsglist_rarecancermsg[cd='00']_cd");
	var rooamsgtoothcd = model.getXPathValue("ds_main_rarecancermsglist_rarecancermsg[cd!='00' and cd!='01']_cd");
	cmb_itemraremsg.visible = false;
	//두번호 모두 존재시.
	if ((rooamsgcnt > 0) && (sdoamsgcnt > 0)) {
		opt_patientinfo.attribute("background-color") = "transparent";
		//희귀종료일자가 퇴원일자,입원일자보다 빠를시 색상변경
		//중증종료일자가 퇴원일자,입원일자보다 빠를시 색상변경
		if (
				((dschnotidt != "" && (dschnotidt > serdiagtodd )) || (dschnotidt == "" && (VAL_today > serdiagtodd )) )||
				((dschnotidt != "" && (dschnotidt >  rareobsttodd   )) || (dschnotidt == "" && (VAL_today>  rareobsttodd   )))
		) {
			cmb_itemraremsg.attribute("background-color") = "#ff9900";
		} else {
			cmb_itemraremsg.attribute("background-color") = "transparent";
		}

		cmb_itemraremsg.visible = true;
		opt_patientinfo.visible =  false;
		roundrect1.visible = false;
		// 등록암 보조유형일경우(06.등록암, 11.가정간호등록암, 32.차상위1종, 40.차상위2종등록암
//		if (suppkind == "06" || suppkind == "11" || suppkind == "32" || suppkind == "40") {
//			model.setValue(cmb_itemraremsg.attribute("ref"), sdoamsg);
//		} else if (suppkind == "87" || suppkind == "88" || suppkind == "89") {
//			model.setValue(cmb_itemraremsg.attribute("ref"), rooamsgtoothcd);
//		} else {
//			model.setValue(cmb_itemraremsg.attribute("ref"), rooamsgcd);
//		}
		cmb_itemraremsg.select(0);
	} else if (rooamsgcnt > 0) {
		//희귀종료일자가 퇴원일자,입원일자보다 빠를시 색상변경
		if ((dschnotidt != "" && (dschnotidt > rareobsttodd   )) || (dschnotidt == "" && (VAL_today > rareobsttodd   ))) {
			if (rooamsgcnt  == 1) {
				opt_patientinfo.attribute("background-color") = "#ff9900";
			} else {
				cmb_itemraremsg.attribute("background-color") = "#ff9900";
			}
		} else {
			opt_patientinfo.attribute("background-color") = "transparent";
			cmb_itemraremsg.attribute("background-color") = "transparent";
		}

		if (suppkind == "87" || suppkind == "88" || suppkind == "89") {
			if (rooamsgcnt == 1) {
				srchrslt += rooamsgtooth; // 희귀등록번호
				model.setValue(opt_patientinfo.attribute("ref"), rooamsgtooth);
				opt_patientinfo.visible =  true;
				roundrect1.visible = true;
			} else {
				cmb_itemraremsg.visible = true;
				opt_patientinfo.visible =  false;
				roundrect1.visible = false;
				model.setValue(cmb_itemraremsg.attribute("ref"), rooamsgtoothcd);
			}

		} else {
			if (rooamsgcnt == 1) {
				srchrslt += rooamsg; // 희귀등록번호
				model.setValue(opt_patientinfo.attribute("ref"), rooamsg);
				opt_patientinfo.visible =  true;
				roundrect1.visible = true;
			} else {
				cmb_itemraremsg.visible = true;
				opt_patientinfo.visible =  false;
				roundrect1.visible = false;
				//model.setValue(cmb_itemraremsg.attribute("ref"), rooamsgcd);
				cmb_itemraremsg.select(0);
			}
		}
	} else if (sdoamsgcnt > 0) {
		//중증종료일자가 퇴원일자,입원일자보다 빠를시 색상변경

		if ((dschnotidt != "" && (dschnotidt > serdiagtodd )) || (dschnotidt == "" && (VAL_today > serdiagtodd))) {
			opt_patientinfo.attribute("background-color") = "#ff9900";
		} else {
			opt_patientinfo.attribute("background-color") = "transparent";
		}
		cmb_itemraremsg.attribute("background-color") = "transparent";

		if (sdoamsgcnt == 1) {
			srchrslt += sdoamsg; // 중증등록정보
			model.setValue(opt_patientinfo.attribute("ref"), sdoamsg);
			opt_patientinfo.visible =  true;
			roundrect1.visible = true;
		} else {
			cmb_itemraremsg.visible = true;
			opt_patientinfo.visible =  false;
			roundrect1.visible = false;
			//model.setValue(cmb_itemraremsg.attribute("ref"), sdoamsgcd);
			cmb_itemraremsg.select(0);
		}
	} else {
		opt_patientinfo.attribute("background-color") = "transparent";
		cmb_itemraremsg.attribute("background-color") = "transparent";
		opt_patientinfo.visible =  true;
		roundrect1.visible = true;
		cmb_itemraremsg.visible = false;
	}

//opt_patientinfo.refresh();

//cmb_itemraremsg.refresh();

}

//Link 연결 팝업
function fLinkPopMenu(trgtWindow, cond, send){

	var trgtManWindow = getChildWindow(trgtWindow);

	if (trgtManWindow == null) {
		frmf_open("trgtWindow ", "trgtWindow", "cond"-"send", "", "", "10", "10", "", "", "", "", "", "M");

	} else {
		activateChild(trgtWindow);

//model.refresh();

	}
}

// 통합심사마감
function fDschallEnd() {
	fDschjudgEndType("A");
}

// 퇴원마감
function fDschjudgEnd() {
	fDschjudgEndType("");
}

// 예고심사 : 2014.06.09 LEJ
function fDschdclrtEnd() {
	fDschjudgEndType("G");
}

function fDschjudgEndType(dschjudgendtype) {
	var chk = ds_main_item1_iteminfo.getColumn(0, "patnm");
	if(chk){
		// 퇴원마감시 간호확정이 취소되었는지 실시한 확인 후 진행한다.
		// 타인이 간호 확정을 취소할때 마감되는 상황이 발생되지 않기 위함 
		// 간호 확정이 취소된 경우에는 대상자 조회 호면을 refresh 하고 
		// 메인화면의 심사상태를 'A' 미심상태로 하고 간호 퇴원통보 여부도 'N'으로 세팅한다.- 20080927 박창원
		dsf_makeValue( ds_send, "checkyn", "string", "Y");
//		if (!submit("TRPIJ00315", false)) {
var oParam = {};
    oParam.id          = "TRPIJ00315";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqNotiDschStat";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=endcnclstat ds_=recal ds_=drginfo";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00315";

tranf_submit(oParam);
/*
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00315") > -1
arErrorCode.pop("TRPIJ00315") < 0
*/


			sysf_messageBox("실시간 환자상태 체크에 실패 했습니다.기본데이터 이상이나 시스템 오류입니다.관리자 문의 후", "C003");
			return;
		}

		dsf_makeValue( ds_send, "checkyn", "string", "N");
		// 퇴원마감시 퇴원확정일시 이후 처방이 있으면 alert - 20081112 박창원
		var maxexectm = ds_main_item11_endcnclstat.getColumn(0, "maxexectm").substr(0,8);
		var dschnotidt = ds_main_item1_iteminfo.getColumn(0, "dschnotidt").substr(0,8);
		var dschnotiyn = ds_main_item11_endcnclstat.getColumn(0, "dschnotiyn");
		var ipscendyn = ds_main_item11_endcnclstat.getColumn(0, "ipscendyn");
		var dumpexistyn = ds_main_item11_endcnclstat.getColumn(0, "dumpexistyn");
		var dupexecdd = ds_main_item11_endcnclstat.getColumn(0, "dupexecdd");
		var dumpclamkeyexistyn = ds_main_item11_endcnclstat.getColumn(0, "dumpclamkeyexistyn");
		var paygrntyn = ds_main_item11_endcnclstat.getColumn(0, "paygrntyn");
		var dschdclrtyn = ds_main_item11_endcnclstat.getColumn(0, "dschdclrtyn");
		var dschjudgprcsstatyn = ds_main_item11_endcnclstat.getColumn(0, "dschjudgprcsstatyn");

		if (dschnotiyn != 'N' && maxexectm > dschnotidt) {
			var msg = sysf_messageBox("퇴원확정이후" + maxexectm + "일자 실시처방이 있습니다. 계속 ", "S001");
			if (msg != "6") {
				return;
			}
		}

		if (dschjudgendtype != 'G' && dschnotiyn == 'N') {
			sysf_messageBox("간호 퇴원확정이 취소된 상태 입니다. 마감 ", "E001");
			// 무조건 대상자 조회 화면을 refresh 
			var trgtManWindow = getChildWindow("SMPIJ00200");
			trgtManWindow.javascript.fGetInBfJudgTrgtManList();
			trgtManWindow.javascript.fCountPat();

//trgtManWindow.model.refresh();

			// 메인화면의 심사상태를 미심으로 퇴원통보여부를 'N'으로
			ds_main_item1_iteminfo.setColumn( 0, "dschnotiyn", "N");
			ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat", "A");

//model.refresh();

			return;
		} else if (dschjudgendtype == 'G' && dschdclrtyn == 'N') {
			sysf_messageBox("의사 퇴원예고가 취소된 상태 입니다. 마감 ", "E001");
			// 무조건 대상자 조회 화면을 refresh 
			var trgtManWindow = getChildWindow("SMPIJ00200");
			trgtManWindow.javascript.fGetInBfJudgTrgtManList();
			trgtManWindow.javascript.fCountPat();

//trgtManWindow.model.refresh();

			// 메인화면의 심사상태를 미심으로 퇴원통보여부를 'N'으로
			ds_main_item1_iteminfo.setColumn( 0, "dschnotiyn", "N");
			ds_main_item1_iteminfo.setColumn( 0, "dschdclrtyn", "N");
			ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat", "A");

//model.refresh();

			return;
		}

		// 20091007 JHP 병실료계산(PAM.FN_PI_GETADMAMTCALCYN) 및 처방계산(PAM.FN_PI_GETCALCMISSYN) 맞는지 확인 
		// 20091113 JHP 부유형은 무조건 Y로 넘어오지만 부유형통에 계산내역이 없을경우에는 값자체가 없기때문에 메세지가뜬다..하여 부유형일 경우는 메세지 제외시킨다.

		var admamtcalcyn 	= ds_main_item11_endcnclstat.getColumn(0, "admamtcalcyn");
		//var calcmissyn 	= ds_main_item11_endcnclstat.getColumn(0, "calcmissyn"); -- 일단 처방은 추후 반영 - 20091013 박창원

		var chkmskind = ds_main_item1_iteminfo.getColumn(0, "mskind");
		var brateflag = ds_main_item1_iteminfo.getColumn(0, "brateflag");

		// 입원요율일 경우만 병실료 체크한다.
		if (brateflag == "I") {
			if (admamtcalcyn != "Y") {
				if(chkmskind != "S"){
					sysf_messageBox("계산되지 않은 병실료가 존재합니다. \n확인후 재계산(전수계산)","I008");
					return;
				}
			}
		}

		// 2011.04.28 syjung 소급계산완료 여부. N이면 소급계산할 데이터가 남아 있으므로 퇴원마감 할 수 없음.
		if (ipscendyn == "N") {
			sysf_messageBox("완료되지 않은 소급계산 내역이 존재합니다. 재계산","I008");
			return;
		}

		// 2011.06.14 syjung 외래에서 덤프되지 않은 처방 존재 여부. Y면 덤프되지 않은 처방이 있으므로 퇴원마감 할 수 없음.
		if (dumpexistyn == "Y") {
			sysf_messageBox("입원 당일 외래에서 덤프되지 않은 처방이 존재합니다. 재원심사 화면에서 [▶Dump] 내역을 ","I007");
			return;
		}

		if (dumpclamkeyexistyn == "Y") {
			if(sysf_messageBox("외래 자료 수집이 된 재원 내 실시처방이 있습니다. 외래 사후 자료를 생성 삭제한 후 Dump처리 하십시오.", "Q003") == 6) {
				frmf_modal("SPPIJ03500", "", ""-"", "", "", "", "", "", "", "", "", "", "M");
				if (ds_main_item1_iteminfo.getColumn(0, "dumprmk") == "" ) {
					sysf_messageBox("사유를", "C001");
					return;
				}
			} else {
				return;
			}
		}

		if (dupexecdd != "") {
			dupexecdd = dupexecdd.toDate().getDateFormat("YYYY_MM_DD")
			sysf_messageBox(dupexecdd + "중복계산 내역이 존재합니다. " + dupexecdd + "일 재계산","I008");
			return;
		}

		//기재점검 중증, 산정특례 여부 체크
		if (fGetDiagSpclcdCheck() == false) {
			return false;
		} 

		// 주부유형이 함께 있는 환자에 대해서는 퇴원마감시 알럿을 띄워준다.
		var msyn = ds_main_item1_iteminfo.getColumn(0, "msyn");

		if (msyn == "Y") {
			sysf_messageBox("다른 보험 유형정보가 존재하오니 해당건 퇴원마감여부도 확인하여 주세요. 해당건 미마감 시 퇴원수납 할 수","I004");
		}

		var cOperDiag = ds_main_item1_iteminfo.getColumn(0, "opflag");

		// 수술심사 미완료시 응급,chemo,dsc는 알럿만 정규퇴원은 blcok - 20090114 박창원
		var ordtype = ds_main_item1_iteminfo.getColumn(0, "ordtype");
		var insukind = ds_main_item1_iteminfo.getColumn(0, "insukindcd");

		// 연도별 분리 안 된 이력 중 본인부담 상한액 초과 환자 메세지 발생 ( 2016.03.11 LEJ )
		var insukind = ds_main_item1_iteminfo.getColumn(0, "insukind");
		var cfe = ds_main_item1_iteminfo.getColumn(0, "cfe");
		var ownlimmitamt = ds_main_item1_iteminfo.getColumn(0, "ownlimmitamt");      // 본인부담 상한 구분에 따른 상한기준액  
		var fromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
		var todd = ds_main_item1_iteminfo.getColumn(0, "todd");
		var curyear = VAL_today.substr(0,4);
		var fromyear = fromdd.substr(0,4);
		var toyear = todd.substr(0,4);
		if ( todd == "99991231" ) {
			if ( dschnotidt == "99991231" || dschnotidt == "" ) {
				toyear = curyear ;
			}
			else {
				toyear = dschnotidt.substr(0,4) ;
			}
		}
		if ( insukind == "11" && fromyear != toyear && cfe != 'F' ) {
			if(parseInt(ds_main_item2_itemcalc.getColumn(0, "ownbpayamt")) > ownlimmitamt) {
				var msg =  sysf_messageBox("연도별 분리 되지 않은 본인부담상한제 환자입니다. \n계속","S001");
				if(msg != 6) {
					return;
				}
			}
		}

		if(dschnotiyn == "Y" || (dschjudgendtype == 'G' && dschdclrtyn == 'Y')){
			// 수술심사가 완료되지 않았습니다.  - 20080821 박창원
			if ( ordtype != "I" && ((btn_operdiag.attribute("text")== "수술(미)") ||(btn_operdiag.attribute("text")== "수술(보)")) && (cOperDiag == "Y" || cOperDiag == "YY" || cOperDiag == "YN") ) {
				var msg = sysf_messageBox("수술심사가 완료되지 않았습니다. 계속","S001");
				if(msg != 6) {
					return;
				}
			}
			if ( ordtype == "I" && ((btn_operdiag.attribute("text")== "수술(미)") ||(btn_operdiag.attribute("text")== "수술(보)")) && (cOperDiag == "Y" || cOperDiag == "YY" || cOperDiag == "YN") ) {
				sysf_messageBox("수술심사가 완료되지 않았습니다. 마감","E001");
				return;
			}
			// 소급내역이 존재합니다. 처리후 마감해주세요.
			// 10월3일 이전 소급건은 조건에서 제외한다. - 20081004 박창원
			if (ds_main_item11_recal.getColumn(1, "recalcdd") != "") {
				sysf_messageBox("소급내역이 존재합니다. 마감","E001");
				return;
			}

			//약 반환 확인유무 및 창 호출.
			if (fCheckReturnPrcpExist() == false) {
				return;
			}

			if (insukind == "31"){
				if (paygrntyn != "Y") {
					sysf_messageBox("자동차보험 지급보증번호 누락입니다.","I007");
					return;
				}
			}

			if ((dschjudgendtype != 'G' && fChkClose() == true) || dschjudgendtype == 'G') {
				// 예고심사 환자가 미시행처방이 있는 경우 마감 제어는 하지 않는다!
				if (dschjudgendtype == 'G' && fChkClose() == false) {
					var msg = sysf_messageBox("예고심사 환자 미시행 처방 내역이 있습니다. 마감","S001");
					if(msg != 6) {
						return;
					}	
				}
				if (fSaveMain("C") == true) {
					//maxexectm 없다는건 iscl이 존재 하지 않는 것임.

					var dschantichk = ds_hidden_result_getdschcalccheck.getColumn(0, "dschantichk");
					if (dschantichk == "Y") {
						var msg = sysf_messageBox("수술 예방적 항생제 평가 대상자입니다.\n항생제 퇴원약 사용 여부를 재확인하시기 바랍니다. \n계속","S001");
						if(msg != 6) {
							return;
						}
					}

					if (maxexectm == "") {
						if ( sysf_messageBox("유형에 계산된 처방 내역이 하나도 없습니다. 마감","Q004") != 6 ) {
							return false;
						}
					}

					// 입원 계산 자료 검증(2012.11.30 LeeEunJung)
					var check0 = ds_hidden_result_getdschcalccheck.getColumn(0, "check0");
					var check1 = ds_hidden_result_getdschcalccheck.getColumn(0, "check1");
					var check2 = ds_hidden_result_getdschcalccheck.getColumn(0, "check2");
					var check3 = ds_hidden_result_getdschcalccheck.getColumn(0, "check3");
					var check4 = ds_hidden_result_getdschcalccheck.getColumn(0, "check4");
					var check5 = ds_hidden_result_getdschcalccheck.getColumn(0, "check5");

					if (check0 =="Y"||check1 =="Y"||check2 =="Y"||check3 =="Y"||check4 =="Y"||check5 =="Y") {
						sysf_messageBox("계산자료 검증 시 오류가 체크되었습니다. 전체 재계산 후 문제 해결이 안 되면 전산실로 문의","I008");
						return false;
					}

					// 건강보험 정상 16일 이상 재원환자에 대해 장기재원 불가피 주상병 존재하는 경우 알림  					
					var longtermchk = ds_hidden_result_getdschcalccheck.getColumn(0, "longtermchk");
					if (longtermchk == "Y") {
						var msg = sysf_messageBox("장기재원 불가피 주상병이 있는 16일 이상 입원료 발생 환자 입니다.\n보조 유형을 확인하시기 바랍니다. \n계속","S001");
						if(msg != 6) {
							return;
						}
					}

					//응급실 관리료 여부 체크
					var nog3reasnyn = ds_hidden_result_getdschcalccheck.getColumn(0, "nog3reasnyn");
					if (nog3reasnyn == "Y") {
						sysf_messageBox("응급 의료관리료 미발생  환자입니다.","I007");
						return false;
					}

					if (fGetDrgOpenPopup("O") == false) {
						return false;
					}

					if (dschjudgendtype == "G" && dschjudgprcsstatyn > 0){
						sysf_messageBox("입원이력 내 미심상태가 있습니다.","I007");
						return false;
					}

					if (dschjudgendtype == "A") {
						if (fJudgAllEnd()){
							// 2. 화면 클리어 (공통)
							fJudgEndClear();

							sysf_messageBox("통합심사마감 처리가","I002");
						} else {
							sysf_messageBox("마감 처리가 되지","E007");
						}
					} else if (dschjudgendtype == "G") {     // 예고심사 추가 (2014.06.19 LEJ)
						if (fJudgDclrtEnd()){
							// 2. 화면 클리어 (공통)
							fJudgEndClear();

							sysf_messageBox("예고심사마감 처리가","I002");
						} else {
							sysf_messageBox("마감 처리가 되지","E007");
						}
					} else {
						if (fJudgEnd()){
							// 2. 화면 클리어 (공통)
							fJudgEndClear();
							sysf_messageBox("퇴원마감 처리가","I002");
						} else {
							sysf_messageBox("마감 처리가 되지","E007");
						}
					}

				}
			} else {
				sysf_messageBox("미시행 처방 내역이 있습니다. 마감","E001");			
			}								
		}
		else {
			sysf_messageBox("유형에 계산된 처방 내역이 하나도 없습니다. 마감","E001");
			return;
		}
	}
}

function fJudgEndClear() {
	// 2. 화면 클리어 (공통)
	delPatientInfos();
	fSetRdoReset();
	btn_judgrmk.selected = true;

	ds_send.setColumn( 0, "totalsumflag", "Y");
	ds_send.setColumn( 0, "unitflag", "-");
	//상세화면 저장버튼 처리를 위해 넣어 놓는다.   - 2007-11.29 박도형
	ds_hidden_item1.setColumn( 0, "chksave","N");

	btn_esscdiag.attribute("class") = "btn2_letter4"; 
	btn_babymother.attribute("class") = "btn2_letter4"; 
	btn_operdiag.attribute("class") = "btn2_letter4"; 
	btn_mt004.attribute("class") = "btn2_letter4"; 
	btn_attData.attribute("class") = "btn2_letter4"; 
	btn_operdiag.attribute("class") = "btn2_letter4";
	btn_patdnor.attribute("class") = "btn_letter3";

	btn_esscdiag.visible = true;
	btn_babymother.visible = true;
	btn_operdiag.visible = true;
	btn_mt004.visible = true;
	btn_attData.visible = true;
	btn_operdiag.visible = true;
	btn_patdnor.visible= true;
	btn_save.enable = true;

	btn_recalc.enable = true;
	btn_sugicalc.enable = true;  
	btn_dschclose.enable = true;
	btn_totjudgclose.enable = true;
	btn_dschclosecancel.enable = true;
	btn_midcomplete.enable = true;
	btn_midcancel.enable = true;
	btn_midregist.enable = true;
	btn_midregistyn.enable = true;

	group9.visible = false;

	btn_dschclose.attribute("class") = "btn2_letter6";
	btn_totjudgclose.attribute("class") = "btn2_letter6";
	btn_dschclosecancel.attribute("class") = "btn2_letter6";
	btn_midregist.attribute("class") = "btn2_letter6";
	btn_midregistyn.attribute("class") = "btn2_letter6";

	ds_main_item1_iteminfo.clearData(); ds_main_item1_iteminfo.addRow();
	ds_main_item2_itemcalc.clearData(); ds_main_item2_itemcalc.addRow();
	ds_main_item2_incd.clearData(); ds_main_item2_incd.addRow();
	ds_main_item4_insu.clearData(); ds_main_item4_insu.addRow();
	ds_send.clearData(); ds_send.addRow();

	ds_main_list1.clearData();
	dsf_makeValue( ds_main, "list1", "string", "" );

	ds_main_list2.clearData();
	dsf_makeValue( ds_main, "list2", "string", "" );

	ds_main_list3.clearData();
	dsf_makeValue( ds_main, "list3", "string", "" );

	ds_main_list4.clearData();
	dsf_makeValue( ds_main, "list4", "string", "" );

//model.refresh();

	// 무조건 대상자 조회 화면을 refresh - 20080926 박창원
	var trgtManWindow = getChildWindow("SMPIJ00200");
	trgtManWindow.javascript.fGetInBfJudgTrgtManList();
	trgtManWindow.javascript.fCountPat();

//trgtManWindow.model.refresh();

}

// 치식 팝업용 데이타 생성
function fSetToothPop(row, flag) {

	ds_hidden_sppiz00600_cond_list.clearData();
	dsf_makeValue( ds_hidden_sppiz00600_cond, "list", "string", "" );
	// 상병
	var cntdiag = ds_main_list3_diaglist.rowcount;
	// 처방
	var cntiscl = ds_main_list2_iscllist.rowcount;

	var cd = "";
	var cdnm = "";
	var orddd = "";
	var toot = "";
	var rowcnt = 1;

	for (i=1; i<=cntdiag; i++) {

		cd = ds_main_list3_diaglist.getColumn(i, "diagcd");
		cdnm = ds_main_list3_diaglist.getColumn(i, "diagnm");
		orddd = ds_main_list3_diaglist.getColumn(i, "ordfromdd");
		toot = ds_main_list3_diaglist.getColumn(i, "toot");
		estmcls = ds_main_list2_iscllist.getColumn(i, "estmcls");  //20100318 정승우 의정부 오류로 추가

		if (cd != "") {
			if ((toot != "-" && toot != "")  || estmcls == "U") {

				var milktoothstr = "ABCDE000";
				var subTootStr = "";

				for (var inx = 0; inx < 32; inx++) {
					var tootnum = toot.substr(inx,1);
					if (tootnum == "*") {		// 선택된 영구치의 경우 1~8 사이 숫자로 표시한다.
						if (inx < 8) {
							subTootStr += (8 - inx);
						}
						else if (inx > 7 && inx < 16) {
							subTootStr += (inx - 7);
						}
						else if (inx > 15 && inx < 24) {
							subTootStr += (24 - inx);
						} else {
							subTootStr += (inx - 23);
						}
					} else if (tootnum == "#") {		// 선택된 유치의 경우 A~E 사이 알파벳으로 표시한다.
						if (inx < 8) {
							subTootStr += milktoothstr.charAt(7 - inx);
						}
						else if (inx > 7 && inx < 16) {
							subTootStr += milktoothstr.charAt(inx - 8);
						}
						else if (inx > 15 && inx < 24) {
							subTootStr += milktoothstr.charAt(23 - inx);
						} else {
							subTootStr += milktoothstr.charAt(inx - 24);
						}
					} else {	// if (tootnum == "0") 선택되지 않은 경우 공백으로 처리한다.
						subTootStr += " ";
					}
				}

				//치식 표기를 설정한다.
				if (row == i && flag == "1" ) {
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "chos", "true");
				} else {
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "chos", "false");
				}
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "flag", "상병");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cd", cd);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cdnm", cdnm);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightupper", subTootStr.substr(0, 8));
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftupper", subTootStr.substr(8, 8));
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightlower", subTootStr.substr(16, 8));
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftlower", subTootStr.substr(24, 8));
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "orddd", orddd);	
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "toot", toot);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "row", i);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "pid", "");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "indd", "");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cretno", "");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "instcd", "");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "execdd", "");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "calcseqno", "");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "calcscorseqno", "");

				rowcnt = rowcnt+1;

			} else {
				if (row == i && flag == "1"  ) {

					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "chos", "true");				
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "flag", "상병");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cd", cd);
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cdnm", cdnm);
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightupper", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftupper", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightlower", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftlower", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "orddd", orddd);	
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "toot", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "row", i);
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "pid", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "indd", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cretno", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "instcd", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "execdd", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "calcseqno", "");
					ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "calcscorseqno", "");

					rowcnt = rowcnt+1;	
				}
			}
		} // if cd != ""
	} // for end

	for (i=1; i<=cntiscl; i++) {
		cd = ds_main_list2_iscllist.getColumn(i, "snglcalcscorcd");
		cdnm = ds_main_list2_iscllist.getColumn(i, "hngnm");
		orddd = ds_main_list2_iscllist.getColumn(i, "ordfromdd");
		toot = ds_main_list2_iscllist.getColumn(i, "tootfact");
		estmcls = ds_main_list2_iscllist.getColumn(i, "estmcls");

		if ((toot != "-" && toot != "") || estmcls == "U") {
			var milktoothstr = "ABCDE000";
			var subTootStr = "";
			var tmpStr  = "";

			for (var inx = 0; inx < 32; inx++) {
				var tootnum = toot.substr(inx,1);
				if (tootnum == "*") {		// 선택된 영구치의 경우 1~8 사이 숫자로 표시한다.
					if (inx < 8) {
						subTootStr += (8 - inx);
					}
					else if (inx > 7 && inx < 16) {
						subTootStr += (inx - 7);
					}
					else if (inx > 15 && inx < 24) {
						subTootStr += (24 - inx);
					} else {
						subTootStr += (inx - 23);
					}
				} else if (tootnum == "#") {		// 선택된 유치의 경우 A~E 사이 알파벳으로 표시한다.
					if (inx < 8) {
						subTootStr += milktoothstr.charAt(7 - inx);
					}
					else if (inx > 7 && inx < 16) {
						subTootStr += milktoothstr.charAt(inx - 8);
					}
					else if (inx > 15 && inx < 24) {
						subTootStr += milktoothstr.charAt(23 - inx);
					} else {
						subTootStr += milktoothstr.charAt(inx - 24);
					}
				} else {	// if (tootnum == "0") 선택되지 않은 경우 공백으로 처리한다.
					subTootStr += " ";
				}
			}

			//치식 표기를 설정한다.
			if (row == i && flag == "2" ) {
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "chos", "true");
			} else {
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "chos", "false");
			}
			ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "flag", "처방");
			ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cd", cd);
			ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cdnm", cdnm);
			ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightupper", subTootStr.substr(0, 8));
			ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftupper", subTootStr.substr(8, 8));
			ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightlower", subTootStr.substr(16, 8));
			ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftlower", subTootStr.substr(24, 8));
			ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "orddd", orddd);
			ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "toot", toot);
			ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "row", i);
			rowcnt = rowcnt+1;
		} else {
			if (row == i && flag == "2" ) {
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "chos", "true");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "flag", "처방");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cd", cd);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "cdnm", cdnm);
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightupper", "");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftupper", "");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "rightlower", "");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "leftlower", "");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "orddd", orddd);	
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "toot", "");
				ds_hidden_sppiz00600_cond_list_toothapplist.setColumn( rowcnt, "row", i);
				rowcnt = rowcnt+1;
			}
		}
	}
}

// 치식 팝어에 받은 데이타
function fGetToothPop() {

	var tootSelectcnt = ds_hidden_sppiz00600_rslt_list.rowcount;

	var flag = "";
	var row = "";
	var toot = "";

	tootSelectcnt = eval(tootSelectcnt) + 1;

	for (var i=1; i<tootSelectcnt; i++) {

		flag = ds_hidden_sppiz00600_rslt_list.getColumn(i, "flag");
		row = ds_hidden_sppiz00600_rslt_list.getColumn(i, "row");

		var rlsttoot = ds_hidden_sppiz00600_rslt_list.getColumn(i, "toot");
		var rlsttoot1 = ds_hidden_sppiz00600_rslt_list.getColumn(i, "toot1");

		if (rlsttoot == "") {
			rlsttoot = "-";
		}
		if (rlsttoot1 == "") {
			rlsttoot1 = "-";
		}

		if (flag == "1") {
			toot = ds_main_list3_diaglist.getColumn(row, "toot"));
			ds_main_list3.setColumn( row , "toot", rlsttoot);
			ds_main_list3.setColumn( row , "toot1", rlsttoot1);
			if (rlsttoot != toot) {	// 치식번호가 변경된 경우
				var diagstatus = grd_diaglist.rowstatus(row);
				if (diagstatus == 0 || diagstatus == 2) {	// 0 : new, 2 : update
					grd_diaglist.rowstatus(row) = 2;		// 2 : update
				}
			}
		}
	}
}

//1. 중증, 산정특례 변경 여부 체크
function fUpdtCheckEssc(flag){

	var pid = ds_main_item1_iteminfo.getColumn(0, "pid");
	var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");

	var mskind = ds_main_item1_iteminfo.getColumn(0, "mskind");
	var insukind = ds_main_item1_iteminfo.getColumn(0, "insukindcd");
	var suppkind = ds_main_item1_iteminfo.getColumn(0, "suppkindcd");
	var cretno = ds_main_item1_iteminfo.getColumn(0, "cretno");
	var fromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
	var dschdd = ds_main_item1_iteminfo.getColumn(0, "dschdd");
	var insuflag = "";

	var isEsscdiag = btn_esscdiag.visible;
	var isEsscdiagUpdt = false;

	var isUpdtEsscV193 = ds_hidden_updtchkessc.getColumn(0, "esscV193");
	var isUpdtEsscV191 = ds_hidden_updtchkessc.getColumn(0, "esscV191");
	var rareesscyn = ds_hidden_result_rareessc.getColumn(0, "rareesscyn");

	ds_hidden_item1.setColumn( 0, "vcode","");
	// 희귀난치 산정특례 추가 - 20100224 박창원
	if(suppkind == "05" || suppkind == "06" || suppkind == "39" || suppkind == "40" || suppkind == "50" || suppkind == "31" || (insukind == "22" && suppkind == "08")){ // 20090325 차상위2종 추가 - 박창원 20100318 정승우 신생아 / 보호2종 6세미만 추가
		return;
	}
	if(pid){
		var isEsscV193 = false;
		var isEsscV191 = false;

		var isEsscVisible = true;

		var cEsscCnt = ds_hidden_result_chkessc.rowcount;
		if (cEsscCnt == 0 && rareesscyn != "Y" ) {	// 특정내역이 없는 경우임
			return;
		} else {
			var chkspclcd = model.getValue("ds_hidden_result_chkessc[vcode='V191' or vcode='V192']_vcode");
			var spclcd = ds_hidden_result_chkessc.lookupExpr("vcode == '" + V193 + "'", "vcode");
			if (chkspclcd.length > 0) {
				isEsscV191 = true;
				//이미 체크된건이 V193인경우 V193으로 처리 한다. 
				var chk = ds_hidden_item1.getColumn(0, "vcode");
				if(chk == "V193"){
					ds_hidden_item1.setColumn( 0, "vcode","V193");
				}else{
					ds_hidden_item1.setColumn( 0, "vcode",chkspclcd);
				}
			}
			if(spclcd == "V193" && suppkind != "32") { // 차상위는 중증등록버튼이 활성화되지 않게한다. 20090227 박창원
				ds_hidden_item1.setColumn( 0, "vcode",spclcd);
				var suppkindcd = ds_main_item1_iteminfo.getColumn(0, "suppkindcd");

				isEsscV193 = true;
				// V193인경우 이미 적용하면 끝이기때문에 일부로 보여지지 않도록 했었지만
				// 사용자 요구사항으로 그냥 버튼 살아 있게 한다. 2007.12.07 박도형
				//if (suppkindcd == "06") {
				//	isEsscVisible = false;
				//}
			}
		}

		btn_esscdiag.visible = false;

		if (isEsscV191) {
			if (isEsscVisible) {
				if (isEsscdiag) {
					if (isUpdtEsscV191 == "True") {
						isEsscdiagUpdt = false;
					} else {
						isEsscdiagUpdt = true;
					}
				} else {
					isEsscdiagUpdt = true;
				}
				btn_esscdiag.visible = true;
			} else {
				btn_esscdiag.visible = false;
				isEsscdiagUpdt = false;
			}
			btn_esscdiag.attribute("class") = "btn5_letter4";
			btn_esscdiag.attribute("color") = "#ff0066";

		} else {
			if (isEsscV193) {
				if (isEsscVisible) {
					if (isEsscdiag) {
						if (isUpdtEsscV193 == "True") {
							isEsscdiagUpdt = false;
						} else {
							isEsscdiagUpdt = true;
						}
					} else {
						isEsscdiagUpdt = true;
					} 
					btn_esscdiag.visible = true;
				} else {
					btn_esscdiag.visible = false;
					isEsscdiagUpdt = false;
				}
				btn_esscdiag.attribute("class") = "btn5_letter4";
				btn_esscdiag.attribute("color") = "#ff0066";						
			} else {
				isEsscdiagUpdt = false;
				btn_esscdiag.attribute("class") = "btn2_letter4";
				btn_esscdiag.visible = false;								
			}
		} 

		//if (isEsscdiagUpdt) {

			var trgtManWindow = getChildWindow("SPPIJ01900");
			var vcode = ds_hidden_item1.getColumn(0, "vcode");

			ds_hidden_sppij01900_cond.setColumn( 0, "pid",ds_main_item1_iteminfo.getColumn(0, "pid"));
			ds_hidden_sppij01900_cond.setColumn( 0, "indd",ds_main_item1_iteminfo.getColumn(0, "indd1"));
			ds_hidden_sppij01900_cond.setColumn( 0, "mskind",ds_main_item1_iteminfo.getColumn(0, "mskind"));
			ds_hidden_sppij01900_cond.setColumn( 0, "brateflag",ds_main_item1_iteminfo.getColumn(0, "brateflag"));
			ds_hidden_sppij01900_cond.setColumn( 0, "brthdd",ds_main_item1_iteminfo.getColumn(0, "brthdd"));
			ds_hidden_sppij01900_cond.setColumn( 0, "vcode",vcode);

			// 희귀난치 산정특례 로직 추가 - 20100224 박창원
			var fromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");

			var insukind = ds_main_item1_iteminfo.getColumn(0, "insukindcd");
	        var suppkind = ds_main_item1_iteminfo.getColumn(0, "suppkindcd");

			if (insukind == "11" && suppkind != "31" && suppkind != "32" && suppkind != "01" && fromdd >= "20090701" && rareesscyn == "Y") {
				// 20090930 JHP 희귀난치 등록여부 확인위해 추가함.   -- 시작
				var anohosprgstflag 	= ds_main_item13_rooa.getColumn(0, "anohosprgstflag");
				var rareobstno 		= ds_main_item13_rooa.getColumn(0, "rareobstno");
				var rareobstfromdd 	= ds_main_item13_rooa.getColumn(0, "rareobstfromdd");
				var rareobsttodd 	= ds_main_item13_rooa.getColumn(0, "rareobsttodd");
				var signyn 		= ds_main_item13_rooa.getColumn(0, "signyn");	

				//20091109 JHP 희귀난치 메세지는 상병에 R_O 상병일 경우는 메세지 제외함.
				var ruleoutyn = ds_main_list3_diaglist.getColumn(1, "ruleoutyn");
				if(ruleoutyn == 'true'){
					// 주상병 R_O일때에는 희귀난치 메세지 처리 안함.
				}else{
					if (fromdd >= "20091001") { // 10월1일 이후에는 등록번호가 반드시 있어야한다. - 추가코딩필요
						// 타병원등록 여부 , Y:타병원,N:우리병원
						if(anohosprgstflag == "Y"){
							// 희귀난치 번호여부
							if(rareobstno == null || rareobstno == '-'){
								sysf_messageBox("## 희귀난치정보 ## : 타병원등록이나 희귀난치번호가 ","I004");
							} else {
								btn_esscdiag.visible = true;
								btn_esscdiag.attribute("class") = "btn5_letter4";
								btn_esscdiag.attribute("color") = "#ff0066";

							}
						} else if(anohosprgstflag == "N"){
							// 희귀난치 번호여부
							if(rareobstno == null || rareobstno == '-'){
								if(signyn  == "Y"){
									btn_esscdiag.visible = true;
									btn_esscdiag.attribute("class") = "btn5_letter4";
									btn_esscdiag.attribute("color") = "#ff0066";

								} else {
									sysf_messageBox("## 희귀난치정보 ## : 재원병원등록이나 등록번호 및 서명정보가 ","I004");
								}
							} else{
								btn_esscdiag.visible = true;
								btn_esscdiag.attribute("class") = "btn5_letter4";
								btn_esscdiag.attribute("color") = "#ff0066";

							}
						} else {
							// 희귀난치 data(mmohrooa)에 정보없음.
							sysf_messageBox("## 희귀난치정보 ## : 등록번호 및 서명정보가 ","I004");
						}
					} else {
						btn_esscdiag.visible = true;
						btn_esscdiag.attribute("class") = "btn5_letter4";
						btn_esscdiag.attribute("color") = "#ff0066";
					}
				}
			} 
			// 20100224 박창원 희귀난치 산정특례추가
			var anohosprgstflag 	= ds_main_item13_rooa.getColumn(0, "anohosprgstflag");
			var rareobstno 		= ds_main_item13_rooa.getColumn(0, "rareobstno");
			var rareobstfromdd 	= ds_main_item13_rooa.getColumn(0, "rareobstfromdd");
			var rareobsttodd 	= ds_main_item13_rooa.getColumn(0, "rareobsttodd");
			var signyn 		= ds_main_item13_rooa.getColumn(0, "signyn");	
			var fromdd 		= ds_main_item1_iteminfo.getColumn(0, "indd1");

			if (insukind == "11" && suppkind != "32" && rareesscyn == "Y" && suppkind != "01" && suppkind != "50" && suppkind != "46" && fromdd >= "20090701" 
			   &&   ((anohosprgstflag == "N" && signyn == "Y") ||   (anohosprgstflag == "Y"  && rareobstfromdd <= fromdd && rareobsttodd >= fromdd)))  {
				fesscdiag();
			}else if(vcode == "V193" && suppkind != "32" && suppkind != "06" && suppkind != "40" && suppkind != "31" && suppkind != "69" && !(insukind == "22" && suppkind == "08")   ){ // 차상위 1종일때는 등록암 메세지가 안나오게 20090227 박창원 20100318 정승우 신생아유형_급여2종 6세미만 일때 등록암 메세지 나오지 않도록
				var msg = sysf_messageBox("등록암환자입니다. 중증요율 적용","S001");
				if(msg !=6){
					return;
				}else{
					Insuchange("06");
				}

			}else if(vcode == "V191" || vcode == "V192"){
				if (flag == "S") {
					var msg = sysf_messageBox("중증수술 환자입니다. 중증요율 적용","S001");
					if(msg !=6){
						return;
					}else{
						if (trgtManWindow == null) {
								frmf_open("SPPIJ01900", "SPPIJ01900", "ds_hidden_sppij01900_cond""-"ds_send_cond"", "", "", "10", "10", "", "", "", "", "", "M");
						} else {
							activateChild("SPPIJ01900");

//model.refresh();

						}
					}
				}
			} else {
				if (flag == "S") {
					//sysf_messageBox("저장이","I002");
				}
				//중증처방여부 체크
				fChkEsscEDI();
			}					
	}
}

// 변경된 퇴원확정여부, 심사상태 flag를 대상자조회화면에 보여준다. (2008.01.28 박지욱 추가)
function fSetChildStat() {

//model.refresh();

	// 대상자조회화면에 심사상태를 업데이트 보여주도록 한다. (2008. 01. 28 박지욱 추가, 심사상태와 퇴원확정여부, 최종심사자, 심사일자 변경)
	var trgtManWindow = getChildWindow("SMPIJ00200");	// SMPIJ00600_입원재원심사대상자조회.xrw
	if (trgtManWindow != null) {
		var dschjudgprcsstat 	= ds_main_item1_iteminfo.getColumn(0, "dschjudgprcsstat");				// 심사상태
		var dschnotiyn 			= ds_main_item1_iteminfo.getColumn(0, "dschnotiyn");					// 퇴원확정여부
		var selectedRow = trgtManWindow.ds_hidden.getColumn(0, "selectedRow");
		var row = parseInt(selectedRow);

		if (row > 0) {
			trgtManWindow.ds_main_list1.setColumn( row , "dschjudgprcsstat", dschjudgprcsstat);
			trgtManWindow.ds_main_list1.setColumn( row , "dschnotiyn", dschnotiyn);
			trgtManWindow.ds_main_list1.setColumn( row , "lastjudgendid", VAL_usernm);
			trgtManWindow.ds_main_list1.setColumn( row , "lastjudgdt", VAL_today);
		}
	}
	// 끝
}

// 중증처방체크로직 추가   - 2007.11.27
// 중증처방만 있고 상병이 없는경우 Alert메세지를 띄운다. 
// 조건 : 중증처방 존재 + 중증버튼 없음 + 중증요율 아님
function fChkEsscEDI(){
	var chkBtn = btn_esscdiag.visible;
	var chkSuppkind = ds_main_item1_iteminfo.getColumn(0, "suppkindcd");
	var chkInsukind = ds_main_item1_iteminfo.getColumn(0, "insukindcd");

	if(chkBtn == "True" || chkSuppkind == "05" || chkSuppkind == "39"){ // 20090325 차상위 2종 추가 - 박창원
		return;
	}
	if(chkInsukind != "11" && chkInsukind != "21" && chkInsukind != "22" ){
		return;	
	}

	var cEssc = instance1.selectSingleNode("ds_hidden_result_chkesscedi");
	if (cEssc == null) {	// 특정내역이 없는 경우임
		return;
	}else{
	frmf_modal("SPPIJ02100", "SPPIJ02100", "ds_hidden_result_chkesscedi""-"ds_main_list1"", "", "", "10", "10", "", "", "", "", "", "M");
	}
}

// 마감 가능 여부 체크(임시적 사용)
function fChkClose() {
	var flag  = true;
	// 처방내역에 있는 미시행 건이 있는지 체크 
	//이경민 속도 개선 for -> xpath
	var chkN = ds_main_list2_iscllist.lookupExpr("execprcpstatcd == 'N'", "execprcpstatcd");
	var chkO = ds_main_list2_iscllist.lookupExpr("execprcpstatcd == 'O'", "execprcpstatcd");
	if(chkN == "N" || chkO == "O"){
		flag = false;
	}

	return flag;
}

// grid 타이틀 컬럼 정보
function getOrderInfoOfCol(grdid){

   	var refdata  = "";  // ref
   	var sizedata = "";  // size

  	var grdobj = document.controls.item(grdid);
   	var totcol   = grdobj.cols;

   	for(var i = 0; i < totcol; i++){
      		var refval = grdobj.colAttribute(i, "ref");
      		refdata += refval + "^";

      		var sizeval = grdobj.colWidth(i);
      		sizedata += sizeval + "^";
   	}

	refdata  = refdata.substring(0 , refdata.length-1);
	sizedata = sizedata.substring(0, sizedata.length-1);

	var scrnid =  ds_hidden_listval_uuee.lookupExpr("compsnm == '" + grdid + "'", "scrnid");
	var compscnts =  ds_hidden_listval_uuee.lookupExpr("compsnm == '" + grdid + "'", "compscnts");

	if (scrnid == "") {
		ds_send_listval_uuee.setColumn( 0, "flag","I");
	} else {
		ds_send_listval_uuee.setColumn( 0, "flag","U");
	}
	ds_send_listval_uuee.setColumn( 0, "scrnid","SMPIJ00300");
	ds_send_listval_uuee.setColumn( 0, "compsnm",grdid.toString());
	ds_send_listval_uuee.setColumn( 0, "compscnts",refdata);
	ds_send_listval_uuee.setColumn( 0, "compsrefcnts","-");
	ds_send_listval_uuee.setColumn( 0, "compssizecnts",sizedata);

//	if ( submit("TXPIJ00402") ) {
var oParam = {};
    oParam.id          = "TXPIJ00402";
    oParam.service     = "bfjudgapp.InHospJudgDetl";
    oParam.method      = "reqExeSaveUuee";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=uuee";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00402";

tranf_submit(oParam);
/*
function cf_TXPIJ00402(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00402(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00402") > -1
arErrorCode.pop("TXPIJ00402") < 0
*/


		sysf_messageBox("사용자 환경 저장이","I002");
	}
}

// grid 타이틀 컬럼 정보
function getOrderInfoOfRdo(rdoid){

   	var refdata  = "";  // ref
   	var sizedata = "";  // size

	var scrnid =  ds_hidden_listval_uuee.lookupExpr("compsnm == '" + rdoid + "'", "scrnid");
	var compscnts =  ds_hidden_listval_uuee.lookupExpr("compsnm == '" + rdoid + "'", "compscnts");
	var calcamtflag = ds_hidden_list1_isclcond.getColumn(0, "calcamtflag")
	if (scrnid == "") {
		ds_send_listval_uuee.setColumn( 0, "flag","I");
	} else {
		ds_send_listval_uuee.setColumn( 0, "flag","U");
	}
	ds_send_listval_uuee.setColumn( 0, "scrnid","SMPIJ00300");
	ds_send_listval_uuee.setColumn( 0, "compsnm",rdoid);
	ds_send_listval_uuee.setColumn( 0, "compscnts",(calcamtflag.length == 0 ? "-" : calcamtflag));
	ds_send_listval_uuee.setColumn( 0, "compsrefcnts", "-");
	ds_send_listval_uuee.setColumn( 0, "compssizecnts","-");

//	if ( submit("TXPIJ00402") ) {
var oParam = {};
    oParam.id          = "TXPIJ00402";
    oParam.service     = "bfjudgapp.InHospJudgDetl";
    oParam.method      = "reqExeSaveUuee";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=uuee";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00402";

tranf_submit(oParam);
/*
function cf_TXPIJ00402(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00402(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00402") > -1
arErrorCode.pop("TXPIJ00402") < 0
*/


		//sysf_messageBox("사용자 환경 저장이","I002");
	}
}

function getOrderInfoOfChk(chkid){

	var scrnid =  ds_hidden_listval_uuee.lookupExpr("compsnm == '" + chkid + "'", "scrnid");
	var compscnts =  ds_hidden_listval_uuee.lookupExpr("compsnm == '" + chkid + "'", "compscnts");
	var chkval = model.getValue("ds_hidden_list1_isclcond/" + chkid.replace("chk_",""));

	if (scrnid == "") {
		ds_send_listval_uuee.setColumn( 0, "flag","I");
	} else {
		ds_send_listval_uuee.setColumn( 0, "flag","U");
	}

	ds_send_listval_uuee.setColumn( 0, "scrnid","SMPIJ00300");
	ds_send_listval_uuee.setColumn( 0, "compsnm",chkid);
	ds_send_listval_uuee.setColumn( 0, "compscnts",(chkval.length == 0 ? "N" : chkval));
	ds_send_listval_uuee.setColumn( 0, "compsrefcnts", "-");
	ds_send_listval_uuee.setColumn( 0, "compssizecnts","-");

//	if ( submit("TXPIJ00402") ) {
var oParam = {};
    oParam.id          = "TXPIJ00402";
    oParam.service     = "bfjudgapp.InHospJudgDetl";
    oParam.method      = "reqExeSaveUuee";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=uuee";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00402";

tranf_submit(oParam);
/*
function cf_TXPIJ00402(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00402(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00402") > -1
arErrorCode.pop("TXPIJ00402") < 0
*/


		//sysf_messageBox("사용자 환경 저장이","I002");
	}
}

// 사용자별 grid 타이틀 컬럼 설정
function setOrderInfoOfCol(grdid, refdata, sizedata){

   	var grdobj  = document.controls.item(grdid);
   	var refarr  = refdata.split("^");
   	var sizearr = sizedata.split("^");

   	for(var i = 0; i < refarr.length; i++){
      		var colcnt = grdobj.colref("" + refarr[i] + "");
      		grdobj.colMove(i, colcnt, "before",false);

      		var size = sizearr[i];
      		grdobj.colWidth(i) = eval(size);
  	}

//grdobj.refresh();

 	var caption = "";
  	for( var i = 1; i < grdobj.cols ; i++ ){
		if (caption == "") {
			caption = grdobj.textMatrix(0,i);								
		} else {
			caption += "^" + grdobj.textMatrix(0,i);
		}							
	}
 	grdobj.caption = caption;
}

// 중간청구등록 화면에서 조회된 환자가 중간 청구 등록이 된 경우.
function fSetMidregist(midcflag) {

	btn_midregist.enable = true;

	if(midcflag == "Y"){
		btn_midregist.attribute("class") = "btn2_letter6";
		btn_midregist.attribute("color") = "#ff0066";
		btn_midregistyn.enable = false;
		btn_midcomplete.enable = true;
		btn_midcancel.enable = true;

	} else {
		btn_midregist.attribute("class") = "btn2_letter6";
		btn_midregistyn.attribute("class") = "btn2_letter6";
		btn_midregistyn.enable = true;
		btn_midcomplete.enable = false;
		btn_midcancel.enable = false;
	}
}

//유형적용 완료후 소급처리 한다. - 20080730 수가계산을 날짜별로 loop. - 박창원
function fReCalc() {
	// 입원일 부터 현재까지 계산한다(일일단위로 loop)			
	var fromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
	var todd = ds_main_item1_iteminfo.getColumn(0, "todd");
	if (todd == "99991231") {
		todd = VAL_today;
	}
	var period = utlf_getDateInterval(fromdd, todd);
	// fromdd부터 currentdate까지 loop
	for (i=1; i<= (period+1); i++) {
		ds_send.setColumn( 0, "calcbasedd" ,  fromdd); 

//		var rslt =  submit("TXPIJ00205",false);
var oParam = {};
    oParam.id          = "TXPIJ00205";
    oParam.service     = "bfjudgapp.InHospJudgTrgtMan";
    oParam.method      = "reqInCalculation";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00205";

tranf_submit(oParam);
/*
function cf_TXPIJ00205(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00205(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00205") > -1
arErrorCode.pop("TXPIJ00205") < 0
*/



	if (rslt == false ) { 
	 	return false;
	}

	// fromdd를 증가시킨다(하루씩)
	fromdd = fromdd.toDate("YYYYMMDD");
	fromdd = fromdd.getAddDate(1);
	fromdd = fromdd.getDateFormat();

	}
}

// SPPIZ00700_심사Comment조회.xrw 호출(심사자메모,EDI메모)
function fGetJudgEdiComment(memoflag, memocls) {
	ds_hidden_sppiz00700_rslt.clearData(); ds_hidden_sppiz00700_rslt.addRow();
	ds_hidden_sppiz00700_cond.clearData(); ds_hidden_sppiz00700_cond.addRow();
	ds_hidden_sppiz00700_cond.setColumn( 0, "memoflag", memoflag);
	ds_hidden_sppiz00700_cond.setColumn( 0, "memocls",  memocls);

	frmf_modal("SPPIZ00700", "SPPIZ00700", "ds_hidden_sppiz00700""-"ds_send_sppiz00700"", "", "", "10", "10", "", "", "", "", "", "M");
}

// 수정추가 20090813 외래요율환자 일경우 보험, 보조유형 정보가 맞는지 확인하여 alert처리함. 
function fOutRateInsuSuppflag(){
	//속도개선 통합 plet2
	//submit("TRPIJ00316");
	if(ds_main_outrateinsusuppflag_info.getColumn(0, "yn") == "N"){
		sysf_messageBox("6시간 미만으로 외래요율 퇴원건입니다. \n환자에게 해당하는 보조유형을 선택하여 변경하시고 재계산 한후 심사","I008");
	}
}

//평가메모 관련 팝업창세팅
function fSetTstMemoRefresh(){

	var memo = ds_hidden_sppiz00700_rslt.getColumn(0, "memo");
	var tmp = ds_main_item1_iteminfo.getColumn(0, "edirmk");

	if(tmp){
		tmp = tmp + " ";
	}
	ds_main_item1_iteminfo.setColumn( 0, "tstrmk",tmp + memo);
	//
//model.refresh();
 최적화 문제로 대체 20080731 박창원

//model.refresh();

}

function fSetRdoReset(){
	var rdo_name = ds_hidden_listval_uuee.lookupExpr("compsnm == '" + rdo_zerofilter + "'", "compsnm");
	var rdo_val = ds_hidden_listval_uuee.lookupExpr("compsnm == '" + rdo_zerofilter + "'", "compscnts");
	if (rdo_name.length > 0) {
		if (rdo_val == "calcamt!='0' or matractflag='0'"){
			model.setValue(rdo_zerofilter.attribute("ref"), "0");
			ds_hidden_list1_isclcond.setColumn( 0, "calcamtflag",rdo_val );
		} else if (rdo_val == "calcamt='0'") {
			model.setValue(rdo_zerofilter.attribute("ref"), "1");
			ds_hidden_list1_isclcond.setColumn( 0, "calcamtflag",rdo_val );
		} else {
			model.setValue(rdo_zerofilter.attribute("ref"), "-");
			ds_hidden_list1_isclcond.setColumn( 0, "calcamtflag","");
		}

	} else {
		model.setValue(rdo_zerofilter.attribute("ref"), "0");
		ds_hidden_list1_isclcond.setColumn( 0, "calcamtflag","calcamt!='0' or matractflag='0'");
	}

	var chk_name = ds_hidden_listval_uuee.lookupExpr("compsnm == '" + chk_showsubtotal + "'", "compsnm");
	var chk_val = ds_hidden_listval_uuee.lookupExpr("compsnm == '" + chk_showsubtotal + "'", "compscnts");

	if (chk_name.length > 0) {
		if (chk_val == "Y"){
			ds_hidden_list1_isclcond.setColumn( 0, "showsubtotal", chk_val);
		} else {
			ds_hidden_list1_isclcond.setColumn( 0, "showsubtotal", "");
		}
	} else {
		ds_hidden_list1_isclcond.setColumn( 0, "showsubtotal", "");
	}

	chk_name = ds_hidden_listval_uuee.lookupExpr("compsnm == '" + chk_showitemcoloryn + "'", "compsnm");
	chk_val = ds_hidden_listval_uuee.lookupExpr("compsnm == '" + chk_showitemcoloryn + "'", "compscnts");

	if (chk_name.length > 0) {
		if (chk_val == "Y"){
			ds_hidden_list1_isclcond.setColumn( 0, "showitemcoloryn", chk_val);
		} else {
			ds_hidden_list1_isclcond.setColumn( 0, "showitemcoloryn", "");
		}
	} else {
		ds_hidden_list1_isclcond.setColumn( 0, "showitemcoloryn", "");
	}

	model.setValue(rdo_actmatflag.attribute("ref"), "-");
	model.setValue(rdo_actingflag.attribute("ref"), "all");
	model.setValue(rdo_insuflag.attribute("ref"), "-");
	model.setValue(rdo_ordfilflag.attribute("ref"), "-");
	model.setValue(rdo_cpflag.attribute("ref"), "-");

	ds_hidden_list1_isclcond.setColumn( 0, "matractflag","");
	ds_hidden_list1_isclcond.setColumn( 0, "calcpayflag","");
	ds_hidden_list1_isclcond.setColumn( 0, "snglcalcscorcls","");
	ds_hidden_list1_isclcond.setColumn( 0, "cpflag","");
	ds_hidden_list1_isclcond.setColumn( 0, "edicd","");
	ds_hidden_list1_isclcond.setColumn( 0, "snglcalcscorcd","");
	ds_hidden_list1_isclcond.setColumn( 0, "actingflag","");
}

function openSMMMR06900() {
	var chk = ds_main_item1_iteminfo.getColumn(0, "patnm");

	if(chk){
		var trgtManWindow = getChildWindow("SMMMR06900");

		if (trgtManWindow == null) {
			frmf_modal("SMMMR06900", "", ""-"", "", "", "", "", "", "", "", "", "", "M");
			//frmf_modal("SMMMR06901", "SPPIJ02501", "ds_hidden_sppij02501_cond""-"ds_send"", "", "", "10", "10", "", "", "", "", "", "M");
		}else{
			activateChild("SMMMR06900");
		}

	}
}

function fGetDrgOpenPopup(flag){
	//DRG 설정..시작
	var opchkyn =  ds_main_item11_drginfo.getColumn(0, "opchkyn");
	var drgmchkyn = ds_main_item11_drginfo.getColumn(0, "drgmchkyn");
	var fromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
	var indaycnt = parseInt(ds_main_list1_insulist.lookupExpr("fromdd == '" + fromdd + "'", "indaycnt"));
	var dschjudgprcsstat = ds_main_item1_iteminfo.getColumn(0, "dschjudgprcsstat");
	var cnt = dsds_main_list2_iscllist.filter("drgacptflag='" + C + "'").rowcount ;
	var snglcalcscorcd = ds_main_list2_iscllist.lookupExpr("drgacptflag == 'C'", "snglcalcscorcd");

	/* DRG 추가인정 수술료의 산정의미를 체크할 필요가 없다!! 추가인정금액 생성 시 제외하고 발생하므로!! (2015.06.24 LEJ) 
	if (cnt > 0 && dschjudgprcsstat != "C") {
		var estmcd000 = getNodesetCount("ds_main_list2_iscllist[drgacptflag='C' and estmcd='000']_drgacptflag");
		var estmcd004 = getNodesetCount("ds_main_list2_iscllist[drgacptflag='C' and estmcd='004']_drgacptflag");
		var estmcd = getNodesetCount("ds_main_list2_iscllist[drgacptflag='C' and estmcd='']_drgacptflag");
		if (estmcd000 > 0 || estmcd004 > 0 || estmcd > 0) {
		} else {
			sysf_messageBox("["+snglcalcscorcd+"] DRG 추가 인정 수술료입니다. 산정의미를","I007");
			return false;
		}
	}
	*/

	if (opchkyn=="Y" && indaycnt <= 30) {

		// DRG 대상자 중 혈우병 특정기호: V009, HIV 특정기호: V103 존재 시 DRG 제외 대상자 메세지
		var drgexceptyn = ds_main_item11_endcnclstat.getColumn(0, "drgexceptyn");
		if (drgexceptyn == "Y") {
			if ( sysf_messageBox("DRG 제외 상병(혈우병 또는 HIV)이 존재하는 DRG 대상자 입니다. 마감","Q004") != 6 ) {
				return false;
			}
		}

		if (flag == "O") { openSMMMR06900(); }

		var vpid = ds_main_item1_iteminfo.getColumn(0, "pid");
		var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");
		var ordfromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
		var cretno = ds_main_item1_iteminfo.getColumn(0, "cretno");

		frmf_setParameter("pid", vpid);
		frmf_setParameter("indd", indd);
		frmf_setParameter("ordfromdd", ordfromdd);
		frmf_setParameter("cretno", cretno);
		frmf_setParameter("drgmstat", flag);

		frmf_modal("SPPIJ03200", "SPPIJ03200", "ds_hidden_sppij03200_cond""-"ds_send_data_drginfo"", "", "", "10", "10", "", "", "", "", "", "M");

		if (ds_main_item11_drginfo.getColumn(0, "rslt") != "true") {
			return false;
		}
	}
	//DRG완료
}

function fGetKDrgOpenPopup(flag){
	var vpid = ds_main_item1_iteminfo.getColumn(0, "pid");
	var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");
	var ordfromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
	var cretno = ds_main_item1_iteminfo.getColumn(0, "cretno");

	frmf_setParameter("pid", vpid);
	frmf_setParameter("indd", indd);
	frmf_setParameter("ordfromdd", ordfromdd);
	frmf_setParameter("cretno", cretno);
	frmf_setParameter("drgmstat", flag);

	frmf_open("SPPIJ04000", "SPPIJ04000", "ds_hidden_sppij03200_cond""-"ds_send_data_drginfo"", "", "", "10", "10", "", "", "", "", "", "M");
}

/*
심사완료전상병특정내역체크 2013.07.10 plet2
16세미만, 35세 이상 초산 산모 필수 진단 체크
특정 분만진단에 필수 부진단 유무 체크
임신주수별 체중과 진단 체크
*/
function fGetDiagSpclcdCheck(){
	var diagnode = "ds_main_list3_diaglist";
	var spclnode = "ds_main_list4_clcjlist";
	var isclnode =  "ds_main_list2_iscllist";
	var chk_diagcd =  model.getValue(diagnode+"[seqno='1']_diagcd"); //주상병코드
	var chk_O3420 =  model.getValue(diagnode+"[diagcd='O3420']_diagcd");
	var chk_prgweekcnt = ds_main_clcjnbwt_clcjnbwtlist.getColumn(0, "prgweekcnt"); //임신주수
	var chk_weig =  ds_main_clcjnbwt_clcjnbwtlist.getColumn(0, "weig"); //신생아체중
	var chk_O365 =model.getValue(diagnode+"[diagcd='O365' or diagcd='O366' ]_diagcd"); //임신주수상병코드
	var chk_poaflag = getNodesetCount(diagnode+"[diagcd!='' and poaflag='']_diagcd"); //poaflag
	//16세미만, 35세 이상 초산 산모 필수 진단 체크
	var chk_R=  model.getValue(isclnode+"[snglcalcscorcd='R4351' " +
												"or snglcalcscorcd='R3131' " +
												"or snglcalcscorcd='R3141' " +
												"or snglcalcscorcd='R4361' " +
												"or snglcalcscorcd='R4519' " +
												"or snglcalcscorcd='R4517' " +
												"]_snglcalcscorcd"); // 초산 상병체크
	var patage = parseInt(ds_main_item1_iteminfo.getColumn(0, "age"));
	var result = true;

	if (chk_R.length > 0 && (patage >= 35 || patage < 16) ) {
		if(sysf_messageBox("어린 초임부 또는 고령초임부 환자입니다.", "Q003") == 6) {
			result = true;
		} else {
			result = false;
		}
	}

	//특정 분만진단에 필수 부진단 유무 체크
	//O820이 주상병인 환자가 O3420 상병이 없을 경우 체크
	if (chk_diagcd == 'O820' && chk_O3420.length == 0 ) {
		if(sysf_messageBox("반복제왕절개 환자입니다.", "Q003") == 6) {
			result = true;
		} else {
			var ans = sysf_messageBox("O3420 상병을 입력" , "S001");
			if (ans==6){
				grd_diaglist.setFocus();
				//fDiagGridInsertRow();
				grd_diaglist.bottomRow = grd_diaglist.rows;

//model.refresh();

				var maxseq = model.getXPathValue("max("+diagnode+"[*]_seqno)");
				model.setValue(diagnode+"[seqno='"+maxseq+"']_diagcd","O3420");
				model.setValue(diagnode+"[seqno='"+maxseq+"']_diagnm","이전의 제왕절개로 인한 흉터의 산모 관리");
			}

			result = false;
		}
	}

	//임신주수별 체중과 진단 체크
	//신생아 체중관련 상병누락입니다 (O365 or O366)
	if (chk_prgweekcnt.length > 0 && chk_weig.length > 0) {
		var nwbabyweight = parseInt(chk_weig);
		var minweight = parseInt(ds_main_nbwt_nbwtlist.lookupExpr("prgntweek == '" + chk_prgweekcnt + "'", "minweight"));
		var maxweight = parseInt(ds_main_nbwt_nbwtlist.lookupExpr("prgntweek == '" + chk_prgweekcnt + "'", "maxweight"));

		if (chk_O365.length == 0 && (nwbabyweight <= minweight || nwbabyweight >= maxweight ) ) {
			if(sysf_messageBox("신생아 체중관련 상병누락 환자입니다.", "Q003") == 6) {
				result = true;
			} else {
				result = false;
			}
		}
	}

	var opchkyn =  ds_main_item11_drginfo.getColumn(0, "opchkyn");
	var fromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
	var indaycnt = parseInt(ds_main_list1_insulist.lookupExpr("fromdd == '" + fromdd + "'", "indaycnt"));

	if (opchkyn=="Y" && indaycnt <= 30) {
		if (chk_poaflag > 0) {
			sysf_messageBox("상병의 POA정보는", "I003");
			return false;		

/*  사후에 에러발생으로 모든상병 POA정보 없으면 진행되지않도록 수정. 2014.01.17 plet2		
 *			if(sysf_messageBox("상병에 POA정보가 없습니다.", "Q003") == 6) {
				result = true;
			} else {
				result = false;
			}*/
		}
	}
}

//2013.07.18 이경민 요율변경 공통호출함수 정리
function Insuchange(suppkind) {
	var pid = ds_main_item1_iteminfo.getColumn(0, "pid");
	var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");
	var cretno = ds_main_item1_iteminfo.getColumn(0, "cretno");
	var mskind = ds_main_item1_iteminfo.getColumn(0, "mskind");
	var fromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
	var seqno = ds_main_item1_iteminfo.getColumn(0, "seqno");
	if (seqno == "") {
		seqno = "1"
	}
	var todd = ds_main_item1_iteminfo.getColumn(0, "todd");
	var insukind = ds_send.getColumn(0, "insukind");
	var instcd = ds_main_item1_iteminfo.getColumn(0, "instcd");
	var indschacptstat = ds_main_item1_iteminfo.getColumn(0, "indschacptstat");

	ds_hidden_item2_insuchange.setColumn( 0, "iphs_status","B");
	ds_hidden_item2_insuchange.setColumn( 0, "iphs_pid",pid);
	ds_hidden_item2_insuchange.setColumn( 0, "iphs_indd",indd);
	ds_hidden_item2_insuchange.setColumn( 0, "iphs_cretno",cretno);
	ds_hidden_item2_insuchange.setColumn( 0, "iphs_mskind",mskind);
	ds_hidden_item2_insuchange.setColumn( 0, "iphs_fromdd",fromdd);
	ds_hidden_item2_insuchange.setColumn( 0, "iphs_seqno",seqno);
	ds_hidden_item2_insuchange.setColumn( 0, "iphs_todd",todd);
	ds_hidden_item2_insuchange.setColumn( 0, "iphs_insukind",insukind);
	ds_hidden_item2_insuchange.setColumn( 0, "iphs_suppkind",suppkind);	
	ds_hidden_item2_insuchange.setColumn( 0, "iphs_instcd",instcd);	
	ds_hidden_item2_insuchange.setColumn( 0, "iphs_indschacptstat",indschacptstat);	

	ds_hidden_insuchange_rslt.clearData();

	var receiptyn = ds_main_item1_iteminfo.getColumn(0, "receiptyn");
	if (receiptyn != "") {
		sysf_messageBox("퇴원(가퇴원) 수납이 되었으므로 유형변경을","E001");
		return false;
	}

//	if(submit("TXPIJ00305", false)){
var oParam = {};
    oParam.id          = "TXPIJ00305";
    oParam.service     = "ipatmngtapp.InhospUpdt";
    oParam.method      = "reqSetInhospUpdt4";
    oParam.inds        = "s_iphs=ds_";
    oParam.outds       = "ds_=result";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00305";

tranf_submit(oParam);
/*
function cf_TXPIJ00305(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00305(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00305") > -1
arErrorCode.pop("TXPIJ00305") < 0
*/


		if(sysf_messageBox("유형변경이 완료 되었습니다. 변경된 내역의 소급처리를", "Q004") == 6){
			// 로딩창 열기
			 var sWindowMsg = "수가계산중입니다...";
			callLoadingWindow(sWindowMsg);
			fReCalc() ;
			// 로딩창 닫기
			removeLoadingWindow();
			sysf_messageBox("소급계산이","I001");
		}
	}

//model.refresh();

	grp_changeownbrate.visible = false;
	fGetItemInfo();
}

/**
 * _desc   : 퇴원예고일자 이후의 처방 존재 유무 확인(submit)
 * _param  : 
 * _return : true, false
 * _authur : 이경민 2013. 8. 5
 */
function fCheckReturnPrcpExist(){
	var bRtn = true;

	var pid       = ds_main_item1_iteminfo.getColumn(0, "pid")
	var indd      = ds_main_item1_iteminfo.getColumn(0, "indd1")
	var cretno    = ds_main_item1_iteminfo.getColumn(0, "cretno")

	dsf_makeValue( ds_dschreturnprcp_reqdata, "pid", "string",        pid);
	dsf_makeValue( ds_dschreturnprcp_reqdata, "indd", "string",       indd);
	dsf_makeValue( ds_dschreturnprcp_reqdata, "cretno", "string",     cretno);

	ds_checkreturnprcp_rtndata_cnt.clearData(); ds_checkreturnprcp_rtndata_cnt.addRow();	
//	if(submit("TRMMO00404")){
var oParam = {};
    oParam.id          = "TRMMO00404";
    oParam.service     = "prcpmngtapp.EtcPrcpMngt";
    oParam.method      = "reqGetChkDschReturnPrcpCnt";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=rtndata";
    oParam.async       = false;
    oParam.callback    = "cf_TRMMO00404";

tranf_submit(oParam);
/*
function cf_TRMMO00404(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRMMO00404(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRMMO00404") > -1
arErrorCode.pop("TRMMO00404") < 0
*/


	    var nCnt = ds_checkreturnprcp_rtndata.getColumn(0, "cnt");

	    if(nCnt > 0) {
			frmf_setParameter("SPMMO50400_pid",         pid);
			frmf_setParameter("SPMMO50400_indd",        indd);
			frmf_setParameter("SPMMO50400_cretno",      cretno);
			frmf_modal("SPMMO50400", "", ""-"", "", "", "", "", "", "", "", "", "", "M");
			bRtn = false;
	    }
    }

    return bRtn;
}
//중간청구등록
function fmidregist() {
	var chk = ds_main_item1_iteminfo.getColumn(0, "patnm");
	var indd = ds_main_item1_iteminfo.getColumn(0, "indd");

	if(chk){						
		if(ipt_pid.text.length >1){
			if(indd.length>1){	
				//var trgtManWindow = getChildWindow("SMPIJ01100");
				var trgtManWindow = getChildWindow("SMPIJ02300");

				var patunitsrch1 = ds_main_item1_iteminfo.getColumn(0, "pid").getTrim();	// (stringHelper.js) 문자열 앞뒤에 있는 공백 제거

				// 2008.01.23 박지욱 수정 (중간청구등록화면에 넘겨주는 데이터 추가 - pid, indd)
				ds_hidden_midclam.clearData();
				dsf_makeValue( ds_hidden_midclam, "pid", "string",  patunitsrch1);
				dsf_makeValue( ds_hidden_midclam, "indd", "string",  ds_main_item1_iteminfo.getColumn(0, "indd"));

				if (trgtManWindow == null) {
					frmf_open("SMPIJ02300", "SMPIJ02300", "ds_hidden_midclam""-"ds_hidden_midclam"", "", "", "10", "10", "", "", "", "", "", "M");
				} else {
					activateChild("SMPIJ02300");
					trgtManWindow.javascript.fGetMidClamList();
				}

//model.refresh();

			}
		}
	}
}
//분할제외등록
function fmidregistyn() {
	var chk = ds_main_item1_iteminfo.getColumn(0, "patnm");

	if(chk){
		var midregistyn = ds_main_item1_iteminfo.getColumn(0, "midregistyn");
		if (midregistyn == "Y") {
//			if (submit("TXPIJ00307", false)) {
var oParam = {};
    oParam.id          = "TXPIJ00307";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqSetDivClamExpt";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=result";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00307";

tranf_submit(oParam);
/*
function cf_TXPIJ00307(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00307(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00307") > -1
arErrorCode.pop("TXPIJ00307") < 0
*/


				btn_midregist.attribute("class") = "btn2_letter6";
				btn_midregist.enable = true;
				btn_midregistyn.attribute("class") = "btn2_letter6";
				//btn_midregistyn.attribute("color") = "#ff0066";
				ds_main_item1_iteminfo.setColumn( 0, "midregistyn", "N");
				sysf_messageBox("분할제외 등록 취소가","I002");
			}
		} else {
//			if (submit("TXPIJ00307"), false) {
var oParam = {};
    oParam.id          = "TXPIJ00307";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqSetDivClamExpt";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=result";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00307";

tranf_submit(oParam);
/*
function cf_TXPIJ00307(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00307(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00307") > -1
arErrorCode.pop("TXPIJ00307") < 0
*/


				btn_midregist.attribute("class") = "btn2_letter6";
				btn_midregist.enable = false;
				btn_midregistyn.attribute("class") = "btn2_letter6";
				btn_midregistyn.attribute("color") = "#ff0066";
				ds_main_item1_iteminfo.setColumn( 0, "midregistyn", "Y");

				sysf_messageBox("분할제외 등록이","I002");
			}
		}
	}
}

//애기_엄마
function fbabymother() {
	var chk = ds_main_item1_iteminfo.getColumn(0, "patnm");

	if(chk){
		var readonly = ds_send.getColumn(0, "readonly");
		// 6시간 미만 환자일 경우 Block - 20081005 박창원
		var sixtimyn = ds_main_item1_iteminfo.getColumn(0, "sixtimyn");
		// open일관련 적용 - 20090302 - 하드코딩 제거,확산병원 데이터 미등록 때문에 예외처리함 
		var opendd = ds_main_item1_iteminfo.getColumn(0, "opendd");
		// 이력 그리드내에서 보조유형이 09(자연분만) 있는 경우 이미 면제기간이 적용된 경우
		// 분만신생아관리 화면에서 면제기간적용 버튼 비활성화 (2008.01.29 박지욱 추가)
		var fromdd = "";
		var todd = "";
		var seqno = ds_main_item1_iteminfo.getColumn(0, "seqno");
		var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");
		var dschnotidt = ds_main_item1_iteminfo.getColumn(0, "dschnotidt");
		var dschnotiyn = ds_main_item1_iteminfo.getColumn(0, "dschnotiyn");
		var cfe =  ds_main_item1_iteminfo.getColumn(0, "cfe");

		for (var i = 1; i < grd_insuhistory.rows; i++) {
			var suppkind = ds_main_list1_insulist.getColumn(i, "suppkind");
			if (suppkind == "09" || suppkind == "42") {
				fromdd	= ds_main_list1_insulist.getColumn(i, "fromdd");
				todd		= ds_main_list1_insulist.getColumn(i, "dschnotidt");
				seqno 	= ds_main_list1_insulist.getColumn(i, "seqno");
			} 
		}

		ds_hidden_sppiz01200_cond.setColumn( 0, "pid",ds_main_item1_iteminfo.getColumn(0, "pid"));
		ds_hidden_sppiz01200_cond.setColumn( 0, "indd",indd);
		ds_hidden_sppiz01200_cond.setColumn( 0, "cretno",ds_main_item1_iteminfo.getColumn(0, "cretno"));
		ds_hidden_sppiz01200_cond.setColumn( 0, "mskind",ds_main_item1_iteminfo.getColumn(0, "mskind"));
		ds_hidden_sppiz01200_cond.setColumn( 0, "brateflag",ds_main_item1_iteminfo.getColumn(0, "brateflag"));
		ds_hidden_sppiz01200_cond.setColumn( 0, "brthdd",ds_main_item1_iteminfo.getColumn(0, "brthdd"));
		ds_hidden_sppiz01200_cond.setColumn( 0, "dschnotidt",dschnotidt);
		ds_hidden_sppiz01200_cond.setColumn( 0, "dschnotiyn",dschnotiyn);
		ds_hidden_sppiz01200_cond.setColumn( 0, "calcbasedd", '-');
		ds_hidden_sppiz01200_cond.setColumn( 0, "seqno", seqno);
		ds_hidden_sppiz01200_cond.setColumn( 0, "cfe", cfe);

		// 심사마감이나 퇴원한 환자는 면제일자적용이나 해제를 시킬 수 없다. - 20080924 박창원
		// 기존에는 심사마감이나 퇴원여부를 인스턴스에서 가져오던 것을 실시간 체크로 변경 - 20080927 박창원
//		if (!submit("TRPIJ00315", false)) {
var oParam = {};
    oParam.id          = "TRPIJ00315";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqNotiDschStat";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=endcnclstat ds_=recal ds_=drginfo";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00315";

tranf_submit(oParam);
/*
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00315") > -1
arErrorCode.pop("TRPIJ00315") < 0
*/


			sysf_messageBox("실시간 환자상태 체크에 실패 했습니다. 시스템 오류입니다.관리자 문의 후", "C003");
			return;
		}
		var indschacptstat = ds_main_item1_iteminfo.getColumn(0, "indschacptstat");
		var dschjudgprcsstat = ds_main_item1_iteminfo.getColumn(0, "dschjudgprcsstat");

		// 중간청구 여부를 판단해서 블로킹 - 20081017 박창원
		var lastmdlclamdd = ds_main_item1_iteminfo.getColumn(0, "lastmdlclamdd");
		var fromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
		if (lastmdlclamdd > fromdd && lastmdlclamdd > opendd  && lastmdlclamdd != "" ) {
			ds_hidden_sppiz01200_cond.setColumn( 0, "saveyn","Y");
		}
		if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E" || indschacptstat == "D"  || readonly == "Y") {
			ds_hidden_sppiz01200_cond.setColumn( 0, "saveyn","Y");
		} else {
			ds_hidden_sppiz01200_cond.setColumn( 0, "saveyn","N");
		}

		// fromdd 와 todd 에 값이 있으면 면제기간 적용된 환자임을 알려주는 flag 세팅
		if (fromdd != "" && todd != "") {
			ds_hidden_sppiz01200_cond.setColumn( 0, "disyn","Y");
		} else {
			ds_hidden_sppiz01200_cond.setColumn( 0, "disyn","N");
		}

		if (sixtimyn == "Y") {
			sysf_messageBox("6시간 미만 상태 입니다. 자연분만 요율을 설정(저장) ","E001");
		}

		ds_hidden_sppiz01200_cond.setColumn( 0, "fromdd",fromdd);
		ds_hidden_sppiz01200_cond.setColumn( 0, "todd",todd);

        var trgtManWindow = getChildWindow("SPPIZ01200");

		if (trgtManWindow == null) {
			frmf_open("SPPIZ01200", "SPPIZ01200", "ds_hidden_sppiz01200_cond""-"ds_hidden_sppiz01200_cond"", "", "", "10", "10", "", "", "", "", "", "M");
		} else {
			activateChild("SPPIZ01200");

//model.refresh();

		}
	}
}

//수술(유)
function foperdiag() {
	var chk = ds_main_item1_iteminfo.getColumn(0, "patnm");
	if(chk){
        var trgtManWindow = getChildWindow("SPPIZ01300");
		var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");

		ds_hidden_sppiz01300_cond.setColumn( 0, "pid",ds_main_item1_iteminfo.getColumn(0, "pid"));
		ds_hidden_sppiz01300_cond.setColumn( 0, "indd",indd);
		ds_hidden_sppiz01300_cond.setColumn( 0, "cretno",ds_main_item1_iteminfo.getColumn(0, "cretno"));

		if (trgtManWindow == null) {
			frmf_open("SPPIZ01300", "SPPIZ01300", "ds_hidden_sppiz01300_cond""-"ds_send_data1"", "", "", "10", "10", "", "", "", "", "", "M");
		} else {
			activateChild("SPPIZ01300");

//model.refresh();

		}
	}
}

//중간마감취소
function fmidcancel() {
	//20091126 JHP 수정추가 
	var chk = ds_main_item1_iteminfo.getColumn(0, "patnm");
	var indd = ds_main_item1_iteminfo.getColumn(0, "indd");
	var ans = 0;
	if(chk){						
		if(ipt_pid.text.length >1){
			if(indd.length>1){	

				var trgtManWindow = getChildWindow("SMPID10100");

				var patunitsrch1 = ds_main_item1_iteminfo.getColumn(0, "pid").getTrim();	// (stringHelper.js) 문자열 앞뒤에 있는 공백 제거

				// 2008.01.23 박지욱 수정 (중간청구등록화면에 넘겨주는 데이터 추가 - pid, indd)
				ds_hidden_midclam.clearData();
				dsf_makeValue( ds_hidden_midclam, "pid", "string",  patunitsrch1);
				dsf_makeValue( ds_hidden_midclam, "indd", "string",  ds_main_item1_iteminfo.getColumn(0, "indd"));

				if (trgtManWindow == null) {
					ans = sysf_messageBox("심사 취소 할 경우", "S001");
					if (ans == 6) {

						dsf_makeValue( ds_send, "checkyn", "string", "Y");
//						if (!submit("TRPIJ00315", false)) {
var oParam = {};
    oParam.id          = "TRPIJ00315";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqNotiDschStat";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=endcnclstat ds_=recal ds_=drginfo";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00315";

tranf_submit(oParam);
/*
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00315") > -1
arErrorCode.pop("TRPIJ00315") < 0
*/


							sysf_messageBox("실시간 환자상태 체크에 실패 했습니다. 시스템 오류입니다.관리자 문의 후", "C003");
							return;
						}

						if (fGetDrgOpenPopup("O") == false) {
								return false;
						}

						ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat","A");
//						if (submit("TXPIJ00301", false)) {
var oParam = {};
    oParam.id          = "TXPIJ00301";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveInpt";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00301";

tranf_submit(oParam);
/*
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00301") > -1
arErrorCode.pop("TXPIJ00301") < 0
*/


						}
					} 
				} else {
					ans = sysf_messageBox("심사 취소 할 경우", "S001");
					if (ans == 6) {

						dsf_makeValue( ds_send, "checkyn", "string", "Y");
//						if (!submit("TRPIJ00315", false)) {
var oParam = {};
    oParam.id          = "TRPIJ00315";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqNotiDschStat";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=endcnclstat ds_=recal ds_=drginfo";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00315";

tranf_submit(oParam);
/*
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00315") > -1
arErrorCode.pop("TRPIJ00315") < 0
*/


							sysf_messageBox("실시간 환자상태 체크에 실패 했습니다. 시스템 오류입니다.관리자 문의 후", "C003");
							return;
						}

						if (fGetDrgOpenPopup("O") == false) {
								return false;
						}

						ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat","A");
//						submit("TXPIJ00301",false);
var oParam = {};
    oParam.id          = "TXPIJ00301";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveInpt";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00301";

tranf_submit(oParam);
/*
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00301") > -1
arErrorCode.pop("TXPIJ00301") < 0
*/


					}
				}

//model.refresh();

			}
		}
	}
}

//특정내역
function fspclData() {
	var chk = ds_main_item1_iteminfo.getColumn(0, "patnm");
	if(chk){		
		var rrgstno = ds_main_item1_iteminfo.getColumn(0, "rrgstno");
		rrgstno = rrgstno.replace("-","");
		ds_send.setColumn( 0, "rrgstno",rrgstno);
		ds_send.setColumn( 0, "dschdd",ds_main_item1_iteminfo.getColumn(0, "dschdd"));
		var fromdd = ds_send.getColumn(0, "fromdd");
		// v191, v192, v193 값을 넣기 위한 vcode
		ds_send.setColumn( 0, "vcode", ds_hidden_item1.getColumn(0, "vcode"));
//		if (submit("TRPIJ00310")) {
var oParam = {};
    oParam.id          = "TRPIJ00310";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqGetSpclCdList";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=clcjlist";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00310";

tranf_submit(oParam);
/*
function cf_TRPIJ00310(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00310(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00310") > -1
arErrorCode.pop("TRPIJ00310") < 0
*/


			ds_main_list4.copyData(ds_hidden_list4);
			//grd_clcjlist.dispatch("xforms-value-changed");
			//
//model.refresh();
 최적화 문제로 대체 20080731 박창원
			model.refreshpart("ds_main_list4");	

			for(var i = 1; i < grd_clcjlist.rows; i++) {
				var spclcd = ds_main_list4_clcjlist.getColumn(i, "spclcd");
				ds_main_list4.setColumn( i , "fromdd", fromdd);
				if (spclcd == "" ) {
					grd_clcjlist.deleteRow(i, false);
				}
			}	

			for(var i = 1; i < grd_clcjlist.rows; i++) {
				var status = ds_main_list4_clcjlist.getColumn(i, "status");
				if(status == "3"){
					grd_clcjlist.rowstatus(i) = 1;
				}
			}

			// 그리드 정렬 + 빈줄 추가
			fSortSpclNo();
			// 행추가
//			fSpclGridInsertRow();
		}
	}
}

//중증질환
function fesscdiag() {
	var chk = ds_main_item1_iteminfo.getColumn(0, "patnm");
	var readonly = ds_send.getColumn(0, "readonly");
	// open 일 적용 - 20090302 박창원 - 확산될때마다 수정해야함 - 확산병원은 오픈일 기준자료가 없으므로...
	var opendd = ds_main_item1_iteminfo.getColumn(0, "opendd"); 

/*	if (opendd != "20081003") {
		opendd = "20081003";
	} */
	if(chk){
		var trgtManWindow = getChildWindow("SPPIJ01900");
		var vcode = ds_hidden_item1.getColumn(0, "vcode");
		var indd = ds_main_item1_iteminfo.getColumn(0, "indd1");
		// 6시간미만 변경 블로킹을 위해 변수 추가 - 20081105 박창원
		var sixtimyn = ds_main_item1_iteminfo.getColumn(0, "sixtimyn");

		// 심사마감이나 퇴원한 환자는 요율을 변경 시킬 수 없다. - 20080924 박창원
		// 등록암 불가 알럿후 종료, 중증수술은 조회만 되게 - 기간적용,적용, 유형복원 안되게
		// 기존에는 심사마감이나 퇴원여부를 인스턴스에서 가져오던 것을 실시간 체크로 변경 - 20080927 박창원
//		if (!submit("TRPIJ00315", false)) {
var oParam = {};
    oParam.id          = "TRPIJ00315";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqNotiDschStat";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=endcnclstat ds_=recal ds_=drginfo";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00315";

tranf_submit(oParam);
/*
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00315") > -1
arErrorCode.pop("TRPIJ00315") < 0
*/


			sysf_messageBox("실시간 환자상태 체크에 실패 했습니다. 시스템 오류입니다.관리자 문의 후", "C003");
			return;
		}

		var indschacptstat = ds_main_item11_endcnclstat.getColumn(0, "indschacptstat");
		var dschjudgprcsstat = ds_main_item11_endcnclstat.getColumn(0, "dschjudgprcsstat");

		ds_hidden_sppij01900_cond.setColumn( 0, "pid",ds_main_item1_iteminfo.getColumn(0, "pid"));
		ds_hidden_sppij01900_cond.setColumn( 0, "indd",indd);
		ds_hidden_sppij01900_cond.setColumn( 0, "cretno",ds_main_item1_iteminfo.getColumn(0, "cretno"));
		ds_hidden_sppij01900_cond.setColumn( 0, "mskind",ds_main_item1_iteminfo.getColumn(0, "mskind"));
		ds_hidden_sppij01900_cond.setColumn( 0, "brateflag",ds_main_item1_iteminfo.getColumn(0, "brateflag"));
		ds_hidden_sppij01900_cond.setColumn( 0, "brthdd",ds_main_item1_iteminfo.getColumn(0, "brthdd"));
		ds_hidden_sppij01900_cond.setColumn( 0, "vcode",vcode);
		ds_hidden_sppij01900_cond.setColumn( 0, "ownbrate",ds_main_item1_iteminfo.getColumn(0, "normalownbrate"));
		ds_hidden_sppij01900_cond.setColumn( 0, "cfe",ds_main_item1_iteminfo.getColumn(0, "cfe"));
		// 심사마감이나 퇴원한 환자는 중증수술기간산정관리에서 조작을 할 수 없다 - 20080924 박창원
		// 중간청구 여부를 판단해서 블로킹 - 20081017 박창원
		var lastmdlclamdd = ds_main_item1_iteminfo.getColumn(0, "lastmdlclamdd");
		var fromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
		if (lastmdlclamdd > fromdd && lastmdlclamdd > opendd  && lastmdlclamdd != "" ) {
			ds_hidden_sppij01900_cond.setColumn( 0, "saveyn","Y");
		}

		if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E" || indschacptstat == "D" || readonly == "Y" ) {
			ds_hidden_sppij01900_cond.setColumn( 0, "saveyn","Y");
		} else {
			ds_hidden_sppij01900_cond.setColumn( 0, "saveyn","N");
		}

		// 희귀난치성산정특례 - 20090621 박창원
		var rareessc = ds_main_item12_rareessc.getColumn(0, "rareesscyn");
		if (rareessc == "Y") {
			var chksuppkind = ds_main_item1_iteminfo.getColumn(0, "suppkindcd");

			if (chksuppkind == "50") {
				if (lastmdlclamdd > fromdd && lastmdlclamdd > opendd  && lastmdlclamdd != ""  ) {
					sysf_messageBox("중간청구 등록이 되어있습니다. 요율을 변경","E001");
					return;
				}else if (readonly == "Y") {
					sysf_messageBox("읽기전용 모드입니다. 희귀난치성 산정특례 요율을 적용하거나 취소","E001");
					return;
				}else if (indschacptstat == "D") {
					sysf_messageBox("이미 퇴원한 환자입니다. 희귀난치성 산정특례  요율을 적용하거나 취소","E001");
					return;
				}else if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
					sysf_messageBox("이미 마감된 환자입니다. 희귀난치성 산정특례 요율을 적용하거나 취소","E001");
					return;
				}
				var msg = sysf_messageBox("이미 희귀난치성 산정특례 적용이 된 환자입니다. 기존에 적용된 유형을 취소","S001");
				if(msg != 6) {
					return;
				}else{
					if (fSaveMain("P") == true) {
						var cfe = ds_main_item1_iteminfo.getColumn(0, "cfe");
						var suppkind = "00";

						if (cfe == "E" || cfe == "F") {
							suppkind = "33";	//차상위2종정상으로 셋팅
						} 

						Insuchange(suppkind);
					}
				}
			} else if (chksuppkind != "50") {
				if (readonly == "Y") {
					sysf_messageBox("읽기전용 모드입니다. 희귀난치성 산정특례 요율을 적용하거나 취소","E001");
					return;
				}
				if (indschacptstat == "D") {
					sysf_messageBox("이미 퇴원한 환자입니다. 희귀난치성 산정특례 요율을 적용하거나 취소","E001");
					return;
				}
				if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
					sysf_messageBox("이미 마감된 환자입니다. 희귀난치성 산정특례 요율을 적용하거나 취소","E001");
					return;
				}
				var msg = sysf_messageBox("희귀난치성 산정특례 환자입니다. 중증요율 적용","S001");
				if(msg !=6){
					return;
				}else{
					if (fSaveMain("P") == true) {
						var cfe = ds_main_item1_iteminfo.getColumn(0, "cfe");
						var suppkind = "50";

						if (cfe == "E" || cfe == "F") {
							suppkind = "46";	// 차상위2종희귀난치성 산정특례로 셋팅
						} 

						Insuchange(suppkind);
					}	
				}
			}
		}

		if(vcode == "V193"){
			var chksuppkind = ds_main_item1_iteminfo.getColumn(0, "suppkindcd");
			var chkinsukind =  ds_main_item1_iteminfo.getColumn(0, "insukindcd");

			// 중간청구 여부를 판단해서 블로킹 - 20081017 박창원
			// 차상위 2종 로직 추가 - 20090325 박창원
			if(chksuppkind == "06"  || chksuppkind == "40"){
				if (lastmdlclamdd > fromdd && lastmdlclamdd > opendd  && lastmdlclamdd != ""  ) {
					sysf_messageBox("중간청구 등록이 되어있습니다. 요율을 변경","E001");
					return;
				}else if (readonly == "Y") {
					sysf_messageBox("읽기전용 모드입니다. 등록암 요율을 적용하거나 취소","E001");
					return;
				}else if (indschacptstat == "D") {
					sysf_messageBox("이미 퇴원한 환자입니다. 등록암 요율을 적용하거나 취소","E001");
					return;
				}else if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
					sysf_messageBox("이미 마감된 환자입니다. 등록암 요율을 적용하거나 취소","E001");
					return;
				}
				var msg = sysf_messageBox("이미 등록암 적용이 된 환자입니다. 기존에 적용된 유형을 취소","S001");
				if(msg != 6) {
					return;
				}else{
					if (fSaveMain("P") == true) {
						var cfe = ds_main_item1_iteminfo.getColumn(0, "cfe");
						var suppkind = "00";

						if (cfe == "E" || cfe == "F") {
							suppkind = "33";	//차상위2종정상으로 셋팅
						} 

						Insuchange(suppkind);
					}
				}
			}
			else if(chksuppkind != "06" && chksuppkind != "40" && chksuppkind != "31"  && !(chkinsukind == "22" && chksuppkind == "08") ) { // 20090325 차상위적용 - 박창원 20100318 정승우 신생아유형은 제외추가
				if (readonly == "Y") {
					sysf_messageBox("읽기전용 모드입니다. 등록암 요율을 적용하거나 취소","E001");
					return;
				}
				if (indschacptstat == "D") {
					sysf_messageBox("이미 퇴원한 환자입니다. 등록암 요율을 적용하거나 취소","E001");
					return;
				}
				if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
					sysf_messageBox("이미 마감된 환자입니다. 등록암 요율을 적용하거나 취소","E001");
					return;
				}
				var msg = sysf_messageBox("등록암환자입니다. 중증요율 적용","S001");
				if(msg !=6){
					return;
				}else{
					if (fSaveMain("P") == true) {
						var cfe = ds_main_item1_iteminfo.getColumn(0, "cfe");
						var suppkind = "06";

						if (cfe == "E" || cfe == "F") {
							suppkind = "40";	// 차상위2종등록암으로 셋팅
						} 

						Insuchange(suppkind);
					}
				}
			}

		}else if(vcode == "V191" || vcode == "V192"){
			// 6시간 미만 환자는 화면을 보여주지 않는다. - 20081105 박창원
			if (sixtimyn == "Y") {
				sysf_messageBox("6시간 미만 상태 입니다. 중증수술 요율을 설정(저장) ","E001");
				ds_hidden_sppij01900_cond.setColumn( 0, "saveyn","Y");
			}

			if (trgtManWindow == null) {
					frmf_open("SPPIJ01900", "SPPIJ01900", "ds_hidden_sppij01900_cond""-"ds_send_cond"", "", "", "10", "10", "", "", "", "", "", "M");
			} else {
				activateChild("SPPIJ01900");

//model.refresh();

			}
		}
	}
}

//퇴원마감취소
function fdschclosecancel() {
	var chk = ds_main_item1_iteminfo.getColumn(0, "patnm");
	var tmpnotiyn;

	var notichngflag = "N";
	// 퇴원 마감 취소시 퇴원수납이 되었는지 실시한 확인 후 진행한다.
	// 마감에서부터 취소사이에 수납에서 퇴원수납이 되었는데 마감취소가 되는 상황이 발생되지 않기 위함 
	// 퇴원수납이 된경우에는 대상자 조회 호면을 refresh 하고 
	// 메인화면의 심사상태를 'A' 미심상태로 하고 메인화면을 다시 로드- 20080927 박창원
	dsf_makeValue( ds_send, "checkyn", "string", "Y");
//	if (!submit("TRPIJ00315", false)) {
var oParam = {};
    oParam.id          = "TRPIJ00315";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqNotiDschStat";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=endcnclstat ds_=recal ds_=drginfo";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00315";

tranf_submit(oParam);
/*
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00315") > -1
arErrorCode.pop("TRPIJ00315") < 0
*/


		sysf_messageBox("실시간 환자상태 체크에 실패 했습니다. 시스템 오류입니다.관리자 문의 후", "C003");
		return;
	}
	var indschacptstat = ds_main_item11_endcnclstat.getColumn(0, "indschacptstat");

	if (indschacptstat == 'D') {
		sysf_messageBox("이미 퇴원처리가 된 환자입니다. 마감취소 ", "E001");
		// 무조건 대상자 조회 화면을 refresh 
		var trgtManWindow = getChildWindow("SMPIJ00200");
		trgtManWindow.javascript.fGetInBfJudgTrgtManList();
		trgtManWindow.javascript.fCountPat();

//trgtManWindow.model.refresh();

  		fGetItemInfo();
		return;
	}

	if(chk){						
		var receiptyn = ds_main_item1_iteminfo.getColumn(0, "receiptyn");
		var dschnotiyn = ds_main_item1_iteminfo.getColumn(0, "dschnotiyn");

		var dschdclrtyn = ds_main_item11_endcnclstat.getColumn(0, "dschdclrtyn");
		var dschjudgprcsstat = ds_main_item11_endcnclstat.getColumn(0, "dschjudgprcsstat"); 

		if (receiptyn != ""  && dschnotiyn == "Y") {
			sysf_messageBox("퇴원(가퇴원) 수납이 되었으므로 마감취소를","E001");
		} else if  (receiptyn == ""  && (dschnotiyn == "Y" || ( dschjudgprcsstat == 'G' && dschdclrtyn == 'Y' ))) {

			//DRG 상세 마감 취소 팝업
			if (fGetDrgOpenPopup("O") == false) {
				return false;
			}

			if ( dschnotiyn == "Y" ) { 
//				var msg = sysf_messageBox("간호의 퇴원확정여부도 함께 취소","S001");
//				if(msg == 6){
//					if (indschacptstat == "T") { // 가퇴원 블로킹 추가 - 20081005 박창원
//						var msg1 = sysf_messageBox("가퇴원 상태에서는 간호확정 취소가 불가합니다. 계속진행","S001");
//						if (msg1 != 6) {
//							return;
//						}
//					} else {
//						ds_main_item1_iteminfo.setColumn( 0, "dschnotiyn","Z");
//					}		
//				}else if(msg == 2){
//					return;
//				}
			}

			if (fJudgEndCancel()) {
				if(fSaveCalcAmt("D")) {
				} else {
					sysf_messageBox("마감취소 처리가 되지","E007");
					return 0;
				} 
			} else {
				sysf_messageBox("마감취소 처리가 되지","E007");
				return 0;
			}

			if(ds_main_item1_iteminfo.getColumn(0, "dschnotiyn") == "Z"){
				ds_main_item1_iteminfo.setColumn( 0, "dschnotiyn","N");
				 notichngflag = "Y";		
			}		

			fJudgEndClear();
		}
	}
}

//종료
function fClear() {
	// 심사상태를 미심상태로 바꾸고 대상자 조회를 리프레쉬 - 20081004 박창원
	// 심사상태를 실시간 체크하여 심사상태가 심사중일때만 업데이트 되게 함 - 20081008 박창원
//	if (!submit("TRPIJ00315", false)) {
var oParam = {};
    oParam.id          = "TRPIJ00315";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqNotiDschStat";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=endcnclstat ds_=recal ds_=drginfo";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00315";

tranf_submit(oParam);
/*
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00315") > -1
arErrorCode.pop("TRPIJ00315") < 0
*/


		sysf_messageBox("실시간 환자상태 체크에 실패 했습니다.기본데이터 이상이나 시스템 오류입니다.관리자 문의 후", "C003");
		return;
	}

	// 혹시모르는 종료버튼 클릭시 간호퇴원확정 취소를 막기위해 적용 - 20081008 박창원
	var realnotiyn = ds_main_item11_endcnclstat.getColumn(0, "dschnotiyn");
	var notiyn = ds_main_item1_iteminfo.getColumn(0, "dschnotiyn");
	var readonly = ds_send.getColumn(0, "readonly");

	if (notiyn == "Z") {
		ds_main_item1_iteminfo.setColumn( 0, "dschnotiyn", realnotiyn);
	}

	var dschjudgprcsstat = ds_main_item11_endcnclstat.getColumn(0, "dschjudgprcsstat");
	if (dschjudgprcsstat == "B" && readonly != "Y") {
		ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat","Z");
//		submit("TXPIJ00301");
var oParam = {};
    oParam.id          = "TXPIJ00301";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveInpt";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00301";

tranf_submit(oParam);
/*
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00301") > -1
arErrorCode.pop("TXPIJ00301") < 0
*/


	}

	// 2. 화면 클리어 (공통)
	fJudgEndClear();
}

//중간청구마감
function fMidcomplete() {
	// 20091126 JHP 수정추가 
	var chk = ds_main_item1_iteminfo.getColumn(0, "patnm");
	var indd = ds_main_item1_iteminfo.getColumn(0, "indd");
	var ans = 0;
	if(chk){						
		if(ipt_pid.text.length >1){
			if(indd.length>1){	

//				if (!submit("TRPIJ00319", false )) {
var oParam = {};
    oParam.id          = "TRPIJ00319";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqNoActYn";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=noactyn";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00319";

tranf_submit(oParam);
/*
function cf_TRPIJ00319(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00319(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00319") > -1
arErrorCode.pop("TRPIJ00319") < 0
*/


					sysf_messageBox("실시간 환자상태 체크에 실패 했습니다. 시스템 오류입니다.관리자 문의 후", "C003");
					return;
				}

				var noactyn = ds_main_item16_noactyn.getColumn(0, "noactyn");
				if (noactyn == 'Y') {
					frmf_modal("SPPIJ00900", "SPPIJ00900", "ds_main_item1_iteminfo_pid""-"ds_send_send_pid_pid"", "", "", "10", "10", "", "", "", "", "", "M");
				}
				var trgtManWindow = getChildWindow("SMPID10100");

				var patunitsrch1 = ds_main_item1_iteminfo.getColumn(0, "pid").getTrim();	// (stringHelper.js) 문자열 앞뒤에 있는 공백 제거

				// 2008.01.23 박지욱 수정 (중간청구등록화면에 넘겨주는 데이터 추가 - pid, indd)
				ds_hidden_midclam.clearData();
				dsf_makeValue( ds_hidden_midclam, "pid", "string",  patunitsrch1);
				dsf_makeValue( ds_hidden_midclam, "indd", "string",  ds_main_item1_iteminfo.getColumn(0, "indd"));

				if (trgtManWindow == null) {
					ans = sysf_messageBox("심사 마감 할 경우", "S001");
					if (ans == 6) {

						dsf_makeValue( ds_send, "checkyn", "string", "Y");
//						if (!submit("TRPIJ00315", false )) {
var oParam = {};
    oParam.id          = "TRPIJ00315";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqNotiDschStat";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=endcnclstat ds_=recal ds_=drginfo";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00315";

tranf_submit(oParam);
/*
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00315") > -1
arErrorCode.pop("TRPIJ00315") < 0
*/


							sysf_messageBox("실시간 환자상태 체크에 실패 했습니다. 시스템 오류입니다.관리자 문의 후", "C003");
							return;
						}

						if (fGetDrgOpenPopup("O") == false) {
								return false;
						}

						ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat","C");
//						if (submit("TXPIJ00301")) {
var oParam = {};
    oParam.id          = "TXPIJ00301";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveInpt";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00301";

tranf_submit(oParam);
/*
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00301") > -1
arErrorCode.pop("TXPIJ00301") < 0
*/


							frmf_open("SMPID10100", "SMPID10100", "ds_hidden_midclam""-"ds_hidden_midclam"", "", "", "10", "10", "", "", "", "", "", "M");
						}
					} else {
					}

				} else {
					ans = sysf_messageBox("심사 마감 할 경우", "S001");
					if (ans == 6) {

						dsf_makeValue( ds_send, "checkyn", "string", "Y");
//						if (!submit("TRPIJ00315", false)) {
var oParam = {};
    oParam.id          = "TRPIJ00315";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqNotiDschStat";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=endcnclstat ds_=recal ds_=drginfo";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00315";

tranf_submit(oParam);
/*
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00315") > -1
arErrorCode.pop("TRPIJ00315") < 0
*/


							sysf_messageBox("실시간 환자상태 체크에 실패 했습니다. 시스템 오류입니다.관리자 문의 후", "C003");
							return;
						}

						if (fGetDrgOpenPopup("O") == false) {
								return false;
						}

						ds_main_item1_iteminfo.setColumn( 0, "dschjudgprcsstat","C");
//						if (submit("TXPIJ00301")) {
var oParam = {};
    oParam.id          = "TXPIJ00301";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqExeSaveInpt";
    oParam.inds        = "req=ds_";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ00301";

tranf_submit(oParam);
/*
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ00301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ00301") > -1
arErrorCode.pop("TXPIJ00301") < 0
*/


							activateChild("SMPID10100");
							trgtManWindow.javascript.fGetMidClamList();
						}
					} else {
						activateChild("SMPID10100");
						trgtManWindow.javascript.fGetMidClamList();
					}
				}

//model.refresh();

			}
		}
	}
}

//중간청구마감
function fAccept() {
	// 심사마감이나 퇴원한 환자는 요율변경을 할 수 없다. - 20080924 박창원
	// 기존에는 심사마감이나 퇴원여부를 인스턴스에서 가져오던 것을 실시간 체크로 변경 - 20080927 박창원
//	if (!submit("TRPIJ00315", false)) {
var oParam = {};
    oParam.id          = "TRPIJ00315";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqNotiDschStat";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=endcnclstat ds_=recal ds_=drginfo";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00315";

tranf_submit(oParam);
/*
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00315(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00315") > -1
arErrorCode.pop("TRPIJ00315") < 0
*/


		sysf_messageBox("실시간 환자상태 체크에 실패 했습니다. 시스템 오류입니다.관리자 문의 후", "C003");
		return;
	}
	// 오픈일 적용 - 20090302 박창원 - 하드코딩 제거 - 확산병원은 자료가 구축되어 있지 않기 때문에 오픈전까지 예외처리
	var opendd = ds_main_item1_iteminfo.getColumn(0, "opendd");
	var indschacptstat = ds_main_item1_iteminfo.getColumn(0, "indschacptstat");
	var dschjudgprcsstat = ds_main_item1_iteminfo.getColumn(0, "dschjudgprcsstat");
	// 중간청구, 읽기전옹 여부를 판단해서 블로킹 - 20081017 박창원
	var lastmdlclamdd = ds_main_item1_iteminfo.getColumn(0, "lastmdlclamdd");
	var fromdd = ds_main_item1_iteminfo.getColumn(0, "fromdd");
	var readonly = ds_send.getColumn(0, "readonly");
	if (lastmdlclamdd > fromdd && lastmdlclamdd > "20081003"  && lastmdlclamdd != "" ) {
		sysf_messageBox("중간청구 등록이 되어있습니다. 요율을 변경","E001");
		grp_changeownbrate.visible = false;
		return;
	} else if (readonly == "Y") {
		sysf_messageBox("읽기전용 모드에서는 요율을 변경","E001");
		grp_changeownbrate.visible = false;
		return;
	} else if (indschacptstat == "D") {
		sysf_messageBox("이미 퇴원한 환자입니다. 요율을 변경","E001");
		grp_changeownbrate.visible = false;
		return;
	} else if (dschjudgprcsstat == "C" || dschjudgprcsstat == "E") {
		sysf_messageBox("이미 마감된 환자입니다. 요율을 변경","E001");
		grp_changeownbrate.visible = false;
		return;
	}

	fChangeRate1();
}

//병용금기확인
function fUseincombinationtaboo() {
	// 20091126 수정추가 JHP 병용금기내역 확인
	var prcsyn = sysf_messageBox("병용금기확인시 계산내역에 따라 일부 시간이 지연될수 있습니다.\n\n","Q003");
	if(prcsyn == "6"){
		var pid = ds_main_item1_iteminfo.getColumn(0, "pid");
		if(pid == "" || pid == null || pid == " "){
		}else{
//			submit("TRPIJ00318");
var oParam = {};
    oParam.id          = "TRPIJ00318";
    oParam.service     = "bfjudgapp.InHospJudg";
    oParam.method      = "reqGetUseInCombinationTaboo";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=list";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00318";

tranf_submit(oParam);
/*
function cf_TRPIJ00318(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00318(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00318") > -1
arErrorCode.pop("TRPIJ00318") < 0
*/


			var nodecnt = ds_hidden_useincombinationtaboo_list.rowcount;

			if(nodecnt > 1){
				var seeyn = sysf_messageBox("병용금기내역이 존재합니다. 확인","Q005");
				if(seeyn == "6"){
					grp_taboo.attribute("left") = "420px";
					grp_taboo.attribute("top") = "525px";
					grp_taboo.attribute("width") = "508px";
					grp_taboo.attribute("height") = "199px";
					grp_taboo.visible = true;
				}else{
				}
			}else{
				sysf_messageBox("병용금기내역이 존재하지 ","I011");
			}
		}
	}
}

//심사변경유무 체크 확인
function fCheckChngStatus() {
	var rslt = true;
	var judgrmk = ds_main_item1_iteminfo.getColumn(0, "judgrmk");
	var edirmk = ds_main_item1_iteminfo.getColumn(0, "edirmk");
	var tstrmk = ds_main_item1_iteminfo.getColumn(0, "tstrmk");
	var judgrmk_orign = ds_main_item1_iteminfo.getColumn(0, "judgrmk_orign");
	var edirmk_orign = ds_main_item1_iteminfo.getColumn(0, "edirmk_orign");
	var tstrmk_orign = ds_main_item1_iteminfo.getColumn(0, "tstrmk_orign");

/*	for (var i = 1; i < grd_diaglist.rows; i++) {									
		if (grd_diaglist.rowstatus(i) != 0 && grd_diaglist.valueMatrix(i, grd_diaglist.colRef("diagcd")) != "" &&  grd_diaglist.valueMatrix(i, grd_diaglist.colRef("diagcd")) != "") {
			rslt = false;
		}
	}*/

	for (var i = 1; i < grd_clcjlist.rows; i++) {									
		if (grd_clcjlist.rowstatus(i) != 0 && grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("edicd")) != "" &&  grd_clcjlist.valueMatrix(i, grd_clcjlist.colRef("spclcd")) != "") {
			rslt = false;
		}
	}

	if (judgrmk != judgrmk_orign) {
		rslt = false;
	}

	if (edirmk != edirmk_orign) {
		rslt = false;
	}

	if (tstrmk != tstrmk_orign) {
		rslt = false;
	}

	return rslt;
}

function fOpenSPPIJ03800(){
	var cond = "ds_hidden_SPPIJ03800_cond";
	var ref = "ds_main_item1_iteminfo";
	var send = "ds_send";

	model.makevalue(cond+"_pid", model.getValue(ref+"_pid"));
	model.makevalue(cond+"_cretno", model.getValue(ref+"_cretno"));
	model.makevalue(cond+"_orddd", model.getValue(ref+"_fromdd"));
	model.makevalue(cond+"_ordtodd", model.getValue(ref+"_todd"));

	fLinkPopMenu("SPPIJ03800", cond, send, "modal");
}

function responseHandlerTRPIJ00322() {
	if (ds_chklist_goso.rowcount;> 0) { 
		sysf_messageBox("외출외박 24시간 초과된 완화의료 대상 환자입니다. 해당 일자의 입원료를", "I007")
	}
}   

]]></Script>