YNU_JEUS/app_home/himed/xpapps/ast/infcmngtxp/xp/SPASB00900_검사결과조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPASB00900" position="absolute 0 0 758 443" titletext="검사결과조회" oninit="SPASB00900_oninit" onload="SPASB00900_onload">
    <Layouts>
      <Layout>
        <Shape id="line56" linetype="horizontal" class="line_10" position="absolute 0 56 755 62"/>
        <Static id="caption5" text="검사결과조회" class="tit_2" position="absolute 5 7 108 25"/>
        <Shape id="line2" class="line_10" position="absolute 0 26 755 32"/>
        <Grid id="grd_testrsltlist" taborder="4" binddataset="ds_grd_testrsltlist" useinputpanel="false" position="absolute 0 60 755 418" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
              </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="Hb"/>
                <Cell col="5" text="WBC"/>
                <Cell col="6" text="Neutrophils"/>
                <Cell col="7" text="ESR"/>
                <Cell col="8" text="CRP"/>
                <Cell col="9" text="채혈일자전송값"/>
              </Band>
              <Band id="body">
                <Cell text="bind:pid" suppress="1"/>
                <Cell col="1" text="bind:patnm" suppress="1"/>
                <Cell col="2" text="bind:bcoldt_view" mask="expr:utlf_isNull(utlf_trim(bcoldt_view)) ? '' : '####-##-## ##:##'"/>
                <Cell col="3" text="bind:lastreptdt" mask="expr:utlf_isNull(utlf_trim(lastreptdt)) ? '' : '####-##-## ##:##'" maskchar=" "/>
                <Cell col="4" text="bind:hb"/>
                <Cell col="5" text="bind:wbc"/>
                <Cell col="6" text="bind:neutrophils"/>
                <Cell col="7" text="bind:esr"/>
                <Cell col="8" text="bind:crp"/>
                <Cell col="9" text="bind:bcoldt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Combo id="cmb_flag" taborder="0" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_s_essential" enable="false" position="absolute 58 32 215 51">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">H</Col>
                <Col id="datacolumn">Hb, WBC, Neutrophils</Col>
              </Row>
              <Row>
                <Col id="codecolumn">E</Col>
                <Col id="datacolumn">ESR</Col>
              </Row>
              <Row>
                <Col id="codecolumn">C</Col>
                <Col id="datacolumn">CRP</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Edit id="ipt_pid" taborder="1" class="input_s_essential" enable="false" position="absolute 282 32 373 51"/>
        <Button id="btn_search" taborder="5" text="조회" class="btn1" position="absolute 699 30 755 52" onclick="btn_search_onclick"/>
        <Static id="caption3" text="~" position="absolute 565 33 580 53"/>
        <Calendar id="ipt_todd" taborder="3" class="input_s_essential" position="absolute 578 32 691 51"/>
        <Calendar id="ipt_fromdd" taborder="2" class="input_s_essential" position="absolute 447 32 560 51"/>
        <Static id="cap_flag" text="구분" class="cell_1" position="absolute 1 30 56 53"/>
        <Static id="cap_pid" text="등록번호" class="cell_1" position="absolute 217 30 280 53"/>
        <Static id="cap_fromdd" text="조회기간" class="cell_1" visible="true" position="absolute 377 30 446 53"/>
        <Button id="btn_cnfm" taborder="7" text="확인" class="btn4" position="absolute 639 419 695 441" onclick="btn_cnfm_onclick"/>
        <Button id="btn_cncl" taborder="8" text="취소" class="btn4" position="absolute 696 419 752 441" onclick="btn_cncl_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_testrsltlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="bcoldt_view" type="STRING"/>
          <Column id="lastreptdt" type="STRING"/>
          <Column id="hb" type="STRING"/>
          <Column id="wbc" type="STRING"/>
          <Column id="neutrophils" type="STRING"/>
          <Column id="esr" type="STRING"/>
          <Column id="crp" type="STRING"/>
          <Column id="bcoldt" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="flag" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="org_flag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="flag">H</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <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="cmb_flag" propid="value" datasetid="ds_main_cond" columnid="flag"/>
      <BindItem id="item1" compid="ipt_pid" propid="value" datasetid="ds_main_cond" columnid="pid"/>
      <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 "ast_infcmngtxp::SPASB00900.xjs";

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

function SPASB00900_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_testrsltlist);
	grdf_setToolTipBind(grd_testrsltlist);
	
	ds_main_cond.copyData(arg_ds_main_cond);
	fInitialize();						
	
	var flag = ds_main_cond.getColumn(0, "flag");
	
	//dsf_makeValue(ds_main_cond, "org_flag", flag, 0);
	dsf_makeValue(ds_main_cond, "org_flag", "string",flag );
	
	flag = flag.substr(0, 1);
	
	ds_main_cond.setColumn(0, "flag", flag);
	ds_send_reqdata.copyData(ds_main_cond);
	
	ds_send_reqdata.setColumn(0, "flag", flag);
	
	if (flag != "-")
	{
		var oParam = {};
			oParam.id          = "TRASB00901";
			oParam.service     = "infcmngtapp.HospInfcMngt";
			oParam.method      = "reqGetTestRsltList";
			oParam.inds        = "req=ds_send_reqdata";
			oParam.outds       = "ds_grd_testrsltlist=testrsltlist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRASB00901";
		tranf_submit(oParam);

		fInit();	
	} 
	ds_grd_testrsltlist.clearData();
}

function fInitialize()
{
	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 : "fromdd", val : peveDate.getDateFormat()}
	                                ,{col : "todd",   val : today}]);
	
	ds_main_cond.setColumn(0, "fromdd", peveDate.getDateFormat());
	ds_main_cond.setColumn(0, "todd", today);
}

/**
 * 파 일 명 : SPASB00900.js
 * 설    명 : 검사결과 조회 화면 Javascript
 * 설 계 자 : 류민정
 * 작 성 자 : 류민정
 * 수정이력 : 2007.06.04 / 신규작성 / 류민정
 */

/**
 * 초기화
 */
function fInit()
{
	var flag = ds_main_cond.getColumn(0, "flag");
	trace("flag = " + flag);
	if(flag == "-")
	{	
		//grd_testrsltlist.setCellProperty("Head", 5, "size", "100");
		//grd_testrsltlist.setCellProperty("Head", 6, "size", "100");
		//grd_testrsltlist.setCellProperty("Head", 7, "size", "100");
		//grd_testrsltlist.setCellProperty("Head", 8, "size", "100");
		//grd_testrsltlist.setCellProperty("Head", 9, "size", "100");
		
		grd_testrsltlist.setRealColSize(4,100,false);
		grd_testrsltlist.setRealColSize(5,100,false);
		grd_testrsltlist.setRealColSize(6,100,false);
		grd_testrsltlist.setRealColSize(7,100,false);
		grd_testrsltlist.setRealColSize(8,100,false);
		grd_testrsltlist.setRealColSize(9,100,false);			
	} 
	else if(flag == "H")
	{
		//grd_testrsltlist.setCellProperty("Head", 5, "size", "100");
		//grd_testrsltlist.setCellProperty("Head", 6, "size", "100");
		//grd_testrsltlist.setCellProperty("Head", 7, "size", "100");
		//grd_testrsltlist.setCellProperty("Head", 8, "size", "0");
		//grd_testrsltlist.setCellProperty("Head", 9, "size", "0");
		
		grd_testrsltlist.setRealColSize(4,100,false);
		grd_testrsltlist.setRealColSize(5,100,false);
		grd_testrsltlist.setRealColSize(6,100,false);
		grd_testrsltlist.setRealColSize(7,0,false);
		grd_testrsltlist.setRealColSize(8,0,false);
		grd_testrsltlist.setRealColSize(9,0,false);
	} 
	else if(flag == "E")
	{
		//grd_testrsltlist.setCellProperty("Head", 5, "size", 0);
		//grd_testrsltlist.setCellProperty("Head", 6, "size", 0);
		//grd_testrsltlist.setCellProperty("Head", 7, "size", 0);
		//grd_testrsltlist.setCellProperty("Head", 8, "size", 100);
		//grd_testrsltlist.setCellProperty("Head", 9, "size", 0);
		
		grd_testrsltlist.setRealColSize(4,0,false);
		grd_testrsltlist.setRealColSize(5,0,false);
		grd_testrsltlist.setRealColSize(6,0,false);
		grd_testrsltlist.setRealColSize(7,100,false);
		grd_testrsltlist.setRealColSize(8,0,false);
		grd_testrsltlist.setRealColSize(9,0,false);		
	}
	else if(flag == "C")
	{
		//grd_testrsltlist.setCellProperty("Head", 5, "size", 0);
		//grd_testrsltlist.setCellProperty("Head", 6, "size", 0);
		//grd_testrsltlist.setCellProperty("Head", 7, "size", 0);
		//grd_testrsltlist.setCellProperty("Head", 8, "size", 0);
		//grd_testrsltlist.setCellProperty("Head", 9, "size", 100);
		
		grd_testrsltlist.setRealColSize(4,0,false);
		grd_testrsltlist.setRealColSize(5,0,false);
		grd_testrsltlist.setRealColSize(6,0,false);
		grd_testrsltlist.setRealColSize(7,0,false);
		grd_testrsltlist.setRealColSize(8,100,false);
		grd_testrsltlist.setRealColSize(9,0,false);				
	}
}

//조회버튼
function btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	if( !frmf_isRequiredControls("cmb_flag","ipt_pid","ipt_fromdd","ipt_todd"))
	{
		return;
	}
	
	ds_send_reqdata.copyData(ds_main_cond);
	
	var oParam = {};
		oParam.id          = "TRASB00901";
		oParam.service     = "infcmngtapp.HospInfcMngt";
		oParam.method      = "reqGetTestRsltList";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_grd_testrsltlist=testrsltlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRASB00901";
	tranf_submit(oParam);

	fInit();	
}

function btn_cnfm_onclick(obj:Button,  e:ClickEventInfo)
{
	var iRow = ds_grd_testrsltlist.rowposition;
	var flag = ds_main_cond.getColumn(0, "org_flag");
	if (flag == "H1")
	{
		//alert(ds_grd_testrsltlist.getColumn(iRow, "prcpdd"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "hbtestdt1", ds_grd_testrsltlist.getColumn(iRow, "prcpdd"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "hbtestrslt1", ds_grd_testrsltlist.getColumn(iRow, "hb"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "wbctestdt1", ds_grd_testrsltlist.getColumn(iRow, "prcpdd"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "wbctestrslt1", ds_grd_testrsltlist.getColumn(iRow, "wbc"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "neutrophilstestdt1", ds_grd_testrsltlist.getColumn(iRow, "prcpdd"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "neutrophilstestrslt1", ds_grd_testrsltlist.getColumn(iRow, "neutrophils"));
	}
	else if (flag == "H2")
	{
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "hbtestdt2", ds_grd_testrsltlist.getColumn(iRow, "prcpdd"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "hbtestrslt2", ds_grd_testrsltlist.getColumn(iRow, "hb"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "wbctestdt2", ds_grd_testrsltlist.getColumn(iRow, "prcpdd"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "wbctestrslt2", ds_grd_testrsltlist.getColumn(iRow, "wbc"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "neutrophilstestdt2", ds_grd_testrsltlist.getColumn(iRow, "prcpdd"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "neutrophilstestrslt2", ds_grd_testrsltlist.getColumn(iRow, "neutrophils"));
	}
	else if (flag == "E1")
	{						
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "esrtestdt1", ds_grd_testrsltlist.getColumn(iRow, "prcpdd"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "esrtestrslt1", ds_grd_testrsltlist.getColumn(iRow, "esr"));
	}
	else if (flag == "E2")
	{
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "esrtestdt2", ds_grd_testrsltlist.getColumn(iRow, "prcpdd"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "esrtestrslt2", ds_grd_testrsltlist.getColumn(iRow, "esr"));
	}								
	else if (flag == "C1")
	{
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "crptestdt1", ds_grd_testrsltlist.getColumn(iRow, "prcpdd"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "crptestrslt1", ds_grd_testrsltlist.getColumn(iRow, "crp"));
	}
	else if (flag == "C2")
	{
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "crptestdt2", ds_grd_testrsltlist.getColumn(iRow, "prcpdd"));
		this.opener.ds_main_hospinfcinfo_hospinfc_info.setColumn(0, "crptestrslt2", ds_grd_testrsltlist.getColumn(iRow, "crp"));
	}	
	this.close();
}

function btn_cncl_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}
]]></Script>
  </Form>
</FDL>