YNU_JEUS/app_home/himed/xpapps/ast/examcurestatsxp/xp/SMAES06500_내시경CLO검사(일별).xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAES06500" position="absolute 0 0 1211 784" titletext="내시경CLO검사조회" oninit="SMAES06500_oninit" onload="SMAES06500_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 1195 25" id="grp_tle">
          <Layouts>
            <Layout>
              <Static text="내시경 CLO검사 건수" position="absolute 0 0 200 25" id="caption6" class="tit_1"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 13 1195 757" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="내시경 CLO검사 건수" position="absolute 5 50 205 64" id="caption1" class="tit_2"/>
              <Shape position="absolute 0 62 1195 68" linetype="vertical" id="line1" class="line_1"/>
              <Div position="absolute 0 13 1195 43" align="align:center top;" id="grp_sea" class="div_SA">
                <Layouts>
                  <Layout>
                    <Static text="조회기간 :" position="absolute 15 7 101 24" id="caption2" class="search_name" anchor="default"/>
                    <Shape position="absolute 1107 5 1113 25" linetype="vertical" id="line13" class="line_4" anchor="default"/>
                    <Button position="absolute 1120 4 1176 26" id="btn_sea" class="btn1" taborder="4" text="조회" anchor="default" onclick="grp_biz_grp_sea_btn_sea_onclick"/>
                    <Calendar position="absolute 109 6 209 25" id="ipt_fromdd" class="input_default" taborder="1" anchor="default" autoselect="true" autoskip="true"/>
                    <Calendar position="absolute 227 6 327 25" id="ipt_todd" class="input_default" taborder="2" anchor="default" autoselect="true"/>
                    <Static text="~" position="absolute 212 6 224 23" id="caption5" class="search_no_b" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Button position="absolute 1130 45 1194 64" id="btn_excsave" class="btn2" text="엑셀저장" onclick="grp_biz_btn_excsave_onclick"/>
              <Grid position="absolute 0 70 1190 740" id="grd_list" binddataset="ds_grd_list" autofittype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="108"/>
                      <Column size="51"/>
                      <Column size="72"/>
                      <Column size="85"/>
                      <Column size="75"/>
                      <Column size="387"/>
                      <Column size="131"/>
                      <Column size="213"/>
                    </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="검사결과"/>
                    </Band>
                    <Band id="body">
                      <Cell style="align:middle;" text="bind:prcpdd" suppress="1" suppressalign="middle"/>
                      <Cell col="1" style="align:middle;" text="bind:ioflag" suppress="2" suppressalign="middle"/>
                      <Cell col="2" style="align:middle;" text="bind:pid" suppress="3" suppressalign="middle"/>
                      <Cell col="3" style="align:middle;" text="bind:hngnm" suppress="3" suppressalign="middle"/>
                      <Cell col="4" text="bind:prcpcd"/>
                      <Cell col="5" style="align:left;" text="bind:prcpnm"/>
                      <Cell col="6" text="bind:bcno"/>
                      <Cell col="7" text="bind:reptrslt"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpdd" type="STRING"/>
          <Column id="ioflag" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="prcpcd" type="STRING"/>
          <Column id="prcpnm" type="STRING"/>
          <Column id="bcno" type="STRING"/>
          <Column id="reptrslt" 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="execfromdd" type="STRING" size="256"/>
          <Column id="exectodd" type="STRING" size="256"/>
          <Column id="comparefromdd" type="STRING" size="256"/>
          <Column id="comparetodd" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="execdeptcd" type="STRING" size="256"/>
          <Column id="execdrid" type="STRING" size="256"/>
          <Column id="suppdeptcd" type="STRING" size="256"/>
          <Column id="srchflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="execfromdd"/>
            <Col id="exectodd"/>
            <Col id="comparefromdd"/>
            <Col id="comparetodd"/>
            <Col id="orddeptcd"/>
            <Col id="orddrid"/>
            <Col id="execdeptcd"/>
            <Col id="execdrid"/>
            <Col id="suppdeptcd"/>
            <Col id="srchflag"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.grp_sea.ipt_fromdd" propid="value" datasetid="ds_send" columnid="execfromdd"/>
      <BindItem id="item1" compid="grp_biz.grp_sea.ipt_todd" propid="value" datasetid="ds_send" columnid="exectodd"/>
    </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_examcurexp::AEZ0001.xjs";
function SMAES06500_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);  // 화면공통
}

function SMAES06500_onload(obj:Form, e:LoadEventInfo)
{
	lf_aezfSetSuppDeptcd();
	
	grdf_initGrid(grp_biz.grd_list);
	ds_grd_list.clearData();
	
	ds_send.setColumn(0,"suppdeptcd", suppdeptcd);

	ds_send.setColumn(0,"execfromdd", utlf_getCurrentDate().toDate().getAddDate(-1, "D").getDateFormat("YYYYMMDD"));
	ds_send.setColumn(0,"exectodd", utlf_getCurrentDate().toDate().getAddDate(-1, "D").getDateFormat("YYYYMMDD"));
}

function grp_biz_grp_sea_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_grd_list.clearData();
                            
	//20150603 by kya 건진내시경일 경우							
	
	if (suppdeptcd == "2370124000" ) {  
		ds_send.setColumn(0,"srchflag","S");								
	} else {
		ds_send.setColumn(0,"srchflag","O");								
	}
	dsf_createDsRow("ds_send_req",
				[{col:"execfromdd", val:ds_send.getColumn(0,"execfromdd")}
				,{col:"exectodd", val:ds_send.getColumn(0,"exectodd")}
				,{col:"suppdeptcd", val:suppdeptcd}
				,{col:"srchflag", val:ds_send.getColumn(0,"srchflag")}				
				]);
				
	
	var oParam = {};
		oParam.id          = "TRAES06501";
		oParam.service     = "examcurestatsapp.FuntExam";
		oParam.method      = "reqGetCLOList";
		oParam.inds        = "req=ds_send_req";
		oParam.outds       = "ds_grd_list=item";
		oParam.async       = false;
		oParam.callback    = "cf_TRAES06501";

	tranf_submit(oParam);

	
}
function cf_TRAES06501(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function grp_biz_btn_excsave_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grp_biz.grd_list, "내시경CLO검사", "sheet1");
}
]]></Script>
  </Form>
</FDL>