YNU_JEUS/app_home/himed/xpapps/lis/rsltmngtxp/xp/SMLLR90200_특이결과등록.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLLR90200" position="absolute 0 0 604 368" titletext="특이결과등록" onload="SMLLR90200_onload">
    <Layouts>
      <Layout>
        <Static id="caption2" text="환자정보" class="tit_2" position="absolute 12 46 127 66" positiontype="position"/>
        <Static id="Static01" class="sta_DA_box" position="absolute 12 66 217 333"/>
        <Edit id="output1" taborder="2" readonly="true" position="absolute 88 69 213 89" positiontype="position"/>
        <Edit id="output2" taborder="3" readonly="true" position="absolute 88 94 213 114" positiontype="position"/>
        <Edit id="output3" taborder="4" readonly="true" position="absolute 88 119 213 139" positiontype="position"/>
        <Edit id="output4" taborder="5" readonly="true" position="absolute 88 144 213 164" positiontype="position"/>
        <TextArea id="tea_rmk" taborder="7" position="absolute 88 267 213 330"/>
        <Static id="caption10" text="조치사항" class="cell_1" position="absolute 13 267 85 332" style="align:left middle;" positiontype="position"/>
        <Static id="caption3" text="환자명" class="cell_1" position="absolute 13 67 85 91" style="align:left middle;" positiontype="position"/>
        <Static id="caption4" text="등록번호" class="cell_1" position="absolute 13 92 85 116" style="align:left middle;" positiontype="position"/>
        <Static id="caption6" text="진료과" class="cell_1" position="absolute 13 117 85 141" style="align:left middle;" positiontype="position"/>
        <Static id="caption7" text="병실" class="cell_1" position="absolute 13 142 85 166" style="align:left middle;" positiontype="position"/>
        <Static id="caption8" text="통보자" class="cell_1" position="absolute 13 167 85 191" style="align:left middle;" positiontype="position"/>
        <Static id="caption9" text="통보시간" class="cell_1" position="absolute 13 242 85 266" style="align:left middle;" positiontype="position"/>
        <Static id="caption11" text="피통보자" class="cell_1" position="absolute 13 217 85 241" style="align:left middle;" positiontype="position"/>
        <Edit id="ipt_repid" taborder="8" position="absolute 88 219 153 239" onkeydown="ipt_repid_onkeydown" imemode="none" positiontype="position" inputmode="upper"/>
        <Edit id="ipt_repnm" taborder="9" class="input_essential" position="absolute 155 219 212 239" imemode="hangul" enable="false" positiontype="position"/>
        <Edit id="ipt_notinm" taborder="10" class="input_essential" position="absolute 155 169 212 189" imemode="hangul" enable="false" positiontype="position"/>
        <Edit id="ipt_notiid" taborder="11" position="absolute 88 169 153 189" onkeydown="ipt_notiid_onkeydown" imemode="none" positiontype="position" inputmode="upper"/>
        <Static id="caption12" text="수신인" class="cell_1" position="absolute 13 192 85 216" style="align:left middle;" positiontype="position"/>
        <Edit id="ipt_rec" taborder="12" class="input_default" position="absolute 88 194 212 214" imemode="hangul" enable="false" positiontype="position"/>
        <Static id="caption1" text="특이결과내역" class="tit_2" position="absolute 227 46 363 66" positiontype="position"/>
        <Grid id="datagrid1" taborder="13" useinputpanel="false" position="absolute 227 66 592 333" binddataset="ds_grid_spcfrsltlist" positiontype="position" style="align:left;" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25"/>
                <Column size="25"/>
                <Column size="154"/>
                <Column size="50"/>
                <Column size="20"/>
                <Column size="20"/>
                <Column size="20"/>
                <Column size="20"/>
                <Column size="20"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="22" band="head"/>
                <Row size="20"/>
              </Rows>
              <Band id="head">
                <Cell text="No."/>
                <Cell col="1"/>
                <Cell col="2" text="검사항목명"/>
                <Cell col="3" text="결과"/>
                <Cell col="4" text="N"/>
                <Cell col="5" text="P"/>
                <Cell col="6" text="D"/>
                <Cell col="7" text="C"/>
                <Cell col="8" text="A"/>
                <Cell col="9" text="testcd"/>
                <Cell col="10" text="spccd"/>
                <Cell col="11" text="tclscd"/>
                <Cell col="12" text="bcno"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" displaytype="normal" edittype="none" text="bind:chk" expr="expr:currow + 1"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                <Cell col="2" style="align:left;" text="bind:tclsscrnnm"/>
                <Cell col="3" style="align:left;" text="bind:reptrslt"/>
                <Cell col="4" text="bind:judgmark"/>
                <Cell col="5" text="bind:panicmark"/>
                <Cell col="6" text="bind:deltamark"/>
                <Cell col="7" text="bind:criticalmark"/>
                <Cell col="8" text="bind:alertmark"/>
                <Cell col="9" text="bind:testcd"/>
                <Cell col="10" text="bind:spccd"/>
                <Cell col="11" text="bind:tclscd"/>
                <Cell col="12" text="bind:bcno"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption5" text="환자명" class="cell_1" position="absolute 13 67 85 90" style="align:left middle;" positiontype="position"/>
        <Button id="btn_cncl" taborder="14" text="취소" class="btn4" position="absolute 536 336 592 356" onclick="btn_cncl_onclick"/>
        <Button id="btn_confirm" taborder="15" text="확인" class="btn4" position="absolute 477 336 533 356" onclick="btn_confirm_onclick"/>
        <MaskEdit id="opt_dt" taborder="16" position="absolute 88 244 213 264" mask="@@@@-@@-@@ @@:@@:@@" style="selectcolor:#444444ff;background:transparent stretch 3,0;border:0 none #808080ff ;color:#888888ff;" class="input_default" type="string"/>
        <BindItem id="item0" compid="ipt_notinm" propid="value" datasetid="ds_temp_getUsernm" columnid="usernm"/>
        <BindItem id="item1" compid="ipt_repnm" propid="value" datasetid="ds_temp_getuserAnm" columnid="usernm"/>
        <BindItem id="item2" compid="output1" propid="value" datasetid="ds_grid_spcfrsltlist" columnid="patnm"/>
        <BindItem id="item3" compid="output2" propid="value" datasetid="ds_grid_spcfrsltlist" columnid="pid"/>
        <BindItem id="item4" compid="output3" propid="value" datasetid="ds_grid_spcfrsltlist" columnid="orddeptnm"/>
        <BindItem id="item5" compid="output4" propid="value" datasetid="ds_grid_spcfrsltlist" columnid="roomcd"/>
        <BindItem id="item7" compid="opt_dt" propid="value" datasetid="ds_grid_spcfrsltlist" columnid="dt"/>
        <Combo id="cmb_cancelgbn" taborder="17" innerdataset="ds_init_combo" codecolumn="resncd" datacolumn="resndesc" position="absolute 87 341 212 361" onitemchanged="cmb_cancelgbn_onitemchanged" visible="false"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grid_datagrid1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING"/>
          <Column id="tclsscrnnm" type="STRING"/>
          <Column id="reptrslt" type="STRING"/>
          <Column id="judgmark" type="STRING"/>
          <Column id="panicmark" type="STRING"/>
          <Column id="deltamark" type="STRING"/>
          <Column id="criticalmark" type="STRING"/>
          <Column id="alertmark" type="STRING"/>
          <Column id="testcd" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="tclscd" type="STRING"/>
          <Column id="bcno" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grid_spcfrsltlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column type="String" id="testcd"/>
          <Column type="String" id="spccd"/>
          <Column type="String" id="rsltstat"/>
          <Column id="tclsscrnnm"/>
          <Column id="reptrslt"/>
          <Column type="String" id="judgmark"/>
          <Column type="String" id="panicmark"/>
          <Column type="String" id="deltamark"/>
          <Column type="String" id="criticalmark"/>
          <Column type="String" id="alertmark"/>
          <Column id="patnm"/>
          <Column type="String" id="pid"/>
          <Column type="String" id="roomcd"/>
          <Column id="orddeptnm"/>
          <Column type="String" id="chk"/>
          <Column type="String" id="dt"/>
          <Column type="String" id="tclscd"/>
          <Column type="String" id="bcno"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_lb0101" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="etc01" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_combo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="resncd" type="STRING" size="256"/>
          <Column id="resndesc" type="STRING" size="256"/>
          <Column id="resncdkind" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="output1" propid="value" datasetid="ds_grid_spcfrsltlist" columnid="patnm"/>
      <BindItem id="item1" compid="output2" propid="value" datasetid="ds_grid_spcfrsltlist" columnid="pid"/>
      <BindItem id="item2" compid="output3" propid="value" datasetid="ds_grid_spcfrsltlist" columnid="orddeptnm"/>
      <BindItem id="item3" compid="output4" propid="value" datasetid="ds_grid_spcfrsltlist" columnid="roomcd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LLZ001.xjs";

function SMLLR90200_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);  // 화면공통
	
	lf_setInit();
	
	if(utlf_transNullToEmpty(appf_getPatientInfoDetail("orddrnm")) !=""){
		ipt_rec.value = appf_getPatientInfoDetail("orddrnm");
		var recnm = ipt_rec.value;
	}
	
	ipt_notiid.setFocus();
}

function lf_setInit() {

	//bcno값 부모창에서 받아오기
	var sInDsName = dsf_createDsRow("in_ds_search"
									,  [{col: "bcno", val: refparam_bcno } //objArg.refparam_bcno
									]);	 	
	
	var oParam = {};
		oParam.id          = "TRLLR90201";
		oParam.service     = "rsltmngtapp.RsltMngt";
		oParam.method      = "reqGetSpcfRsltRef";
		oParam.inds        = "cond="+sInDsName;
		oParam.outds       = "ds_grid_spcfrsltlist=spcfrsltlist";
		oParam.async       = false;

	tranf_submit(oParam);
     
	lf_getDbDeptcd("0000|0011|0101|");  // 중분류
	 
	 for(var i=0; i< ds_init_lb0101.rowcount; i++){
		if(ds_init_lb0101.getColumn(i,"etc01")==18){
			var nRow = ds_init_combo.addRow();
			ds_init_combo.setColumn(nRow,"resncd",ds_init_lb0101.getColumn(i,"cd"));
			ds_init_combo.setColumn(nRow,"resndesc",ds_init_lb0101.getColumn(i,"nm"));
			ds_init_combo.setColumn(nRow,"resncdkind",ds_init_lb0101.getColumn(i,"etc01"));	
		}
	}	
     
     //opt_dt.value = utlf_getCurrentDateTime().toDate("YYYYMMDD hhmmss");
     //opt_dt.value = utlf_getCurrentDateTime().toDate("YYYYMMDDhhmmss").getDateFormat("yyyy-MM-dd HH:mm:ss");
     opt_dt.value = utlf_getCurrentDateTime().replace(" ","");
}
		
		
function lf_spclResultSave(){

	if(utlf_transNullToEmpty(ipt_notinm.value) == ""){
		sysf_messageBox("통보자를","C001");
		return;
	}
	
	if(utlf_transNullToEmpty(ipt_rec.value) == ""){
		sysf_messageBox("수신인을","C001");
		return;
	}
	
// 	if(utlf_transNullToEmpty(ipt_repnm.value) == ""){
// 		sysf_messageBox("피통보자를","C001");
// 		return;
// 	}
		
	var isSpcl = false;
	ds_grid_datagrid1.reset();
	
	ds_grid_spcfrsltlist.updatecontrol = false;
	
	for(i=0; i<ds_grid_spcfrsltlist.rowcount; i++){
		if(ds_grid_spcfrsltlist.getColumn(i,"chk")=="1" || ds_grid_spcfrsltlist.getColumn(i,"chk")=="true"){
			ds_grid_spcfrsltlist.setRowType(i,Dataset.ROWTYPE_UPDATE);
			isSpcl = true;
		}
	}
	
	ds_grid_spcfrsltlist.updatecontrol = true;

	
	if(isSpcl){
	
		var dt = ds_grid_spcfrsltlist.getColumn(0,"dt");
		
		if(utlf_transNullToEmpty(ipt_notiid.value) == ""){
			ipt_notiid.value = "-";
		}
		
		if(utlf_transNullToEmpty(ipt_repid.value) == ""){
			ipt_repid.value = "-";
		}
		
		for(var i=0; i<ds_init_combo.rowcount;i++){
			if(ds_init_combo.getColumn(i,"resncd")==cmb_cancelgbn.value){
				var rsnComboValue = ds_init_combo.getColumn(i,"resndesc")
			}
		}
		
		var sInDsName = dsf_createDsRow("ds_temp_search"
								 , [{col: "notitrgtid", val:ipt_repid.value} 
								 , {col: "notitrgtnm", val:ipt_repnm.value} 
								 , {col: "notichrgid", val:ipt_notiid.value} 
							     , {col: "notichrgnm", val:ipt_notinm.value}
								 , {col: "measfact", val: rsnComboValue+"/"+tea_rmk.value} //특이결과사유에 콤보박스값과 텍스트 모두 들어가게.
								 , {col: "dt", val:dt}
								 ]);
		var oParam = {};
			oParam.id          = "TXLLR90201";
			oParam.service     = "rsltmngtapp.RsltMngt";
			oParam.method      = "reqInsSpcfRsltSave";
			oParam.inds        = "refparam="+sInDsName+" TestData=ds_grid_spcfrsltlist:U";
			oParam.async       = false;

		tranf_submit(oParam);
	}
	
	this.close();
}


function lf_getusernm(flag){

	if(flag == "R") {  //피통보자
		if(utlf_transNullToEmpty(ipt_repid.value)==""){
			sysf_messageBox("피통보자 ID를","C001");
			return;
		}
	
	var sInDsName = dsf_createDsRow("ds_temp_search"
	                             , [{col: "acceptid", val: ipt_repid.value}]);
	var sOutDsName = dsf_createDsRow("ds_temp_acceptnm"
								 , [{col: "usernm", val: ""}]);
												
	var oParam = {};
		oParam.id          = "TRLBT10404";
		oParam.service     = "transfusionmngtapp.BloodDelivery";
		oParam.method      = "reqGetUsernm";
		oParam.inds        = "cond="+sInDsName;
		oParam.outds       = sOutDsName+"=getDeliverynm";
		oParam.async       = false;
		oParam.callback    = "cbf_TRLBT10404";

	tranf_submit(oParam);
		
	} else if(flag=="N"){
	
		if(utlf_transNullToEmpty(ipt_notiid.value)==""){
			sysf_messageBox("통보자 ID를","C001");
			return;
		}
		
		var sInDsName = dsf_createDsRow("ds_temp_search"
								 , [{col: "userid", val: ipt_notiid.value}]);
		var sOutDsName = dsf_createDsRow("ds_temp_usernm"
								 , [{col: "usernm"}, {col: "userflag"}]);
		
		var oParam = {};
			oParam.id          = "TRLZZ00104";
			oParam.service     = "diagtestapplib.LisCommon";
			oParam.method      = "reqGetUserNM";
			oParam.inds        = "cond="+sInDsName;
			oParam.outds       = "ds_temp_usernm=usernm";
			oParam.async       = false;
			oParam.callback    = "cbf_TRLZZ00104";

		tranf_submit(oParam);
		
	}
}

//콜백_접속자조회
function cbf_TRLBT10404(strSvcID, nErrorCode, strErrorMag){
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
	
	if(!utlf_isNull(ds_temp_acceptnm.getColumn(0, "usernm"))){
	
		ipt_repnm.value = ds_temp_acceptnm.getColumn(0,"usernm");
		ds_temp_acceptnm.clearData();

	}else{
		sysf_messageBox("피통보자 ID가 정확히 입력되지","E007","");
		ipt_repid.value = "";
		ipt_repid.setFocus();
		return;
	}
}

// 콜백 통보자 조회
function cbf_TRLZZ00104(strSvcID, nErrorCode, strErrorMag){
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
	

	if(!utlf_isNull(ds_temp_usernm.getColumn(0, "usernm"))){
	
		ipt_notinm.value = ds_temp_usernm.getColumn(0,"usernm");
		ds_temp_usernm.clearData();

	}else{
		sysf_messageBox("통보자 ID가 정확히 입력되지","E007","");
		ipt_notiid.value = "";
		ipt_notiid.setFocus();
		return;
	}
}

function btn_confirm_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_spclResultSave();
}

function ipt_notiid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13){
		lf_getusernm("N");
	}
}  

function ipt_repid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13){
		lf_getusernm("R");	
	}
}

function btn_exit_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function btn_cncl_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

]]></Script>
  </Form>
</FDL>