YNU_JEUS/app_home/himed/xpapps/pam/clamuncoxp/xp/SMPIF73201_진료비청구심사조정내역(기간별).xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPIF73201" position="absolute 0 0 1215 781" titletext="진료비 청구심사 조정내역" oninit="SMPIF73201_oninit" onload="SMPIF73201_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 13 1203 775" id="grp_biz" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Grid position="absolute 1 73 1195 759" id="grd_clbsmast" class="datagrid2" binddataset="ds_main_datagrid" anchor="all" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="23" band="left"/>
                      <Column size="48" band="left"/>
                      <Column size="58" band="left"/>
                      <Column size="60" band="left"/>
                      <Column size="50" band="left"/>
                      <Column size="50" band="left"/>
                      <Column size="95" band="left"/>
                      <Column size="95" band="left"/>
                      <Column size="95" band="left"/>
                      <Column size="95" band="left"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="84"/>
                      <Column size="95"/>
                      <Column size="95"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="35" band="head"/>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell rowspan="2" taborder="undefined"/>
                      <Cell col="1" rowspan="2" colspan="2" text="구분" taborder="undefined"/>
                      <Cell col="3" rowspan="2" text="진료과" taborder="undefined"/>
                      <Cell col="4" colspan="2" text="건수" taborder="undefined"/>
                      <Cell col="6" colspan="2" text="총진료비" taborder="undefined"/>
                      <Cell col="8" colspan="2" text="청구액" taborder="undefined"/>
                      <Cell col="10" colspan="2" text="상한액" taborder="undefined"/>
                      <Cell col="12" colspan="2" text="희귀" taborder="undefined"/>
                      <Cell col="14" colspan="2" text="결핵" taborder="undefined"/>
                      <Cell col="16" colspan="2" text="장애인" taborder="undefined"/>
                      <Cell col="18" colspan="2" text="청구액&#10;상한+희귀+결핵" taborder="undefined"/>
                      <Cell col="20" rowspan="2" text="청구차액" taborder="undefined"/>
                      <Cell col="21" rowspan="2" text="청구차액&#10;상한+희귀+결핵" taborder="undefined"/>
                      <Cell col="22" rowspan="2" text="건당 진료비" taborder="undefined"/>
                      <Cell col="23" text="caption1"/>
                      <Cell col="24" text="caption2"/>
                      <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="심사후"/>
                      <Cell row="1" col="23" text="caption1"/>
                      <Cell row="1" col="24" text="caption2"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head"/>
                      <Cell col="1" displaytype="combo" edittype="combo" style="align:center middle;background:EXPR(insert == 'S' ? '#99ff99' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : '#ffffff');" text="bind:ioflag" suppress="1" suppressalign="middle,over" combodataset="ds_cmb_ioflag" combocodecol="value" combodatacol="label" enable="false"/>
                      <Cell col="2" displaytype="combo" edittype="combo" style="align:center middle;background:EXPR(insert == 'S' ? '#99ff99' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : '#ffffff');" text="expr:getRowLevel(currow) == 2 ? '' : insuflag" suppress="2" suppressalign="middle,over" combodataset="ds_cmb_insuflag" combocodecol="value" combodatacol="label" enable="false"/>
                      <Cell col="3" displaytype="expr:getRowLevel(currow) == 2 ? 'text' : 'combo'" edittype="combo" style="background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:ordfildcd" combodataset="ds_cmb_ordfildcd" combocodecol="value" combodatacol="label" id="cmb_ordfildcd" enable="false"/>
                      <Cell col="4" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:bfcnt"/>
                      <Cell col="5" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:afcnt"/>
                      <Cell col="6" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:bfeditotordamt"/>
                      <Cell col="7" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:afeditotordamt"/>
                      <Cell col="8" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:bfinsuclamamt"/>
                      <Cell col="9" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:afinsuclamamt"/>
                      <Cell col="10" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:bfownbmaxexamt"/>
                      <Cell col="11" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:afownbmaxexamt"/>
                      <Cell col="12" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:bfhedisuppamt"/>
                      <Cell col="13" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:afhedisuppamt"/>
                      <Cell col="14" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:bfledisuppamt"/>
                      <Cell col="15" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:afledisuppamt"/>
                      <Cell col="16" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:bfedihandcaprfundamt"/>
                      <Cell col="17" displaytype="number" edittype="none" style="align:right middle;background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:afedihandcaprfundamt"/>
                      <Cell col="18" displaytype="number" style="background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:bfallinsuclamamt"/>
                      <Cell col="19" displaytype="number" style="background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:afallinsuclamamt"/>
                      <Cell col="20" displaytype="number" style="background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:afdiffamt"/>
                      <Cell col="21" displaytype="number" style="background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:afalldiffamt"/>
                      <Cell col="22" displaytype="number" style="background:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');background2:EXPR(insert == 'S' ? '#99ff99' : insert == 'M' ? '#99ccff' : '#ffffff');" text="bind:avrgeditotordamt"/>
                      <Cell col="23" text="bind:isexist"/>
                      <Cell col="24" text="bind:uncaym"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static text="진료비 청구심사 조정내역" position="absolute 1 52 238 75" id="cap_judgtrgtman" class="tit_2" anchor="default"/>
              <Shape position="absolute 1 68 1195 74" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
              <Div position="absolute 1 11 1196 44" align="align:center top;" id="group1" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Static text="청구년월" position="absolute 10 8 95 25" id="caption30" class="search_name" anchor="default"/>
                    <Calendar position="absolute 85 7 162 26" align="align:center middle;" id="ipt_clamym" class="input_search" taborder="1" mask="yyyy-mm" anchor="default" dateformat="yyyy-MM" editformat="yyyy-MM" onchanged="grp_biz_group1_ipt_clamym_onchanged" onkeydown="grp_biz_group1_ipt_clamym_onkeydown"/>
                    <Button position="absolute 1130 6 1186 28" id="btn_select" class="btn1" taborder="32" text="조회" anchor="top right" onclick="grp_biz_group1_btn_select_onclick"/>
                    <Shape position="absolute 1117 6 1123 28" linetype="vertical" id="line3" class="line_4" anchor="top right"/>
                    <Static text="~" position="absolute 171 6 191 26" id="caption1" anchor="default"/>
                    <Calendar position="absolute 197 7 274 26" align="align:center middle;" id="ipt_clamtoym" class="input_search" taborder="1" mask="yyyy-mm" anchor="default" dateformat="yyyy-MM" value="null" editformat="yyyy-MM" onchanged="grp_biz_group1_ipt_clamtoym_onchanged" onkeydown="grp_biz_group1_ipt_clamtoym_onkeydown"/>
                    <Combo position="absolute 379 7 479 26" id="combo1" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn"/>
                          <Column id="datacolumn"/>
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">
                            </Col>
                            <Col id="datacolumn">전체</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">6</Col>
                            <Col id="datacolumn">치과</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Combo>
                    <Static text="진료분야" position="absolute 303 9 388 26" id="caption2" class="search_name" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Button position="absolute 1138 46 1194 68" id="btn_prnt" class="btn6" text="출력" anchor="top right" onclick="grp_biz_btn_prnt_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="cap_title" text="진료비 청구심사 조정내역" class="tit_1" position="absolute 1 0 225 23"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_datagrid" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="ioflag" type="STRING" size="256" sumtext="구분" prop="KEY"/>
          <Column id="insuflag" type="STRING" size="256" sumtext="보험구분" prop="KEY"/>
          <Column id="ordfildcd" type="STRING" size="256" sumtext="합계" prop="TEXT"/>
          <Column id="bfcnt" type="BIGDECIMAL" size="256" sumtext="전월미수금"/>
          <Column id="afcnt" type="BIGDECIMAL" size="256" sumtext="원무청구액"/>
          <Column id="bfeditotordamt" type="BIGDECIMAL" size="256" sumtext="심사전청구액"/>
          <Column id="afeditotordamt" type="BIGDECIMAL" size="256" sumtext="인수차액"/>
          <Column id="bfinsuclamamt" type="BIGDECIMAL" size="256" sumtext="청구불능자체조정"/>
          <Column id="afinsuclamamt" type="BIGDECIMAL" size="256" sumtext="심사후청구액"/>
          <Column id="bfownbmaxexamt" type="BIGDECIMAL" size="256" sumtext="장기이식미수금"/>
          <Column id="afownbmaxexamt" type="BIGDECIMAL" size="256" sumtext="장기이식미수입금"/>
          <Column id="bfhedisuppamt" type="BIGDECIMAL" size="256" sumtext="삭감액"/>
          <Column id="afhedisuppamt" type="BIGDECIMAL" size="256" sumtext="미수이관"/>
          <Column id="bfledisuppamt" type="BIGDECIMAL" size="256" sumtext="금월미수금"/>
          <Column id="afledisuppamt" type="BIGDECIMAL" size="256" sumtext="존재구분"/>
          <Column id="bfedihandcaprfundamt" type="BIGDECIMAL" size="256" sumtext="추가당초보완청구"/>
          <Column id="afedihandcaprfundamt" type="BIGDECIMAL" size="256" sumtext="기타금액"/>
          <Column id="bfallinsuclamamt" type="BIGDECIMAL" size="256" sumtext="청구년월"/>
          <Column id="afallinsuclamamt" type="BIGDECIMAL" size="256" sumtext="청구년월"/>
          <Column id="afdiffamt" type="BIGDECIMAL" size="256" sumtext="청구미수입금"/>
          <Column id="afalldiffamt" type="BIGDECIMAL" size="256" sumtext="청구미수입금"/>
          <Column id="avrgeditotordamt" type="BIGDECIMAL" size="256" sumtext="청구년월"/>
          <Column id="isexist" type="STRING" size="256" sumtext="청구년월"/>
          <Column id="uncaym" type="STRING" size="256" sumtext="청구년월"/>
          <Column id="insert" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0291list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamtoym" type="STRING" size="256"/>
          <Column id="ordfildcd" type="STRING" size="256"/>
          <Column id="research" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="isexist" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_ioflag" 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">I</Col>
          </Row>
          <Row>
            <Col id="label">외래</Col>
            <Col id="value">O</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_insuflag" 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">1</Col>
          </Row>
          <Row>
            <Col id="label">DRG</Col>
            <Col id="value">D</Col>
          </Row>
          <Row>
            <Col id="label">의료급여</Col>
            <Col id="value">2</Col>
          </Row>
          <Row>
            <Col id="label">자보</Col>
            <Col id="value">3</Col>
          </Row>
          <Row>
            <Col id="label">산재</Col>
            <Col id="value">4</Col>
          </Row>
          <Row>
            <Col id="label">기타</Col>
            <Col id="value">5</Col>
          </Row>
          <Row>
            <Col id="label">장기이식</Col>
            <Col id="value">9</Col>
          </Row>
          <Row>
            <Col id="label">완화</Col>
            <Col id="value">B</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_ordfildcd" 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">1</Col>
          </Row>
          <Row>
            <Col id="label">치과</Col>
            <Col id="value">6</Col>
          </Row>
          <Row>
            <Col id="label">정신과</Col>
            <Col id="value">7</Col>
          </Row>
          <Row>
            <Col id="label">DRG</Col>
            <Col id="value">D</Col>
          </Row>
          <Row>
            <Col id="label">완화</Col>
            <Col id="value">B</Col>
          </Row>
          <Row>
            <Col id="label">소계</Col>
          </Row>
          <Row>
            <Col id="label">피스</Col>
            <Col id="value">C</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.group1.ipt_clamym" propid="value" datasetid="ds_send" columnid="clamym"/>
      <BindItem id="item1" compid="grp_biz.group1.ipt_clamtoym" propid="value" datasetid="ds_send" columnid="clamtoym"/>
      <BindItem id="item2" compid="grp_biz.group1.combo1" propid="value" datasetid="ds_send" columnid="ordfildcd"/>
    </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 SMPIF73201_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPIF73201_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grp_biz.grd_clbsmast);
	grdf_setRowTypeIcon(grp_biz.grd_clbsmast, 0);
	
	fInitialize();
}

function fInitialize()
{
	var arrParam = [{dsNm: "ds_init_P0291list", cdGrpId: "P0291"}]
				   
	appf_getCodeList(arrParam);	
	
	pamGetDeptCDDrIDList();
	
	ds_send.setColumn(0, "clamym", String(utlf_getCurrentDate()).substr(0,6));
	ds_send.setColumn(0, "clamtoym", String(utlf_getCurrentDate()).substr(0,6));
	
	grp_biz.group1.combo1.index = 0;
}

function grp_biz_group1_ipt_clamym_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	var date = obj.value;
	
	ds_send.setColumn(0, "clamym", String(date).substr(0, 6));
	
	grp_biz.group1.ipt_clamtoym.setFocus();
}

function grp_biz_group1_ipt_clamym_onkeydown(obj:Calendar, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		grp_biz_group1_ipt_clamym_onchanged
	}
}

function grp_biz_group1_ipt_clamtoym_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	var date = obj.value;
	
	ds_send.setColumn(0, "clamtoym", String(date).substr(0, 6));
}

function grp_biz_group1_ipt_clamtoym_onkeydown(obj:Calendar, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		grp_biz_group1_ipt_clamtoym_onchanged();
		
		grp_biz_group1_btn_select_onclick();
	}
}

function grp_biz_group1_btn_select_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_send.setColumn(0, "research", "");
	fGetDocuList();
	
	fGetListExistChk();
}

function fGetDocuList()
{
	var oParam = {};
		oParam.id          = "TRPIF73200";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetClamAdjustList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_datagrid=datagrid";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIF73200";

	tranf_submit(oParam);
	
	ds_main_datagrid.updatecontrol = false;
	dsf_setDefaultVal(ds_main_datagrid, "bfcnt:0,afcnt:0,bfeditotordamt:0,afeditotordamt:0,bfinsuclamamt:0,afinsuclamamt:0,bfownbmaxexamt:0,afownbmaxexamt:0,bfhedisuppamt:0,afhedisuppamt:0,bfledisuppamt:0.afledisuppamt:0,bfedihandcaprfundamt:0,afedihandcaprfundamt:0,bfallinsuclamamt:0,afallinsuclamamt:0,afdiffamt:0,afalldiffamt:0,avrgeditotordamt:0");
	ds_main_datagrid.updatecontrol = true;

	ds_main_datagrid.rowposition = -1 ;
	
	for(var i = 0; i < ds_main_datagrid.rowcount; i++)
	{
		if(ds_main_datagrid.getColumn(i, "isexist") == "I")
		{
			var arrRow = new Array();
			
			arrRow[0] = i;
			
			grdf_setStatus(grp_biz.grd_clbsmast, "I", arrRow);
		}
	}
	
	var ioflagGubun = "";
	var ioflagGubunEnd = "";
	
	var insuflagGubun = "";
	var insuflagGubunEnd = "";

	var bfcnt = 0;
	var afcnt = 0;
	var bfeditotordamt = 0;
	var afeditotordamt = 0;
	var bfinsuclamamt = 0;
	var afinsuclamamt = 0;
	var bfownbmaxexamt = 0;
	var afownbmaxexamt = 0;
	var bfhedisuppamt = 0;
	var afhedisuppamt = 0;
	var bfledisuppamt = 0;
	var bfledisuppamt = 0;
	var afledisuppamt = 0;
	var bfedihandcaprfundamt = 0;
	var afedihandcaprfundamt = 0;
	var bfallinsuclamamt = 0;
	var afallinsuclamamt = 0;
	var afdiffamt = 0;
	var afalldiffamt = 0;
	var avrgeditotordamt = 0; 
	
	ds_main_datagrid.updatecontrol = false;
	for(var i = 0; i < ds_main_datagrid.rowcount + 1; i++)
	{
		ioflagGubun = ds_main_datagrid.getColumn(i, "ioflag");
		insuflagGubun = ds_main_datagrid.getColumn(i, "insuflag");

		if(utlf_isNull(ioflagGubunEnd) && utlf_isNull(insuflagGubunEnd))
		{
			ioflagGubunEnd = ds_main_datagrid.getColumn(i, "ioflag");
			insuflagGubunEnd = ds_main_datagrid.getColumn(i, "insuflag");
			continue;
		}
		
		if(insuflagGubun != insuflagGubunEnd)
		{
			ds_main_datagrid.insertRow(i);
			ds_main_datagrid.setColumn(i, "ordfildcd", "");
			ds_main_datagrid.setColumn(i, "ioflag", ioflagGubunEnd);
			ds_main_datagrid.setColumn(i, "insuflag", insuflagGubunEnd);
			ds_main_datagrid.setColumn(i, "insert", "M");
	
			i++;
		}
		
		if(ioflagGubun != ioflagGubunEnd)
		{
			ds_main_datagrid.insertRow(i);
			ds_main_datagrid.setColumn(i, "ordfildcd", "합계");
			ds_main_datagrid.setColumn(i, "ioflag", ioflagGubunEnd);
			ds_main_datagrid.setColumn(i, "insuflag", insuflagGubunEnd);
 			ds_main_datagrid.setColumn(i, "insert", "S");
			i++;
		}
				
		ioflagGubunEnd = ds_main_datagrid.getColumn(i, "ioflag");
		insuflagGubunEnd = ds_main_datagrid.getColumn(i, "insuflag");
	}

	for(var j = 0; j < ds_main_datagrid.rowcount; j++)
	{
		if(ds_main_datagrid.getColumn(j , "insert") != "M")
		{
			if(ds_main_datagrid.getColumn(j, "insert") == "S")
			{
				var ioflag = ds_main_datagrid.getColumn(j, "ioflag");
				
				for(var z = 0; z < ds_main_datagrid.rowcount; z++)
				{
					if(ds_main_datagrid.getColumn(z, "ioflag") == ioflag && ds_main_datagrid.getColumn(z, "insert") == "M")
					{
						bfcnt += ds_main_datagrid.getColumn(z, "bfcnt");
						afcnt += ds_main_datagrid.getColumn(z, "afcnt");
						bfeditotordamt += ds_main_datagrid.getColumn(z, "bfeditotordamt");
						afeditotordamt += ds_main_datagrid.getColumn(z, "afeditotordamt");
						bfinsuclamamt += ds_main_datagrid.getColumn(z, "bfinsuclamamt");
						afinsuclamamt += ds_main_datagrid.getColumn(z, "afinsuclamamt");
						bfownbmaxexamt += ds_main_datagrid.getColumn(z, "bfownbmaxexamt");
						afownbmaxexamt += ds_main_datagrid.getColumn(z, "afownbmaxexamt");
						bfhedisuppamt += ds_main_datagrid.getColumn(z, "bfhedisuppamt");
						afhedisuppamt += ds_main_datagrid.getColumn(z, "afhedisuppamt");
						bfledisuppamt += ds_main_datagrid.getColumn(z, "bfledisuppamt");
						afledisuppamt += ds_main_datagrid.getColumn(z, "afledisuppamt");
						bfedihandcaprfundamt += ds_main_datagrid.getColumn(z, "bfedihandcaprfundamt");
						afedihandcaprfundamt += ds_main_datagrid.getColumn(z, "afedihandcaprfundamt");
						bfallinsuclamamt += ds_main_datagrid.getColumn(z, "bfallinsuclamamt");
						afallinsuclamamt += ds_main_datagrid.getColumn(z, "afallinsuclamamt");
						afdiffamt += ds_main_datagrid.getColumn(z, "afdiffamt");
						afalldiffamt += ds_main_datagrid.getColumn(z, "afalldiffamt");
					}
				}
				
				ds_main_datagrid.setColumn(j, "bfcnt", bfcnt);
				ds_main_datagrid.setColumn(j, "afcnt", afcnt);
				ds_main_datagrid.setColumn(j, "bfeditotordamt", bfeditotordamt);
				ds_main_datagrid.setColumn(j, "afeditotordamt", afeditotordamt);
				ds_main_datagrid.setColumn(j, "bfinsuclamamt", bfinsuclamamt);
				ds_main_datagrid.setColumn(j, "afinsuclamamt", afinsuclamamt);
				ds_main_datagrid.setColumn(j, "bfownbmaxexamt", bfownbmaxexamt);
				ds_main_datagrid.setColumn(j, "afownbmaxexamt", afownbmaxexamt);
				ds_main_datagrid.setColumn(j, "bfhedisuppamt", bfhedisuppamt);
				ds_main_datagrid.setColumn(j, "afhedisuppamt", afhedisuppamt);
				ds_main_datagrid.setColumn(j, "bfledisuppamt", bfledisuppamt);
				ds_main_datagrid.setColumn(j, "afledisuppamt", afledisuppamt);
				ds_main_datagrid.setColumn(j, "bfedihandcaprfundamt", bfedihandcaprfundamt);
				ds_main_datagrid.setColumn(j, "afedihandcaprfundamt", afedihandcaprfundamt);
				ds_main_datagrid.setColumn(j, "bfallinsuclamamt", bfallinsuclamamt);
				ds_main_datagrid.setColumn(j, "afallinsuclamamt", afallinsuclamamt);
				ds_main_datagrid.setColumn(j, "afdiffamt", afdiffamt);
				ds_main_datagrid.setColumn(j, "afalldiffamt", afalldiffamt);
				ds_main_datagrid.setColumn(j, "avrgeditotordamt", Math.floor(afeditotordamt/afcnt));
				
				bfcnt = 0;
				afcnt = 0;
				bfeditotordamt = 0;
				afeditotordamt = 0;
				bfinsuclamamt = 0;
				afinsuclamamt = 0;
				bfownbmaxexamt = 0;
				afownbmaxexamt = 0;
				bfhedisuppamt = 0;
				afhedisuppamt = 0;
				bfledisuppamt = 0;
				afledisuppamt = 0;
				bfedihandcaprfundamt = 0;
				afedihandcaprfundamt = 0;
				bfallinsuclamamt = 0;
				afallinsuclamamt = 0;
				afdiffamt = 0;
				afalldiffamt = 0;
				avrgeditotordamt = 0;
			}
			else
			{
				bfcnt += ds_main_datagrid.getColumn(j, "bfcnt");
				afcnt += ds_main_datagrid.getColumn(j, "afcnt");
				bfeditotordamt += ds_main_datagrid.getColumn(j, "bfeditotordamt");
				afeditotordamt += ds_main_datagrid.getColumn(j, "afeditotordamt");
				bfinsuclamamt += ds_main_datagrid.getColumn(j, "bfinsuclamamt");
				afinsuclamamt += ds_main_datagrid.getColumn(j, "afinsuclamamt");
				bfownbmaxexamt += ds_main_datagrid.getColumn(j, "bfownbmaxexamt");
				afownbmaxexamt += ds_main_datagrid.getColumn(j, "afownbmaxexamt");
				bfhedisuppamt += ds_main_datagrid.getColumn(j, "bfhedisuppamt");
				afhedisuppamt += ds_main_datagrid.getColumn(j, "afhedisuppamt");
				bfledisuppamt += ds_main_datagrid.getColumn(j, "bfledisuppamt");
				afledisuppamt += ds_main_datagrid.getColumn(j, "afledisuppamt");
				bfedihandcaprfundamt += ds_main_datagrid.getColumn(j, "bfedihandcaprfundamt");
				afedihandcaprfundamt += ds_main_datagrid.getColumn(j, "afedihandcaprfundamt");
				bfallinsuclamamt += ds_main_datagrid.getColumn(j, "bfallinsuclamamt");
				afallinsuclamamt += ds_main_datagrid.getColumn(j, "afallinsuclamamt");
				afdiffamt += ds_main_datagrid.getColumn(j, "afdiffamt");
				afalldiffamt += ds_main_datagrid.getColumn(j, "afalldiffamt");
			}
		}
		else
		{
			ds_main_datagrid.setColumn(j, "bfcnt", bfcnt);
			ds_main_datagrid.setColumn(j, "afcnt", afcnt);
			ds_main_datagrid.setColumn(j, "bfeditotordamt", bfeditotordamt);
			ds_main_datagrid.setColumn(j, "afeditotordamt", afeditotordamt);
			ds_main_datagrid.setColumn(j, "bfinsuclamamt", bfinsuclamamt);
			ds_main_datagrid.setColumn(j, "afinsuclamamt", afinsuclamamt);
			ds_main_datagrid.setColumn(j, "bfownbmaxexamt", bfownbmaxexamt);
			ds_main_datagrid.setColumn(j, "afownbmaxexamt", afownbmaxexamt);
			ds_main_datagrid.setColumn(j, "bfhedisuppamt", bfhedisuppamt);
			ds_main_datagrid.setColumn(j, "afhedisuppamt", afhedisuppamt);
			ds_main_datagrid.setColumn(j, "bfledisuppamt", bfledisuppamt);
			ds_main_datagrid.setColumn(j, "afledisuppamt", afledisuppamt);
			ds_main_datagrid.setColumn(j, "bfedihandcaprfundamt", bfedihandcaprfundamt);
			ds_main_datagrid.setColumn(j, "afedihandcaprfundamt", afedihandcaprfundamt);
			ds_main_datagrid.setColumn(j, "bfallinsuclamamt", bfallinsuclamamt);
			ds_main_datagrid.setColumn(j, "afallinsuclamamt", afallinsuclamamt);
			ds_main_datagrid.setColumn(j, "afdiffamt", afdiffamt);
			ds_main_datagrid.setColumn(j, "afalldiffamt", afalldiffamt);
			ds_main_datagrid.setColumn(j, "avrgeditotordamt", Math.floor(afeditotordamt/afcnt));
			
			bfcnt = 0;
			afcnt = 0;
			bfeditotordamt = 0;
			afeditotordamt = 0;
			bfinsuclamamt = 0;
			afinsuclamamt = 0;
			bfownbmaxexamt = 0;
			afownbmaxexamt = 0;
			bfhedisuppamt = 0;
			afhedisuppamt = 0;
			bfledisuppamt = 0;
			afledisuppamt = 0;
			bfedihandcaprfundamt = 0;
			afedihandcaprfundamt = 0;
			bfallinsuclamamt = 0;
			afallinsuclamamt = 0;
			afdiffamt = 0;
			afalldiffamt = 0;
			avrgeditotordamt = 0;
		}
	}
	
	ds_main_datagrid.updatecontrol = true;
	
	if(ds_main_datagrid.getColumn(0, "isexist") == "O")
	{
		grp_biz.btn_prnt.enable = true;
	}
	else
	{
		grp_biz.btn_prnt.enable = false;
	}
}

function fGetListExistChk()
{
	if(ds_main_datagrid.getColumn(0, "isexist") == "O")
	{
		ds_hidden.setColumn(0, "isexist", "Y");
	}
	else
	{
		ds_hidden.setColumn(0, "isexist", "N");
	}
}

function grp_biz_btn_prnt_onclick(obj:Button,  e:ClickEventInfo)
{
	var objDOM = rptf_createDOM();	// DOM 객체 설정
		rptf_setNodeListToDOM(objDOM, "/root/main/datagrid", ds_main_datagrid);
		rptf_setNodeListToDOM(objDOM, "/root/send", ds_send);
		
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;

	var option =// //"open=1;save=1;directprint=0;printdialog=0;print=1;zoom=0;";	

	rptf_exeReportPreview30(["RPPIF73201"],[objParam], option);
}
]]></Script>
  </Form>
</FDL>