YNU_JEUS/app_home/himed/xpapps/lis/qcmngtxp/xp/SMLQP00400_QC결과연동.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLQP00400" position="absolute 0 0 1256 805" titletext="QC 결과연동" oninit="SMLQP00400_oninit" onload="SMLQP00400_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 1195 13" id="group2">
          <Layouts>
            <Layout/>
          </Layouts>
        </Div>
        <Button id="button5" taborder="1" text="초기화" class="btn4" position="absolute 1185 3 1253 25" anchor="top right"/>
        <Static id="caption7" text="QC 결과연동" class="tit_1" position="absolute 1 1 138 27" onclick="caption7_onclick"/>
        <Div id="group5" taborder="2" position="absolute 0 32 1255 72" anchor="left top right" class="div_SA">
          <Layouts>
            <Layout>
              <Static id="caption1" text="~" class="search_no_b" position="absolute 245 12 260 29" anchor="left top"/>
              <Static id="caption3" text="검사실 :" class="search_name" position="absolute 444 11 519 28" anchor="left top"/>
              <Static id="caption4" text="장비 :" class="search_name" position="absolute 661 11 736 28" anchor="left top"/>
              <Combo id="cbo_testRoom" taborder="1" innerdataset="ds_init_lb0111" codecolumn="cd" datacolumn="nm" class="combo_search" position="absolute 524 10 624 29" anchor="left top" onitemchanged="group5_cbo_testRoom_onitemchanged"/>
              <Combo id="cbo_emqt" taborder="2" innerdataset="ds_init_lb0701" codecolumn="cd" datacolumn="nm" class="combo_search" position="absolute 726 10 826 29" anchor="left top"/>
              <Button id="btn_getRslt" taborder="3" text="조회" class="btn1" position="absolute 1187 9 1243 31" anchor="top right" onclick="group5_btn_getRslt_onclick"/>
              <Shape id="line1" linetype="vertical" class="line_4" position="absolute 1169 8 1175 32" anchor="top right"/>
              <Static id="caption6" text="접수일자 :" class="search_name" position="absolute 15 11 105 28" anchor="left top"/>
              <Calendar id="ipt_acptFromdd" taborder="4" class="input_search" position="absolute 105 10 190 29" anchor="left top"/>
              <Calendar id="ipt_acptTodd" taborder="5" class="input_search" position="absolute 260 10 345 29" anchor="left top"/>
              <MaskEdit id="ipt_acpfromtm" taborder="6" mask="##:##" class="input_search" position="absolute 191 10 241 29" anchor="left top" type="string"/>
              <MaskEdit id="ipt_acpttotm" taborder="7" mask="##:##" class="input_search" position="absolute 346 10 396 29" anchor="left top" type="string"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_rslt" taborder="4" binddataset="ds_grd_rslt" useinputpanel="false" position="absolute 2 107 1255 800" anchor="all" autofittype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="120"/>
                <Column size="169"/>
                <Column size="50"/>
                <Column size="120"/>
                <Column size="30"/>
                <Column size="110"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="110"/>
                <Column size="110"/>
                <Column size="0"/>
                <Column size="110"/>
                <Column size="60"/>
                <Column size="40"/>
                <Column size="0"/>
                <Column size="80"/>
              </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="LOT번호"/>
                <Cell col="8" text="항목코드"/>
                <Cell col="9" text="방법"/>
                <Cell col="10" text="장비"/>
                <Cell col="11" text="시약"/>
                <Cell col="12" text="단위"/>
                <Cell col="13" text="온도"/>
                <Cell col="14" text="Comment"/>
                <Cell col="15" text="검사자"/>
              </Band>
              <Band id="body">
                <Cell displaytype="date" edittype="none" text="bind:acptdt" mask="yyyy-MM-dd hh:mm:ss"/>
                <Cell col="1" style="align:left middle;" text="bind:testnm"/>
                <Cell col="2" style="align:right middle;" text="bind:orgrslt"/>
                <Cell col="3" displaytype="date" text="bind:testdt" mask="yyyy-MM-dd hh:mm:ss"/>
                <Cell col="4" style="align:right middle;" text="bind:run"/>
                <Cell col="5" style="align:left middle;" text="bind:matrnm"/>
                <Cell col="6" style="align:left middle;" text="bind:levlnm"/>
                <Cell col="7" style="align:center middle;" text="bind:lotno"/>
                <Cell col="8" style="align:left middle;" text="bind:ocitemnm"/>
                <Cell col="9" style="align:left middle;" text="bind:ocmthdnm"/>
                <Cell col="10" text="bind:eqmtcd"/>
                <Cell col="11" text="bind:ocreagentnm"/>
                <Cell col="12" style="align:right middle;" text="bind:ocunitnm"/>
                <Cell col="13" style="align:right middle;" text="bind:octmprnm"/>
                <Cell col="14" text="bind:comment"/>
                <Cell col="15" text="bind:operator"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption9" text="검체정보상세내역" class="tit_2" position="absolute 3 85 139 104"/>
        <Button id="button6" taborder="5" text="엑셀" class="btn7" position="absolute 1194 82 1246 101" anchor="top right" onclick="button6_onclick"/>
        <Shape id="line2" linetype="horizontal" class="line_1" position="absolute 2 103 1254 109" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
        <Button id="btn_saveTxt" taborder="6" text="TEXT" class="btn2" position="absolute 1138 82 1191 101" anchor="top right" onclick="btn_saveTxt_onclick"/>
        <Grid id="grd_rslt2" taborder="3" binddataset="ds_grd_rslt" useinputpanel="false" visible="false" position="absolute 2 398 1255 800" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="70"/>
                <Column size="130"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="80"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="Point"/>
                <Cell col="1" text="검사(접수)일시"/>
                <Cell col="2" text="횟수"/>
                <Cell col="3" text="레벨"/>
                <Cell col="4" text="시행부서"/>
                <Cell col="5" text="LOT번호"/>
                <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="검사자"/>
                <Cell col="13" text="Comment"/>
                <Cell col="14" text="Reserved"/>
                <Cell col="15" text="결과"/>
              </Band>
              <Band id="body">
                <Cell text="bind:point"/>
                <Cell col="1" text="bind:acptdt"/>
                <Cell col="2" text="bind:run"/>
                <Cell col="3" text="bind:oclevlcd"/>
                <Cell col="4" text="bind:testroom"/>
                <Cell col="5" text="bind:oclotno"/>
                <Cell col="6" text="bind:ocitemcd"/>
                <Cell col="7" text="bind:ocmthdcd"/>
                <Cell col="8" text="bind:eqmtcd2"/>
                <Cell col="9" text="bind:ocreagentcd"/>
                <Cell col="10" text="bind:ocunitcd"/>
                <Cell col="11" text="bind:octmprcd"/>
                <Cell col="12" text="bind:operator"/>
                <Cell col="13" text="bind:comment"/>
                <Cell col="14" text="bind:reserved"/>
                <Cell col="15" text="bind:orgrslt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_cbo_testRoom" 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_cbo_emqt" 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_rslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="acptdt" type="STRING"/>
          <Column id="testnm" type="STRING"/>
          <Column id="orgrslt" type="STRING"/>
          <Column id="testdt" type="STRING"/>
          <Column id="run" type="STRING"/>
          <Column id="matrnm" type="STRING"/>
          <Column id="levlnm" type="STRING"/>
          <Column id="lotno" type="STRING"/>
          <Column id="ocitemnm" type="STRING"/>
          <Column id="ocmthdnm" type="STRING"/>
          <Column id="eqmtcd" type="STRING"/>
          <Column id="ocreagentnm" type="STRING"/>
          <Column id="ocunitnm" type="STRING"/>
          <Column id="octmprnm" type="STRING"/>
          <Column id="comment" type="STRING"/>
          <Column id="operator" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_lb0701" 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"/>
        </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="cd" type="STRING" size="256"/>
          <Column id="nm" 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="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-08
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-08      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LLZ001.xjs";

function SMLQP00400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);  // 화면공통
}

function SMLQP00400_onload(obj:Form, e:LoadEventInfo)
{
	lf_setInit();	
	grdf_initGrid(grd_rslt);
}

function lf_setInit(){
	var totm = utlf_getCurrentTime().substring(0,4)
	
	group5.ipt_acptFromdd.value = utlf_getCurrentDate();
	group5.ipt_acpfromtm.value = "0000";
	group5.ipt_acptTodd.value = utlf_getCurrentDate();
	group5.ipt_acpttotm.value = totm;

	dsf_createDsRow("ds_temp_search"
								, [{col: "codeflag", val: "0000|0111|0701|"}]); //0000:사용자부서코드, 0111:시행부서계 0701: 장비코드 0703: 조치사유
	
	var oParam = {};
		oParam.id          = "TRLZZ00101";
		oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
		oParam.method      = "reqGetInitCodeInfo";
		oParam.inds        = "cond=ds_temp_search";
		oParam.outds       = "ds_init_lb0000=0000 ds_init_lb0111=0111 ds_init_lb0701=0701";
		oParam.async       = false;

	tranf_submit(oParam);
	
	dsf_createDsRow("ds_temp_search2"
								, [{col: "codeflag", val: "0501|"}     
								,  {col: "basecdid", val: ds_init_lb0000.getColumn(0,"nm")}]); 																	
																		
	oParam = {};
	oParam.id          = "TRLZZ00101";
	oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
	oParam.method      = "reqGetInitCodeInfo";
	oParam.inds        = "cond=ds_temp_search2";
	oParam.outds       = "ds_init_lb0501=0501";
	oParam.async       = false;

	tranf_submit(oParam);
	
}

function group5_btn_getRslt_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_getRslt();
}

function lf_getRslt() {
	if(group5.cbo_emqt.value == "00"){
		sysf_messageBox("장비를", "C002","");
		return;
	}
	
	dsf_createDsRow("ds_temp_search"
								, [{col: "fromdd", val: group5.ipt_acptFromdd.value }
								,  {col: "todd", val: group5.ipt_acptTodd.value }
								,  {col: "fromtm", val: group5.ipt_acpfromtm.value } //검사실
								,  {col: "totm", val: group5.ipt_acpttotm.value}
								,  {col: "testroom", val: group5.cbo_testRoom.value}
								,  {col: "eqmtcd", val: group5.cbo_emqt.value}]); 
	
	var oParam = {};
    oParam.id          = "TRLQP00401";
    oParam.service     = "grademngtprintapp.QCRsltReference";
    oParam.method      = "reqGetRslt";
    oParam.inds        = "cond=ds_temp_search";
    oParam.outds       = "ds_grd_rslt=testrslt";
    oParam.async       = false;
    //oParam.callback    = "cf_TRLQP00401";

	tranf_submit(oParam);
}

function lf_setEqmtCd(){
	var sEtc = group5.cbo_testRoom.value;
	var sFilter = "cd =='00' || etc01 =='" + sEtc + "'";
	ds_init_lb0701.filter("");
	if(sEtc != "00"){
		ds_init_lb0701.filter(sFilter);
	}else{
		ds_init_lb0701.filter("cd =='00'");
	}
	
	group5.cbo_emqt.index=0;
}

function group5_cbo_testRoom_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	lf_setEqmtCd();
}

function button6_onclick(obj:Button,  e:ClickEventInfo)
{
	var name = "QC_"+group5.cbo_emqt.text.substring(6, group5.cbo_emqt.text.length);
	grdf_exportExcel(grd_rslt,lf_lisGetTitle(this) + "_" + name , "sheet1", false);
}

function btn_saveTxt_onclick(obj:Button,  e:ClickEventInfo)
{
	var name = "QC_"+group5.cbo_emqt.text.substring(6, group5.cbo_emqt.text.length);
	grdf_exportTxt(grd_rslt2,lf_lisGetTitle(this) + "_" + name , "", "USER");
}

function lf_grdVisible(){
	if(grd_rslt2.visible == true){
		grd_rslt2.visible = false;
	}else{
		grd_rslt2.visible = true;
	}
}
function caption7_onclick(obj:Static,  e:ClickEventInfo)
{
	lf_grdVisible();
}
]]></Script>
  </Form>
</FDL>