YNU_JEUS/app_home/himed/xpapps/pam/rcptteamstatsxp/xp/SPPAS00720_기간별미수조회및출력.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml" />
  <Form id="SPPAS00720" position="absolute 0 0 900 784" titletext="미수금 조회 및 출력" onload="SPPAS00720_onload">
    <Layouts>
      <Layout>
        <Div id="group2" position="absolute 0 23 895 60" style="">
          <Layouts>
            <Layout>
              <Shape id="roundrect2" anchor="default" class="roundrect_search" type="roundrectangle" position="absolute 5 0 890 35" style="border: solid #ffd799 #ffd799;background:#fffbf2  ;" />
              <Button id="btn_search" class="btn1_letter2" position="absolute 825 7 881 29" style="" text="조회" onclick="group2_btn_search_onclick" />
              <Shape id="line1" class="line_4" linetype="vertical" position="absolute 815 7 818 29" style="border: solid #ffe4bb #ffe4bb;" anchor="default" />
              <Static id="caption4" class="search_name" position="absolute 10 10 101 27" style="" text="미수기간 :" />
              <Calendar id="input1" position="absolute 102 9 207 28" style="" anchor="default" />
              <Static id="caption1" position="absolute 210 11 230 26" style="align:center ;" text="~" />
              <Calendar id="input2" position="absolute 230 9 335 28" style="" anchor="default" />
              <Static id="caption3" class="search_name" position="absolute 350 10 441 27" style="" text="미수구분 :" />
              <Combo innerdataset="root_init_uncocd" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmd_uncocd" position="absolute 440 9 535 28" style="" onitemclick="group2_cmd_uncocd_onitemclick" />
              <Radio datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="radio1" position="absolute 557 11 692 26" style="">
                <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>
            </Layout>
          </Layouts>
        </Div>
        <Div id="group3" position="absolute 0 0 895 13" style="">
          <Layouts>
            <Layout>
              <Static id="caption60" class="tit_1" position="absolute 0 0 183 14" style="font:돋움,,돋움;align: middle;" text="미수 조회및 출력" />
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption2" class="tit_2" position="absolute 10 66 150 80" style="" text="미수조회" />
        <Button id="button1" class="btn2_letter2" position="absolute 774 63 816 82" style="" text="출력" onclick="button1_onclick" />
        <Grid id="grd_uncolist" binddataset="ds_list_uncolist" position="absolute 0 85 895 760" style="align:center ;" onaftersort="grd_uncolist_onaftersort" oncelldblclick="grd_uncolist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="80" />
                <Column size="100" />
                <Column size="85" />
                <Column size="85" />
                <Column size="80" />
                <Column size="100" />
                <Column size="70" />
                <Column size="38" />
                <Column size="80" />
                <Column size="80" />
                <Column size="80" />
                <Column size="100" />
                <Column size="45" />
                <Column size="43" />
                <Column size="37" />
                <Column size="30" />
              </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="rcptdd" />
                <Cell col="13" text="rcptno" />
                <Cell col="14" text="rcptseqno" />
                <Cell col="15" text="seqno" />
              </Band>
              <Band id="body">
                <Cell text="bind:uncono" />
                <Cell col="1" text="bind:unconm" />
                <Cell col="2" text="bind:orddd" />
                <Cell col="3" text="bind:rcptexecdd" />
                <Cell col="4" text="bind:pid" />
                <Cell col="5" text="bind:rrgstno" />
                <Cell col="6" text="bind:hngnm" />
                <Cell col="7" text="bind:sex" />
                <Cell col="8" text="bind:uncoamt" />
                <Cell col="9" text="bind:rcptamt" />
                <Cell col="10" text="bind:uncorem" />
                <Cell col="11" text="bind:remfact" />
                <Cell col="12" text="bind:rcptdd" />
                <Cell col="13" text="bind:rcptno" />
                <Cell col="14" text="bind:rcptseqno" />
                <Cell col="15" text="bind:seqno" />
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="button2" class="btn2_letter4" position="absolute 819 63 883 82" style="" text="엑셀저장" onclick="button2_onclick" />
        <Div id="group1" position="absolute 0 765 895 780" style="" />
        <Button id="button3" class="btn5_letter6" position="absolute 683 63 769 82" style="" text="미수번호저장" onclick="button3_onclick" />
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="uncolist" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="uncolist"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_source" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="source" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="source"></Col>
          </Row>
        </Rows>
      </Dataset>
      <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_result" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="result" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="result"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="uncocd" type="STRING" size="256" />
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="temp" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="temp"></Col>
          </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="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" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdd"></Col>
            <Col id="todd"></Col>
            <Col id="uncocd"></Col>
            <Col id="endyn">all</Col>
            <Col id="save"></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="keep">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"></Col>
          </Row>
        </Rows>
      </Dataset>
    </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" />
    </Bind>
    <Script type="xscript4.0"><![CDATA[include '../../.._com_commonweb_js_common.js'
include '../../.._com_commonweb_js_utilHelper.js'
include '../../.._com_commonweb_js_tfHelper.js'
include '../../.._com_commonweb_js_dateHelper.js'
include '../../.._com_commonweb_js_numericHelper.js'
include '../../.._com_commonweb_js_stringHelper.js'
include '../../.._com_basiccodeweb_js_ZBC001.js'
include '../../.._com_zipcodeweb_js_ZBP001.js'
include '../../.._pam_outordamtmngtweb_js_SMPAO00100.js'
function SPPAS00720_onload(obj:Form, e:LoadEventInfo) {
 frmf_initForm(obj); 
 //grdf_initGrid(grd_XXX); 
 //grdf_setGridSort(grd_XXX); 
 //grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 

				ds_send.setColumn( 0, "fromdd" , utlf_getCurrentDate());
				ds_send.setColumn( 0, "todd" , utlf_getCurrentDate());

			 		zbcfGetCodeList( new Array("P0072","P0001","P0311"),  
					                         new Array("ds_init_com_comncdlist_P0072list"	//미수분류(개인,계약처)
					                                       ,"ds_init_com_comncdlist_P0001list"	//진료형태(입원,외래,응급)
					                                       ,"ds_init_com_comncdlist_P0311list"	//납부자정보
					                                        ) );	

					if (instance1.selectSingleNode("ds_init_com_comncdlist_P0072list") != null)
					{          
						ds_init_com_comncdlist_P0072list_P0072.setColumn( 0, "cdnm","-");
						ds_init_com_comncdlist_P0072list_P0072.setColumn( 0, "cdid","-");
					}

					if (instance1.selectSingleNode("ds_init_com_comncdlist_P0001list") != null)
					{          
						ds_init_com_comncdlist_P0001list_P0001.setColumn( 0, "cdnm","전체");
						ds_init_com_comncdlist_P0001list_P0001.setColumn( 0, "cdid","-");
					}				
					frmf_addComboItem( "group2.cmd_uncocd" , "", "", "above" );

//model.refresh();

}

function group2_btn_search_onclick(obj:Button, e:ClickEventInfo) {

				        var Day = utlf_getDateInterval(ds_send.getColumn(0, "fromdd") , ds_send.getColumn(0, "todd") , "dd");
						// 조회기간이 1년 이상일시 미수구분을 필히 선택하게 함
						if(Day >= 365) {
							if(ds_send.getColumn(0, "uncocd") == ""){
								sysf_messageBox("미수구분을", "C002");
								return;
							}
						}
//							submit("TRPAS00810");
var oParam = {};
    oParam.id          = "TRPAS00810";
    oParam.service     = "rcptteamstatsapp.rcptTeamOrdStats";
    oParam.method      = "reqGetUncoPrint";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=uncolist";
    oParam.async       = false;
    oParam.callback    = "cf_TRPAS00810";

tranf_submit(oParam);
/*
function cf_TRPAS00810(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPAS00810(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPAS00810") > -1
arErrorCode.pop("TRPAS00810") < 0
*/


							grd_uncolist.subtotal("sum", 1, 8, "#,###", "background-color:#99ff99", 6, "소계");
							grd_uncolist.subtotal("sum", 1, 9, "#,###", "background-color:#99ff99", 6, "소계");
							grd_uncolist.subtotal("sum", 1, 10, "#,###", "background-color:#99ff99", 6, "소계");

}

function group2_cmd_uncocd_onitemclick(obj:Combo, e:ListBoxClickEventInfo) {

					group2.btn_search.dispatch("DOMActivate");

}

function button1_onclick(obj:Button, e:ClickEventInfo) {
    var objDOM = rptf_createDOM();
    var objParam = new Object();
    rptf_setNodeListToDOM(objDOM, "/root/XXX" , ds_XXX);
    objParam.xml_data_XML1 	= objDOM.documentElement.source;
    var option = "open=1;save=1;directprint=0;printdialog=1;print=1;zoom=0";
    rptf_exeReportPreview30(["RPPAS00760"],[objParam], option); 

}

function grd_uncolist_onaftersort {

				grd_uncolist.gridToInstance();

}

function grd_uncolist_oncelldblclick(obj:Grid, e:GridClickEventInfo) {

					if(isDataCell()) {
					var row = grd_uncolist.row;

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

					model.close();
					}

}

function button2_onclick(obj:Button, e:ClickEventInfo) {

				var fileName = window.fileDialog("save", ",", false, "excel", "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");

					if (fileName != "")
					{
grdf_exportExcel(grd_uncolist, "Sheet1", fileName, false, "" , 'user' , true);
					}				

}

function button3_onclick(obj:Button, e:ClickEventInfo) {

				var row = grd_uncolist.row;
					ds_send_sav.copyRow( e, ds_list_uncolist, row);
					ds_send_save.setColumn( 0, "uncono" , ds_list_uncolist.getColumn(row, "uncono")));

//model.refresh();

//				if(submit("TXPAS00810")){
var oParam = {};
    oParam.id          = "TXPAS00810";
    oParam.service     = "rcptteamstatsapp.rcptTeamOrdStats";
    oParam.method      = "reqSetUncono";
    oParam.inds        = "req=ds_";
    oParam.async       = false;
    oParam.callback    = "cf_TXPAS00810";

tranf_submit(oParam);
/*
function cf_TXPAS00810(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPAS00810(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPAS00810") > -1
arErrorCode.pop("TXPAS00810") < 0
*/


					group2.btn_search.dispatch("DOMActivate");
				}

}

]]></Script>
  </Form>
</FDL>