YNU_JEUS/app_home/himed/xpapps/lis/rsltmngtxp/xp/SMLLR00600_이상치결과일괄관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLLR00600" position="absolute 0 0 1199 805" titletext="이상치결과일괄보고" oninit="SMLLR00600_oninit" onload="SMLLR00600_onload">
    <Layouts>
      <Layout>
        <Div id="Div00" taborder="17" position="absolute 0 25 1187 99" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Static id="caption11" text="조회일자 :" class="search_name" position="absolute 12 13 84 30" anchor="default"/>
              <Calendar id="ipt_acptfromdd" taborder="1" class="input_s_essential" position="absolute 89 12 189 31" anchor="default"/>
              <MaskEdit id="input1" taborder="2" type="string" mask="##:##" class="input_search" position="absolute 190 12 230 31" anchor="default"/>
              <Static id="caption4" text="~" position="absolute 234 13 246 33" anchor="default"/>
              <Calendar id="ipt_acpttodd" taborder="3" class="input_s_essential" position="absolute 249 12 349 31" anchor="default"/>
              <MaskEdit id="input2" taborder="4" type="string" mask="##:##" class="input_search" position="absolute 350 12 390 31" anchor="default"/>
              <Static id="caption1" text="검사 장비 :" class="search_name" position="absolute 439 13 530 30" anchor="default"/>
              <Combo id="combo1" taborder="5" innerdataset="@ds_init_lb0115" codecolumn="cd" datacolumn="nm" position="absolute 534 12 694 31" anchor="default"/>
              <Static id="caption2" text="PDC 구분 :" class="search_name" position="absolute 439 43 534 60" anchor="default"/>
              <CheckBox id="checkbox1" taborder="6" text="Panic" position="absolute 534 43 594 63" anchor="default"/>
              <CheckBox id="checkbox2" taborder="7" text="Delta" position="absolute 594 43 654 63" anchor="default"/>
              <CheckBox id="checkbox3" taborder="8" text="Critical" position="absolute 654 43 724 63" anchor="default"/>
              <Static id="caption19" text="검사자 :" class="tit_2" position="absolute 937 12 1003 28" anchor="top right"/>
              <Edit id="ipt_testpsn" taborder="9" imemode="alpha" inputmode="upper" inputfilter="dot,comma,sign,symbol,space" inputtype="numberandenglish" onkeyup="ipt_testpsn_onkeyup" class="input_essential" position="absolute 1007 10 1087 29" anchor="top right"/>
              <Edit id="opt_testpsn" taborder="10" readonly="true" position="absolute 1090 10 1170 29" anchor="top right" enable="false"/>
              <Shape id="line3" linetype="vertical" class="line_4" position="absolute 1104 43 1110 65" anchor="top right"/>
              <Button id="btn_Ref" taborder="11" text="조회" onclick="btn_Ref_onclick" class="btn1" position="absolute 1117 43 1173 65" anchor="top right"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption3" text="결과 리스트" class="tit_2" position="absolute 2 103 96 119"/>
        <Grid id="grd_abnormallist" taborder="2" binddataset="ds_grd_abnormallist" useinputpanel="false" position="absolute 1 124 1195 754" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="23"/>
                <Column size="20"/>
                <Column size="85"/>
                <Column size="75"/>
                <Column size="85"/>
                <Column size="50"/>
                <Column size="65"/>
                <Column size="0"/>
                <Column size="160"/>
                <Column size="0"/>
                <Column size="70"/>
                <Column size="80"/>
                <Column size="131"/>
                <Column size="80"/>
                <Column size="133"/>
                <Column size="39"/>
                <Column size="44"/>
                <Column size="39"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell displaytype="checkbox" edittype="checkbox"/>
                <Cell col="1" style="align:center middle;"/>
                <Cell col="2" text="바코드번호"/>
                <Cell col="3" text="등록번호"/>
                <Cell col="4" text="환자명"/>
                <Cell col="5" text="진료과"/>
                <Cell col="6" text="병동/병실"/>
                <Cell col="7" text="testcd"/>
                <Cell col="8" text="검사명"/>
                <Cell col="9" text="spccd"/>
                <Cell col="10" text="검체명"/>
                <Cell col="11" text="결과"/>
                <Cell col="12" text="결과보고일시"/>
                <Cell col="13" text="이전결과"/>
                <Cell col="14" text="이전결과일시"/>
                <Cell col="15" text="P"/>
                <Cell col="16" text="D"/>
                <Cell col="17" text="C"/>
                <Cell col="18"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                <Cell col="1" displaytype="image" style="align:center;background:stretch;background2:stretch;selectbackground:stretch;backgroundimage:EXPR(fSetGridColor(currow));" text="bind:rstimg"/>
                <Cell col="2" text="bind:bcno"/>
                <Cell col="3" text="bind:pid"/>
                <Cell col="4" text="bind:patnm"/>
                <Cell col="5" text="bind:orddeptnm"/>
                <Cell col="6" text="bind:wardroom"/>
                <Cell col="7" text="bind:testcd"/>
                <Cell col="8" text="bind:tclsscrnnm"/>
                <Cell col="9" text="bind:spccd"/>
                <Cell col="10" text="bind:spcnm"/>
                <Cell col="11" text="bind:inptrslt"/>
                <Cell col="12" displaytype="date" text="bind:reptdt" mask="yyyy-MM-dd hh:mm:ss"/>
                <Cell col="13" text="bind:bfreptrslt"/>
                <Cell col="14" displaytype="normal" text="bind:bfreptdt"/>
                <Cell col="15" style="background:EXPR(panic == 'P' ?  &quot;#7BE6B7&quot; : &quot;#ffffff&quot;);background2:EXPR(panic == 'P' ?  &quot;#7BE6B7&quot; : &quot;#ffffff&quot;);" text="bind:panic"/>
                <Cell col="16" style="background:EXPR(delta == 'D' ?  &quot;#dec6a4&quot; : &quot;#ffffff&quot;);background2:EXPR(delta == 'D' ?  &quot;#dec6a4&quot; : &quot;#ffffff&quot;);" text="bind:delta"/>
                <Cell col="17" style="background:EXPR(critical== 'C' ?  &quot;#ffe79d&quot; : &quot;#ffffff&quot;);" text="bind:critical"/>
                <Cell col="18" text="bind:rsltstat"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption6" text="이상치결과일괄보고" class="tit_1" position="absolute 0 0 152 25" anchor="left top"/>
        <Button id="btn_reset" taborder="14" text="초기화" class="btn4" position="absolute 1120 1 1188 23" onclick="btn_reset_onclick" anchor="top right"/>
        <Button id="button11" taborder="15" text="출력" class="btn6" visible="false" position="absolute 971 1 1027 23" onclick="button11_onclick"/>
        <Button id="btn_lstrept" taborder="16" text="최종보고" class="btn4" position="absolute 1037 1 1117 23" onclick="btn_lstrept_onclick" anchor="top right"/>
        <Shape id="line1" class="line_1" position="absolute 0 120 1194 126" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_combo1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING"/>
          <Column id="cd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_abnormallist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING"/>
          <Column id="rstimg" type="STRING"/>
          <Column id="bcno" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="wardroom" type="STRING"/>
          <Column id="testcd" type="STRING"/>
          <Column id="tclsscrnnm" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="spcnm" type="STRING"/>
          <Column id="inptrslt" type="STRING"/>
          <Column id="reptdt" type="STRING"/>
          <Column id="bfreptrslt" type="STRING"/>
          <Column id="bfreptdt" type="STRING"/>
          <Column id="panic" type="STRING"/>
          <Column id="delta" type="STRING"/>
          <Column id="critical" type="STRING"/>
          <Column id="rsltstat" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_checkbox1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">Panic</Col>
            <Col id="value">P</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_checkbox2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">Delta</Col>
            <Col id="value">D</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_checkbox3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">Critical</Col>
            <Col id="value">C</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_ref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="fromtm" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="totm" type="STRING" size="256"/>
          <Column id="eqmtcd" type="STRING" size="256"/>
          <Column id="panic" type="STRING" size="256"/>
          <Column id="delta" type="STRING" size="256"/>
          <Column id="critical" type="STRING" size="256"/>
          <Column id="pdcmark" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="fromtm" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="totm" type="STRING" size="256"/>
          <Column id="eqmtcd" type="STRING" size="256"/>
          <Column id="panic" type="STRING" size="256"/>
          <Column id="delta" type="STRING" size="256"/>
          <Column id="critical" type="STRING" size="256"/>
          <Column id="pdcmark" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_lb0115" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="cd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="param" type="STRING" size="256"/>
          <Column id="data2" type="STRING" size="256"/>
          <Column id="data1" type="STRING" size="256"/>
          <Column id="XFMGbn" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_refflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="rsltstat" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
          <Column id="testlrgkind" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="rsltstat">4</Col>
            <Col id="testlrgkind">-</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_getUsernm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="usernm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_TestData" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="Div00.combo1" propid="value" datasetid="ds_hidden_ref" columnid="eqmtcd"/>
      <BindItem id="item1" compid="Div00.checkbox1" propid="value" datasetid="ds_hidden_ref" columnid="panic"/>
      <BindItem id="item2" compid="Div00.checkbox2" propid="value" datasetid="ds_hidden_ref" columnid="delta"/>
      <BindItem id="item3" compid="Div00.checkbox3" propid="value" datasetid="ds_hidden_ref" columnid="critical"/>
      <BindItem id="item4" compid="Div00.opt_testpsn" propid="value" datasetid="ds_getUsernm" columnid="usernm"/>
    </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";
include "lis_commonxp::LZZ001.xjs";
include "lis_commonxp::LPZ001.xjs";

function cf_TRLZZ00101(strSvcID, nErrorCode, strErrorMag)
{
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
}

function cf_TRLLR00601(strSvcID, nErrorCode, strErrorMag)
{
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
}

function SMLLR00600_oninit(obj:Form, e:InitEventInfo)
{
	//폼 초기화 함수
	frmf_initForm(obj);
}

function SMLLR00600_onload(obj:Form, e:LoadEventInfo)
{	
	grdf_initGrid(grd_abnormallist);
	
	Div00.ipt_acptfromdd.value = utlf_addDate(utlf_getCurrentDate(), -1);
	Div00.ipt_acpttodd.value   = utlf_getCurrentDate();
	Div00.input1.value = "0000";
	Div00.input2.value = "2359";
	
	ds_hidden_ref.setColumn(0, "eqmtcd", '00');
	
	var sInDsName = dsf_createDsRow("ds_temp_search", [{col: "codeflag", val: "0115|"}]);
								
	// 서브밋호출
	var oParam = {};
    oParam.id          = "TRLZZ00101";
    oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
    oParam.method      = "reqGetInitCodeInfo";
    oParam.inds        = "cond=" + sInDsName;
    oParam.outds       = "ds_init_lb0115=0115";
    oParam.async       = false;
    oParam.callback    = "cf_TRLZZ00101";
	tranf_submit(oParam);	
}

//조회
function fGetAbnormalList()
{					
	var pdcmark  = "";	
	var panic    = ds_hidden_ref.getColumn(0, "panic");
	var delta    = ds_hidden_ref.getColumn(0, "delta");
	var critical = ds_hidden_ref.getColumn(0, "critical");
	var eqmtcd   = ds_hidden_ref.getColumn(0, "eqmtcd");
	
	pdcmark = panic + delta + critical;	
	
	if(utlf_isNull(pdcmark))
	{	
		alert("Panic, Delta, Critical 구분을 하나라도 선택하십시오.");
		return;
	}
	
	if(eqmtcd == "00")
	{	
		alert("장비코드를 선택하십시오.");
		return;
 	}
 	
 	ds_cond.setColumn(0, "pdcmark", pdcmark);
	ds_cond.setColumn(0, "eqmtcd",  ds_hidden_ref.getColumn(0, "eqmtcd"));
	ds_cond.setColumn(0, "fromdd",  Div00.ipt_acptfromdd.value);
	ds_cond.setColumn(0, "fromtm",  Div00.input1.value);
	ds_cond.setColumn(0, "todd",    Div00.ipt_acpttodd.value);
	ds_cond.setColumn(0, "totm",    Div00.input2.value);
	
	var oParam = {};
    oParam.id          = "TRLLR00601";
    oParam.service     = "rsltmngtapp.RsltMngt";
    oParam.method      = "reqGetAbnormalRsltList";
    oParam.inds        = "cond=ds_cond";
    oParam.outds       = "ds_grd_abnormallist=getAbnormalRsltList";
    oParam.async       = false;
    oParam.callback    = "cf_TRLLR00601";

	tranf_submit(oParam);
}

//그리드색깔
function fSetGridColor(currow)
{
	if(ds_grd_abnormallist.getColumn(currow, "rsltstat") == "-")
	{
		return "../../../IMAGES/lis/icnRSTFLAG_N.png";
	}
	
	else if(ds_grd_abnormallist.getColumn(currow, "rsltstat") == "1")
	{
		return "../../../IMAGES/lis/icnRSTFLAG_1.png";
	}
	
	else if(ds_grd_abnormallist.getColumn(currow, "rsltstat") == "2")
	{
		return "../../../IMAGES/lis/icnRSTFLAG_2.png";
	}
	
	else if(ds_grd_abnormallist.getColumn(currow, "rsltstat") == "3")
	{
		return "../../../IMAGES/lis/icnRSTFLAG_3.png";
	}
	
	else if(ds_grd_abnormallist.getColumn(currow, "rsltstat") == "4")
	{
		return "../../../IMAGES/lis/icnRSTFLAG_F.png";
	}
}

//검사자 조회
function fUserNMRef()
{
	if(!utlf_isNull(ds_hidden_refflag.getColumn(0, "userid")))
	{
		ds_send.setColumn(0, "userid", ds_hidden_refflag.getColumn(0, "userid"));
		
		var oParam = {};
		oParam.id          = "TRLZZ00104";
		oParam.service     = "diagtestapplib.LisCommon";
		oParam.method      = "reqGetUserNM";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_getUsernm=usernm";
		oParam.async       = false;

		tranf_submit(oParam);

		if(utlf_isNull(ds_getUsernm.getColumn(0, "usernm")))
		{
			ds_hidden_refflag.setColumn(0, "userid", "");
		}						
	}
}

//최종보고
function fSetLstRept()
{
	if(utlf_isNull(ds_getUsernm.getColumn(0, "usernm")))
	{
		alert("검사자를 입력하십시오.");
		return;
	}
	for(var aRow = 0 ; aRow < grd_abnormallist.rowcount ; aRow++)
	{
		if(ds_grd_abnormallist.getColumn(aRow, "chk") == 1)
		{	
			ds_grd_abnormallist.updatecontrol = false;
			ds_grd_abnormallist.setRowType(aRow, 4);
			ds_grd_abnormallist.updatecontrol = true;
		}
		else
		{	
			ds_grd_abnormallist.updatecontrol = false;
			ds_grd_abnormallist.setRowType(aRow, 0);
			ds_grd_abnormallist.updatecontrol = true;
		}						
	}
	
	var grddata = grdf_getGridUpdateData(grd_abnormallist, "all");
	grdf_setStatusColumn(grddata, "status");
	ds_TestData.copyData(grddata, true);
	
	var oParam = {};
    oParam.id          = "TXLLR00401";
    oParam.service     = "rsltmngtapp.RsltMngt";
    oParam.method      = "reqSetItemResultSave";
    oParam.inds        = "TestData=ds_TestData RefFalg=ds_hidden_refflag";
    oParam.transaction = false;
    oParam.async       = false;
	tranf_submit(oParam);
	fGetAbnormalList();
}

//조회
function btn_Ref_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetAbnormalList();
}

//초기화
function btn_reset_onclick(obj:Button,  e:ClickEventInfo)
{
	this.reload();
}

//최종보고
function btn_lstrept_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetLstRept();
}

//검사자입력
function ipt_testpsn_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{		  		 	
		ds_hidden_refflag.setColumn(0, "userid", Div00.ipt_testpsn.text);
		fUserNMRef();
	}	
}]]></Script>
  </Form>
</FDL>