YNU_JEUS/app_home/himed/xpapps/lis/rsltmngtxp/xp/SPLNR90600_핵의학이전결과조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLNR90600" position="absolute 0 0 899 504" titletext="환자별결과조회" oninit="SPLNR90600_oninit" onload="SPLNR90600_onload">
    <Layouts>
      <Layout>
        <Shape id="line11" class="line_6" position="absolute 0 475 894 481"/>
        <Button id="btn_can" taborder="1" text="닫기" class="btn4" position="absolute 839 480 895 502" onclick="btn_can_onclick"/>
        <Static id="caption5" text="결과 리스트" class="tit_2" position="absolute 0 49 134 70"/>
        <Shape id="line8" class="line_10" position="absolute 0 65 895 71"/>
        <Shape id="line2" linetype="vertical" class="line_3" position="absolute 0 471 650 477"/>
        <Grid id="oldrslt" taborder="2" binddataset="ds_main_oldrslt" useinputpanel="false" position="absolute 0 70 895 475" autofittype="col" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="90"/>
                <Column size="125"/>
                <Column size="125"/>
                <Column size="140"/>
                <Column size="90"/>
                <Column size="100"/>
                <Column size="70"/>
              </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="재검"/>
              </Band>
              <Band id="body">
                <Cell text="bind:orddeptnm"/>
                <Cell col="1" text="bind:orddrnm"/>
                <Cell col="2" displaytype="normal" text="bind:prcpdd" mask="expr:utlf_isNull(prcpdd) || prcpdd == '-' ? '' : '####-##-##'"/>
                <Cell col="3" displaytype="normal" text="bind:spcacptdt" mask="expr:utlf_isNull(spcacptdt) || spcacptdt == '-' ? '' : '####-##-## ##:##:##'"/>
                <Cell col="4" displaytype="normal" text="bind:lastreptdt" mask="expr:utlf_isNull(lastreptdt) || lastreptdt == '-' ? '' : '####-##-## ##:##:##'"/>
                <Cell col="5" text="bind:tclsnm"/>
                <Cell col="6" text="bind:spcnm"/>
                <Cell col="7" text="bind:reptrslt"/>
                <Cell col="8" text="bind:retest"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_excel" taborder="3" text="엑셀저장" class="btn7" position="absolute 815 45 895 64" onclick="btn_excel_onclick"/>
        <Edit id="output4" taborder="4" readonly="true" position="absolute 72 22 162 41"/>
        <Static id="caption14" text="등록번호" class="cell_1" position="absolute 0 21 70 44"/>
        <Shape id="line7" class="line_2" position="absolute 0 41 650 47"/>
        <Edit id="output1" taborder="5" readonly="true" position="absolute 237 22 327 41"/>
        <Static id="caption1" text="환자명" class="cell_1" position="absolute 165 21 235 44"/>
        <Static id="caption10" text="환자정보" class="tit_2" position="absolute 0 0 74 22"/>
        <Shape id="line1" class="line_10" position="absolute 0 16 650 22"/>
        <Static id="caption2" text="연령" class="cell_1" position="absolute 330 21 400 44"/>
        <Edit id="output2" taborder="6" readonly="true" position="absolute 402 22 487 41"/>
        <Static id="caption3" text="성별" class="cell_1" position="absolute 490 21 560 44"/>
        <Edit id="output3" taborder="7" readonly="true" position="absolute 562 22 647 41"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" 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="tclslist" type="STRING" size="256"/>
          <Column id="divgrupcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="tclslist"/>
            <Col id="divgrupcd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_ref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_oldrslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="검사명"/>
          <Column id="orddrnm" type="STRING" size="256" sumtext="이전결과"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="이전결과"/>
          <Column id="spcacptdt" type="STRING" size="256" sumtext="이전결과"/>
          <Column id="lastreptdt" type="STRING" size="256" sumtext="이전결과"/>
          <Column id="tclsnm" type="STRING" size="256" sumtext="이전결과"/>
          <Column id="spcnm" type="STRING" size="256" sumtext="검체명"/>
          <Column id="reptrslt" type="STRING" size="256" sumtext="이전결과"/>
          <Column id="retest" type="STRING" size="256" sumtext="이전결과"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="검사명"/>
          <Column id="patnm" type="STRING" size="256" sumtext="이전결과"/>
          <Column id="age" type="STRING" size="256" sumtext="이전결과"/>
          <Column id="sex" type="STRING" size="256" sumtext="이전결과"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="output4" propid="value" datasetid="ds_main_patinfo" columnid="pid"/>
      <BindItem id="item1" compid="output1" propid="value" datasetid="ds_main_patinfo" columnid="patnm"/>
      <BindItem id="item2" compid="output2" propid="value" datasetid="ds_main_patinfo" columnid="age"/>
      <BindItem id="item3" compid="output3" propid="value" datasetid="ds_main_patinfo" columnid="sex"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
function SPLNR90600_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPLNR90600_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(oldrslt);
	
	ds_hidden_ref.copyData(arg_ds_hidden_ref);
	
	ds_send.setColumn(0, "pid", ds_hidden_ref.getColumn(0, "pid"));
	ds_send.setColumn(0, "tclslist", ds_hidden_ref.getColumn(0, "tclslist"));
	ds_send.setColumn(0, "divgrupcd", "");
	
	btn_can.setFocus();
	
	var oParam = {};
		oParam.id          = "TRLNR90301";
		oParam.service     = "rsltmngtapp.RsltMngt";
		oParam.method      = "reqGetNBfRsltList";
		oParam.inds        = "refparam=ds_send";
		oParam.outds       = "ds_main_oldrslt=getBfNRslt ds_main_patinfo=getPatInfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLNR90301";

	tranf_submit(oParam);	
}

function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(oldrslt, "", "", false, "", "", false);
}

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