YNU_JEUS/app_home/himed/xpapps/pam/clamuncoxp/xp/SPPIF80801_완화의료진료비현황조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPIF80801" position="absolute 0 0 1210 791" titletext="완화의료 진료비 현황 조회" oninit="SPPIF80801_oninit" onload="SPPIF80801_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 1 13 1196 757" id="grp_biz" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Div position="absolute 0 11 1194 49" align="align:center top;" id="grp_sea" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Button position="absolute 1128 7 1184 29" id="button1" class="btn1" text="조회" anchor="top right" onclick="grp_biz_grp_sea_button1_onclick"/>
                    <Shape position="absolute 1115 7 1121 29" linetype="vertical" id="line13" class="line_4" anchor="top right"/>
                    <Calendar position="absolute 296 8 366 27" id="ipt_fromdd" mask="yyyy-mm" anchor="default" dateformat="yyyy-MM" value="null" editformat="yyyy-MM" onchanged="grp_biz_grp_sea_ipt_fromdd_onchanged"/>
                    <Static text="청구월 :" position="absolute 223 10 305 27" id="caption13" class="search_name" anchor="default"/>
                    <Radio position="absolute 90 8 210 28" id="radio1" columncount="2" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn"/>
                          <Column id="datacolumn"/>
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">C</Col>
                            <Col id="datacolumn">청구월</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">D</Col>
                            <Col id="datacolumn">퇴원일</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Radio>
                    <Static text="기준선택 :" position="absolute 9 11 104 28" id="caption1" class="search_name" anchor="default"/>
                    <Static text="퇴원일 :" position="absolute 450 11 535 28" id="caption2" class="search_name" anchor="default"/>
                    <Calendar position="absolute 516 9 603 28" id="input1" class="input_search" mask="yyyy-mm-dd" anchor="default" dateformat="yyyy-MM-dd"/>
                    <Calendar position="absolute 618 9 708 28" id="ipt_todd" class="input_search" mask="yyyy-mm-dd" anchor="default" dateformat="yyyy-MM-dd" value="null"/>
                    <Static text="~" position="absolute 605 8 620 28" id="caption3" anchor="default"/>
                    <Combo position="absolute 367 8 427 27" id="cmb_clamdg" class="combo_search" innerdataset="@ds_init_clamdg_clamdglist" datacolumn="clamdgnm" codecolumn="clamdgcd" anchor="default"/>
                    <Static text="진료과 :" position="absolute 745 10 820 27" id="caption4" class="search_name" anchor="default"/>
                    <Combo position="absolute 818 8 933 27" id="cmb_orddeptcd" class="combo_search" innerdataset="@ds_init_list1_deptlist" datacolumn="depthngnm" codecolumn="deptcd" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Button position="absolute 1115 57 1195 76" id="button12" class="btn7" text="엑셀저장" anchor="top right" onclick="grp_biz_button12_onclick"/>
              <Shape position="absolute 0 76 1195 82" linetype="horizontal" id="line2" class="line_1" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
              <Static text="완화의료 환자 리스트" position="absolute 0 60 265 83" id="caption10" class="tit_2" anchor="default"/>
              <Grid position="absolute 0 81 1195 741" id="datagrid1" binddataset="ds_main_list_datagrid" anchor="all" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="25"/>
                      <Column size="100"/>
                      <Column size="56"/>
                      <Column size="60"/>
                      <Column size="55"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="43"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="59"/>
                      <Column size="42"/>
                      <Column size="33"/>
                      <Column size="59"/>
                      <Column size="74"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24" band="head"/>
                      <Row size="24" band="head"/>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                      <Row size="24" band="summ"/>
                    </Rows>
                    <Band id="head">
                      <Cell rowspan="4" taborder="undefined"/>
                      <Cell col="1" rowspan="4" text="진료과" taborder="undefined"/>
                      <Cell col="2" rowspan="4" text="진료의" taborder="undefined"/>
                      <Cell col="3" rowspan="4" text="등록번호" taborder="undefined"/>
                      <Cell col="4" rowspan="4" text="환자명" taborder="undefined"/>
                      <Cell col="5" rowspan="4" text="입원일자" taborder="undefined"/>
                      <Cell col="6" rowspan="4" text="퇴원일자" taborder="undefined"/>
                      <Cell col="7" rowspan="4" text="개시일" taborder="undefined"/>
                      <Cell col="8" rowspan="4" text="종료일" taborder="undefined"/>
                      <Cell col="9" rowspan="4" text="재원일" taborder="undefined"/>
                      <Cell col="10" colspan="6" text="행위별내역(예상금액)" taborder="undefined"/>
                      <Cell col="16" colspan="7" text="완화의료 정액수가 내역" taborder="undefined"/>
                      <Cell col="23" colspan="5" text="청구내역" taborder="undefined"/>
                      <Cell row="1" col="10" colspan="4" text="본인부담금" taborder="undefined"/>
                      <Cell row="1" col="14" rowspan="3" text="공단부담금" taborder="undefined"/>
                      <Cell row="1" col="15" rowspan="3" text="총진료비" taborder="undefined"/>
                      <Cell row="1" col="16" colspan="5" text="본인부담금" taborder="undefined"/>
                      <Cell row="1" col="21" rowspan="3" text="공단부담금" taborder="undefined"/>
                      <Cell row="1" col="22" rowspan="3" text="총진료비" taborder="undefined"/>
                      <Cell row="1" col="23" rowspan="3" text="청구월" taborder="undefined"/>
                      <Cell row="1" col="24" rowspan="3" text="차수" taborder="undefined"/>
                      <Cell row="1" col="25" rowspan="3" text="순번" taborder="undefined"/>
                      <Cell row="1" col="26" rowspan="3" text="접수번호" taborder="undefined"/>
                      <Cell row="1" col="27" rowspan="3" text="명일련번호" taborder="undefined"/>
                      <Cell row="2" col="10" rowspan="2" text="급여&#10;(식대포함)" taborder="undefined"/>
                      <Cell row="2" col="11" rowspan="2" text="전액본인부담금" taborder="undefined"/>
                      <Cell row="2" col="12" rowspan="2" text="비급여액&#10;(선택진료비포함)" taborder="undefined"/>
                      <Cell row="2" col="13" rowspan="2" text="계" taborder="undefined"/>
                      <Cell row="2" col="16" rowspan="2" text="정액수가" taborder="undefined"/>
                      <Cell row="2" col="17" rowspan="2" text="별도산정&#10;급여" taborder="undefined"/>
                      <Cell row="2" col="18" rowspan="2" text="별도산정&#10;전액본인부담" taborder="undefined"/>
                      <Cell row="2" col="19" rowspan="2" text="별도산정&#10;비급여" taborder="undefined"/>
                      <Cell row="2" col="20" rowspan="2" text="계" taborder="undefined"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" expr="currow+1"/>
                      <Cell col="1" text="bind:orddeptcd"/>
                      <Cell col="2" text="bind:medispclid"/>
                      <Cell col="3" text="bind:pid"/>
                      <Cell col="4" text="bind:patnm"/>
                      <Cell col="5" displaytype="date" text="bind:indd" mask="yyyy-MM-dd"/>
                      <Cell col="6" displaytype="date" text="bind:dschdd" mask="yyyy-MM-dd"/>
                      <Cell col="7" displaytype="date" text="bind:fromdd" mask="yyyy-MM-dd"/>
                      <Cell col="8" displaytype="date" text="bind:todd" mask="yyyy-MM-dd"/>
                      <Cell col="9" displaytype="date" text="bind:inday" mask="yyyy-MM-dd"/>
                      <Cell col="10" displaytype="number" text="bind:payownbamt"/>
                      <Cell col="11" displaytype="number" text="bind:allownbamt"/>
                      <Cell col="12" displaytype="number" text="bind:nopyamt"/>
                      <Cell col="13" displaytype="number" text="bind:ownbamt"/>
                      <Cell col="14" displaytype="number" text="bind:payinsubamt"/>
                      <Cell col="15" displaytype="number" text="bind:totamt"/>
                      <Cell col="16" displaytype="number" text="bind:hfixownbamt"/>
                      <Cell col="17" displaytype="number" text="bind:hpayownbamt"/>
                      <Cell col="18" displaytype="number" text="bind:hallownbamt"/>
                      <Cell col="19" displaytype="number" text="bind:hnopyamt"/>
                      <Cell col="20" displaytype="number" text="bind:hownbamt"/>
                      <Cell col="21" displaytype="number" text="bind:hpayinsubamt"/>
                      <Cell col="22" displaytype="number" text="bind:htotamt"/>
                      <Cell col="23" displaytype="date" text="bind:clamym" mask="yyyy/MM"/>
                      <Cell col="24" text="bind:clamdg"/>
                      <Cell col="25" text="bind:pidsn"/>
                      <Cell col="26" text="bind:acptno"/>
                      <Cell col="27" text="bind:docuseqno"/>
                    </Band>
                    <Band id="summary">
                      <Cell/>
                      <Cell col="1"/>
                      <Cell col="2"/>
                      <Cell col="3"/>
                      <Cell col="4"/>
                      <Cell col="5"/>
                      <Cell col="6"/>
                      <Cell col="7"/>
                      <Cell col="8"/>
                      <Cell col="9"/>
                      <Cell col="10" displaytype="number" style="align:right middle;" text="expr:getSum('payownbamt')"/>
                      <Cell col="11" displaytype="number" style="align:right middle;" text="expr:getSum('allownbamt')"/>
                      <Cell col="12" displaytype="number" style="align:right middle;" text="expr:getSum('nopyamt')"/>
                      <Cell col="13" displaytype="number" style="align:right middle;" text="expr:getSum('ownbamt')"/>
                      <Cell col="14" displaytype="number" style="align:right middle;" text="expr:getSum('payinsubamt')"/>
                      <Cell col="15" displaytype="number" style="align:right middle;" text="expr:getSum('totamt')"/>
                      <Cell col="16" displaytype="number" style="align:right middle;" text="expr:getSum('hfixownbamt')"/>
                      <Cell col="17" displaytype="number" style="align:right middle;" text="expr:getSum('hpayownbamt')"/>
                      <Cell col="18" displaytype="number" style="align:right middle;" text="expr:getSum('hallownbamt')"/>
                      <Cell col="19" displaytype="number" style="align:right middle;" text="expr:getSum('hnopyamt')"/>
                      <Cell col="20" displaytype="number" style="align:right middle;" text="expr:getSum('hownbamt')"/>
                      <Cell col="21" displaytype="number" style="align:right middle;" text="expr:getSum('hpayinsubamt')"/>
                      <Cell col="22" displaytype="number" style="align:right middle;" text="expr:getSum('htotamt')"/>
                      <Cell col="23"/>
                      <Cell col="24"/>
                      <Cell col="25"/>
                      <Cell col="26"/>
                      <Cell col="27"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 757 1195 784" id="grp_btn"/>
        <Div position="absolute 0 755 1195 783" id="group1" scrollbars="autoboth" anchor="left right bottom">
          <Layouts>
            <Layout>
              <Button position="absolute 1139 0 1195 22" id="button45" class="btn4" text="닫기" anchor="right bottom" onclick="group1_button45_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption6" text="완화의료환자 진료비 현황 조회" class="tit_1" position="absolute 1 0 249 23"/>
      </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="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="kindcd" type="STRING" size="256"/>
          <Column id="clamdg" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="clamym"/>
            <Col id="kindcd">C</Col>
            <Col id="clamdg">1</Col>
            <Col id="ioflag">I</Col>
            <Col id="orddeptcd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_list1_deptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptcd" type="STRING" size="256" sumtext="심사자id"/>
          <Column id="depthngnm" type="STRING" size="256" sumtext="심사자이름"/>
          <Column id="deptengabbr" type="STRING" size="256" sumtext="진료과약어"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_list_datagrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_clamdg_clamdglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.grp_sea.radio1" propid="value" datasetid="ds_send" columnid="kindcd"/>
      <BindItem id="item1" compid="grp_biz.grp_sea.ipt_fromdd" propid="value" datasetid="ds_send" columnid="clamym"/>
      <BindItem id="item2" compid="grp_biz.grp_sea.cmb_clamdg" propid="value" datasetid="ds_send" columnid="clamdg"/>
      <BindItem id="item3" compid="grp_biz.grp_sea.input1" propid="value" datasetid="ds_send" columnid="fromdd"/>
      <BindItem id="item4" compid="grp_biz.grp_sea.ipt_todd" propid="value" datasetid="ds_send" columnid="todd"/>
      <BindItem id="item5" compid="grp_biz.grp_sea.cmb_orddeptcd" propid="value" datasetid="ds_send" columnid="orddeptcd"/>
    </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";
include "pam_pamcomnxp::PAM.xjs";
include "pam_aftjudgstatxp::SMPIS01700.xjs";

function SPPIF80801_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPPIF80801_onload(obj:Form, e:LoadEventInfo)
{
	dsf_createDsRow("ds_tmp", [ {col:"instcd", type:"STRING", size:256, val: sysf_getUserInfo("dutplceinstcd")}
							,	{col:"ordfildcd", type:"STRING", size:256, val: ""}
							,	{col:"ordflag", type:"STRING", size:256, val: ""}]);	
							
	var oParam = {};
		oParam.id          = "TRPIJ00203";
		oParam.service     = "bfjudgapp.InHospJudgTrgtMan";
		oParam.method      = "reqGetDeptList";
		oParam.inds        = "req=ds_tmp";
		oParam.outds       = "ds_init_list1_deptlist=deptlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIJ00203";

	tranf_submit(oParam);
	
	ds_main_list_datagrid.clearData();
	
	ds_send.setColumn(0, "fromdd", utlf_getCurrentDate());
	ds_send.setColumn(0, "todd", utlf_getCurrentDate());
	ds_send.setColumn(0, "clamym", String(utlf_getCurrentDate()).substr(0,6));
	
	
	pidfGetClamdg(ds_send.getColumn(0, "clamym"), "", ds_send.getColumn(0, "ioflag"), "", "ds_init_clamdg_clamdglist")
	
	frmf_addComboItem("grp_biz.grp_sea.cmb_clamdg","전체","","above");
	
	grp_biz.grp_sea.cmb_clamdg.index = 0;
}

function grp_biz_grp_sea_ipt_fromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	ds_init_clamdg_clamdglist.clearData();
	
	pidfGetClamdg(String(obj.value).substr(0,6), "", ds_send.getColumn(0, "ioflag"), "", "ds_init_clamdg_clamdglist")
	
	frmf_addComboItem("grp_biz.grp_sea.cmb_clamdg","전체","","above");
	
	grp_biz.grp_sea.cmb_clamdg.index = 0;
}

function group1_button45_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function grp_biz_button12_onclick(obj:Button,  e:ClickEventInfo)
{
	if(ds_main_list_datagrid.rowcount == 0)
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");
	}
	else
	{
		grdf_exportExcel(grp_biz.datagrid1, "완화의료 환자 리스트", "see");
	}
}

function grp_biz_grp_sea_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_openLoadingBar();
	
	var oParam = {};
		oParam.id          = "TRPIF80801";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetHospiceAmtList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_list_datagrid=datagrid";
		oParam.async       = true;
		oParam.callback    = "responseHandlerTRPIF80801";

	tranf_submit(oParam);
}

function responseHandlerTRPIF80801() 
{
	frmf_closeLoadingBar(); 
}   ]]></Script>
  </Form>
</FDL>