YNU_JEUS/app_home/himed/xpapps/pam/rcptteamstatsxp/xp/SPPAS00701_미수입금내역.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPAS00701" position="absolute 0 0 1050 359" titletext="환자기초정보조회" onload="SPPAS00701_onload">
    <Layouts>
      <Layout>
        <Static id="caption1" text="미수입금현황" class="tit_2" position="absolute 5 4 105 20"/>
        <Shape id="line1" class="line_10" position="absolute 0 24 1019 28"/>
        <Grid id="grd_uncolist" class="datagrid2" taborder="1" binddataset="ds_main_data1_uncorcptlist" useinputpanel="false" autofittype="col" position="absolute 0 27 1020 318">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="30"/>
                <Column size="30"/>
                <Column size="70"/>
                <Column size="65"/>
                <Column size="30"/>
                <Column size="110"/>
                <Column size="30"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="65"/>
                <Column size="30"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="70"/>
                <Column size="70"/>
              </Columns>
              <Rows>
                <Row size="28" band="head"/>
                <Row size="23"/>
                <Row size="24" band="summ"/>
              </Rows>
              <Band id="head">
                <Cell text="종결"/>
                <Cell col="1" text="진료&#10;구분"/>
                <Cell col="2" text="등록번호"/>
                <Cell col="3" text="이름"/>
                <Cell col="4" text="미수&#10;코드"/>
                <Cell col="5" text="미수명"/>
                <Cell col="6" text="입금&#10;구분"/>
                <Cell col="7" colspan="2" text="진료일자" taborder="undefined"/>
                <Cell col="9" text="진료과"/>
                <Cell col="10" text="진료의"/>
                <Cell col="11" text="보험&#10;유형"/>
                <Cell col="12" text="발생일자"/>
                <Cell col="13" text="입금일자"/>
                <Cell col="14" text="미수금액"/>
                <Cell col="15" text="입금금액"/>
              </Band>
              <Band id="body">
                <Cell text="bind:endyn"/>
                <Cell col="1" displaytype="combo" text="bind:ordtype" combodataset="ds_init_ordtype" combocodecol="value" combodatacol="label"/>
                <Cell col="2" text="bind:pid"/>
                <Cell col="3" text="bind:hngnm"/>
                <Cell col="4" text="bind:uncocd"/>
                <Cell col="5" text="bind:discunconm"/>
                <Cell col="6" displaytype="combo" text="bind:uncorcptflag" combodataset="ds_init_uncorcptflag" combocodecol="value" combodatacol="label"/>
                <Cell col="7" displaytype="date" text="bind:orddd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                <Cell col="8" displaytype="date" text="bind:dschdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                <Cell col="9" text="bind:orddeptnm"/>
                <Cell col="10" text="bind:orddrnm"/>
                <Cell col="11" text="bind:insukind"/>
                <Cell col="12" displaytype="date" text="bind:rcptdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                <Cell col="13" displaytype="date" text="bind:rcptexecdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                <Cell col="14" displaytype="number" text="bind:uncoamt" mask="#,##0"/>
                <Cell col="15" displaytype="number" text="bind:rcptamt" mask="#,##0"/>
              </Band>
              <Band id="summary">
                <Cell colspan="4" text="입금 합계" taborder="undefined"/>
                <Cell col="4"/>
                <Cell col="5"/>
                <Cell col="6"/>
                <Cell col="7"/>
                <Cell col="8"/>
                <Cell col="9"/>
                <Cell col="10"/>
                <Cell col="11"/>
                <Cell col="12"/>
                <Cell col="13"/>
                <Cell col="14"/>
                <Cell col="15" text="expr:getSum(&quot;rcptamt&quot;)"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_confirm" taborder="2" text="확인" onclick="group1_btn_confirm_onclick" class="btn4" visible="false" position="absolute 900 324 956 346"/>
        <Button id="btn_cancel" taborder="3" text="닫기" onclick="group1_btn_cancel_onclick" class="btn4" position="absolute 959 324 1015 346"/>
        <Shape id="line32" class="line_6" position="absolute 0 320 1018 323"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="init" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="init"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="rcptdd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="rcptdd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_data1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="uncorcptlist" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="uncorcptlist"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="hidden" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_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">I</Col>
          </Row>
          <Row>
            <Col id="label">외래</Col>
            <Col id="value">O</Col>
          </Row>
          <Row>
            <Col id="label">응급</Col>
            <Col id="value">E</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_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>
          <Row>
            <Col id="label">대손</Col>
            <Col id="value">3</Col>
          </Row>
          <Row>
            <Col id="label">승인</Col>
            <Col id="value">4</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_patinfo_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind/>
    <Script type="xscript4.0"><![CDATA[include 'com_commonxp::comm_main.xjs';
include 'com_basiccodexp::ZBC001.xjs';
include 'pam_pamcomnxp::PAM.xjs';

function SPPAS00701_onload(obj: Form, e: LoadEventInfo) {
    frmf_initForm(obj);

    if (frmf_checkOpener()) {
        var vpid = utlf_transNullToEmpty(opener.frmf_getParameter("pid"));
        var vrcptdd = opener.frmf_getParameter("rcptdd");

        if (vpid != '') {
            ds_send.setColumn(0, "pid", vpid);
            ds_send.setColumn(0, "rcptdd", vrcptdd);

            ds_main_data1_uncorcptlist.clearData();

            var oParam = {};
            oParam.id = "TRPAS00701";
            oParam.service = "rcptteamstatsapp.rcptTeamOrdStats";
            oParam.method = "reqGetUncoRcptList";
            oParam.inds = "req=ds_send";
            oParam.outds = "ds_main_data1_uncorcptlist=uncorcptlist";
            oParam.async = false;
            tranf_submit(oParam);
        }
    }
}

function group1_btn_confirm_onclick(obj: Button, e: ClickEventInfo) {
    if (frmf_checkOpener()) {
        if (PatRefPamFlag == "SMP" || PatRefPamFlag == "SPP") {
            row = grd_patinfo.currentrow;
        }
        else {
            row = grd_patinfo2.currentrow;
        }
        //dsf_makeValue(opener.ds_main, "popupendflag", "string", "");
        opener.ds_main.setColumn(0, "popupendflag", "cancel");

        if (row > 0) {
            if (ds_main_patinfo_patinfolist.rowcount > 0) {

                //합번된 등록번호 메세지 처리
                var sPid = ds_main_patinfo_patinfolist.getColumn(row, "pid");
                var sHngnm = ds_main_patinfo_patinfolist.getColumn(row, "hngnm");
                var sBindPid = utlf_transNullToEmpty(ds_main_patinfo_patinfolist.getColumn(row, "bindpid"));
                if (sBindPid != '' && sBindPid != '-' && sBindPid != ' ') {
                    var retValue = sysf_messageBox(sPid + "(" + sHngnm + ") 환자의 등록번호가 [ " + sBindPid + " ] 로 합번 되었습니다. 합번된 등록번호로 재조회 하시겠습니까?", "Q999", "");
                    if (retValue == '6') {
                        try {
                            ds_send.clearData();
                            ds_send.addRow();
                            ds_send.setColumn(0, "srchcond", "1");
                            fChangeSearchCondition('1');
                            ds_send.setColumn(0, "pid", sBindPid);

                            btn_search.click();
                        }
                        catch (e) {
                            return false;
                        }
                    }

                    return false;
                }

                if (PatRefPamFlag == "SMP" || PatRefPamFlag == "SPP") {
                    ds_main_patinfo_patinfolist.copyRow(0, grd_patinfo.binddataset, row);

                }
                else {
                    ds_main_patinfo_patinfolist.copyRow(0, grd_patinfo2.binddataset, row);
                }
                dsf_makeValue(opener.ds_main, "popupendflag", "string", "");
                opener.ds_main.setColumn(0, "popupendflag", "ok");

            }
        }
        else {
            sysf_messageBox("행이 정확히 선택되지", "E007");
        }
    }
    else {
        sysf_messageBox("상위화면이 변경되어 데이터를 가져올 수", "I004");
    }
    this.close();

}

function group1_btn_cancel_onclick(obj: Button, e: ClickEventInfo) {
    this.close();
}]]></Script>
  </Form>
</FDL>