YNU_JEUS/app_home/himed/xpapps/pam/rcptteamstatsxp/xp/SPPAS00721_기간별미수조회.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPAS00721" position="absolute 0 0 900 784" titletext="미수금 조회 및 출력" onload="SPPAS00721_onload">
    <Layouts>
      <Layout>
        <Div id="group2" position="absolute 0 23 895 90" style="" class="div_SA">
          <Layouts>
            <Layout>
              <Button id="btn_search" class="btn1" position="absolute 825 9 881 31" style="" text="조회" onclick="group2_btn_search_onclick"/>
              <Shape id="line1" class="line_4" linetype="vertical" position="absolute 815 9 818 31" style="border: solid #ffe4bb #ffe4bb;" anchor="default"/>
              <Static id="caption4" class="search_name" position="absolute 10 12 85 29" style="" text="미수기간 :"/>
              <Calendar id="input1" position="absolute 102 11 207 30" style="" anchor="default" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd " value="null"/>
              <Static id="caption1" position="absolute 208 13 228 28" style="align:center ;" text="~"/>
              <Calendar id="input2" position="absolute 229 11 334 30" style="" anchor="default" autoselect="true" dateformat="yyyy-MM-dd "/>
              <Static id="caption3" class="search_name" position="absolute 10 37 85 54" style="" text="미수구분 :"/>
              <Combo innerdataset="ds_init_uncocd" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmd_uncocd" position="absolute 102 37 197 56" style=""/>
              <Radio datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="radio1" visible="true" position="absolute 203 38 352 54" style="textpadding:0 3 0 3;">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">N</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">Y</Col>
                      <Col id="datacolumn">0이 아닌것</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Static id="caption5" class="search_name" position="absolute 368 38 442 55" style="" text="조회범위 :"/>
              <Combo innerdataset="ds_listcount_listcnt" datacolumn="rowcount" codecolumn="seq" columncount="-1" rowcount="-1" id="combo1" position="absolute 460 38 560 57" style="" onitemchanged="group2_combo1_onitemchanged"/>
              <Static id="caption6" class="search_name" position="absolute 600 12 664 29" style="" text="기준일 :"/>
              <Calendar id="input3" position="absolute 675 12 765 31" style="" anchor="default" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd "/>
              <Button id="button1" class="btn2" position="absolute 570 38 634 57" style="" text="범위조회" onclick="group2_button1_onclick"/>
              <Static id="caption7" class="search_name" position="absolute 368 12 439 29" style="" text="조회구분 :"/>
              <Combo datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="combo2" position="absolute 460 12 560 31" style="">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">R</Col>
                      <Col id="datacolumn">수납일자</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">O</Col>
                      <Col id="datacolumn">진료일자</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption2" class="tit_2" position="absolute 0 96 119 114" style="" text="미수조회"/>
        <Grid id="grd_uncolist" binddataset="ds_list_uncolist" position="absolute 0 115 895 760" style="align:center ;" oncelldblclick="grd_uncolist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="80"/>
                <Column size="100"/>
                <Column size="85"/>
                <Column size="100"/>
                <Column size="85"/>
                <Column size="80"/>
                <Column size="100"/>
                <Column size="70"/>
                <Column size="0"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="미수번호"/>
                <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="rcptdd"/>
                <Cell col="14" text="rcptno"/>
                <Cell col="15" text="rcptseqno"/>
                <Cell col="16" text="seqno"/>
              </Band>
              <Band id="body">
                <Cell style="background:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');" text="bind:uncono"/>
                <Cell col="1" style="align:center top;padding:5 2 3 2;background:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');" text="bind:unconm" wordwrap="word"/>
                <Cell col="2" displaytype="date" style="background:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');" text="bind:orddd" mask="yyyy-MM-dd" calendardisplaynulltype="none"/>
                <Cell col="3" displaytype="date" style="background:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');" text="bind:rcptdd" mask="yyyy-MM-dd" calendardisplaynulltype="none"/>
                <Cell col="4" displaytype="date" style="background:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');" text="bind:orgrcptdd" mask="yyyy-MM-dd" calendardisplaynulltype="none"/>
                <Cell col="5" style="background:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');" text="bind:pid"/>
                <Cell col="6" style="background:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');" text="bind:rrgstno" expr="expr:getRowLevel(currow) == 1 ? '소계' : rrgstno"/>
                <Cell col="7" style="background:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');" text="bind:hngnm"/>
                <Cell col="8" style="background:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');" text="bind:sex"/>
                <Cell col="9" displaytype="number" style="background:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');" text="bind:uncoamt" mask="9,999"/>
                <Cell col="10" displaytype="number" style="background:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');" text="bind:rcptamt" mask="9,999"/>
                <Cell col="11" displaytype="number" style="background:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');" text="bind:uncorem" mask="9,999"/>
                <Cell col="12" style="background:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#99ff99' : '');" text="bind:remfact"/>
                <Cell col="13" text="bind:rcptdd"/>
                <Cell col="14" text="bind:rcptno"/>
                <Cell col="15" text="bind:rcptseqno"/>
                <Cell col="16" text="bind:seqno"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="button2" class="btn7" position="absolute 815 94 895 113" style="" text="엑셀저장" onclick="button2_onclick"/>
        <Edit id="input4" visible="false" position="absolute 135 94 155 113" style="" anchor="default"/>
        <Edit id="input5" visible="false" position="absolute 160 94 185 113" style="" anchor="default"/>
        <Static id="caption60" text="미수 조회및 출력" class="tit_1" position="absolute 0 0 140 23" style="align:left middle;font:Dotum,9,bold;"/>
      </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="uncocd" type="STRING" size="256"/>
          <Column id="endyn" type="STRING" size="256"/>
          <Column id="save" type="STRING" size="256"/>
          <Column id="condd" type="STRING" size="256"/>
          <Column id="fromst" type="STRING" size="256"/>
          <Column id="tost" type="STRING" size="256"/>
          <Column id="srchtype" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="uncocd"/>
            <Col id="endyn">all</Col>
            <Col id="save"/>
            <Col id="condd"/>
            <Col id="fromst"/>
            <Col id="tost"/>
            <Col id="srchtype">R</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_uncocd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_listcount_listcnt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_list_uncolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_com_comncdlist_P0072list_P0072" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_com_comncdlist_P0001list_P0001" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_com_comncdlist_P0311list_P0311" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.input1" propid="value" datasetid="ds_send" columnid="fromdd"/>
      <BindItem id="item1" compid="group2.input2" propid="value" datasetid="ds_send" columnid="todd"/>
      <BindItem id="item2" compid="group2.cmd_uncocd" propid="value" datasetid="ds_send" columnid="uncocd"/>
      <BindItem id="item3" compid="group2.radio1" propid="value" datasetid="ds_send" columnid="endyn"/>
      <BindItem id="item4" compid="group2.combo1" propid="value" datasetid="ds_hidden" columnid="seq"/>
      <BindItem id="item5" compid="group2.input3" propid="value" datasetid="ds_send" columnid="condd"/>
      <BindItem id="item6" compid="group2.combo2" propid="value" datasetid="ds_send" columnid="srchtype"/>
      <BindItem id="item7" compid="input4" propid="value" datasetid="ds_send" columnid="fromst"/>
      <BindItem id="item8" compid="input5" propid="value" datasetid="ds_send" columnid="tost"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[include 'com_commonxp::comm_main.xjs';
//include 'pam_pamcomnxp::PAM001.xjs';

var arErrorCode = new HashArray();

function SPPAS00721_onload(obj: Form, e: LoadEventInfo) 
{
    frmf_initForm(obj);
    
    ds_send.setColumn(0, "fromdd", utlf_getCurrentDate());
    ds_send.setColumn(0, "todd", utlf_getCurrentDate());
    ds_send.setColumn(0, "condd", utlf_getCurrentDate());


    var arrParam = [{dsNm: "ds_init_com_comncdlist_P0072list_P0072", cdGrpId: "P0072"  }, //미수분류(개인,계약처)
					{dsNm: "ds_init_com_comncdlist_P0001list_P0001", cdGrpId: "P0001"  }, //진료형태(입원,외래,응급)
					{dsNm: "ds_init_com_comncdlist_P0311list_P0311", cdGrpId: "P0311"  }];  //납부자정보
    appf_getCodeList(arrParam); 

    if (ds_init_com_comncdlist_P0072list_P0072.rowcount > 0)
    {
		ds_init_com_comncdlist_P0072list_P0072.insertRow(0);
        ds_init_com_comncdlist_P0072list_P0072.setColumn(0, "cdnm", "-");
        ds_init_com_comncdlist_P0072list_P0072.setColumn(0, "cdid", "-");
    }

    if (ds_init_com_comncdlist_P0001list_P0001.rowcount > 0) 
    {
		ds_init_com_comncdlist_P0001list_P0001.insertRow(0);
        ds_init_com_comncdlist_P0001list_P0001.setColumn(0, "cdnm", "전체");
        ds_init_com_comncdlist_P0001list_P0001.setColumn(0, "cdid", "-");
    }
    
    dsf_createDsRow('ds_TRPAMCOM01', [{ col: 'sess_posinstcd', type: 'string', size: 256, val: '' }], false);

    var oParam = {};
		oParam.id = "TRPAMCOM01";
		oParam.service = "pamcomnapp.PamComn";
		oParam.method = "reqGetComCD";
		oParam.inds = "req=ds_TRPAMCOM01";
		oParam.outds = "ds_init_uncocd=uncocd";
		oParam.async = false;

    tranf_submit(oParam);
    
    frmf_addComboItem("group2.cmd_uncocd", "- 전 체 -", "", "above");
    group2.cmd_uncocd.index = 0;
}

function group2_btn_search_onclick(obj: Button, e: ClickEventInfo) 
{
    var oParam = {};
		oParam.id = "TRPAS00811";
		oParam.service = "rcptteamstatsapp.rcptTeamOrdStats";
		oParam.method = "reqGetUncoTotalList";
		oParam.inds = "req=ds_send";
		oParam.outds = "ds_list_uncolist=uncolist";
		oParam.async = false;
    tranf_submit(oParam);
    
    ds_list_uncolist.keystring = "G:uncocd";
}

function group2_combo1_onitemchanged(obj: Combo, e: ItemChangeEventInfo) 
{
    var seqv = obj.value
    var fromst = ds_listcount_listcnt.getColumn(seqv, "fromst");
    var tost = ds_listcount_listcnt.getColumn(seqv, "tost");

    ds_send.setColumn(0, "fromst", fromst);
    ds_send.setColumn(0, "tost", tost);
}

function group2_button1_onclick(obj: Button, e: ClickEventInfo) {
    var oParam = {};
		oParam.id = "TRPAS00812";
		oParam.service = "rcptteamstatsapp.rcptTeamOrdStats";
		oParam.method = "reqGetUncoListCount";
		oParam.inds = "req=ds_send";
		oParam.outds = "ds_listcount_listcnt=listcnt";
		oParam.async = false;
		oParam.callback = "cf_TRPAS00812";
    tranf_submit(oParam);

    if (arErrorCode.pop("TRPAS00812") > -1) 
    {
        sysf_messageBox("범위조회가 완료되었습니다. 조회범위를 선택하십시오.", "I");
    }

}

function cf_TRPAS00812(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

function grd_uncolist_oncelldblclick(obj: Grid, e: GridClickEventInfo) {
    var row = ds_list_uncolist.rowposition;

    opener.frmf_setParameter("SMPAS00700_PID", ds_list_uncolist.getColumn(row, "pid"));

    this.close();
}

function button2_onclick(obj: Button, e: ClickEventInfo) {
    grdf_exportExcel(grd_uncolist, "excel", "Sheet1", true, "", 'user', true);
}]]></Script>
  </Form>
</FDL>