YNU_JEUS/app_home/himed/xpapps/lis/bcollmngtxp/xp/SMLLC00620_접수후미결과검체조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLLC00620" position="absolute 0 0 1198 759" titletext="핵의학 검체 조회" oninit="SMLLC00620_oninit" onload="SMLLC00620_onload">
    <Layouts>
      <Layout>
        <Div id="Div00" taborder="11" position="absolute -1 25 1196 57" class="div_SA" anchor="left top right"/>
        <Button id="btn_reset" taborder="1" text="초기화" class="btn4" position="absolute 1119 2 1187 24" onclick="btn_reset_onclick" anchor="top right" style="align:right middle;"/>
        <Static id="caption1" text="진검 검체 List" class="tit_2" position="absolute -1 70 108 87"/>
        <Grid id="grd_nspclist" taborder="2" binddataset="ds_grd_nspclist" useinputpanel="false" position="absolute -2 90 1192 757" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="100"/>
                <Column size="80"/>
                <Column size="70"/>
                <Column size="60"/>
                <Column size="65"/>
                <Column size="247"/>
                <Column size="95"/>
                <Column size="50"/>
                <Column size="120"/>
                <Column size="70"/>
                <Column size="170"/>
                <Column size="60"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="시행부서"/>
                <Cell col="1" text="검체번호"/>
                <Cell col="2" text="진료과"/>
                <Cell col="3" text="등록번호"/>
                <Cell col="4" text="성명"/>
                <Cell col="5" text="검사명"/>
                <Cell col="6" text="검체명"/>
                <Cell col="7" text="검체상태"/>
                <Cell col="8" text="채취시각"/>
                <Cell col="9" text="채취자"/>
                <Cell col="10" text="접수정보"/>
                <Cell col="11" text="병동"/>
              </Band>
              <Band id="body">
                <Cell text="bind:tsectnm"/>
                <Cell col="1" displaytype="text" edittype="text" text="bind:bcno"/>
                <Cell col="2" text="bind:orddeptnm"/>
                <Cell col="3" text="bind:pid"/>
                <Cell col="4" text="bind:hngnm"/>
                <Cell col="5" text="bind:tclsnm"/>
                <Cell col="6" text="bind:spcnm"/>
                <Cell col="7" text="bind:spcstat"/>
                <Cell col="8" text="bind:bcoll"/>
                <Cell col="9" text="bind:spcpseuacpt"/>
                <Cell col="10" text="bind:spcacpt"/>
                <Cell col="11" text="bind:spccncl"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_excel" taborder="4" text="엑셀저장" class="btn7" position="absolute 1110 64 1186 87" onclick="btn_excel_onclick" anchor="top right" style="align:right middle;"/>
        <Shape id="line3" linetype="vertical" class="line_4" position="absolute 1103 31 1109 53" anchor="left top"/>
        <Button id="btn_Ref" taborder="5" text="조회" class="btn1" position="absolute 1121 31 1185 53" onclick="btn_Ref_onclick" anchor="top right" style="align:left middle;"/>
        <Static id="caption4" text="조회기간 :" class="search_name" position="absolute 14 33 86 50"/>
        <Calendar id="ipt_fromdd" taborder="6" class="input_s_essential" position="absolute 100 33 206 52"/>
        <Static id="caption5" text="~" class="search_no_b" position="absolute 208 34 223 51"/>
        <Calendar id="ipt_todd" taborder="7" class="input_s_essential" position="absolute 223 33 329 52"/>
        <Radio id="radio1" taborder="8" columncount="4" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 823 31 1053 51" anchor="left top">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">00</Col>
                <Col id="datacolumn">전체</Col>
              </Row>
              <Row>
                <Col id="codecolumn">1</Col>
                <Col id="datacolumn">입원</Col>
              </Row>
              <Row>
                <Col id="codecolumn">2</Col>
                <Col id="datacolumn">외래</Col>
              </Row>
              <Row>
                <Col id="codecolumn">3</Col>
                <Col id="datacolumn">건진</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Static id="caption3" text="시행부서 :" class="search_name" position="absolute 348 34 434 51"/>
        <Combo id="cmd_TMdlCd" taborder="9" innerdataset="@ds_init_LB0106" codecolumn="cd" datacolumn="nm" class="combo_s_essential" position="absolute 603 33 753 52"/>
        <Combo id="cmb_TLrgCd" taborder="10" innerdataset="@ds_init_LB0111" codecolumn="cd" datacolumn="nm" class="combo_s_essential" position="absolute 439 32 593 51" onitemchanged="cmb_TLrgCd_onitemchanged"/>
        <Static id="caption6" text="진단검사의학과 접수후 미결과 검체 조회" class="tit_1" position="absolute 0 0 272 25" anchor="left top"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_nspclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="tsectnm" type="STRING"/>
          <Column id="bcno" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="tclsnm" type="STRING"/>
          <Column id="spcnm" type="STRING"/>
          <Column id="spcstat" type="STRING"/>
          <Column id="bcoll" type="STRING"/>
          <Column id="spcpseuacpt" type="STRING"/>
          <Column id="spcacpt" type="STRING"/>
          <Column id="spccncl" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmd_TMdlCd" 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_init_cmb_TLrgCd" 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_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="refflag" type="STRING" size="256"/>
          <Column id="reftext" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="spcflag" type="STRING" size="256"/>
          <Column id="genrflag" type="STRING" size="256"/>
          <Column id="codeflag" type="STRING" size="256"/>
          <Column id="execdept" type="STRING" size="256"/>
          <Column id="sectcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="spcflag">00</Col>
            <Col id="genrflag">2</Col>
            <Col id="refflag">1</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_LB0102" 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_init_LB0104" 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_init_LB0106" 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_init_LB0111" 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_init_LB0000" 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_radio1" 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">전체</Col>
            <Col id="value">00</Col>
          </Row>
          <Row>
            <Col id="label">입원</Col>
            <Col id="value">1</Col>
          </Row>
          <Row>
            <Col id="label">외래</Col>
            <Col id="value">2</Col>
          </Row>
          <Row>
            <Col id="label">건진</Col>
            <Col id="value">3</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_spcacpt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="testmdlcd" type="STRING" size="256"/>
          <Column id="testlrgcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd"/>
      <BindItem id="item1" compid="ipt_todd" propid="value" datasetid="ds_send" columnid="todd"/>
      <BindItem id="item2" compid="radio1" propid="value" datasetid="ds_send" columnid="genrflag"/>
      <BindItem id="item3" compid="cmb_TLrgCd" propid="value" datasetid="ds_hidden_spcacpt" columnid="testlrgcd"/>
      <BindItem id="item4" compid="cmd_TMdlCd" propid="value" datasetid="ds_hidden_spcacpt" columnid="testmdlcd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-09
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-09      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

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

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

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

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

function SMLLC00620_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_nspclist);
	
	ipt_fromdd.value = utlf_getCurrentDate();
	ipt_todd.value = utlf_getCurrentDate();
	
	ds_hidden_spcacpt.setColumn(0, "testlrgcd", '00');
	ds_hidden_spcacpt.setColumn(0, "testmdlcd", '00');
	radio1.value = '00';
	
	var sInDsName = dsf_createDsRow("ds_temp_search", [{col : "codeflag", val : "0102|0106|0104|0111|0000|"}]);
	//초기정보 조회
	var oParam = {};
    oParam.id          = "TRLZZ00101";
    oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
    oParam.method      = "reqGetInitCodeInfo";
    oParam.inds        = "cond=" + sInDsName;
    oParam.outds       = "ds_init_LB0102=0102 ds_init_LB0106=0106 ds_init_LB0104=0104 ds_init_LB0111=0111 ds_init_LB0000=0000";
    oParam.async       = false;
    oParam.callback    = "cf_TRLZZ00101";

	tranf_submit(oParam);
	
	//fGetNSpcList();
}

//조회
function fGetNSpcList() 
{
	
	ds_send.setColumn(0, "execdept", ds_hidden_spcacpt.getColumn(0, "testmdlcd"));
 	ds_send.setColumn(0, "codeflag", ds_hidden_spcacpt.getColumn(0, "testlrgcd"));
	
	//submit("TRLLC00603");
	
	var oParam = {};
    oParam.id          = "TRLLC00603";
    oParam.service     = "bcollmngtapp.BCollMngt";
    oParam.method      = "reqGetLSpcList1";
    oParam.inds        = "cond=ds_send";
    oParam.outds       = "ds_grd_nspclist=nspclist";
    oParam.async       = false;
    oParam.callback    = "cf_TRLLC00603";

	tranf_submit(oParam);
	//fSetTLrgCd();
}

function fSetTLrgCd()
{	
	var sLcode = cmb_TLrgCd.value;
	
	if(sLcode == "00")
	{
		ds_init_LB0106.filter("");
	}
	else
	{	
		ds_init_LB0106.filter("cd =='00' || etc01 =='"+sLcode+"'");
	}
	cmd_TMdlCd.value = "00"
}



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

//엑셀저장
function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_nspclist, lf_lisGetTitle(this), "see");	
}

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

function cmb_TLrgCd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fSetTLrgCd();
}
]]></Script>
  </Form>
</FDL>