YNU_JEUS/app_home/himed/xpapps/pam/planteamstatsxp/xp/SMPAS01180_외래환자현황.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml" />
  <Form id="SMPAS01180" position="absolute 0 0 1211 784" titletext="외래환자현황" onload="SMPAS01180_onload">
    <Layouts>
      <Layout>
        <Div id="group3" position="absolute 0 0 1211 13" style="">
          <Layouts>
            <Layout>
              <Static id="caption60" class="tit_1" position="absolute 0 0 183 14" style="font:돋움,,돋움;align: middle;" text="외래환자현황" />
            </Layout>
          </Layouts>
        </Div>
        <Div id="group2" position="absolute 4 22 1207 57" style="">
          <Layouts>
            <Layout>
              <Shape id="roundrect1" anchor="default" class="roundrect_search" type="roundrectangle" position="absolute 0 0 1202 35" style="border: solid #ffd799 #ffd799;background:#fffbf2  ;" />
              <Static id="caption2" class="search_name" position="absolute 15 9 213 26" style="" text="기간                           ~" />
              <Shape id="line2" class="line_4" linetype="vertical" position="absolute 1130 7 1133 29" style="border: solid #ffe4bb #ffe4bb;" anchor="default" />
              <Button id="btn_search" class="btn1_letter2" position="absolute 1139 7 1195 29" style="" text="조회" onclick="group2_btn_search_onclick" />
              <Calendar id="input7" class="input_default" taborder="7" position="absolute 70 8 190 27" style="align:center ;" anchor="default" onkeydown="group2_input7_onkeydown" />
              <Calendar id="input1" class="input_default" taborder="7" position="absolute 215 8 335 27" style="align:center ;" anchor="default" onkeydown="group2_input1_onkeydown" />
              <Button id="button95" class="btn6_letter4" visible="true" position="absolute 971 7 1051 29" style="" text="액셀저장" onclick="group2_button95_onclick" />
              <Shape id="line1" class="line_4" linetype="vertical" position="absolute 1058 7 1061 29" style="border: solid #ffe4bb #ffe4bb;" anchor="default" />
            </Layout>
          </Layouts>
        </Div>
        <Grid id="datagrid1" binddataset="ds_main_interpathamtlist_interpathamtstats" position="absolute 10 69 1208 760" style="" onscroll="datagrid1_onscroll">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="138" />
                <Column size="33" />
                <Column size="80" />
                <Column size="90" />
                <Column size="110" />
                <Column size="100" />
                <Column size="100" />
                <Column size="100" />
                <Column size="100" />
                <Column size="100" />
                <Column size="100" />
                <Column size="118" />
                <Column size="100" />
                <Column size="100" />
                <Column size="100" />
                <Column size="100" />
                <Column size="100" />
                <Column size="100" />
                <Column size="100" />
                <Column size="100" />
              </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="90일후선수금" />
                <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="미수입금" />
                <Cell col="31" text="처방선수대체" />
                <Cell col="32" text="90일후선수금" />
                <Cell col="33" text="매출에누리(할인)" />
                <Cell col="34" text="절사차액" />
                <Cell col="35" text="자선진료비" />
                <Cell col="36" text="매출할인(감면)" />
                <Cell col="37" text="혈액미수금" />
                <Cell col="38" text="카드미수금" />
              </Band>
              <Band id="body">
                <Cell text="bind:depthngnm" />
                <Cell col="1" text="bind:insukind" />
                <Cell col="2" text="bind:pid" />
                <Cell col="3" text="bind:hangnm" />
                <Cell col="4" text="bind:allamt" />
                <Cell col="5" text="bind:ownbamt" />
                <Cell col="6" text="bind:insubamt" />
                <Cell col="7" text="bind:ordsunsuamt" />
                <Cell col="8" text="bind:ordsunsurtnamt" />
                <Cell col="9" text="bind:outsunsuamt" />
                <Cell col="10" text="bind:outsunsurtnamt" />
                <Cell col="11" text="bind:uncoinamt" />
                <Cell col="12" text="bind:ordsunsualt" />
                <Cell col="13" text="bind:nineafter" />
                <Cell col="14" text="bind:uncoenuri" />
                <Cell col="15" text="bind:restamt" />
                <Cell col="16" text="bind:jasunamt" />
                <Cell col="17" text="bind:uncoredu" />
                <Cell col="18" text="bind:uncoblod" />
                <Cell col="19" text="bind:uncocard" />
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_print" class="btn6_letter2" position="absolute 1070 29 1126 51" style="" text="출력" onclick="btn_print_onclick" />
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_intersumamtlist_intersumamtstats" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING" size="256" />
          <Column id="insukind" type="STRING" size="256" />
          <Column id="pid" type="STRING" size="256" />
          <Column id="hangnm" type="STRING" size="256" />
          <Column id="allamt" type="STRING" size="256" />
          <Column id="ownbamt" type="STRING" size="256" />
          <Column id="insubamt" type="STRING" size="256" />
          <Column id="ordsunsuamt" type="STRING" size="256" />
          <Column id="ordsunsurtnamt" type="STRING" size="256" />
          <Column id="outsunsuamt" type="STRING" size="256" />
          <Column id="outsunsurtnamt" type="STRING" size="256" />
          <Column id="uncoinamt" type="STRING" size="256" />
          <Column id="ordsunsualt" type="STRING" size="256" />
          <Column id="nineafter" type="STRING" size="256" />
          <Column id="uncoenuri" type="STRING" size="256" />
          <Column id="restamt" type="STRING" size="256" />
          <Column id="jasunamt" type="STRING" size="256" />
          <Column id="uncoredu" type="STRING" size="256" />
          <Column id="uncoblod" type="STRING" size="256" />
          <Column id="uncocard" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="depthngnm">총계</Col>
            <Col id="insukind"></Col>
            <Col id="pid"></Col>
            <Col id="hangnm"></Col>
            <Col id="allamt"></Col>
            <Col id="ownbamt"></Col>
            <Col id="insubamt"></Col>
            <Col id="ordsunsuamt"></Col>
            <Col id="ordsunsurtnamt"></Col>
            <Col id="outsunsuamt"></Col>
            <Col id="outsunsurtnamt"></Col>
            <Col id="uncoinamt"></Col>
            <Col id="ordsunsualt"></Col>
            <Col id="nineafter"></Col>
            <Col id="uncoenuri"></Col>
            <Col id="restamt"></Col>
            <Col id="jasunamt"></Col>
            <Col id="uncoredu"></Col>
            <Col id="uncoblod"></Col>
            <Col id="uncocard"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_search" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="fromdata" type="STRING" size="256" />
          <Column id="todata" type="STRING" size="256" />
          <Column id="datagubun" type="STRING" size="256" />
          <Column id="erdata" type="STRING" size="256" />
          <Column id="dcgubun" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdata"></Col>
            <Col id="todata"></Col>
            <Col id="datagubun">1</Col>
            <Col id="erdata">1</Col>
            <Col id="dcgubun">D</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="fromdata" type="STRING" size="256" />
          <Column id="todata" type="STRING" size="256" />
          <Column id="datagubun" type="STRING" size="256" />
          <Column id="erdata" type="STRING" size="256" />
          <Column id="dcgubun" type="STRING" size="256" />
          <Column id="offset" type="STRING" size="256" />
          <Column id="pagesize" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdata"></Col>
            <Col id="todata"></Col>
            <Col id="datagubun"></Col>
            <Col id="erdata"></Col>
            <Col id="dcgubun"></Col>
            <Col id="offset"></Col>
            <Col id="pagesize">100</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_main_intersumamtlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="session" type="STRING" size="256" />
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_interpathamtlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_main_interpathamtlist_interpathamtstats" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING" size="256" />
          <Column id="insukind" type="STRING" size="256" />
          <Column id="pid" type="STRING" size="256" />
          <Column id="hangnm" type="STRING" size="256" />
          <Column id="allamt" type="STRING" size="256" />
          <Column id="ownbamt" type="STRING" size="256" />
          <Column id="insubamt" type="STRING" size="256" />
          <Column id="ordsunsuamt" type="STRING" size="256" />
          <Column id="ordsunsurtnamt" type="STRING" size="256" />
          <Column id="outsunsuamt" type="STRING" size="256" />
          <Column id="outsunsurtnamt" type="STRING" size="256" />
          <Column id="uncoinamt" type="STRING" size="256" />
          <Column id="ordsunsualt" type="STRING" size="256" />
          <Column id="nineafter" type="STRING" size="256" />
          <Column id="uncoenuri" type="STRING" size="256" />
          <Column id="restamt" type="STRING" size="256" />
          <Column id="jasunamt" type="STRING" size="256" />
          <Column id="uncoredu" type="STRING" size="256" />
          <Column id="uncoblod" type="STRING" size="256" />
          <Column id="uncocard" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="depthngnm"></Col>
            <Col id="insukind"></Col>
            <Col id="pid"></Col>
            <Col id="hangnm"></Col>
            <Col id="allamt"></Col>
            <Col id="ownbamt"></Col>
            <Col id="insubamt"></Col>
            <Col id="ordsunsuamt"></Col>
            <Col id="ordsunsurtnamt"></Col>
            <Col id="outsunsuamt"></Col>
            <Col id="outsunsurtnamt"></Col>
            <Col id="uncoinamt"></Col>
            <Col id="ordsunsualt"></Col>
            <Col id="nineafter"></Col>
            <Col id="uncoenuri"></Col>
            <Col id="restamt"></Col>
            <Col id="jasunamt"></Col>
            <Col id="uncoredu"></Col>
            <Col id="uncoblod"></Col>
            <Col id="uncocard"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_tmpinfo_info" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="user" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="user"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_tmpinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.input7" propid="value" datasetid="ds_send" columnid="fromdata" />
      <BindItem id="item1" compid="group2.input1" propid="value" datasetid="ds_send" columnid="todata" />
    </Bind>
    <Script type="xscript4.0"><![CDATA[function SMPAS01180_onload(obj:Form, e:LoadEventInfo) {

//				submit("TRPAS00001");



				var vToday = new Date();
				var tmpYear = vToday.getYear();
				var tmpMonth = vToday.getMonth()+1;
				var tmpDate = vToday.getDate();

				if (tmpMonth < 10) { tmpMonth = "0"+tmpMonth; }
				if (tmpDate < 10) { tmpDate = "0"+tmpDate; }
				ds_send.setColumn( 0, "fromdata", tmpYear+""+tmpMonth+""+tmpDate);
				ds_send.setColumn( 0, "todata", tmpYear+""+tmpMonth+""+tmpDate);

				//Rexport에 출력날자를 보여주기위한 데이터 저장
				dsf_makeValue( ds_main_tmp_print, "date", "string", "" );
				ds_main_tmp_print.setColumn( 0, "date", ds_send.getColumn(0, "fromdata"));

//group2.input7.refresh();

//group2.input1.refresh();

				datagrid1.explorerbar = "sort";

}

				function fSubmitOnScroll() {
					if(datagrid1.vscroll.attribute("max") == datagrid1.vscroll.attribute("pos")) {
						// end of scroll
						ds_send.setColumn( 0, "offset", datagrid1.rows - datagrid1.fixedRows); // grid의 header row는 제외
//						submit("TRPAS01181");
var oParam = {};
    oParam.id          = "TRPAS01181";
    oParam.service     = "planteamstatsapp.planTeamOrdStats";
    oParam.method      = "reqGetInterPathList";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=interpathamtstats";
    oParam.async       = false;
    oParam.callback    = "cf_TRPAS01181";

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


						datagrid1.dispatch("onmouseup");  // 스크롤바 처리를 위한 이벤트 발생
					}
				}

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'

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

						ds_send.setColumn( 0, "offset","0");

						var  fromdata =  ds_send.getColumn(0, "fromdata");
						var  todata     =  ds_send.getColumn(0, "todata");

						if(fromdata==""||fromdata==null){
							sysf_messageBox("시작일을 입력","E007");
							group2.input7.setFocus();
							return false;
						}
						if(todata==""|| todata==null){
							sysf_messageBox("끝일을 입력","E007");
							group2.input1.setFocus();
							return false;
						}

						if(fromdata > todata){
							sysf_messageBox("시작일이 끝일자보다 클수 ", "C001")
							return false;
						}else{

							ds_main_interpathamtlist_interpathamtstats.clearData();
							datagrid1.rebuild(); // delimeter grid 초기화.
//							submit("TRPAS01181");							
var oParam = {};
    oParam.id          = "TRPAS01181";
    oParam.service     = "planteamstatsapp.planTeamOrdStats";
    oParam.method      = "reqGetInterPathList";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=interpathamtstats";
    oParam.async       = false;
    oParam.callback    = "cf_TRPAS01181";

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



							//로드값이 있을때  엑셀저장여부 버튼 생성여부
							var nodelist = bind1.nodeset;

							//if(nodelist.length>0 && nodelist.length < 100 ) {
								//총계 구한후 셋벨류(copyNodesetType("ds/":실데이트 Node값    ,"ds/: bind를 통해 합계구한Node, ,  위치:"after"데이트그리드 맨아래,"before"  데이트그리그 맨위,))
								ds_main_interpathamtlist_interpathamtstats.copyData(ds_main_intersumamtlist_intersumamtstats); 	
								datagrid1.rebuild();

								//datagrid마직막에 총계 구하는것  merge
								var sumtotal = instance1.selectNodes("ds_main_interpathamtlist_interpathamtstats").length + datagrid1.fixedRows - 1;
								datagrid1.mergeByFree(sumtotal,1,sumtotal,4);
							//}						
						}				

}

function group2_input7_onkeydown(obj:Calendar, e:KeyEventInfo) {

								if( event.keyCode == 13 ) {

									var pCurTargetObj = event.ptarget.parent;

									if( pCurTargetObj.elementName == "xforms:select1" || pCurTargetObj.elementName == "xforms:select") {
										event.keyCode = 9;
										pCurTargetObj.dispatch("onkeydown");
									}
									else {
										event.keyCode = 9;	
									}
								}
								event.stopPropagation();							

}

function group2_input1_onkeydown(obj:Calendar, e:KeyEventInfo) {

								if( event.keyCode == 13 ) {

									var pCurTargetObj = event.ptarget.parent;

									if( pCurTargetObj.elementName == "xforms:select1" || pCurTargetObj.elementName == "xforms:select") {
										event.keyCode = 9;
										pCurTargetObj.dispatch("onkeydown");
									}
									else {

										event.keyCode = 9;	
									}
								}
								event.stopPropagation();							

}

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

					var vToday = new Date();
					var tmpYear = vToday.getYear();
					var tmpMonth = vToday.getMonth()+1;
					var tmpDate = vToday.getDate();

					if (tmpMonth < 10) { tmpMonth = "0"+tmpMonth; }
					if (tmpDate < 10) { tmpDate = "0"+tmpDate; }
					ds_send.setColumn( 0, "fromdata", tmpYear+""+tmpMonth+""+tmpDate);
					ds_send.setColumn( 0, "todata", tmpYear+""+tmpMonth+""+tmpDate);

//group2.input7.refresh();

//group2.input1.refresh();

					//엑셀저장 여부(타이틀별)
					var fileName = window.fileDialog("save", "", false, "외래환자현황"+tmpYear+tmpMonth+tmpDate, "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");

						if (fileName != "")
						{

							datagrid1.saveExcel(fileName, "외래환자현황"+tmpYear+tmpMonth+tmpDate, true, true, "", "", true);
						}

}

function datagrid1_onscroll {

//					fSubmitOnScroll();

}

function btn_print_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(["RPPAS01181"],[objParam], option);	

}

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