YNU_JEUS/app_home/himed/xpapps/pam/pamendstatsxp/xp/SMPAE00102_KU일일마감공통장표.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPAE00102" position="absolute 0 0 1213 787" titletext="KU일일마감공통장표" oninit="SMPAE00102_oninit" onload="SMPAE00102_onload">
    <Layouts>
      <Layout>
        <Div id="grp_sea" taborder="16" position="absolute 0 24 1195 64" class="div_SA">
          <Layouts>
            <Layout>
              <Button id="btn_search" taborder="0" text="조회" class="btn1" position="absolute 1115 9 1171 31" anchor="top right" onclick="grp_sea_btn_search_onclick"/>
              <Static id="caption35" text="조회일자" class="search_name" position="absolute 5 11 90 28" anchor="default"/>
              <Calendar id="ipt_enddd" taborder="1" position="absolute 74 10 172 29" anchor="default" autoselect="true" autoskip="true"/>
              <Shape id="line14" linetype="vertical" class="line_4" position="absolute 1092 6 1098 36" anchor="top right"/>
              <Combo id="cmb_worktype" taborder="2" innerdataset="@ds_init_worktypelist_PK021" codecolumn="cdid" datacolumn="cdnm" position="absolute 621 10 721 29" anchor="default"/>
              <Static id="caption1" text="수납계정" class="search_name" position="absolute 540 11 625 28" anchor="default"/>
              <Static id="caption2" text="결제구분" class="search_name" position="absolute 755 11 840 28" anchor="default"/>
              <Combo id="combo2" taborder="3" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 834 10 934 29" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">all</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">cashamt</Col>
                      <Col id="datacolumn">현금금액</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">cardamt</Col>
                      <Col id="datacolumn">카드금액</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">onlineamt</Col>
                      <Col id="datacolumn">온라인금액</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Radio id="radio1" taborder="4" columncount="4" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 310 9 495 29" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">A</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">O</Col>
                      <Col id="datacolumn">외래</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">I</Col>
                      <Col id="datacolumn">입원</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">S</Col>
                      <Col id="datacolumn">건진</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Calendar id="input1" taborder="5" position="absolute 192 10 291 29" anchor="default"/>
              <Static id="caption3" text="~" position="absolute 175 11 190 31" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Static text="KU일일마감 공통장표" position="absolute 0 0 178 24" id="caption6" class="tit_1"/>
        <Tab position="absolute 0 79 1195 773" id="switch1" anchor="all" onchanged="switch1_onchanged">
          <Tabpages>
            <Tabpage text="업무구분별 환자별 세부내역" position="absolute 0 0 1193 685" id="case1">
              <Layouts>
                <Layout>
                  <Shape position="absolute 0 2 1195 8" linetype="horizontal" id="line3" class="line_10" anchor="left top right"/>
                  <Grid position="absolute 0 7 1195 662" id="grd_rcptdetlist" binddataset="ds_main_rcptinfo_rcptinfolist" autoenter="select" cellsizingtype="col" anchor="all">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="25" band="left"/>
                          <Column size="140"/>
                          <Column size="30"/>
                          <Column size="60"/>
                          <Column size="60"/>
                          <Column size="98"/>
                          <Column size="55"/>
                          <Column size="40"/>
                          <Column size="40"/>
                          <Column size="80"/>
                          <Column size="80"/>
                          <Column size="80"/>
                          <Column size="70"/>
                          <Column size="70"/>
                          <Column size="70"/>
                          <Column size="37"/>
                          <Column size="32"/>
                          <Column size="55"/>
                          <Column size="60"/>
                        </Columns>
                        <Rows>
                          <Row size="24" band="head"/>
                          <Row size="24"/>
                          <Row size="24" band="summ"/>
                        </Rows>
                        <Band id="head">
                          <Cell/>
                          <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" colspan="2" text="보험유형" taborder="undefined"/>
                          <Cell col="9" text="현금금액"/>
                          <Cell col="10" text="카드금액"/>
                          <Cell col="11" text="통장입금액"/>
                          <Cell col="12" text="수납일자"/>
                          <Cell col="13" text="수납시간"/>
                          <Cell col="14" text="영수일자"/>
                          <Cell col="15" colspan="2" text="영수번호" taborder="undefined"/>
                          <Cell col="17" text="수납자"/>
                          <Cell col="18" text="무인번호"/>
                        </Band>
                        <Band id="body">
                          <Cell celltype="head" expr="currow+1"/>
                          <Cell col="1" displaytype="combo" style="padding:0 0 0 3;" text="bind:worktype" combodataset="ds_init_worktypelist_PK021" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                          <Cell col="2" text="bind:ordtype"/>
                          <Cell col="3" text="bind:pid"/>
                          <Cell col="4" text="bind:hngnm"/>
                          <Cell col="5" style="align:left middle;padding:0 0 0 3;" text="bind:orddeptnm"/>
                          <Cell col="6" text="bind:medispclnm"/>
                          <Cell col="7" text="bind:insukind"/>
                          <Cell col="8" text="bind:suppkind"/>
                          <Cell col="9" displaytype="number" text="bind:cashamt"/>
                          <Cell col="10" displaytype="number" text="bind:cardamt"/>
                          <Cell col="11" displaytype="number" text="bind:onlineamt"/>
                          <Cell col="12" displaytype="date" text="bind:rcptexecdd" calendardisplaynulltype="nulltext"/>
                          <Cell col="13" displaytype="date" text="bind:rcpttm" mask="hh:mm:ss" calendardisplaynulltype="nulltext"/>
                          <Cell col="14" displaytype="date" text="bind:rcptdd" calendardisplaynulltype="nulltext"/>
                          <Cell col="15" displaytype="text" text="bind:rcptno"/>
                          <Cell col="16" text="bind:rcptseqno"/>
                          <Cell col="17" text="bind:rcptrnm"/>
                          <Cell col="18" text="bind:ktrmnno"/>
                        </Band>
                        <Band id="summary">
                          <Cell style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="1" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="2" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="3" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="4" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="5" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="6" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="7" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="8" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="9" displaytype="number" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;" text="expr:getSum('cashamt')"/>
                          <Cell col="10" displaytype="number" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;" text="expr:getSum('cardamt')"/>
                          <Cell col="11" displaytype="number" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;" text="expr:getSum('onlineamt')"/>
                          <Cell col="12" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="13" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="14" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="15" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="16" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="17" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="18" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
            <Tabpage text="업무구분별 합산내역" id="case2">
              <Layouts>
                <Layout>
                  <Grid position="absolute 0 7 1195 662" id="datagrid2" binddataset="ds_main_rcptsuminfo_rcptsuminfolist" autoenter="select" cellsizingtype="col" anchor="all">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="23" band="left"/>
                          <Column size="200"/>
                          <Column size="180"/>
                          <Column size="180"/>
                          <Column size="200"/>
                          <Column size="180"/>
                          <Column size="200"/>
                        </Columns>
                        <Rows>
                          <Row size="24" band="head"/>
                          <Row size="24"/>
                          <Row size="24" band="summ"/>
                        </Rows>
                        <Band id="head">
                          <Cell/>
                          <Cell col="1" text="계정"/>
                          <Cell col="2" text="입원"/>
                          <Cell col="3" text="외래"/>
                          <Cell col="4" text="합계"/>
                          <Cell col="5" text="건진"/>
                          <Cell col="6" text="합계"/>
                        </Band>
                        <Band id="body">
                          <Cell celltype="head" expr="currow+1"/>
                          <Cell col="1" displaytype="combo" style="padding:0 0 0 5;" text="bind:worktype" combodataset="ds_init_worktypelist_PK021" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                          <Cell col="2" displaytype="number" text="bind:rcpt1"/>
                          <Cell col="3" displaytype="number" text="bind:rcpt2"/>
                          <Cell col="4" displaytype="number" text="bind:sum1"/>
                          <Cell col="5" displaytype="number" text="bind:rcpt3"/>
                          <Cell col="6" displaytype="number" text="bind:sum2"/>
                        </Band>
                        <Band id="summary">
                          <Cell style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="1" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;"/>
                          <Cell col="2" displaytype="number" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;" text="expr:getSum('rcpt1')"/>
                          <Cell col="3" displaytype="number" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;" text="expr:getSum('rcpt2')"/>
                          <Cell col="4" displaytype="number" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;" text="expr:getSum('sum1')"/>
                          <Cell col="5" displaytype="number" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;" text="expr:getSum('rcpt3')"/>
                          <Cell col="6" displaytype="number" style="background:#99ff99ff;background2:#99ff99ff;font:arial,9,bold;" text="expr:getSum('sum2')"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                  <Shape position="absolute 0 2 1195 8" linetype="horizontal" id="line4" class="line_10" anchor="left top right"/>
                </Layout>
              </Layouts>
            </Tabpage>
          </Tabpages>
        </Tab>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send_search" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="worktype" type="STRING" size="256"/>
          <Column id="rcpttype" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="worktype"/>
            <Col id="rcpttype"/>
            <Col id="ioflag">A</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_worktypelist_PK021" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_rcptinfo_rcptinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="worktype" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="ordtype" type="STRING" size="256" sumtext="구분"/>
          <Column id="pid" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="medispclnm" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="insukind" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="suppkind" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="cashamt" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="cardamt" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="onlineamt" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="rcptexecdd" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="rcptdd" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="rcpttm" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="rcptno" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="rcptseqno" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="rcptrnm" type="STRING" size="256" sumtext="마감상태"/>
          <Column id="ktrmnno" type="STRING" size="256" sumtext="마감상태"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_rcptsuminfo_rcptsuminfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="worktype" type="STRING" size="256" sumtext="업무계정"/>
          <Column id="rcpt1" type="STRING" size="256" sumtext="입원수납"/>
          <Column id="rcpt2" type="STRING" size="256" sumtext="외래수납"/>
          <Column id="sum1" type="STRING" size="256" sumtext="합계1"/>
          <Column id="rcpt3" type="STRING" size="256" sumtext="건진수납"/>
          <Column id="sum2" type="STRING" size="256" sumtext="합계2"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.ipt_enddd" propid="value" datasetid="ds_send_search" columnid="fromdd"/>
      <BindItem id="item1" compid="grp_sea.input1" propid="value" datasetid="ds_send_search" columnid="todd"/>
      <BindItem id="item2" compid="grp_sea.radio1" propid="value" datasetid="ds_send_search" columnid="ioflag"/>
      <BindItem id="item3" compid="grp_sea.cmb_worktype" propid="value" datasetid="ds_send_search" columnid="worktype"/>
      <BindItem id="item4" compid="grp_sea.combo2" propid="value" datasetid="ds_send_search" columnid="rcpttype"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "pam_pamcomnxp::PAM001.xjs";
var arErrorCode = new HashArray();
function SMPAE00102_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPAE00102_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(switch1.case1.grd_rcptdetlist);
	grdf_initGrid(switch1.case2.datagrid2);
	
	var worktype  = "";
	var rcpttype  = "all";
	var ioflag    = "A";
	var fromdd    = utlf_getCurrentDate();
	var todd      = utlf_getCurrentDate();

	// 부모창 검증
	if (!frmf_checkOpener()) 
	{
		sysf_messageBox("상위화면이 존재하지 않습니다.", "C000");
	}
	else 
	{	
		// 부모창에서 올라온 조건으로 업데이트
		worktype = opener.frmf_getParameter("SMPAE00102_WORKTYPE");
		rcpttype = opener.frmf_getParameter("SMPAE00102_RCPTTYPE");
		ioflag   = opener.frmf_getParameter("SMPAE00102_IOFLAG");
		fromdd   = opener.frmf_getParameter("SMPAE00102_FROMDD");
		todd     = opener.frmf_getParameter("SMPAE00102_TODD");
	}
	
	fGetBaseInfo();	//기본코드 조회
	
	ds_send_search.setColumn(0, "fromdd",      fromdd);
	ds_send_search.setColumn(0, "todd",        todd);
	ds_send_search.setColumn(0, "worktype",    worktype);
	ds_send_search.setColumn(0, "rcpttype",    rcpttype);
	ds_send_search.setColumn(0, "ioflag",      ioflag);

	// 조회 실행
	grp_sea.btn_search.click();
}

function fGetBaseInfo()
{
	/*
	*	PK021 - 마감프로그램_업무구분 
	*/
	var arrParam = new Array();
	arrParam = [{dsNm: "ds_init_worktypelist_PK021", cdGrpId: "PK021", showValue: false}];
	pamfGetCodeList(arrParam, false, ""); 
	
	frmf_addComboItem("grp_sea.cmb_worktype","전체","all","above");
	ds_send_search.setColumn(0, "worktype", "all");
	ds_send_search.setColumn(0, "rcpttype", "all");
}

function grp_sea_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	if (switch1.tabindex == 0)
	{		
		// 업무구분별 환자별 수납내역 조회
		var oParam = {};
			oParam.id          = "TRPAE00105";
			oParam.service     = "pamendstatsapp.PamEndStats";
			oParam.method      = "reqGetComnRcptDetInfoList";
			oParam.inds        = "req=ds_send_search";
			oParam.outds       = "ds_main_rcptinfo_rcptinfolist=rcptdetinfo";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPAE00105";

		tranf_submit(oParam);
	} 
	else 
	{
		// 업무구분별 수납내역 조회
		var oParam = {};
			oParam.id          = "TRPAE00106";
			oParam.service     = "pamendstatsapp.PamEndStats";
			oParam.method      = "reqGetComnRcptSumInfoList";
			oParam.inds        = "req=ds_send_search";
			oParam.outds       = "ds_main_rcptsuminfo_rcptsuminfolist=rcptsuminfo";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPAE00106";

		tranf_submit(oParam);
	}
}

function switch1_onchanged(obj:Tab, e:TabIndexChangeEventInfo)
{
	if(obj.tabindex == 0)
	{
		grp_sea.radio1.enable = true;
		grp_sea.cmb_worktype.enable = true;
		grp_sea.combo2.enable = true;
	}
	else if(obj.tabindex == 1)
	{
		grp_sea.radio1.enable = false;
		grp_sea.cmb_worktype.enable = false;
		grp_sea.combo2.enable = false;
	}
}
]]></Script>
  </Form>
</FDL>