YNU_JEUS/app_home/himed/xpapps/ast/examcurexp/xp/SMAEA05800_재진료대상자조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAEA05800" position="absolute 0 0 1256 805" titletext="재진료대상자조회" oninit="SMAEA05800_oninit" onload="SMAEA05800_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 1195 26" id="grp_tle">
          <Layouts>
            <Layout>
              <Static text="재진료 대상자" position="absolute 0 0 134 25" id="caption6" class="tit_1" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Div id="grp_biz" taborder="1" position="absolute 0 28 1195 772">
          <Layouts>
            <Layout>
              <Shape id="roundrect2" type="roundrectangle" class="roundrect_search" position="absolute 0 0 1191 35"/>
              <Static id="caption1" text="재진료 대상자 List" class="tit_2" position="absolute 5 40 205 53"/>
              <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 0 55 1195 61" style="strokepen:3 solid #33bbbbff;"/>
              <Button id="btn_excsave" taborder="5" text="엑셀저장" class="btn2" position="absolute 1125 35 1189 54" onclick="grp_biz_btn_excsave_onclick"/>
              <Combo id="cmb_execdrid" taborder="6" innerdataset="@ds_out_execrcode" codecolumn="basecd" datacolumn="basecdflagdesc" position="absolute 605 8 720 27"/>
              <Static id="caption13" text="입원/외래구분 :" class="search_name" position="absolute 760 10 879 27"/>
              <Button id="btn_sea" taborder="7" text="조회" class="btn1" position="absolute 1115 7 1171 29" onclick="grp_biz_btn_sea_onclick"/>
              <Radio id="radio3" taborder="8" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 885 9 1025 27" value=" " index="-1">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn"/>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">I</Col>
                      <Col id="datacolumn">입원</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">O</Col>
                      <Col id="datacolumn">외래</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Combo id="cmb_curerm" taborder="9" innerdataset="@ds_out_curerm" codecolumn="basecd" datacolumn="basecdflagdesc" position="absolute 390 8 505 27"/>
              <Static id="caption8" text="치료실 :" class="search_name" position="absolute 310 10 388 27"/>
              <Static id="caption9" text="치료사 :" class="search_name" position="absolute 525 10 603 27"/>
              <Static id="caption2" text="접수일자 :" class="search_name" position="absolute 10 10 96 27"/>
              <Calendar id="ipt_todd" taborder="10" class="input_s_essential" position="absolute 197 8 288 27" autoselect="true"/>
              <Calendar id="ipt_fromdd" taborder="11" class="input_s_essential" position="absolute 98 8 190 27" autoselect="true"/>
              <Shape id="line2" linetype="vertical" class="line_4" position="absolute 1103 7 1109 29"/>
              <Grid id="grd_list" taborder="12" binddataset="ds_grd_list" useinputpanel="false" position="absolute 0 60 1195 727">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="100"/>
                      <Column size="62"/>
                      <Column size="100"/>
                      <Column size="66"/>
                      <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="병동"/>
                      <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="연속처방종료일"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:pid"/>
                      <Cell col="1" text="bind:hngnm"/>
                      <Cell col="2" text="bind:age"/>
                      <Cell col="3" text="bind:ioflag"/>
                      <Cell col="4" text="bind:wardcd"/>
                      <Cell col="5" text="bind:wardnm"/>
                      <Cell col="6" text="bind:roomcd"/>
                      <Cell col="7" text="bind:orddeptcd"/>
                      <Cell col="8" text="bind:orddeptnm"/>
                      <Cell col="9" text="bind:orddrid"/>
                      <Cell col="10" text="bind:orddrnm"/>
                      <Cell col="11" displaytype="date" edittype="date" text="bind:acptdd" calendardisplaynulltype="none"/>
                    </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="pid" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="age" type="STRING"/>
          <Column id="ioflag" type="STRING"/>
          <Column id="wardcd" type="STRING"/>
          <Column id="wardnm" type="STRING"/>
          <Column id="roomcd" type="STRING"/>
          <Column id="orddeptcd" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="orddrid" type="STRING"/>
          <Column id="orddrnm" type="STRING"/>
          <Column id="acptdd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_req2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="basecd" type="STRING" size="256" sumtext="실시자코드"/>
          <Column id="basesuppdeptcd" type="STRING" size="256" sumtext="지원부서코드"/>
          <Column id="ebasecdflag" type="STRING" size="256" sumtext="부서코드"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_out_execrcode" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="basecd" type="STRING" size="256" sumtext="사번"/>
          <Column id="basecdflagdesc" type="STRING" size="256" sumtext="성명"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="basecdflagdesc">--전체--</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="basecd" type="STRING" size="256" sumtext="부서코드"/>
          <Column id="basesuppdeptcd" type="STRING" size="256" sumtext="지원부서코드"/>
          <Column id="rbasecdflag" type="STRING" size="256" sumtext="검사실코드"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_out_curerm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="basecd" type="STRING" size="256" sumtext="기본코드"/>
          <Column id="basecdflagdesc" type="STRING" size="256" sumtext="코드설명"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="basecdflagdesc">--전체--</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchioflag" type="STRING" size="256" sumtext="조회구분"/>
          <Column id="srchdate1" type="STRING" size="256" sumtext="조회시작일자"/>
          <Column id="srchdate2" type="STRING" size="256" sumtext="조회종료일자"/>
          <Column id="excuroomcd" type="STRING" size="256" sumtext="치료실"/>
          <Column id="execrid" type="STRING" size="256" sumtext="치료사"/>
          <Column id="suppdeptcd" type="STRING" size="256" sumtext="지원부서"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <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";
include "ast_examcurexp::combolist.xjs";
include "com_commodulexp::SSZFM00401.xjs"; // Dataset 뷰어용
include "com_commodulexp::SMZFS00501.xjs";
//include "com_commodulexp::SMZFS00401.xjs";

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

function SMAEA05800_onload(obj:Form, e:LoadEventInfo)
{
	
    lf_aezfSetSuppDeptcd();
	
	fn_TRAEA00902();
	fn_TRAEA00903();
// 	
// 	var arrParam 	= [{dsNm: "ds_init_A510", cdGrpId: "A510"}	
// 					  ]
// 	lf_getAstCodeList(arrParam);
// 	
// 	
// 	
// 	
 	var curDate = utlf_getCurrentDate();
 	grp_biz.ipt_fromdd.value = curDate;
 	grp_biz.ipt_todd.value = curDate;
    		
    grp_biz.cmb_curerm.value = "";    		
    grp_biz.cmb_execdrid.value = "";
	grp_biz.radio3.value = "";
}

function fn_TRAEA00902() {
  
   var dutplcecd = sysf_getUserInfo("dutplcecd");

    ds_send_req.setColumn(0,"basecd","");
    ds_send_req.setColumn(0,"basesuppdeptcd",suppdeptcd);
    ds_send_req.setColumn(0,"rbasecdflag","R");
    ds_send_req.setColumn(0,"instcd","");
    

var oParam = {};
    oParam.id          = "TRAEA00902";
    oParam.service     = "examcurebaseapp.ExamCureRoom";
    oParam.method      = "reqGetExamCureRoomGrpList";
    oParam.inds        = "req=ds_send_req";
    oParam.outds       = "ds_out_curerm=item";
    oParam.async       = false;
    oParam.callback    = "cf_TRAEA00902";

tranf_submit(oParam);

}



function cf_TRAEA00902(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;    
    
    dsf_addDsItem( ds_out_curerm,   "basecd", "basecdflagdesc", "-- 전체 --", "", "above" ); //치료실콤보 Item '전체'추가

}

function fn_TRAEA00903() {

   var dutplcecd = sysf_getUserInfo("dutplcecd");

    ds_send_req2.setColumn(0,"basecd","");
    ds_send_req2.setColumn(0,"basesuppdeptcd",suppdeptcd);
    ds_send_req2.setColumn(0,"ebasecdflag","E");

    
    var oParam = {};
    oParam.id          = "TRAEA00903";
    oParam.service     = "examcurebaseapp.ExecrCode";
    oParam.method      = "reqGetExecrCodeList";
    oParam.inds        = "req=ds_send_req2";
    oParam.outds       = "ds_out_execrcode=execrcode";
    oParam.async       = false;
    oParam.callback    = "cf_TRAEA00903";

tranf_submit(oParam);
}

function cf_TRAEA00903(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;    
    
    dsf_addDsItem( ds_out_execrcode,   "basecd", "basecdflagdesc", "-- 전체 --", "", "above" ); //치료실콤보 Item '전체'추가
}

function grp_biz_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{

    ds_send.setColumn(0,"srchioflag",grp_biz.radio3.value);
    ds_send.setColumn(0,"srchdate1",grp_biz.ipt_fromdd.value);
    ds_send.setColumn(0,"srchdate2",grp_biz.ipt_todd.value);
    ds_send.setColumn(0,"excuroomcd",grp_biz.cmb_curerm.value);
    ds_send.setColumn(0,"execrid",grp_biz.cmb_execdrid.value);
    ds_send.setColumn(0,"suppdeptcd",suppdeptcd);
    

	var oParam = {};
    oParam.id          = "TRAEA05800";
    oParam.service     = "examcureacptexecapp.ExamCureAcpt";
    oParam.method      = "reqGetRehbAcptEndList";
    oParam.inds        = "req=ds_send";
    oParam.outds       = "ds_grd_list=item";
    oParam.async       = false;
    //oParam.callback    = "cf_TRAEA05800";

tranf_submit(oParam);
}

function grp_biz_btn_excsave_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_grd_list.rowcount > 0 ){
		grdf_exportExcel(grp_biz.grd_list,"재진료 대상자 조회", "재진료 대상자 조회", false, "", "user", false);
	} else {
		sysf_messageBox("조회된 데이터가 ", "I004");
    }
}
]]></Script>
  </Form>
</FDL>