YNU_JEUS/app_home/himed/xpapps/pam/uncoamtmngtxp/xp/SMPAM00500_미수발생종결관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPAM00500" position="absolute 0 0 1209 779" titletext="임상 연구 검사비 미수 청구 관리" onload="SMPAM00500_onload" oninit="SMPAM00500_oninit">
    <Layouts>
      <Layout>
        <Div id="grp" taborder="4" position="absolute 0 25 1195 65" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Static id="caption1" text="수납 기간 :" class="search_name" position="absolute 5 12 100 29" anchor="default"/>
              <Calendar id="ipt_fromdd" taborder="1" class="input_search" position="absolute 99 11 189 30" anchor="default" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd" value="null"/>
              <Static id="caption4" text="~" position="absolute 193 13 204 28" anchor="default"/>
              <Calendar id="ipt_todd" taborder="2" class="input_search" position="absolute 206 11 296 30" anchor="default" autoselect="true" dateformat="yyyy-MM-dd"/>
              <Static id="caption5" text="※ 발생 및 종결 기준 : [ 등록번호 ]  [ 진료일 ]  [ 생성번호 ]  [ 미수코드 ]" position="absolute 310 11 725 31" anchor="default"/>
              <Shape id="line13" linetype="vertical" position="absolute 1115 6 1121 33" anchor="top right"/>
              <Button id="btn_search" taborder="3" text="조회" class="btn1" position="absolute 1130 9 1186 31" anchor="top right" onclick="grp_btn_search_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static text="미수 발생 및 종결 관리" position="absolute 0 0 180 25" align="align:center middle;" id="cap_title" class="tit_1"/>
        <Static text="미수 발생 및 종결 오류 내역" position="absolute 0 73 197 89" id="caption2" class="tit_2"/>
        <Shape position="absolute 0 89 1195 95" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
        <Grid position="absolute 0 94 1195 484" align="align:center middle;" id="grd_err" binddataset="ds_main_ptlist_ptinfo" autofittype="col" oncelldblclick="grd_err_oncelldblclick" cellsizebandtype="allband" cellsizingtype="col" anchor="left top right" autoenter="select">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25"/>
                <Column size="40"/>
                <Column size="90"/>
                <Column size="90"/>
                <Column size="90"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="80"/>
                <Column size="0"/>
                <Column size="80"/>
                <Column size="0"/>
                <Column size="120"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="80"/>
                <Column size="0"/>
                <Column size="90"/>
                <Column size="0"/>
                <Column size="140"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="80"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </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" text="진료형태"/>
                <Cell col="8" text="진료일"/>
                <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" text="주유형"/>
                <Cell col="16" text="보조유형코드"/>
                <Cell col="17" text="보조유형"/>
                <Cell col="18" text="미수코드"/>
                <Cell col="19" text="미수명"/>
                <Cell col="20" text="정산구분"/>
                <Cell col="21" text="미수금액"/>
                <Cell col="22" text="수납금액"/>
                <Cell col="23" text="대손금액"/>
                <Cell col="24" text="종결여부"/>
                <Cell col="25" text="수납일"/>
                <Cell col="26" text="영수증번호"/>
                <Cell col="27" text="영수증일련번호"/>
                <Cell col="28" text="영수증번호별일련번호"/>
                <Cell col="29" text="수납상태"/>
                <Cell col="30" text="수납일"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="expr:currow + 1"/>
                <Cell col="1" displaytype="combo" style="align:center middle;" text="bind:errflag" combodataset="ds_cmb_errflag" combocodecol="value" combodatacol="label" enable="false"/>
                <Cell col="2" displaytype="number" style="align:right middle;color:red;color2:red;font:Dotum,9,bold;" text="bind:uncosumamt"/>
                <Cell col="3" displaytype="number" style="align:right middle;color:blue;color2:blue;font:Dotum,9,bold;" text="bind:rcptsumamt"/>
                <Cell col="4" displaytype="number" style="align:right middle;color:purple;color2:purple;font:Dotum,9,bold;" text="bind:remnamt"/>
                <Cell col="5" style="align:center middle;" text="bind:pid"/>
                <Cell col="6" style="align:center middle;" text="bind:hngnm"/>
                <Cell col="7" displaytype="combo" style="align:center middle;" text="bind:ordtype" combodataset="ds_cmb_ordtype" combocodecol="value" combodatacol="label" enable="false"/>
                <Cell col="8" displaytype="date" style="align:center middle;" text="bind:orddd" calendardisplaynulltype="none"/>
                <Cell col="9" displaytype="date" style="align:center middle;" text="bind:cretno" mask="yyyy-MM-dd" calendardisplaynulltype="none"/>
                <Cell col="10" displaytype="date" style="align:center middle;" text="bind:dschdd" calendardisplaynulltype="none"/>
                <Cell col="11" text="bind:orddeptcd"/>
                <Cell col="12" style="align:center middle;" text="bind:orddeptnm" wordwrap="char" tooltiptype="bottom,right" tooltiptext="bind:orddeptnm"/>
                <Cell col="13" style="align:center middle;" text="bind:orddrid"/>
                <Cell col="14" style="align:center middle;" text="bind:insukind"/>
                <Cell col="15" style="align:center middle;" text="bind:insukindnm" tooltiptype="bottom,right" tooltiptext="bind:insukindnm"/>
                <Cell col="16" style="align:center middle;" text="bind:suppkind"/>
                <Cell col="17" style="align:center middle;" text="bind:suppkindnm" tooltiptype="bottom,right" tooltiptext="bind:suppkindnm"/>
                <Cell col="18" text="bind:uncocd"/>
                <Cell col="19" style="align:center middle;" text="bind:unconm" tooltiptype="bottom,right" tooltiptext="bind:unconm"/>
                <Cell col="20" text="bind:uncorcptflag"/>
                <Cell col="21" text="bind:uncoamt"/>
                <Cell col="22" text="bind:rcptamt"/>
                <Cell col="23" text="bind:debtamt"/>
                <Cell col="24" displaytype="combo" edittype="combo" text="bind:endyn" enable="false"/>
                <Cell col="25" text="bind:rcptdd"/>
                <Cell col="26" text="bind:rcptno"/>
                <Cell col="27" text="bind:rcptseqno"/>
                <Cell col="28" text="bind:seqno"/>
                <Cell col="29" text="bind:rcptstat"/>
                <Cell col="30" displaytype="date" style="align:center middle;" text="bind:rcptexecdd" calendardisplaynulltype="none"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static text="환자별 미수 내역" position="absolute 0 494 123 510" id="caption3" class="tit_2"/>
        <Shape position="absolute 0 510 1195 516" linetype="horizontal" id="line2" class="line_1" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
        <Grid position="absolute 0 515 1195 745" align="align:center middle;" id="grd_unco" binddataset="ds_main_uncolist_uncoinfo" autoenter="select" anchor="all" selecttype="cell" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25" band="left"/>
                <Column size="60" band="left"/>
                <Column size="60" band="left"/>
                <Column size="60" band="left"/>
                <Column size="80" band="left"/>
                <Column size="60" band="left"/>
                <Column size="100" band="left"/>
                <Column size="0"/>
                <Column size="120"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="60"/>
                <Column size="140"/>
                <Column size="60"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="80"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="80"/>
                <Column size="200"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </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" style="line:EXPR(lineStyle2);" text="퇴원일"/>
                <Cell col="7" text="진료과코드"/>
                <Cell col="8" text="진료과"/>
                <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" text="미수명"/>
                <Cell col="16" text="정산구분"/>
                <Cell col="17" text="미수금액"/>
                <Cell col="18" text="수납금액"/>
                <Cell col="19" text="대손금액"/>
                <Cell col="20" text="종결여부"/>
                <Cell col="21" text="수납상태"/>
                <Cell col="22" text="RCPTDD"/>
                <Cell col="23" text="RCPTNO"/>
                <Cell col="24" text="R.SEQNO"/>
                <Cell col="25" text="SEQNO"/>
                <Cell col="26" text="수납일"/>
                <Cell col="27" text="비고"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" style="background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:pid"/>
                <Cell col="2" style="background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:hngnm"/>
                <Cell col="3" displaytype="combo" style="align:center middle;background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:ordtype" combodataset="ds_cmb_ordtype" combocodecol="value" combodatacol="label" enable="false"/>
                <Cell col="4" displaytype="date" style="align:center middle;background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:orddd" calendardisplaynulltype="none"/>
                <Cell col="5" displaytype="text" style="align:center middle;line:EXPR(lineStyle1);background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:cretno"/>
                <Cell col="6" displaytype="date" edittype="date" style="align:center middle;line:EXPR(lineStyle2);background:EXPR(bgColor_dschdd);background2:EXPR(bgColor_dschdd);font:EXPR(bgColor_dschdd == '#ffb4b4' ? 'arial,9,bold' : '');" text="bind:dschdd" combodisplay="edit" calendardisplay="edit" calendardisplaynulltype="none"/>
                <Cell col="7" style="background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:orddeptcd"/>
                <Cell col="8" style="align:center middle;background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:orddeptnm"/>
                <Cell col="9" style="background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:orddrid"/>
                <Cell col="10" style="background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:insukind"/>
                <Cell col="11" style="background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:insukindnm"/>
                <Cell col="12" style="background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:suppkind"/>
                <Cell col="13" style="background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:suppkindnm"/>
                <Cell col="14" style="align:center middle;background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:uncocd"/>
                <Cell col="15" style="align:center middle;background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:unconm"/>
                <Cell col="16" displaytype="combo" style="align:center middle;line:EXPR(lineStyle1);background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:uncorcptflag" combodataset="ds_cmb_uncorcptflag" combocodecol="value" combodatacol="label" enable="false"/>
                <Cell col="17" displaytype="number" edittype="normal" style="align:right middle;padding:0 4 0 0;line:EXPR(lineStyle2);background:EXPR(bgColor_uncoamt);background2:EXPR(bgColor_uncoamt);font:EXPR(bgColor_uncoamt == '#ffb4b4' ? 'arial,9,bold' : '');" text="bind:uncoamt"/>
                <Cell col="18" displaytype="number" edittype="normal" style="align:right middle;padding:0 4 0 0;line:EXPR(lineStyle2);background:EXPR(bgColor_rcptamt);background2:EXPR(bgColor_rcptamt);font:EXPR(bgColor_rcptamt == '#ffb4b4' ? 'arial,9,bold' : '');" text="bind:rcptamt"/>
                <Cell col="19" displaytype="number" edittype="normal" style="align:right middle;padding:0 3 0 0;line:EXPR(lineStyle2);background:EXPR(bgColor_debtamt);background2:EXPR(bgColor_debtamt);font:EXPR(bgColor_debtamt == '#ffb4b4' ? 'arial,9,bold' : '');" text="bind:debtamt"/>
                <Cell col="20" displaytype="combo" edittype="combo" style="align:center middle;line:EXPR(lineStyle2);background:EXPR(bgColor_endyn);background2:EXPR(bgColor_endyn);font:EXPR(bgColor_endyn == '#ffb4b4' ? 'arial,9,bold' : '');" text="bind:endyn" combodataset="ds_cmb_endyn" combocodecol="value" combodatacol="label" combodisplay="edit"/>
                <Cell col="21" displaytype="combo" edittype="combo" style="align:center middle;line:EXPR(lineStyle2);background:EXPR(bgColor_rcptstat);background2:EXPR(bgColor_rcptstat);font:EXPR(bgColor_rcptstat == '#ffb4b4' ? 'arial,9,bold' : '');" text="bind:rcptstat" combodataset="ds_cmb_rcptstat" combocodecol="value" combodatacol="label" combodisplay="edit"/>
                <Cell col="22" displaytype="date" style="align:center middle;background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:rcptdd" calendardisplaynulltype="none"/>
                <Cell col="23" displaytype="text" style="align:center middle;background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:rcptno"/>
                <Cell col="24" style="align:center middle;background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:rcptseqno"/>
                <Cell col="25" style="align:center middle;background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:seqno"/>
                <Cell col="26" displaytype="date" style="align:center middle;background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:rcptexecdd" calendardisplaynulltype="none"/>
                <Cell col="27" style="align:left middle;padding:0 0 0 3;background:EXPR(bgColor);background2:EXPR(bgColor);" text="bind:remfact"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <CheckBox position="absolute 140 495 270 510" id="chk_totalflag" text="미수 내역 전체 조회" falsevalue="N" truevalue="Y" onchanged="chk_totalflag_onchanged"/>
        <CheckBox position="absolute 281 495 396 510" id="chk_rcptflag" text="수납 취소건 포함" falsevalue="N" truevalue="Y" onchanged="chk_rcptflag_onchanged"/>
        <Button position="absolute 1145 70 1195 89" id="btn_xls1" class="btn7" text="엑셀" onclick="btn_xls1_onclick" anchor="top right"/>
        <Button position="absolute 1145 491 1195 510" id="btn_xls2" class="btn7" text="엑셀" onclick="btn_xls2_onclick" anchor="top right"/>
        <Button position="absolute 1092 747 1196 769" id="btn_save" class="btn4" text="수정내역저장" onclick="btn_save_onclick" anchor="right bottom"/>
        <Static text="발생 :" position="absolute 745 491 780 510" align="align:center middle;" id="caption6" anchor="top right"/>
        <Static text="수납 :" position="absolute 874 491 909 510" align="align:center middle;" id="caption8" anchor="top right"/>
        <Static text="잔액 :" position="absolute 1004 491 1039 510" align="align:center middle;" id="caption10" anchor="top right"/>
        <Static text="환자별 수정 내역은 수정 후 바로 갱신되지만, 미수 발생 및 종결 오류 내역은 재조회 후 갱신됩니다." position="absolute 542 748 1080 768" id="caption7" visible="false" anchor="right bottom"/>
        <MaskEdit id="cap_uncoamt" taborder="5" position="absolute 781 491 861 510" style="background:stretch 5,5;border:1 solid #808080ff ;color:red;font:Dotum,9,bold;" mask="9,990" anchor="top right"/>
        <MaskEdit id="cap_rcptamt" taborder="6" mask="9,990" position="absolute 910 491 990 510" style="background:stretch 5,5;border:1 solid #808080ff ;color:blue;font:Dotum,9,bold;" anchor="top right"/>
        <MaskEdit id="cap_remnamt" taborder="7" mask="9,990" position="absolute 1040 491 1120 510" style="background:stretch 5,5;border:1 solid #808080ff ;color:purple;font:Dotum,9,bold;" anchor="top right"/>
      </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="totalflag" type="STRING" size="256"/>
          <Column id="rcptflag" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="dschdd" type="STRING" size="256"/>
          <Column id="uncocd" type="STRING" size="256"/>
          <Column id="unco" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="totalflag"/>
            <Col id="rcptflag"/>
            <Col id="pid"/>
            <Col id="orddd"/>
            <Col id="cretno"/>
            <Col id="dschdd"/>
            <Col id="uncocd"/>
            <Col id="unco"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_ptlist_ptinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="errflag" type="STRING" size="256" sumtext="오류구분"/>
          <Column id="uncosumamt" type="STRING" size="256" sumtext="미수합계"/>
          <Column id="rcptsumamt" type="STRING" size="256" sumtext="수납합계"/>
          <Column id="remnamt" type="STRING" size="256" sumtext="미수잔액"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="ordtype" type="STRING" size="256" sumtext="진료형태"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="dschdd" type="STRING" size="256" sumtext="퇴원일"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과명"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="진료의"/>
          <Column id="insukind" type="STRING" size="256" sumtext="주유형코드"/>
          <Column id="insukindnm" type="STRING" size="256" sumtext="주유형"/>
          <Column id="suppkind" type="STRING" size="256" sumtext="보조유형코드"/>
          <Column id="suppkindnm" type="STRING" size="256" sumtext="보조유형"/>
          <Column id="uncocd" type="STRING" size="256" sumtext="미수코드"/>
          <Column id="unconm" type="STRING" size="256" sumtext="미수명"/>
          <Column id="uncorcptflag" type="STRING" size="256" sumtext="정산구분"/>
          <Column id="uncoamt" type="STRING" size="256" sumtext="미수금액"/>
          <Column id="rcptamt" type="STRING" size="256" sumtext="수납금액"/>
          <Column id="debtamt" type="STRING" size="256" sumtext="대손금액"/>
          <Column id="endyn" type="STRING" size="256" sumtext="종결여부"/>
          <Column id="rcptdd" type="STRING" size="256" sumtext="영수증처리일"/>
          <Column id="rcptno" type="STRING" size="256" sumtext="영수증번호"/>
          <Column id="rcptseqno" type="STRING" size="256" sumtext="영수증일련번호"/>
          <Column id="seqno" type="STRING" size="256" sumtext="영수증번호별일련번호"/>
          <Column id="rcptstat" type="STRING" size="256" sumtext="수납상태"/>
          <Column id="rcptexecdd" type="STRING" size="256" sumtext="수납일"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_uncolist_uncoinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_uncolist_uncoinfo_oncolumnchanged">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="ordtype" type="STRING" size="256" sumtext="진료형태"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="dschdd" type="STRING" size="256" sumtext="퇴원일"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과명"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="진료의"/>
          <Column id="insukind" type="STRING" size="256" sumtext="주유형코드"/>
          <Column id="insukindnm" type="STRING" size="256" sumtext="주유형"/>
          <Column id="suppkind" type="STRING" size="256" sumtext="보조유형코드"/>
          <Column id="suppkindnm" type="STRING" size="256" sumtext="보조유형"/>
          <Column id="uncocd" type="STRING" size="256" sumtext="미수코드"/>
          <Column id="unconm" type="STRING" size="256" sumtext="미수명"/>
          <Column id="uncorcptflag" type="STRING" size="256" sumtext="정산구분"/>
          <Column id="uncoamt" type="STRING" size="256" sumtext="미수금액"/>
          <Column id="rcptamt" type="STRING" size="256" sumtext="수납금액"/>
          <Column id="debtamt" type="STRING" size="256" sumtext="대손금액"/>
          <Column id="endyn" type="STRING" size="256" sumtext="종결여부"/>
          <Column id="rcptdd" type="STRING" size="256" sumtext="영수증처리일"/>
          <Column id="rcptno" type="STRING" size="256" sumtext="영수증번호"/>
          <Column id="rcptseqno" type="STRING" size="256" sumtext="영수증일련번호"/>
          <Column id="seqno" type="STRING" size="256" sumtext="영수증번호별일련번호"/>
          <Column id="rcptexecdd" type="STRING" size="256" sumtext="수납일"/>
          <Column id="rcptstat" type="STRING" size="256" sumtext="수납상태"/>
          <Column id="remfact" type="STRING" size="256" sumtext="비고"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cmb_errflag" 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">E</Col>
          </Row>
          <Row>
            <Col id="label">미결</Col>
            <Col id="value">P</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_ordtype" 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">O</Col>
          </Row>
          <Row>
            <Col id="label">입원</Col>
            <Col id="value">I</Col>
          </Row>
          <Row>
            <Col id="label">응급</Col>
            <Col id="value">E</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_uncorcptflag" 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">2</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_endyn" 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">Y</Col>
          </Row>
          <Row>
            <Col id="label">미결</Col>
            <Col id="value">N</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_rcptstat" 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">C</Col>
            <Col id="value">C</Col>
          </Row>
          <Row>
            <Col id="label">D</Col>
            <Col id="value">D</Col>
          </Row>
          <Row>
            <Col id="label">Y</Col>
            <Col id="value">Y</Col>
          </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="uncoamt" type="STRING" size="256"/>
          <Column id="rcptamt" type="STRING" size="256"/>
          <Column id="remnamt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="uncoamt">0</Col>
            <Col id="rcptamt">0</Col>
            <Col id="remnamt">0</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_unco" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp.ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd"/>
      <BindItem id="item1" compid="grp.ipt_todd" propid="value" datasetid="ds_send" columnid="todd"/>
      <BindItem id="item2" compid="chk_rcptflag" propid="value" datasetid="ds_send" columnid="rcptflag"/>
      <BindItem id="item3" compid="cap_rcptamt" propid="value" datasetid="ds_hidden" columnid="rcptamt"/>
      <BindItem id="item4" compid="cap_remnamt" propid="value" datasetid="ds_hidden" columnid="remnamt"/>
      <BindItem id="item5" compid="cap_uncoamt" propid="value" datasetid="ds_hidden" columnid="uncoamt"/>
      <BindItem id="item6" compid="chk_totalflag" propid="value" datasetid="ds_send" columnid="totalflag"/>
    </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';

var arErrorCode = new HashArray();
function SMPAM00500_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPAM00500_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_err);
	grdf_initGrid(grd_unco);
	grdf_setRowTypeIcon(grd_unco, 0);
	
	ds_send.setColumn(0, "fromdd", "19000101");
	ds_send.setColumn(0, "todd", utlf_getCurrentDate());
}

function grp_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_hidden.setColumn(0, "uncoamt", "0");
	ds_hidden.setColumn(0, "rcptamt", "0");
	ds_hidden.setColumn(0, "remnamt", "0");
	
	var oParam = {};
		oParam.id          = "TRPAM00501";
		oParam.service     = "uncoamtmngtapp.UncoAmtMngt";
		oParam.method      = "reqGetUncoErrList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_ptlist_ptinfo=unco";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPAM00501";

	tranf_submit(oParam);

	ds_main_uncolist_uncoinfo.clearData();
}

function grd_err_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	ds_send.setColumn(0, "totalflag", "");
	ds_send.setColumn(0, "rcptflag", "");
	
	var row = ds_main_ptlist_ptinfo.rowposition;
	
	ds_hidden.setColumn(0, "uncoamt", ds_main_ptlist_ptinfo.getColumn(row, "uncosumamt"));
	ds_hidden.setColumn(0, "rcptamt", ds_main_ptlist_ptinfo.getColumn(row, "rcptsumamt"));
	ds_hidden.setColumn(0, "remnamt", ds_main_ptlist_ptinfo.getColumn(row, "remnamt"));
	
	fGetUncoList(true);
}

function fGetUncoList(isNew) 
{					
	if (isNew) 
	{
		if (ds_main_ptlist_ptinfo.rowposition < 0)
		{
			return;
		}
		
		var row = ds_main_ptlist_ptinfo.rowposition;
		
		ds_send.setColumn(0, "pid",    ds_main_ptlist_ptinfo.getColumn(row, "pid"));
		ds_send.setColumn(0, "orddd",    ds_main_ptlist_ptinfo.getColumn(row, "orddd"));
		ds_send.setColumn(0, "cretno",    ds_main_ptlist_ptinfo.getColumn(row, "cretno"));
		ds_send.setColumn(0, "dschdd",    ds_main_ptlist_ptinfo.getColumn(row, "dschdd"));
		ds_send.setColumn(0, "uncocd",    ds_main_ptlist_ptinfo.getColumn(row, "uncocd"));
	}
	
	var oParam = {};
		oParam.id          = "TRPAM00502";
		oParam.service     = "uncoamtmngtapp.UncoAmtMngt";
		oParam.method      = "reqGetUncoErrDetail";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_uncolist_uncoinfo=unco";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPAM00502";

	tranf_submit(oParam);
	
	var cnt = ds_main_uncolist_uncoinfo.rowcount;
	
	if (cnt > 0) 
	{		
		var selKey = ds_send.getColumn(0, "pid")
				   + ds_send.getColumn(0, "orddd")
				   + ds_send.getColumn(0, "cretno")
				   + ds_send.getColumn(0, "uncocd")
		
		var prevKey = ds_main_uncolist_uncoinfo.getColumn(0, "pid")
					+ ds_main_uncolist_uncoinfo.getColumn(0, "orddd")
					+ ds_main_uncolist_uncoinfo.getColumn(0, "cretno")
					+ ds_main_uncolist_uncoinfo.getColumn(0, "uncocd")
		
		var color = "white";
		
		for (var i = 0; i < cnt; i++) 
		{			
			var currKey = ds_main_uncolist_uncoinfo.getColumn(0, "pid")
						+ ds_main_uncolist_uncoinfo.getColumn(0, "orddd")
						+ ds_main_uncolist_uncoinfo.getColumn(0, "cretno")
						+ ds_main_uncolist_uncoinfo.getColumn(0, "uncocd")
			
			if (currKey != prevKey) 
			{				
				color = color == "white" ? "#ebebeb" : "white";	
				
				prevKey = currKey;
			}
			
			if (currKey == selKey) 
			{
				color = "#ffffa0";
			}
			
			// background 색상 지정 추가.
			ds_main_uncolist_uncoinfo.enableevent = false;
			ds_main_uncolist_uncoinfo.updatecontrol = false;
			dsf_makeValue(ds_main_uncolist_uncoinfo, "bgColor", "string", color, i);
			dsf_makeValue(ds_main_uncolist_uncoinfo, "bgColor_dschdd", "string", color, i);
			dsf_makeValue(ds_main_uncolist_uncoinfo, "bgColor_endyn", "string", color, i);
			dsf_makeValue(ds_main_uncolist_uncoinfo, "bgColor_uncoamt", "string", color, i);
			dsf_makeValue(ds_main_uncolist_uncoinfo, "bgColor_rcptamt", "string", color, i);
			dsf_makeValue(ds_main_uncolist_uncoinfo, "bgColor_debtamt", "string", color, i);
			dsf_makeValue(ds_main_uncolist_uncoinfo, "bgColor_rcptstat", "string", color, i);
			ds_main_uncolist_uncoinfo.updatecontrol = true;
			ds_main_uncolist_uncoinfo.enableevent = true;
			
			if (currKey == selKey) 
			{
				ds_main_uncolist_uncoinfo.enableevent = false;
				ds_main_uncolist_uncoinfo.updatecontrol = false;
				if(i == 0)
				{
					// 0번째 로우를 위하여 헤더부분 라인 추가 작업.
					grd_unco.setCellProperty("Head", grd_unco.getBindCellIndex("Body", "dschdd"), "line", "1 solid #B0B0B0ff,1 solid #B0B0B0ff,2 solid red,1 solid #B0B0B0ff");
					grd_unco.setCellProperty("Head", grd_unco.getBindCellIndex("Body", "endyn"), "line", "1 solid #B0B0B0ff,1 solid #B0B0B0ff,2 solid red,1 solid #B0B0B0ff");
					grd_unco.setCellProperty("Head", grd_unco.getBindCellIndex("Body", "uncoamt"), "line", "1 solid #B0B0B0ff,1 solid #B0B0B0ff,2 solid red,1 solid #B0B0B0ff");
					grd_unco.setCellProperty("Head", grd_unco.getBindCellIndex("Body", "rcptamt"), "line", "1 solid #B0B0B0ff,1 solid #B0B0B0ff,2 solid red,1 solid #B0B0B0ff");
					grd_unco.setCellProperty("Head", grd_unco.getBindCellIndex("Body", "debtamt"), "line", "1 solid #B0B0B0ff,1 solid #B0B0B0ff,2 solid red,1 solid #B0B0B0ff");
					grd_unco.setCellProperty("Head", grd_unco.getBindCellIndex("Body", "rcptstat"), "line", "1 solid #B0B0B0ff,1 solid #B0B0B0ff,2 solid red,1 solid #B0B0B0ff");
				}
				// cell 라인 주기 위한 작업 추가함.
				dsf_makeValue(ds_main_uncolist_uncoinfo, "lineStyle1", "string", "1 solid #B0B0B0ff, 2 solid red, 1 solid #B0B0B0ff, 1 solid #B0B0B0ff", i);
				dsf_makeValue(ds_main_uncolist_uncoinfo, "lineStyle2", "string", "2 solid red, 2 solid red, 2 solid red, 2 solid red", i);
				ds_main_uncolist_uncoinfo.updatecontrol = true;
				ds_main_uncolist_uncoinfo.enableevent = true;
			}
		}	
	}
}

function btn_xls1_onclick(obj:Button,  e:ClickEventInfo)
{
	var day = utlf_transNullToEmpty(ds_send.getColumn(0, "fromdd")) + "-" + utlf_transNullToEmpty(ds_send.getColumn(0, "todd"));
	grdf_exportExcel(grd_err, "미수 발생 및 종결 오류 내역_" + day, "오류내역", "true", "", "");
	sysf_messageBox("엑셀 저장이 완료되었습니다.", "I999");
}


function btn_xls2_onclick(obj:Button,  e:ClickEventInfo)
{
	var info = ds_send.getColumn(0, "pid");
	grdf_exportExcel(grd_unco, "환자별 미수 내역_" + info, "미수내역", "true", "", "");
	sysf_messageBox("엑셀 저장이 완료되었습니다.", "I999");
}

function chk_totalflag_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
{
	if(!utlf_isNull(ds_send.getColumn(0, "pid")))
	{
		fGetUncoList(false);		
		fSetUncoAmt();
	}
}

function chk_rcptflag_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
{
	if(!utlf_isNull(ds_send.getColumn(0, "pid")))
	{
		fGetUncoList(false);		
		fSetUncoAmt();
	}
}

function fSetUncoAmt()
{	
	var uncoamt = 0;
	var rcptamt = 0;
	
	var selKey = ds_send.getColumn(0, "pid")
			   + ds_send.getColumn(0, "orddd")
			   + ds_send.getColumn(0, "cretno")
			   + ds_send.getColumn(0, "uncocd")
	
	var cnt = ds_main_uncolist_uncoinfo.rowcount;
	
	for (var i = 0; i < cnt; i++) 
	{
		var currKey = ds_main_uncolist_uncoinfo.getColumn(i, "pid")
					+ ds_main_uncolist_uncoinfo.getColumn(i, "orddd")
					+ ds_main_uncolist_uncoinfo.getColumn(i, "cretno")
					+ ds_main_uncolist_uncoinfo.getColumn(i, "uncocd")
		
		if (selKey != currKey) 
		{
			continue;
		}
		
		uncoamt += parseInt(ds_main_uncolist_uncoinfo.getColumn(i, "uncoamt"));
		rcptamt += parseInt(ds_main_uncolist_uncoinfo.getColumn(i, "rcptamt"));
		rcptamt += parseInt(ds_main_uncolist_uncoinfo.getColumn(i, "debtamt"));
	}
	
	var remnamt = uncoamt - rcptamt;
	ds_hidden.setColumn(0, "uncoamt", uncoamt);
	ds_hidden.setColumn(0, "rcptamt", rcptamt);
	ds_hidden.setColumn(0, "remnamt", remnamt);
}

function ds_main_uncolist_uncoinfo_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	var colID = e.columnid;
	// 데이터 변경 시 색상 변경되는 이벤트를 위한 작업.
 	dsf_makeValue(obj, "bgColor_"+colID, "string", "#ffb4b4", e.row);

	fSetUncoAmt();
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = ds_main_uncolist_uncoinfo.rowcount;
					
	var cnt = 0;
	
	for (var i = 0; i < rows; i++) 
	{
		if (ds_main_uncolist_uncoinfo.getRowType(i) == 4)
		{
			cnt++;
		}
	}
	
	if (cnt < 1) 
	{
		sysf_messageBox("수정된 내역이 없습니다.", "E999");
		return;
	} 
	else if (sysf_messageBox("[ " + cnt + " ] 개의 미수 데이터를 수정하시겠습니까?", "Q999") != 6) 
	{
		return;
	}
	
	var str = grdf_getGridUpdateData(grd_unco);
	ds_send_unco.copyData(str, true);

	var oParam = {};
		oParam.id          = "TXPAM00301";
		oParam.service     = "uncoamtmngtapp.UncoAmtMngt";
		oParam.method      = "reqExeSetUncoFix";
		oParam.inds        = "unco=ds_send_unco";
		oParam.async       = false;
		//oParam.callback    = "cf_TXPAM00301";

	tranf_submit(oParam);
	
	ds_send.setColumn(0, "totalflag", "");
	ds_send.setColumn(0, "rcptflag", "");
	
	fGetUncoList(false);
	
	fSetUncoAmt();
}
]]></Script>
  </Form>
</FDL>