YNU_JEUS/app_home/himed/xpapps/pam/ipatmngtxp/xp/SMPMI05000_전일당일퇴원예고.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml" />
  <Form id="SMPMI05000" position="absolute 0 0 1280 1024" titletext="퇴원사유별통계" onload="SMPMI05000_onload">
    <Layouts>
      <Layout>
        <Shape id="roundrect1" anchor="default" class="roundrect_search" type="roundrectangle" position="absolute 0 25 1194 95" style="" />
        <Static id="caption3" class="tit_1" position="absolute 0 5 215 18" style="" text="전일_당일 퇴원 사유별 통계" />
        <Button id="button1" class="btn1_letter2" position="absolute 1040 45 1096 67" style="" text="조회" onclick="button1_onclick" />
        <Static id="caption1" class="search_name" position="absolute 460 35 545 52" style="" text="조회기간" />
        <Static id="caption2" class="search_name" position="absolute 15 35 105 52" style="" text="퇴원구분" />
        <Calendar id="ipt_fromdd" position="absolute 555 35 655 54" style="" anchor="default" />
        <Calendar id="ipt_todd" position="absolute 660 35 760 54" style="" anchor="default" />
        <Grid id="grd_list" binddataset="ds_main_gridlist_grid" position="absolute 0 100 1194 740" style="">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="113" />
                <Column size="80" />
                <Column size="80" />
                <Column size="80" />
                <Column size="80" />
                <Column size="80" />
                <Column size="80" />
                <Column size="80" />
                <Column size="80" />
                <Column size="80" />
                <Column size="80" />
                <Column size="80" />
                <Column size="80" />
              </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="1일입원" />
                <Cell col="12" text="전일퇴원해당" />
                <Cell col="13" text="전일퇴원해당" />
              </Band>
              <Band id="body">
                <Cell text="bind:col1" />
                <Cell col="1" text="bind:col2" />
                <Cell col="2" text="bind:col3" />
                <Cell col="3" text="bind:col4" />
                <Cell col="4" text="bind:col5" />
                <Cell col="5" text="bind:col6" />
                <Cell col="6" text="bind:col7" />
                <Cell col="7" text="bind:col8" />
                <Cell col="8" text="bind:col9" />
                <Cell col="9" text="bind:col10" />
                <Cell col="10" text="bind:col11" />
                <Cell col="11" text="bind:col12" />
                <Cell col="12" text="bind:col13" />
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Radio datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="rdo_cond1" position="absolute 135 65 360 85" style="" onitemchanged="rdo_cond1_onitemchanged">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" />
              <Column id="datacolumn" />
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">1</Col>
                <Col id="datacolumn">진료과별</Col>
              </Row>
              <Row>
                <Col id="codecolumn">2</Col>
                <Col id="datacolumn">병동별</Col>
              </Row>
              <Row>
                <Col id="codecolumn">3</Col>
                <Col id="datacolumn">진료의별</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Radio datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="rdo_dsch" position="absolute 135 35 305 55" style="" onitemchanged="rdo_dsch_onitemchanged">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" />
              <Column id="datacolumn" />
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">1</Col>
                <Col id="datacolumn">전일퇴원</Col>
              </Row>
              <Row>
                <Col id="codecolumn">2</Col>
                <Col id="datacolumn">당일퇴원</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Button id="btn_excel" class="btn6_letter4" taborder="8" position="absolute 1100 45 1180 67" style="" text="엑셀저장" onclick="btn_excel_onclick" />
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="send" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="send"></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_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_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="dsch" type="STRING" size="256" />
          <Column id="cond1" type="STRING" size="256" />
          <Column id="fromdd" type="STRING" size="256" />
          <Column id="todd" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="dsch">1</Col>
            <Col id="cond1">1</Col>
            <Col id="fromdd"></Col>
            <Col id="todd"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_gridlist_grid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="col1" type="STRING" size="256" />
          <Column id="col2" type="STRING" size="256" />
          <Column id="col3" type="STRING" size="256" />
          <Column id="col4" type="STRING" size="256" />
          <Column id="col5" type="STRING" size="256" />
          <Column id="col6" type="STRING" size="256" />
          <Column id="col7" type="STRING" size="256" />
          <Column id="col8" type="STRING" size="256" />
          <Column id="col9" type="STRING" size="256" />
          <Column id="col10" type="STRING" size="256" />
          <Column id="col11" type="STRING" size="256" />
          <Column id="col12" type="STRING" size="256" />
          <Column id="col13" type="STRING" size="256" />
          <Column id="col14" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="col1"></Col>
            <Col id="col2"></Col>
            <Col id="col3"></Col>
            <Col id="col4"></Col>
            <Col id="col5"></Col>
            <Col id="col6"></Col>
            <Col id="col7"></Col>
            <Col id="col8"></Col>
            <Col id="col9"></Col>
            <Col id="col10"></Col>
            <Col id="col11"></Col>
            <Col id="col12"></Col>
            <Col id="col13"></Col>
            <Col id="col14"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_gridlist" 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"></Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="ipt_fromdd" propid="value" datasetid="ds_main_cond" columnid="fromdd" />
      <BindItem id="item1" compid="ipt_todd" propid="value" datasetid="ds_main_cond" columnid="todd" />
      <BindItem id="item2" compid="rdo_cond1" propid="value" datasetid="ds_main_cond" columnid="cond1" />
      <BindItem id="item3" compid="rdo_dsch" propid="value" datasetid="ds_main_cond" columnid="dsch" />
    </Bind>
    <Script type="xscript4.0"><![CDATA[function SMPMI05000_onload(obj:Form, e:LoadEventInfo) {
 frmf_initForm(obj); 
 //grdf_initGrid(grd_XXX); 
 //grdf_setGridSort(grd_XXX); 
 //grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 

//				fInitialize();
				//날자 입력 항목에 오늘 날자 세팅		
				var curDate = utlf_getCurrentDate();
				      ipt_fromdd.value =curDate;
				      ipt_todd.value     =curDate;
					ds_main_cond.setColumn( 0, "fromdd",  curDate);
					ds_main_cond.setColumn( 0, "todd",  curDate);	

}

include '../../.._com_commonweb_js_common.js'
include '../../.._com_basiccodeweb_js_ZBC001.js'
include '../../.._com_commonweb_js_tfHelper.js'
include '../../.._com_commonweb_js_dateHelper.js'
include '../../.._com_commonweb_js_stringHelper.js'

	                      function gridcnt(a){
	                      	           var b = grd_list.cols;    
	                      	           var c = null;               	           
	                      	          if (b >a) {
		                      	          for( i=0;b-i>a;i++ ){
		                      	          	grd_list.removeColumn();				                      	          	
		                      	          }	                    
	                      	          }
	                      	          else if  	(b <a) {
		                      	          for( i=0;b+i<a;i++){
		                      	          	c = "ref:col"+(b+i+1)+";type:output";
		                      	          	grd_list.addColumn(c);
		                      	          	grd_list.colWidth(b+i)   ="80" ;
		                      	          }	                    
	                      	          }   	                      	      
	                      }
	                      function initgrid(){
	                      	         dsf_makeValue( ds_main_gridlist, "grid", "string", "" );  	

//model.refresh();

		                      	 if (rdo_cond1.value != 3 && rdo_dsch.value ==1) {				      	 
                                               gridcnt(13);
					          grd_list.caption ="구분^전체퇴원^당일퇴원전체^제외^순수당일퇴원^전일퇴원^평가소계^전일퇴원율^사망^탈원^자의퇴원^1일입원^전일퇴원해당" ;
					      }
					   else if (rdo_cond1.value == 3 && rdo_dsch.value ==1) {				      	 
                                                gridcnt(14);
					           grd_list.caption ="구분^진료의^전체퇴원^당일퇴원전체^제외^순수당일퇴원^전일퇴원^평가소계^전일퇴원율^사망^탈원^자의퇴원^1일입원^전일퇴원해당";
					      }
					   else if  (rdo_cond1.value != 3 && rdo_dsch.value ==2){				      	
                                               gridcnt(11);  
                                               grd_list.caption ="구분^당일퇴원전체^회진후퇴원^협진후^검사후^수술후^추가약처방후^추가서류후^추가처치후^약반납후^추가식사후";                                             
					      }
					   else if  (rdo_cond1.value == 3  && rdo_dsch.value ==2){				      	
                                                gridcnt(12);
                                                grd_list.caption ="구분^진료의^당일퇴원전체^회진후퇴원^협진후^검사후^수술후^추가약처방후^추가서류후^추가처치후^약반납후^추가식사후";
					      }					        				      
	                    	  }	
	                    	  	function fInitialize(){
		                           ds_main_gridlist_grid.clearData();  		                           

//model.refresh();

	                               }				

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

				 var dsch   = ds_main_cond.getColumn(0, "dsch");
     				 var cond1  = ds_main_cond.getColumn(0, "cond1");
				 var fromdd = ds_main_cond.getColumn(0, "fromdd");
				 var todd     = ds_main_cond.getColumn(0, "todd");			
				 dsf_makeValue( ds_send, "dsch", "string", dsch);
				 dsf_makeValue( ds_send, "cond1", "string", cond1);
				 dsf_makeValue( ds_send, "fromdd", "string", fromdd);
				 dsf_makeValue( ds_send, "todd", "string", todd);
//				 submit("TRPMI05001");
var oParam = {};
    oParam.id          = "TRPMI05001";
    oParam.service     = "ipatmngtapp.DschDclrt";
    oParam.method      = "reqGetDschlist";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=gridlist";
    oParam.async       = false;
    oParam.callback    = "cf_TRPMI05001";

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



//grd_list.refresh();

}

function rdo_cond1_onitemchanged(obj:Radio, e:ItemChangeEventInfo) {

					fInitialize();
				       initgrid();

}

function rdo_dsch_onitemchanged(obj:Radio, e:ItemChangeEventInfo) {

   				    fInitialize();	
				    initgrid();				  				    			    	

}

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

						var fileName = window.fileDialog("save", ",", false, "전일당일퇴원예고", "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
						var sheetName="전일당일퇴원예고";											

						sheetName= rdo_dsch.label+rdo_cond1.label;		

						if (fileName != "")
						{					
							grd_list.rebuild();

							grd_list.saveExcel(fileName, sheetName, true, true, "", "");
						}

						window.exec(fileName);	

}

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