YNU_JEUS/app_home/himed/xpapps/ast/infcmngtxp/xp/SPASI00300_미생물배양결과정보조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPASI00300" position="absolute 0 0 1102 617" titletext="미생물배양결과 정보" oninit="SPASI00300_oninit" onload="SPASI00300_onload">
    <Layouts>
      <Layout>
        <Calendar position="absolute 382 29 495 48" id="ipt_fromdd" class="input_s_essential" taborder="2"/>
        <Calendar position="absolute 515 29 628 48" id="ipt_todd" class="input_s_essential" taborder="3"/>
        <Edit position="absolute 64 29 167 48" id="ipt_pid" class="input_s_essential" enable="false" taborder="0"/>
        <Div position="absolute 0 590 1100 617" id="grp_btn" taborder="10">
          <Layouts>
            <Layout>
              <Button position="absolute 1028 3 1096 25" id="btn_init" class="btn4" text="초기화" onclick="grp_btn_btn_init_onclick"/>
              <Button position="absolute 3 3 59 25" id="btn_print" class="btn6" text="출력"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_microculturersltlist" class="datagrid2" taborder="5" binddataset="ds_grd_microculturersltlist" useinputpanel="false" position="absolute 0 64 1100 602" cellsizingtype="col" oncelldblclick="grd_microculturersltlist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="29"/>
                <Column size="39"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="120"/>
                <Column size="0"/>
                <Column size="200"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="113"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </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="현병실"/>
                <Cell col="13" text="진료과"/>
                <Cell col="14" text="진료의"/>
                <Cell col="15" text=" 내성균코드"/>
                <Cell col="16" text="항생제 내성균 구분"/>
                <Cell col="17" text="bcno"/>
                <Cell col="18" text="tclscd"/>
                <Cell col="19" text="testcd"/>
                <Cell col="20" text="prcpdd"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow + 1"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:check"/>
                <Cell col="2" displaytype="normal" text="bind:spcacptdt" mask="expr:utlf_isNull(utlf_trim(spcacptdt)) ? '' : '####-##-## ##:##'" maskchar=" "/>
                <Cell col="3" text="bind:lastreptdt" mask="expr:utlf_isNull(utlf_trim(lastreptdt)) ? '' : '####-##-## ##:##'" maskchar=" "/>
                <Cell col="4" text="bind:bcoldt" mask="expr:utlf_isNull(utlf_trim(bcoldt)) ? '' : '####-##-## ##:##'" maskchar=" "/>
                <Cell col="5" text="bind:spccd"/>
                <Cell col="6" style="align:left middle;" text="bind:spcnm"/>
                <Cell col="7" text="bind:baccd"/>
                <Cell col="8" style="align:left middle;" text="bind:bacnm"/>
                <Cell col="9" text="bind:prcpwardcd"/>
                <Cell col="10" text="bind:prcproomcd"/>
                <Cell col="11" text="bind:wardcd"/>
                <Cell col="12" text="bind:roomcd"/>
                <Cell col="13" text="bind:orddeptcd"/>
                <Cell col="14" text="bind:atdoct"/>
                <Cell col="15" text="bind:antibtrstbtrflag"/>
                <Cell col="16" text="bind:antibtrstbtrflagnm"/>
                <Cell col="17" text="bind:bcno"/>
                <Cell col="18" text="bind:tclscd"/>
                <Cell col="19" text="bind:testcd"/>
                <Cell col="20" text="bind:prcpdd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line56" linetype="horizontal" class="line_10" position="absolute 0 50 1100 56"/>
        <Static id="caption1" text="미생물배양 결과정보조회" class="tit_2" position="absolute 5 7 180 23"/>
        <Shape id="line7" linetype="horizontal" class="line_10" position="absolute 0 23 1100 29"/>
        <Static id="caption3" text="~" position="absolute 500 30 520 50"/>
        <Button id="btn_allchoi" taborder="6" text="전체선택" class="btn2" position="absolute 865 2 929 21" onclick="btn_allchoi_onclick"/>
        <Button id="btn_allcncl" taborder="7" text="전체취소" class="btn2" position="absolute 930 2 994 21" onclick="btn_allcncl_onclick"/>
        <Button id="btn_search" taborder="4" text="조회" class="btn1" position="absolute 1042 28 1098 50" onclick="btn_search_onclick"/>
        <Button id="btn_excel" taborder="8" text="엑셀" class="btn7" position="absolute 996 2 1052 21" onclick="btn_excel_onclick"/>
        <Button id="btn_cnfm" taborder="9" text="확인" class="btn2" position="absolute 1055 2 1097 21" onclick="btn_cnfm_onclick"/>
        <Combo id="cmb_refcond" taborder="1" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_s_essential" position="absolute 227 29 314 48">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">O</Col>
                <Col id="datacolumn">처방일</Col>
              </Row>
              <Row>
                <Col id="codecolumn">A</Col>
                <Col id="datacolumn">접수일</Col>
              </Row>
              <Row>
                <Col id="codecolumn">R</Col>
                <Col id="datacolumn">결과보고일</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Static id="cap_pid" text="등록번호" class="cell_1" position="absolute 0 27 63 50"/>
        <Static id="cap_fromdd" text="조회기간" class="cell_1" position="absolute 317 27 380 50"/>
        <Static id="cap_refcond" text="구분" class="cell_1" position="absolute 170 27 225 50"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_microculturersltlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="check" type="STRING"/>
          <Column id="spcacptdt" type="STRING"/>
          <Column id="lastreptdt" type="STRING"/>
          <Column id="bcoldt" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="spcnm" type="STRING"/>
          <Column id="baccd" type="STRING"/>
          <Column id="bacnm" type="STRING"/>
          <Column id="prcpwardcd" type="STRING"/>
          <Column id="prcproomcd" type="STRING"/>
          <Column id="wardcd" type="STRING"/>
          <Column id="roomcd" type="STRING"/>
          <Column id="orddeptcd" type="STRING"/>
          <Column id="atdoct" type="STRING"/>
          <Column id="antibtrstbtrflag" type="STRING"/>
          <Column id="antibtrstbtrflagnm" type="STRING"/>
          <Column id="bcno" type="STRING"/>
          <Column id="tclscd" type="STRING"/>
          <Column id="testcd" type="STRING"/>
          <Column id="prcpdd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_deptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_warddeptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="refcond" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="refcond">O</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_initdate" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="today" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="ipt_pid" propid="value" datasetid="ds_main_cond" columnid="pid"/>
      <BindItem id="item1" compid="cmb_refcond" propid="value" datasetid="ds_main_cond" columnid="refcond"/>
      <BindItem id="item2" compid="ipt_fromdd" propid="value" datasetid="ds_main_cond" columnid="fromdd"/>
      <BindItem id="item3" compid="ipt_todd" propid="value" datasetid="ds_main_cond" columnid="todd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "com_basiccodexp::ZBC001.xjs";
include "com_departmentcodexp::ZSD001.xjs";

function SPASI00300_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPASI00300_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_microculturersltlist);
	grdf_setToolTipBind(grd_microculturersltlist);
	
	fInitialize();
	ds_main_cond.setColumn(0, "refcond", "O");
	ds_main_cond.setColumn(0, "pid", arg_ds_main_cond.getColumn(0, "pid"));
}

function fInitialize()
{
	// 진료과
	var instcd = sysf_getUserInfo("dutplceinstcd");
	var standard_yn = "orduseyn";
	var ord_deptflag = 'D';
	var rslt_ref = "ds_init_deptlist";
	sort_field = "deptcd";
	sort_method = "asc";
	var dt = utlf_getCurrentDate();
	appf_getDeptCodeList(instcd, standard_yn, ord_deptflag, sort_field, sort_method, dt, "", "",rslt_ref ,false, "");
	
	//병동
	standard_yn = "orduseyn";
	ord_deptflag = "W";
	rslt_ref = "ds_init_warddeptlist";
	sort_field = "deptcd";
	sort_method = "asc";
	var dt = utlf_getCurrentDate();
	appf_getDeptCodeList(instcd, standard_yn, ord_deptflag, sort_field, sort_method, dt, "", "",rslt_ref ,false, "");
	
	var today = utlf_getCurrentDate();
	var idate = new Date();
	var peveDate = idate.getAddDate(-1, "M");
	
	ds_init_initdate.setColumn(0, "today", today);
	dsf_createDsRow("ds_send_cond", [{col : "trgtmancnt", val : "I"}
	                                ,{col : "fromdd",     val : peveDate.getDateFormat()}
	                                ,{col : "todd",       val : today}]);
	
	ds_main_cond.setColumn(0, "fromdd", peveDate.getDateFormat());
	ds_main_cond.setColumn(0, "todd", today);
	

	
	//frmf_inputEnterKey("btn_search", "onclick", new ClickEventInfo );

}

//조회버튼
function btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	if( !frmf_isRequiredControls("ipt_pid","cmb_refcond","ipt_fromdd","ipt_todd") )
	{
		return;
	}
	dsf_createDs("ds_send_reqdata");
	ds_send_reqdata.copyData(ds_main_cond);	
	
	var oParam = {};
		oParam.id          = "TRASI00301";
		oParam.service     = "infcmngtapp.HospInfcMngt";
		oParam.method      = "reqGetMicroCultRsltList";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_grd_microculturersltlist=microculturersltlist";
		oParam.async       = false;
		oParam.callback    = "cf_TRASI00301";
	tranf_submit(oParam);
}

function cf_TRASI00301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    
    ds_grd_microculturersltlist.addColumn("check", "string");
}


//전체선택 
function btn_allchoi_onclick(obj:Button,  e:ClickEventInfo)
{
	for(var i = 0; i < ds_grd_microculturersltlist.rowcount; i++)
	{
		ds_grd_microculturersltlist.setColumn(i, "check", "1");
	}
}

//전체취소 
function btn_allcncl_onclick(obj:Button,  e:ClickEventInfo)
{
	for(var i = 0; i < ds_grd_microculturersltlist.rowcount; i++)
	{
		ds_grd_microculturersltlist.setColumn(i, "check", "0");
	}
}

//엑셀
function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	//grdf_exportExcel(grd_microculturersltlist, "");
	grdf_exportExcel(grd_microculturersltlist, "미생물배양결과 정보", "미생물배양결과 정보", false, "", "user", false);
}


//확인버튼
function btn_cnfm_onclick(obj:Button,  e:ClickEventInfo)
{
	var mainObj         = frmf_getMainViewer();
	//var iRow = ds_grd_microculturersltlist.rowposition;
	
	var iRow = 0;
	
	var rtnmsg_header = "lastreptdt▦spccd▦spcnm▦baccd▦bacnm▦antibtrstbtrflag▦bcno▦tclscd▦testcd▦prcpdd▦bcoldt▦antibtrstbtrflagnm▩";
	var rtnmsg_data = "";
	
	for(var iRow = 0; iRow < ds_grd_microculturersltlist.rowcount; iRow++)
	{
	
		if(ds_grd_microculturersltlist.getColumn(iRow, "check") == "1")
		{
		
			rtnmsg_data += utlf_transNullToEmpty(ds_grd_microculturersltlist.getColumn(iRow, "lastreptdt"))+"▦"
					  + utlf_transNullToEmpty(ds_grd_microculturersltlist.getColumn(iRow, "spccd"))+"▦"
					  + utlf_transNullToEmpty(ds_grd_microculturersltlist.getColumn(iRow, "spcnm"))+"▦"
					  + utlf_transNullToEmpty(ds_grd_microculturersltlist.getColumn(iRow, "baccd"))+"▦"
					  + utlf_transNullToEmpty(ds_grd_microculturersltlist.getColumn(iRow, "bacnm"))+"▦"
					  + utlf_transNullToEmpty(ds_grd_microculturersltlist.getColumn(iRow, "antibtrstbtrflag"))+"▦"
					  + utlf_transNullToEmpty(ds_grd_microculturersltlist.getColumn(iRow, "bcno"))+"▦"
					  + utlf_transNullToEmpty(ds_grd_microculturersltlist.getColumn(iRow, "tclscd"))+"▦"
					  + utlf_transNullToEmpty(ds_grd_microculturersltlist.getColumn(iRow, "testcd"))+"▦"
					  + utlf_transNullToEmpty(ds_grd_microculturersltlist.getColumn(iRow, "prcpdd"))+"▦"
					  + utlf_transNullToEmpty(ds_grd_microculturersltlist.getColumn(iRow, "bcoldt"))+"▦"
					  + utlf_transNullToEmpty(ds_grd_microculturersltlist.getColumn(iRow, "antibtrstbtrflagnm"))+"▩";
					  
		}
	}
	
	mainObj.frmf_setParameter("setVal", rtnmsg_header+rtnmsg_data);
	//frmf_setParameter("setVal", rtnmsg_header+rtnmsg_data);
	this.close();
}


//초기화버튼
function grp_btn_btn_init_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_grd_microculturersltlist.clearData();
}

function grd_microculturersltlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	
}
]]></Script>
  </Form>
</FDL>