YNU_JEUS/app_home/himed/xpapps/ast/examcurexp/xp/SMAEA00520_장비연동율조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAEA00510" position="absolute 0 0 1206 793" titletext="검사치료 진행현황조회" oninit="SMAEA00510_oninit" onload="SMAEA00510_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="검사실별 연동율 조회" class="tit_1" position="absolute 0 0 170 29" anchor="left top"/>
        <Div id="group2" taborder="1" position="absolute 0 30 1203 90" anchor="left top right" class="div_SA">
          <Layouts>
            <Layout>
              <Shape id="line1" linetype="vertical" position="absolute 413 8 419 51" anchor="top right"/>
              <Calendar id="input1" taborder="5" class="input_default" position="absolute 246 20 352 39" anchor="left top"/>
              <Button id="btn_sea" taborder="6" text="조회" class="btn1" position="absolute 440 18 496 40" anchor="top right" onclick="group2_btn_sea_onclick"/>
              <Combo id="cmb_ddflag" taborder="8" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 11 20 111 39" value="acptdd" text="접수일자" index="1" anchor="left top" visible="true">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">prcpdd</Col>
                      <Col id="datacolumn">처방일자</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">acptdd</Col>
                      <Col id="datacolumn">접수일자</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">execdd</Col>
                      <Col id="datacolumn">실시일자</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">rsrvdd</Col>
                      <Col id="datacolumn">예약일자</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Calendar id="ipt_fromdd" taborder="9" class="input_default" position="absolute 123 20 229 39" anchor="left top"/>
              <Combo id="cmb_suppdept" taborder="11" innerdataset="ds_init_cmb_suppdept" codecolumn="suppdeptcd" datacolumn="depthngnm" class="combo_search" position="absolute 656 20 775 39" anchor="top right" onitemchanged="group2_cmb_suppdept_onitemchanged" visible="false"/>
              <Combo id="cmb_excuroom" taborder="12" innerdataset="ds_init_cmb_excuroom" codecolumn="basecd" datacolumn="basecdflagdesc" class="combo_search" position="absolute 788 20 888 39" anchor="top right" visible="false"/>
              <Combo id="cmb_orddept" taborder="13" innerdataset="ds_init_cmb_orddept" codecolumn="deptcd" datacolumn="depthngnm" class="combo_search" position="absolute 897 21 1024 40" anchor="top right" visible="false"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption10" text="검사실별 연동율" class="tit_2" position="absolute 1 102 135 128" anchor="left top"/>
        <Grid id="grd_mainordlist" taborder="2" binddataset="ds_grd_mainordlist" useinputpanel="false" position="absolute 1 126 1203 750" anchor="all" oncelldblclick="grd_mainordlist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="48"/>
                <Column size="418"/>
                <Column size="99"/>
                <Column size="86"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="86"/>
                <Column size="108"/>
                <Column size="0"/>
              </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="expr:currow+1"/>
                <Cell col="1" displaytype="normal" style="align:left;" text="bind:excutypenm"/>
                <Cell col="2" style="align:center;" text="bind:excutype"/>
                <Cell col="3" style="align:right;" text="bind:totcnt"/>
                <Cell col="4" text="bind:age"/>
                <Cell col="5" text="bind:sex"/>
                <Cell col="6" displaytype="normal" edittype="none" style="align:right;" text="bind:cnt"/>
                <Cell col="7" displaytype="normal" edittype="normal" style="align:right;" text="bind:youl"/>
                <Cell col="8" text="bind:roomcd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_excel" taborder="3" text="엑셀저장" class="btn7" position="absolute 1123 98 1203 117" onclick="btn_excel_onclick" anchor="top right"/>
        <Button id="button1" taborder="4" text="출력" class="btn6" position="absolute 0 765 56 787" anchor="left bottom"/>
        <Button id="btn_reset" taborder="5" text="초기화" class="btn4" position="absolute 1136 765 1204 787" onclick="btn_reset_onclick" anchor="right bottom"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_cmb_suppdept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING"/>
          <Column id="suppdeptcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_excuroom" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="basecdflagdesc" type="STRING"/>
          <Column id="basecd" type="STRING"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_cmb_orddept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING"/>
          <Column id="deptcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_rsrvflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING"/>
          <Column id="cdid" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_ward" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING"/>
          <Column id="deptcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_mainordlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="excutype" type="STRING" size="256"/>
          <Column id="excutypenm" type="STRING" size="256"/>
          <Column id="totcnt" type="STRING" size="256"/>
          <Column id="cnt" type="STRING" size="256"/>
          <Column id="youl" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_M0011" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_A0075" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_globalinstancd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="basesuppdeptcd" type="STRING" size="256"/>
          <Column id="rbasecdflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="rbasecdflag">R</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="ddflag" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="suppdeptcd" type="STRING" size="256"/>
          <Column id="excuroomcd" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="wardcd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="patnm" type="STRING" size="256"/>
          <Column id="rsrvflag" type="STRING" size="256"/>
          <Column id="globalinstancd" type="STRING" size="256"/>
          <Column id="excucd" type="STRING" size="256"/>
          <Column id="excucdnm" type="STRING" size="256"/>
          <Column id="condflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="condflag">2</Col>
            <Col id="globalinstancd">instance1</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"/>
          <Column id="basesuppdeptcd" type="STRING" size="256"/>
          <Column id="rbasecdflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="rbasecdflag">R</Col>
          </Row>
        </Rows>
      </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="patinfolist" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_grd_mainordlist00" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpdd" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="age" type="STRING"/>
          <Column id="sex" type="STRING"/>
          <Column id="orddeptcd" type="STRING"/>
          <Column id="wardcd" type="STRING"/>
          <Column id="roomcd" type="STRING"/>
          <Column id="prcpnm" type="STRING"/>
          <Column id="prcpcd" type="STRING"/>
          <Column id="execprcpstatcd" type="STRING"/>
          <Column id="rcptyn" type="STRING"/>
          <Column id="payflagcd" type="STRING"/>
          <Column id="acptid" type="STRING"/>
          <Column id="excuroomcd" type="STRING"/>
          <Column id="execrid" type="STRING"/>
          <Column id="prcpdt" type="STRING"/>
          <Column id="rsrvdt" type="STRING"/>
          <Column id="acptdt" type="STRING"/>
          <Column id="execdt" type="STRING"/>
          <Column id="suppdeptdelivefact" type="STRING"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item2" compid="group2.ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd"/>
      <BindItem id="item3" compid="group2.input1" propid="value" datasetid="ds_send" columnid="todd"/>
      <BindItem id="item4" compid="group2.cmb_suppdept" propid="value" datasetid="ds_send" columnid="suppdeptcd"/>
      <BindItem id="item5" compid="group2.cmb_excuroom" propid="value" datasetid="ds_send" columnid="excuroomcd"/>
      <BindItem id="item6" compid="group2.cmb_orddept" propid="value" datasetid="ds_send" columnid="orddeptcd"/>
    </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 "emr_prcpmngtxp::MMO001.xjs";
include "lis_commonxp::LLZ001.xjs";
include "lis_commonxp::LPZ001.xjs";
include "lis_commonxp::LZZ002.xjs";
include "com_basiccodexp::ZBC001.xjs";
include "com_departmentcodexp::ZSD001.xjs";
include "ast_examcurexp::AEZ0001.xjs";

function SMAEA00510_oninit(obj:Form, e:InitEventInfo)
{
	//폼 초기화 함수
	frmf_initForm(obj);
}

function SMAEA00510_onload(obj:Form, e:LoadEventInfo)
{	
	fInitialize()
	grdf_initGrid(grd_mainordlist);
	group2.ipt_fromdd.value = utlf_getCurrentDate();
	group2.input1.value = utlf_getCurrentDate();
}

function fInitialize()
{
	lf_aezfSetSuppDeptcd();

	ds_send.setColumn(0, "suppdeptcd", suppdeptcd);

	var instcd = sysf_getUserInfo("dutplceinstcd");
	var standard_yn = "orduseyn";
	var ord_deptflag = "D";
	var rslt_ref  = "ds_init_cmb_orddept";
	var sort_field = "depthngnm"
	var sort_method = "asc"
	appf_getDeptCodeList(instcd, standard_yn, ord_deptflag, sort_field, sort_method, "", "", "", rslt_ref, false, "");
	
	ord_deptflag = "W";
	rslt_ref = "ds_init_cmb_suppdept";
	appf_getDeptCodeList(instcd, standard_yn, ord_deptflag, sort_field, sort_method, "", "", "", rslt_ref, false, "");
	
	var arrParam 	= [{dsNm: "ds_init_M0011", cdGrpId: "M0011"}
					  ,{dsNm: "ds_init_A0075", cdGrpId: "A0075"}
					  ]
	appf_getCodeList(arrParam);
	
	var oParam = {};
    oParam.id          = "TRAEA00503";
    oParam.service     = "examcurebaseapp.ExamCureRoom";
    oParam.method      = "reqGetExamCureRoomGrpList";
    oParam.inds        = "req=ds_send_req";
    oParam.outds       = "ds_init_cmb_excuroom=item";
    oParam.async       = false;
    //oParam.callback    = "cf_TRAEA00503";

	tranf_submit(oParam);
// 	submit("TRAEA00904", false);
	var oParam = {};
    oParam.id          = "TRAEA00904";
    oParam.service     = "examcurersrvapp.RsrvRef";
    oParam.method      = "reqGetSuppDeptCdList";
    oParam.inds        = "req=ds_send_req";
    oParam.outds       = "ds_init_cmb_suppdept=item";
    oParam.async       = false;
    //oParam.callback    = "cf_TRAEA00904";

	tranf_submit(oParam);
}

function group2_cmb_suppdept_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	ds_send_globalinstancd.setColumn(0, "basesuppdeptcd", obj.value);
	//submit("TRAEA00503");
	var oParam = {};
    oParam.id          = "TRAEA00503";
    oParam.service     = "examcurebaseapp.ExamCureRoom";
    oParam.method      = "reqGetExamCureRoomGrpList";
    oParam.inds        = "req=ds_send_globalinstancd";
    oParam.outds       = "ds_init_cmb_excuroom=item";
    oParam.async       = false;
    //oParam.callback    = "cf_TRAEA00503";

	tranf_submit(oParam);
}


//조회
function group2_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
    ds_send.setColumn(0,"ddflag",group2.cmb_ddflag.value);
    
    
	var oParam = {};
    oParam.id          = "TRAEA00504";
    oParam.service     = "examcureacptexecapp.ExamCurePrcs";
    oParam.method      = "reqGetExamCurePrcsPresConddList2";
    oParam.inds        = "req=ds_send";
    oParam.outds       = "ds_grd_mainordlist=item";
    oParam.async       = false;
    //oParam.callback    = "cf_TRAEA00504";

	tranf_submit(oParam);
}

function group2_img1_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SPAEA02302", "SPAEA02302",  null, null, null, null, null, null, null, null, null, null, "M");
}

function group2_btn_pidsearch_onclick(obj:Button,  e:ClickEventInfo)
{
 	var objArg = new Object();
 	objArg.arg_ds_send = ds_send;
	frmf_modal("SPPMC02500", "SPPMC02500",  objArg, null, null, null, null, null, null, null, null, null, "M");

	ds_send.setColumn(0, "pid", group2.ipt_pid.value);
	alert(group2.ipt_pid.value);

	ds_send.setColumn(0, "patnm", group2.ipt_patnm.value);
	alert(group2.ipt_patnm.value);
}

//초기화
function btn_reset_onclick(obj:Button,  e:ClickEventInfo)
{
	this.reload();
}

//엑셀
function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_mainordlist, lf_lisGetTitle(this), "see");
}

function grd_mainordlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
  if(e.col == 6)	//연동건수
  {  
     trace("1111");
	var objArg = new Object();  
        objArg.fromdd    = ds_send.getColumn(0, "fromdd");
	    objArg.todd      = ds_send.getColumn(0, "todd");
	    objArg.excutype  = ds_grd_mainordlist.getColumn(e.row, "excutype");
	    objArg.excutypenm  = ds_grd_mainordlist.getColumn(e.row, "excutypenm");	    

     frmf_modal("SMAEA00540", "SMAEA00540", objArg, null, null, null, null, null, null, null, null, null, "M");	
   }

}
]]></Script>
  </Form>
</FDL>