YNU_JEUS/app_home/himed/xpapps/lis/bcollmngtxp/xp/SMLLC00610_외래채혈실검체조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLLC00610" position="absolute 0 0 1241 805" titletext="핵의학 검체 조회" onload="SMLLC00610_onload" oninit="SMLLC00610_oninit">
    <Layouts>
      <Layout>
        <Div id="Div00" taborder="16" position="absolute 0 25 1236 97" class="div_SA"/>
        <Button position="absolute 1159 34 1233 56" id="btn_reset" class="btn4" text="초기화" onclick="btn_reset_onclick" anchor="left top"/>
        <Button id="btn_excel" taborder="6" text="엑셀저장" class="btn7" position="absolute 1159 61 1233 83" onclick="btn_excel_onclick" anchor="left top"/>
        <Grid id="grd_nspclist" taborder="7" binddataset="ds_grd_nspclist" useinputpanel="false" position="absolute 1 108 1240 765" anchor="all" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="27"/>
                <Column size="100"/>
                <Column size="80"/>
                <Column size="75"/>
                <Column size="70"/>
                <Column size="65"/>
                <Column size="235"/>
                <Column size="95"/>
                <Column size="60"/>
                <Column size="120"/>
                <Column size="80"/>
                <Column size="170"/>
                <Column size="86"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <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="접수정보"/>
                <Cell col="12" text="병동"/>
              </Band>
              <Band id="body">
                <Cell text="expr:currow + 1"/>
                <Cell col="1" text="bind:tsectnm"/>
                <Cell col="2" displaytype="text" edittype="text" style="align:center;" text="bind:bcno"/>
                <Cell col="3" text="bind:orddeptnm"/>
                <Cell col="4" displaytype="text" edittype="text" style="align:center middle;" text="bind:pid"/>
                <Cell col="5" text="bind:hngnm"/>
                <Cell col="6" style="align:left middle;" text="bind:tclsnm"/>
                <Cell col="7" text="bind:spcnm"/>
                <Cell col="8" text="bind:spcstat"/>
                <Cell col="9" text="bind:bcoll"/>
                <Cell col="10" text="bind:spcpseuacpt"/>
                <Cell col="11" text="bind:spcacpt"/>
                <Cell col="12" text="bind:spccncl"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line3" linetype="vertical" class="line_4" position="absolute 1048 32 1054 74" anchor="left top"/>
        <Button id="btn_Ref" taborder="8" text="조회" class="btn1" position="absolute 1087 44 1143 67" onclick="btn_Ref_onclick" anchor="left top"/>
        <Static id="caption4" text="조회기간 :" class="search_name" position="absolute 7 38 97 55" anchor="default"/>
        <Calendar id="ipt_fromdd" taborder="9" class="input_s_essential" position="absolute 93 37 199 56" oneditclick="ipt_fromdd_oneditclick" anchor="default"/>
        <Static id="caption5" text="~" class="search_no_b" position="absolute 201 39 216 56" anchor="default"/>
        <Calendar id="ipt_todd" taborder="10" class="input_s_essential" position="absolute 216 37 322 56" anchor="default"/>
        <Static id="caption3" text="검체상태 :" class="search_name" position="absolute 416 42 506 59" anchor="left top"/>
        <Combo id="cmb_spcflag" taborder="11" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 506 42 581 61" 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">0</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>
              <Row>
                <Col id="codecolumn">4</Col>
                <Col id="datacolumn">접수</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Radio id="radio3" taborder="12" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 641 42 811 62" anchor="left top" onitemclick="radio3_onitemclick">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">1</Col>
                <Col id="datacolumn">진검채혈자</Col>
              </Row>
              <Row>
                <Col id="codecolumn">2</Col>
                <Col id="datacolumn">진검외</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Static id="caption2" text="구분" position="absolute 611 42 641 62" anchor="left top" style="color:#ff0000ff;"/>
        <Radio id="radio1" taborder="13" columncount="4" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 822 42 1047 62" 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="caption7" text="시행부서 :" class="search_name" position="absolute 6 64 92 81" anchor="default"/>
        <Combo id="cmd_TMdlCd" taborder="14" innerdataset="@ds_init_LB0106" codecolumn="cd" datacolumn="nm" class="combo_s_essential" position="absolute 256 67 406 86" anchor="default"/>
        <Combo id="cmb_TLrgCd" taborder="15" innerdataset="@ds_init_LB0111" codecolumn="cd" datacolumn="nm" class="combo_s_essential" position="absolute 92 66 246 85" onitemchanged="cmb_TLrgCd_onitemchanged" anchor="default"/>
        <Shape id="line1" linetype="vertical" class="line_4" position="absolute 812 32 818 74" anchor="left top"/>
        <Static id="caption6" text="진단검사의학과 검체 조회" class="tit_1" position="absolute 0 0 184 25" anchor="left top"/>
      </Layout>
    </Layouts>
    <Objects>
      <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_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_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"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="spcflag">00</Col>
            <Col id="refflag">1</Col>
            <Col id="genrflag">2</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>
      <Dataset id="ds_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="codeflag" type="STRING" size="256"/>
          <Column id="basecdid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_spclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="bcno" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="tclsnm" type="STRING" size="256"/>
          <Column id="spcnm" type="STRING" size="256"/>
          <Column id="spcstat" type="STRING" size="256"/>
          <Column id="bcoll" type="STRING" size="256"/>
          <Column id="spcpseuacpt" type="STRING" size="256"/>
          <Column id="spcacpt" type="STRING" size="256"/>
          <Column id="spccncl" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="tsectnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_spcflag" 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="value">00</Col>
            <Col id="label">-전체-</Col>
          </Row>
          <Row>
            <Col id="value">0</Col>
            <Col id="label">취소</Col>
          </Row>
          <Row>
            <Col id="value">2</Col>
            <Col id="label">채혈</Col>
          </Row>
          <Row>
            <Col id="value">3</Col>
            <Col id="label">가접수</Col>
          </Row>
          <Row>
            <Col id="value">4</Col>
            <Col id="label">접수</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_radio3" 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">1</Col>
          </Row>
          <Row>
            <Col id="label">진검외</Col>
            <Col id="value">2</Col>
          </Row>
        </Rows>
      </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_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_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_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_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>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="cmb_TLrgCd" propid="value" datasetid="ds_hidden_spcacpt" columnid="testlrgcd"/>
      <BindItem id="item1" compid="cmd_TMdlCd" propid="value" datasetid="ds_hidden_spcacpt" columnid="testmdlcd"/>
      <BindItem id="item2" compid="cmb_spcflag" propid="value" datasetid="ds_send" columnid="spcflag"/>
      <BindItem id="item3" compid="radio3" propid="value" datasetid="ds_send" columnid="refflag"/>
      <BindItem id="item4" compid="radio1" propid="value" datasetid="ds_send" columnid="genrflag"/>
      <BindItem id="item5" compid="ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd"/>
      <BindItem id="item6" compid="ipt_todd" propid="value" datasetid="ds_send" columnid="todd"/>
    </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";

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

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

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

function SMLLC00610_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_nspclist);
	ipt_fromdd.value = utlf_getCurrentDate();
	ipt_todd.value = utlf_getCurrentDate();
// 	radio3.value = '1';
// 	radio1.value = '00';
// 	cmb_spcflag.value = '00';

	ds_hidden_spcacpt.setColumn(0, "testlrgcd", '00');
	ds_hidden_spcacpt.setColumn(0, "testmdlcd", '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"));
	ds_send.setColumn(0, "fromdd", ipt_fromdd.value);
	ds_send.setColumn(0, "todd", ipt_todd.value);

	var oParam = {};
    oParam.id          = "TRLLC00602";
    oParam.service     = "bcollmngtapp.BCollMngt";
    oParam.method      = "reqGetLSpcList";
    oParam.inds        = "cond=ds_send";
    oParam.outds       = "ds_grd_nspclist=nspclist";
    oParam.async       = false;
    oParam.callback    = "cf_TRLLC00602";

	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>