YNU_JEUS/app_home/himed/xpapps/pam/clamuncoxp/xp/SMPIF90200_심사자별업무현황.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPIF90200" position="absolute 0 0 1211 770" titletext="심사자별 업무현황" oninit="SMPIF90200_oninit" onload="SMPIF90200_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 1 13 1191 759" id="group2" anchor="all">
          <Layouts>
            <Layout>
              <Div position="absolute 0 11 1190 131" align="align:center top;" id="group4" class="div_SA" anchor="default">
                <Layouts>
                  <Layout>
                    <Static text="작업일자 :" position="absolute 15 10 101 27" id="caption5" class="search_name" anchor="default"/>
                    <Calendar position="absolute 97 10 187 29" id="ipt_clamymfrom" class="input_search" taborder="1" mask="yyyy-mm-dd" anchor="default" onchanged="group2_group4_ipt_clamymfrom_onchanged" dateformat="yyyy-MM-dd" value="null"/>
                    <Shape position="absolute 1106 6 1112 110" linetype="vertical" id="line2" class="line_4" anchor="top right"/>
                    <Button position="absolute 1120 51 1176 73" id="button1" class="btn1" taborder="2" text="조회" anchor="top right" onclick="group2_group4_button1_onclick"/>
                    <Static text="내원유형" position="absolute 835 10 911 27" id="caption9" class="search_name" anchor="default"/>
                    <Combo position="absolute 915 8 1015 27" id="rdo_ioflag" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn" 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">I</Col>
                            <Col id="datacolumn">입원</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">O</Col>
                            <Col id="datacolumn">외래</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Combo>
                    <Calendar position="absolute 207 10 297 29" id="ipt_clamymto" class="input_search" taborder="1" mask="yyyy-mm-dd" anchor="default" dateformat="yyyy-MM-dd" value="null"/>
                    <Static text="~" position="absolute 192 10 207 30" id="caption2" anchor="default"/>
                    <Static text="심사자" position="absolute 835 50 908 67" id="caption15" class="search_name" anchor="default"/>
                    <Combo position="absolute 915 49 1015 68" id="combo1" taborder="1" innerdataset="@ds_init_U0001list" datacolumn="cdnm" codecolumn="cdid" anchor="default"/>
                    <Static text="보험유형 :" position="absolute 16 49 112 66" id="caption3" class="search_name" anchor="default"/>
                    <Static text="청구형태 :" position="absolute 400 10 490 27" id="cp_text2_3" class="search_name" anchor="default"/>
                    <cp_checkboxList id="cb_cond2_3" titletext="CheckBox List" taborder="3" text="cp_checkboxList00" scrollbars="none" position="absolute 481 7 757 28" style="background:transparent; " col="1" row="1" cellspacing="2" vcellspacing="0" itemWidth="100" itemHeight="20" overflow="visible" anchor="default"/>
                    <cp_checkboxList id="checkbox1" titletext="CheckBox List" taborder="4" text="cp_checkboxList01" scrollbars="none" position="absolute 98 47 331 71" style="background:transparent; " col="1" row="1" cellspacing="2" vcellspacing="0" itemWidth="100" itemHeight="20" overflow="visible" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Button position="absolute 1110 135 1190 154" id="button2" class="btn7" text="엑셀저장" anchor="top right" onclick="group2_button2_onclick"/>
              <Grid position="absolute 0 155 1190 720" id="grdjudgclam" class="datagrid2" binddataset="ds_main_list1_grdjudgclam" anchor="all" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="25"/>
                      <Column size="80"/>
                      <Column size="75"/>
                      <Column size="100"/>
                      <Column size="75"/>
                      <Column size="100"/>
                      <Column size="75"/>
                      <Column size="75"/>
                      <Column size="75"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="75"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="75"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell rowspan="2" taborder="undefined"/>
                      <Cell col="1" rowspan="2" text="심사자명" taborder="undefined"/>
                      <Cell col="2" colspan="2" text="청구" taborder="undefined"/>
                      <Cell col="4" colspan="2" text="반송" taborder="undefined"/>
                      <Cell col="6" colspan="14" text="이의신청" taborder="undefined"/>
                      <Cell row="1" col="2" text="건수"/>
                      <Cell row="1" col="3" text="총진료비"/>
                      <Cell row="1" col="4" text="건수"/>
                      <Cell row="1" col="5" text="총진료비"/>
                      <Cell row="1" col="6" text="이의신청율"/>
                      <Cell row="1" col="7" text="부제기율"/>
                      <Cell row="1" col="8" text="이의신청건수"/>
                      <Cell row="1" col="9" text="이의신청액"/>
                      <Cell row="1" col="10" text="이의신청액원내"/>
                      <Cell row="1" col="11" text="이의신청액원외"/>
                      <Cell row="1" col="12" text="부제기건수"/>
                      <Cell row="1" col="13" text="부제기액"/>
                      <Cell row="1" col="14" text="부제기금액원내"/>
                      <Cell row="1" col="15" text="부제기금액원외"/>
                      <Cell row="1" col="16" text="조정건수"/>
                      <Cell row="1" col="17" text="삭감액"/>
                      <Cell row="1" col="18" text="원내삭감액"/>
                      <Cell row="1" col="19" text="원외삭감액"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" expr="currow+1"/>
                      <Cell col="1" style="align:left middle;" text="bind:judgrnm" enable="false"/>
                      <Cell col="2" displaytype="number" style="align:left middle;" text="bind:clamcnt" enable="false"/>
                      <Cell col="3" displaytype="number" style="align:left middle;" text="bind:clamtotamt" enable="false"/>
                      <Cell col="4" displaytype="number" style="align:left middle;" text="bind:retcnt" enable="false"/>
                      <Cell col="5" displaytype="number" style="align:left middle;" text="bind:rettotamt" enable="false"/>
                      <Cell col="6" displaytype="number" style="align:left middle;" text="bind:cutrate" enable="false"/>
                      <Cell col="7" displaytype="number" style="align:left middle;" text="bind:abdrate" enable="false"/>
                      <Cell col="8" displaytype="number" style="align:left middle;" text="bind:obtappcnt" enable="false"/>
                      <Cell col="9" displaytype="number" style="align:left middle;" text="bind:obtappamt" enable="false"/>
                      <Cell col="10" displaytype="number" text="bind:in_obtappamt" enable="false"/>
                      <Cell col="11" displaytype="number" style="align:right middle;" text="bind:out_obtappamt" enable="false"/>
                      <Cell col="12" displaytype="number" style="align:left middle;" text="bind:abdcnt" enable="false"/>
                      <Cell col="13" displaytype="number" style="align:left middle;" text="bind:abdamt" enable="false"/>
                      <Cell col="14" displaytype="number" style="align:left middle;" text="bind:in_abdamt" enable="false"/>
                      <Cell col="15" displaytype="number" style="align:right middle;" text="bind:out_abdamt" enable="false"/>
                      <Cell col="16" displaytype="number" style="align:left middle;" text="bind:cutcnt" enable="false"/>
                      <Cell col="17" displaytype="number" style="align:left middle;" text="bind:cuttotamt" enable="false"/>
                      <Cell col="18" displaytype="number" style="align:left middle;" text="bind:in_cutamt" enable="false"/>
                      <Cell col="19" displaytype="number" style="align:left middle;" text="bind:out_cutamt" enable="false"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static text="* 작업일자: 청구는 접수일자 기준, 반송은 해당 작업일자에 도착한 심결기준, 이의신청은 마감일자 기준" position="absolute 5 722 975 742" id="caption4" anchor="left bottom" style="color:#ff0000ff;font:Dotum,10,bold;"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption1" 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="clamymfrom" type="STRING" size="256"/>
          <Column id="clamymto" type="STRING" size="256"/>
          <Column id="clamflag" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="insukind" type="STRING" size="256"/>
          <Column id="judgrid" type="STRING" size="256"/>
          <Column id="in_cond3" type="STRING" size="256"/>
          <Column id="sclamflag" type="STRING" size="256"/>
          <Column id="sinsukind" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="clamymfrom"/>
            <Col id="clamymto"/>
            <Col id="clamflag"/>
            <Col id="ioflag"/>
            <Col id="insukind"/>
            <Col id="judgrid"/>
            <Col id="in_cond3"/>
            <Col id="sclamflag"/>
            <Col id="sinsukind"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_chk_cb_cond2_3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">원청구</Col>
            <Col id="value">0,3</Col>
          </Row>
          <Row>
            <Col id="label">누락청구</Col>
            <Col id="value">4</Col>
          </Row>
          <Row>
            <Col id="label">추가청구</Col>
            <Col id="value">2</Col>
          </Row>
          <Row>
            <Col id="label">보완청구</Col>
            <Col id="value">1</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_chk_checkbox1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">건강보험</Col>
            <Col id="value">11</Col>
          </Row>
          <Row>
            <Col id="label">의료급여</Col>
            <Col id="value">21,22</Col>
          </Row>
          <Row>
            <Col id="label">산재</Col>
            <Col id="value">41</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_U0001list" 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_list1_grdjudgclam" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="judgrnm" type="STRING" size="256" sumtext="심사자명"/>
          <Column id="clamcnt" type="STRING" size="256" sumtext="청구건수"/>
          <Column id="clamtotamt" type="STRING" size="256" sumtext="청구총진료비"/>
          <Column id="retcnt" type="STRING" size="256" sumtext="반송건수"/>
          <Column id="rettotamt" type="STRING" size="256" sumtext="반송총진료비"/>
          <Column id="cutrate" type="STRING" size="256" sumtext="이의신청율"/>
          <Column id="abdrate" type="STRING" size="256" sumtext="부제기율"/>
          <Column id="obtappcnt" type="STRING" size="256" sumtext="이의신청건수"/>
          <Column id="obtappamt" type="STRING" size="256" sumtext="이의신청액"/>
          <Column id="in_obtappamt" type="STRING" size="256" sumtext="이의신청액원내"/>
          <Column id="out_obtappamt" type="STRING" size="256" sumtext="이의신청액원외"/>
          <Column id="abdcnt" type="STRING" size="256" sumtext="부제기건수"/>
          <Column id="abdamt" type="STRING" size="256" sumtext="부제기액"/>
          <Column id="in_abdamt" type="STRING" size="256" sumtext="부제기금액원내"/>
          <Column id="out_abdamt" type="STRING" size="256" sumtext="부제기금액원외"/>
          <Column id="cutcnt" type="STRING" size="256" sumtext="조정건수"/>
          <Column id="cuttotamt" type="STRING" size="256" sumtext="삭감액"/>
          <Column id="in_cutamt" type="STRING" size="256" sumtext="원내삭감액"/>
          <Column id="out_cutamt" type="STRING" size="256" sumtext="원외삭감액"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_UserInfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="userId" type="STRING" size="256" sumtext="userId"/>
          <Column id="userNm" type="STRING" size="256" sumtext="userNm"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.group4.ipt_clamymfrom" propid="value" datasetid="ds_send" columnid="clamymfrom"/>
      <BindItem id="item1" compid="group2.group4.ipt_clamymto" propid="value" datasetid="ds_send" columnid="clamymto"/>
      <BindItem id="item2" compid="group2.group4.rdo_ioflag" propid="value" datasetid="ds_send" columnid="ioflag"/>
    </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";
function SMPIF90200_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPIF90200_onload(obj:Form, e:LoadEventInfo)
{
	var sProp="col=4,row=1,cellspacing=4,vcellspacing=0,itemWidth=-1,itemHeight=20,overflow='visible'";
	group2.group4.cb_cond2_3.setInitComp(sProp, ds_chk_cb_cond2_3,"value","label","fn_cmpEvent");
	
	var sProp="col=3,row=1,cellspacing=4,vcellspacing=0,itemWidth=-1,itemHeight=20,overflow='visible'";
	group2.group4.checkbox1.setInitComp(sProp, ds_chk_checkbox1,"value","label","fn_cmpEvent2");

	fInitialize();
	
	group2.group4.cb_cond2_3.setCheckAll(false);//초기화
	var clamflag = ds_send.getColumn(0, "clamflag");
	group2.group4.cb_cond2_3.setData(utlf_transNullToEmpty(clamflag).split("^"), "", false);
	
	group2.group4.checkbox1.setCheckAll(false);//초기화
	var insukind = ds_send.getColumn(0, "insukind");
	group2.group4.checkbox1.setData(utlf_transNullToEmpty(insukind).split("^"), "", false);
}

function fInitialize()
{	
	ds_main_list1_grdjudgclam.clearData();
	
	dsf_createDsRow("ds_tmp", [{col:"instcd", type:"STRING", size:256, val: sysf_getUserInfo("dutplceinstcd")}]);	
	
	var oParam = {};
		oParam.id          = "TRPIB00603";
		oParam.service     = "insubasecdmngtapp.JudgCmt";
		oParam.method      = "reqGetJudgRidList";
		oParam.inds        = "req=ds_tmp";
		oParam.outds       = "ds_init_U0001list=U0001 ds_init_UserInfo=UserInfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIB00603";

	tranf_submit(oParam);
	
	var curDate = utlf_getCurrentDate();
	
	ds_send.setColumn(0, "clamymfrom", curDate);
	ds_send.setColumn(0, "clamymto", curDate);
	
	ds_send.setColumn(0, "clamflag", "0,3");
	ds_send.setColumn(0, "insukind", "11");
	ds_send.setColumn(0, "ioflag", "A");
	ds_send.setColumn(0, "in_cond3", "1");
}		

function fn_cmpEvent()
{
	var chk = group2.group4.cb_cond2_3.getData();
	ds_send.setColumn(0, "clamflag", chk);
}

function fn_cmpEvent2()
{
	var chk = group2.group4.checkbox1.getData();
	ds_send.setColumn(0, "insukind", chk);
}

function group2_group4_ipt_clamymfrom_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	ds_send.setColumn(0, "clamymfrom", obj.value);
	ds_send.setColumn(0, "clamymto", obj.value)
}

function group2_group4_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fSearch();
}

function fSearch()
{
	var chk_clamymfrom = ds_send.getColumn(0, "clamymfrom");
	var chk_clamymto = ds_send.getColumn(0, "clamymto");
	
	if(utlf_isNull(chk_clamymfrom) || utlf_isNull(chk_clamymto))
	{
		sysf_messageBox("조회기준 일자는 ", "I003");
		group2.group4.ipt_clamymfrom.setFocus();
		return;
	}
	
	var af = ds_send.getColumn(0, "clamflag");
	var bf = "";
	var cf = ds_send.getColumn(0, "insukind");
	var df = "";

	var afcnt = af.length;
	var cfcnt = cf.length;

	if(!utlf_isNull(ds_send.getColumn(0, "clamflag")))
	{
		bf = af.replace("^", "','");	
		bf = af.replace(",", "','");	
	
		for(var i = 0; i < afcnt; i++)
		{
			bf = bf.replace("^", "','");	
			
			if(bf.substr(0,1) != "'")
			{
				bf = "'" + bf + "'";	
			}
		}
	}
	
	ds_send.getColumn(0, "sclamflag", bf);
	
	if(!utlf_isNull(ds_send.getColumn(0, "insukind")))
	{
		df = cf.replace("^", "','");	
		df = cf.replace(",", "','");	
		for(var i = 0; i < cfcnt; i++)
		{
			df = df.replace("^", "','");	
			
			if(df.substr(0,1) != "'")
			{
				df = "'" + df + "'";	
			}
		}
	}
	
	ds_send.setColumn(0, "sinsukind", df);
	
	var oParam = {};
		oParam.id          = "TRPIF90201";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetJudgClamStatistics";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_list1_grdjudgclam=grdjudgclam";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIF90201";

	tranf_submit(oParam);
}

function group2_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	if(ds_main_list1_grdjudgclam.rowcount == 0)
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");
	}
	else
	{
		grdf_exportExcel(group2.grdjudgclam, "심사자별 업무현황_"+utlf_getCurrentDate(), "see");
	}
}
]]></Script>
  </Form>
</FDL>