YNU_JEUS/app_home/himed/xpapps/emr/cncrpatmngtxp/xp/SMMRD05000.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[function lf_FormInit(nFlag){
	var nPid = "";
	var nHngnm = "";
	var nFormKind = "";
	
	stt_histinfo.text = "";
	stt_histinfo.visible = false;
	
	if( oOpener != null && oOpener.objects["ds_cond_cncrinfo"] != null ){
		nPid = oOpener.ds_cond_cncrinfo.getColumn(0, "pid");
		nHngnm = oOpener.ds_cond_cncrinfo.getColumn(0, "hngnm");
		nFormKind = oOpener.ds_cond_cncrinfo.getColumn(0, "formkind");
	}
	
	// 기록 신규
	if( nFormKind == "N" || nFlag == "Y" ){
		stt_histnm.text = "신규";
	
		ds_data_recinfo.clearData();
		ds_data_recinfo.addRow();
		ds_data_recinfo.setColumn(0, "status", "i");
		ds_data_recinfo.setColumn(0, "scrnid", lgv_scrnid);
		
		if( nFormKind == "N" && nFlag != "Y" ){
			ds_data_recinfo.setColumn(0, "pid", nPid);
			ds_data_recinfo.setColumn(0, "hngnm", nHngnm);
			
			if( !utlf_isNull(nPid) ){
				lf_setEnable(false);
			
				if( lgv_scrnid == "SMMRD05001" ){
					btn_patsrch.click();
				}
			}
			
			//lf_getSyncData();
		}else{
			lf_setEnable(true);
		}
		
		
	// 기록 조회
	}else if( nFormKind == "Y" ){
		stt_histnm.text = "수정";
		ds_data_recinfo.clearData();
		
		dsf_createDsRow("ds_cond_recinfo", [{col:"pid", type:"string", size:256, val:nPid}
											, {col:"scrnid", type:"string", size:256, val:lgv_scrnid}]);
		
		var oParam = {};
			oParam.id       = "TRMRD05001";
			oParam.service  = "cncrpatmngtapp.CncrRegstryMngt";
			oParam.method   = "reqGetCncrRegstryRecInfo";
			oParam.inds     = "req=ds_cond_recinfo";
			oParam.outds    = "ds_data_recinfo=info";
			oParam.async    = false;
			//oParam.callback = "cf_TRMRD05000";

		tranf_submit(oParam);
		
		ds_data_recinfo.addColumn("status", "string");
		ds_data_recinfo.setColumn(0, "status", "u");
		
		var fstrgstrnm 	= ds_data_recinfo.getColumn(0, "fstrgstrnm"); 
		var fstrgstdt	= utlf_transNullToEmpty(ds_data_recinfo.getColumn(0, "fstrgstdt")); 
		var lastupdtrnm = ds_data_recinfo.getColumn(0, "lastupdtrnm"); 
		var lastupdtdt	= utlf_transNullToEmpty(ds_data_recinfo.getColumn(0, "lastupdtdt")); 
		fstrgstdt = fstrgstdt.toDate("YYYYMMDD hh:ss");
		fstrgstdt = fstrgstdt.getDateFormat("YYYY-MM-DD hh:ss");
		lastupdtdt = lastupdtdt.toDate("YYYYMMDD hh:ss");
		lastupdtdt = lastupdtdt.getDateFormat("YYYY-MM-DD hh:ss");
		
		
		stt_histinfo.text = "작성자 : " + fstrgstrnm + "  " + fstrgstdt + " , 수정자 : " + lastupdtrnm + "  " + lastupdtdt;
		stt_histinfo.visible = true;
		
		lf_setEnable(false);
	}
	
	ds_temp_recinfo.copyData(ds_data_recinfo);
}

function lf_FormSave(nFlag){
	var sNm = "저장";
	
	if( !utlf_isNull(nFlag) ){
		ds_data_recinfo.setColumn(0, "status", "d");
		sNm = "삭제";
	}
	
	var nPid = ds_data_recinfo.getColumn(0, "pid");
	var nStatus = ds_data_recinfo.getColumn(0, "status");
	
	if( utlf_isNull(nPid) ){
		sysf_messageBox("차트번호는 필수입니다.", "E");
		return;
	}
	
	if( nStatus == "u" ){
		if(ds_temp_recinfo.saveXML() == ds_data_recinfo.saveXML()){
			sysf_messageBox("수정 사항이 없습니다.", "I");
			return;
		}
	}
	
	var nRtn = sysf_messageBox(sNm + " 하시겠습니까?", "Q");
	if( nRtn != 6 ){
		return false;
	}
	
	dsf_createDs("ds_data_cnt");
	
	
	var oParam = {};
		oParam.id       = "TXMRD05001";
		oParam.service  = "cncrpatmngtapp.CncrRegstryMngt";
		oParam.method   = "reqExeSaveCncrRegstryRecInfo";
		oParam.inds     = "req=ds_data_recinfo";
		oParam.outds    = "ds_data_cnt=result";
		oParam.async    = false;
		//oParam.callback = "cf_TXMRD05001";

	tranf_submit(oParam);
	
	if( ds_data_cnt.getColumn(0, "cnt") > 0 ){
		sysf_messageBox(sNm + " ", "I001");
		ds_cond_cncrinfo.setColumn(0, "formkind", "Y");
		oOpener.btn_new.click();
		oOpener.grp_srch.btn_search.click();
	}
	
}

function btn_patsrch_onclick(obj:Button,  e:ClickEventInfo)
{
	var nPid = ds_data_recinfo.getColumn(0, "pid");
	var nHngnm = ds_data_recinfo.getColumn(0, "hngnm");
	
	if( !utlf_isNull(nPid) ){
		ds_cond_patinfo.setColumn(0, "pid", nPid);
		ds_cond_patinfo.setColumn(0, "srchcond", "1");
	} else if(!utlf_isNull(nHngnm)){
		ds_cond_patinfo.setColumn(0, "hngnm", nHngnm);
		ds_cond_patinfo.setColumn(0, "srchcond", "2");
	}
	
	ds_cond_patinfo.setColumn(0, "autoflag","Y");  // 1건인경우 자동으로닫힘
	
	var objArg = new Object();
	objArg.arg_ds_send = ds_cond_patinfo;

	frmf_modal("SPPMC02500", "SPPMC02500", objArg, null, null, null, null, null, null, null, null, null, "M");

	if(!utlf_isNull(this.objects["ds_patinfolist"])) {
		var sPid 		= ds_patinfolist.getColumn(0, "pid");
		var sHngnm 		= ds_patinfolist.getColumn(0, "hngnm");
		var sSex 		= ds_patinfolist.getColumn(0, "sex");
		var sAge 		= ds_patinfolist.getColumn(0, "age");
		var sRrgstno1 	= utlf_transNullToEmpty(ds_patinfolist.getColumn(0, "rrgstno1"));
		var sRrgstno2 	= utlf_transNullToEmpty(ds_patinfolist.getColumn(0, "rrgstno2"));
		var sHometel 	= ds_patinfolist.getColumn(0, "hometel");
		var sMpphontel = ds_patinfolist.getColumn(0, "mpphontel");
		var sAddr 		= utlf_transNullToEmpty(ds_patinfolist.getColumn(0, "addr"));
		var sDetladdr 	= utlf_transNullToEmpty(ds_patinfolist.getColumn(0, "detladdr"));
		
		
		ds_data_recinfo.setColumn(0, "pid", sPid);
		ds_data_recinfo.setColumn(0, "hngnm", sHngnm);
		
		if( lgv_scrnid == "SMMRD05001" ){
			if( sSex == "F" ){
				ds_data_recinfo.setColumn(0, "c15", 1);
			}else if( sSex == "M" ){
				ds_data_recinfo.setColumn(0, "c15", 2);
			}
			ds_data_recinfo.setColumn(0, "c14", sAge);
			ds_data_recinfo.setColumn(0, "c20", sRrgstno1 + "-" + sRrgstno2);
			ds_data_recinfo.setColumn(0, "c17", sHometel);
			ds_data_recinfo.setColumn(0, "c18", sMpphontel);
			ds_data_recinfo.setColumn(0, "c16", sAddr + " " + sDetladdr);
		}
		
		//lf_getSyncData();
	}
}


function Edit_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if( e.keycode == 13){
		obj.updateToDataset();
		btn_patsrch.click();
	}
}


function lf_getSyncData(){

	var nPid = ds_data_recinfo.getColumn(0, "pid");
	var url = this.url;
	
	var condqry = "";
	
	if( oOpener != null ){
		condqry = oOpener.ds_init_forminfo.lookup("hardspec", url, "condqry");
	}
	
	//trace("nPid : " + nPid + " || condqry : " + condqry);
	
	if( utlf_isNull(nPid ) || utlf_isNull(condqry) ){
		return;
	}
	
	dsf_createDsRow("ds_cond_syncdata", [{col:"pid", type:"string", size:256, val:nPid}
									  , {col:"condqry", type:"string", size:256, val:condqry}
								      , {col:"instcd", type:"string", size:256, val:sysf_getUserInfo("dutplceinstcd")}]);

	dsf_createDs("ds_data_syncdata");
	
	var oParam = {};
		oParam.id       = "TRMRD05002";
		oParam.service  = "cncrpatmngtapp.CncrRegstryMngt";
		oParam.method   = "reqGetDataInfo";
		oParam.inds     = "req=ds_cond_syncdata";
		oParam.outds    = "ds_data_syncdata=datainfo";
		oParam.async    = false;
		oParam.callback = "cf_TRMRD05002";
		
	tranf_submit(oParam);
}


function cf_TRMRD05002(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
    
    if( ds_data_syncdata.rowcount > 0 ){
		var cCnt = ds_data_syncdata.getColCount();
		for(var i=0; i<cCnt; i++){
			var cInfo = ds_data_syncdata.getColumnInfo(i);
			if( cInfo != null ){
				var cNm = cInfo.name;
				var sVal = ds_data_syncdata.getColumn(0, i);
				if( !utlf_isNull(sVal) ){
					var cVal = ds_data_recinfo.getColumn(0, cNm);
					if( !utlf_isNull(cVal) && cVal != sVal ){
						var oComp = lf_getBindObj(cNm);
						if( oComp != null ){
							oComp.color = "red";
						}	
					}
				
					ds_data_recinfo.setColumn(0, cNm, sVal);
				}
			}
		}
	}
}


function lf_getBindObj(sColumnid){
	for(var i=0; i<this.binds.length; i++){
		if( this.binds[i].columnid == sColumnid ){
			var obj = this.components[this.binds[i].compid];
			if( obj != null )
				return obj;
		}
	}
	return null;
}

function lf_setEnable(nFlag){
	var oPid = lf_getBindObj("pid");
	if( oPid != null ){
		oPid.enable = nFlag;
	}
	
	var oHngnm = lf_getBindObj("hngnm");
	if( oHngnm != null ){
		oHngnm.enable = nFlag;
	}
	btn_patsrch.enable = nFlag;
}]]></Script>