YNU_JEUS/app_home/himed/xpapps/lis/refprintmngtxp/xp/SMLBP02300_1pint 수혈율.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLBP02300" position="absolute 0 0 1256 805" titletext="1pint 수혈율" onload="SMLBP02300_onload">
    <Layouts>
      <Layout>
        <Div id="group3" position="absolute 0 25 1256 67" anchor="left top right" positiontype="position" class="div_SA">
          <Layouts>
            <Layout>
              <Static id="caption3" class="search_name" position="absolute 8 10 82 30" anchor="default" text="조회기간" positiontype="position"/>
              <Button id="button1" class="btn1" position="absolute 1188 10 1244 30" anchor="top right" text="조회" onlbuttonup="button1_onlbuttonup" positiontype="position"/>
              <Calendar id="ipt_fromdd" taborder="1" dateformat="yyyy-MM-dd" class="input_search" position="absolute 99 10 189 30" onchanged="group3_ipt_fromdd_onchanged"/>
              <Static id="caption8" text="~" position="absolute 189 10 205 30" style="align:center middle;"/>
              <Calendar id="ipt_todd" taborder="2" dateformat="yyyy-MM-dd" class="input_search" position="absolute 205 10 295 30" onchanged="group3_ipt_todd_onchanged"/>
            </Layout>
          </Layouts>
        </Div>
        <Div id="group4" position="absolute 1156 5 1256 25" anchor="top right" positiontype="position">
          <Layouts>
            <Layout/>
          </Layouts>
        </Div>
        <Grid id="grd_onedetail" taborder="2" useinputpanel="false" position="absolute 495 97 1256 805" autofittype="col" anchor="all" binddataset="ds_grid_grd_onedetail">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="30"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="120"/>
                <Column size="50"/>
                <Column size="120"/>
              </Columns>
              <Rows>
                <Row size="22" band="head"/>
                <Row size="20"/>
              </Rows>
              <Band id="head">
                <Cell text="No."/>
                <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="실시일시"/>
              </Band>
              <Band id="body">
                <Cell expr="expr:currow+1"/>
                <Cell col="1" style="align:center middle;" text="bind:pid"/>
                <Cell col="2" style="align:center middle;" text="bind:hngnm"/>
                <Cell col="3" style="align:center middle;" text="bind:indd" mask="expr:indd==null?'':'####-##-##'"/>
                <Cell col="4" style="align:center middle;" text="bind:dschdd" mask="expr:dschdd==null?'':'####-##-##'"/>
                <Cell col="5" style="align:center middle;" text="bind:blodcomnm"/>
                <Cell col="6" style="align:center middle;" text="bind:blodcomstat"/>
                <Cell col="7" style="align:center middle;" text="bind:execdt" mask="expr:execdt==null?'':'####-##-## ##:##'"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="datagrid1" taborder="4" useinputpanel="false" position="absolute 0 97 485 805" onclick="datagrid1_onclick" autofittype="col" anchor="left top bottom">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="22" band="head"/>
                <Row size="20"/>
              </Rows>
              <Band id="head">
                <Cell text="처방부서"/>
                <Cell col="1" text="1Pint 건수"/>
                <Cell col="2" text="전체건수"/>
                <Cell col="3" text="1pint 수혈율"/>
                <Cell col="4" text="1pint 상세"/>
              </Band>
              <Band id="body">
                <Cell style="align:center middle;"/>
                <Cell col="1" style="align:right middle;"/>
                <Cell col="2" style="align:right middle;"/>
                <Cell col="3" style="align:right middle;" mask="#,##0.00"/>
                <Cell col="4"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption1" text="1pint 수혈율" class="tit_2" position="absolute 0 77 131 97"/>
        <Static id="caption2" text="1pint 수혈 세부 내역" class="tit_2" position="absolute 495 77 652 97"/>
        <Button id="btn_excel" taborder="1" text="엑셀저장" class="btn7" position="absolute 1180 74 1255 94" anchor="top right" onclick="btn_excel_onclick"/>
        <Button id="btn_reset" taborder="5" text="초기화" onlbuttonup="btn_reset_onlbuttonup" class="btn4" position="absolute 1187 0 1256 20" anchor="top right"/>
        <Button id="button00" taborder="6" text="엑셀저장" class="btn7" position="absolute 408 74 484 94" onclick="button00_onclick"/>
        <Grid id="grd_getOnePint" taborder="7" useinputpanel="false" autofittype="col" position="absolute 0 97 485 805" anchor="left top bottom" onclick="datagrid1_onclick" binddataset="ds_grid_grd_getOnePint" oncellclick="grd_getOnePint_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="30"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="22" band="head"/>
                <Row size="20"/>
              </Rows>
              <Band id="head">
                <Cell text="No."/>
                <Cell col="1" text="처방부서"/>
                <Cell col="2" text="1Pint 건수"/>
                <Cell col="3" text="전체건수"/>
                <Cell col="4" text="1pint 수혈율"/>
                <Cell col="5" text="1pint 상세"/>
              </Band>
              <Band id="body">
                <Cell expr="expr:currow+1"/>
                <Cell col="1" style="align:center middle;" text="bind:dept"/>
                <Cell col="2" style="align:right middle;" text="bind:one"/>
                <Cell col="3" style="align:right middle;" text="bind:all"/>
                <Cell col="4" displaytype="number" style="align:right middle;" text="bind:per" mask="#,##0.0#"/>
                <Cell col="5"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption6" text="1회 입원 기간중 1pint 수혈율" class="tit_1" position="absolute 0 0 207 25"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grid_grd_getOnePint" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <column id="dept" type="STRING" size="256"/>
          <column id="one" type="STRING" size="256"/>
          <column id="all" type="STRING" size="256"/>
          <column id="per" type="STRING" size="256"/>
          <Column id="onedetail" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grid_grd_onedetail" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <column id="pid" type="STRING" size="256"/>
          <column id="hngnm" type="STRING" size="256"/>
          <column id="indd" type="STRING" size="256"/>
          <column id="dschdd" type="STRING" size="256"/>
          <Column id="blodcomnm" type="STRING" size="256"/>
          <Column id="blodcomstat" type="STRING" size="256"/>
          <Column id="execdt" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LZZ001.xjs";
include "lis_commonxp::LLZ001.xjs";

function SMLBP02300_onload(obj:Form, e:LoadEventInfo)
{
	//폼 초기화 함수
	frmf_initForm(obj);
	
	lf_setInit();	
	
}

function lf_setInit() {
	
	ds_grid_grd_getOnePint.clearData();
	ds_grid_grd_onedetail.clearData();
	
	var toDay = utlf_getCurrentDate();
	    toDay = utlf_addMonth(toDay, -1);
	group3.ipt_fromdd.value = toDay;
	group3.ipt_todd.value = utlf_getCurrentDate(); 
}

 function lf_getOnePint() {
	
	var fromdd = group3.ipt_fromdd.value;
	var todd   = group3.ipt_todd.value;
	var sInDsName = dsf_createDsRow("ds_temp_search"
							 , [{col: "fromdd", val:fromdd }
							 ,  {col: "todd", val:todd }
							 ]);
	var oParam = {};
		oParam.id          = "TRLBP02201";
		oParam.service     = "refprintmngtapp.BloodBankRefPrintMngt";
		oParam.method      = "reqGetOnePint";
		oParam.inds        = "cond="+sInDsName;
		oParam.outds       = "ds_grid_grd_getOnePint=getOnePint";
		oParam.async       = false;
		oParam.callback    = "cbf_SMLBP02300";

	tranf_submit(oParam);
}

// 엑셀 저장
function lf_setOuterExcel(grdId,titleNm) {
	trace(grdId);
	grdf_exportExcel(grdId, lf_lisGetTitle(this) + "_" + titleNm, "sheet1", false);	
}

// callback 함수
function cbf_SMLBP02300(strSvcID, nErrorCode, strErrorMag) {
	
	if(nErrorCode != 0) {		
		sysf_messageBox("ID: "+ strSvcID + "  Error: " + strErrorMag, "E009", "");
	}else{
		switch(strSvcID){
			
			case "TRLBP02301":
					
				break;
			default:
				break;
		}
	}
}

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

	ds_grid_grd_onedetail.clearData();
	var addRw = 0;
	var cLob = "<XML>"+ds_grid_grd_getOnePint.getColumn(e.row, "onedetail")+"</XML>";
	trace(cLob);
	if(!utlf_isNull(cLob)) {	
		var DomParser00 = new DomParser;
		var DomDoc00 = DomParser00.parseFromString(cLob);
		var findElement = DomDoc00.getElementsByTagName("element");
		for(var i=0; i<findElement.length; i++) {
			addRw = ds_grid_grd_onedetail.addRow();
			ds_grid_grd_onedetail.setColumn(addRw, "pid", DomDoc00.getElementsByTagName("PID")[i].sourceContent);
			ds_grid_grd_onedetail.setColumn(addRw, "hngnm", DomDoc00.getElementsByTagName("HNGNM")[i].sourceContent);
			ds_grid_grd_onedetail.setColumn(addRw, "indd", DomDoc00.getElementsByTagName("INDD")[i].sourceContent);
			ds_grid_grd_onedetail.setColumn(addRw, "dschdd", DomDoc00.getElementsByTagName("DSCHDD")[i].sourceContent);
			ds_grid_grd_onedetail.setColumn(addRw, "blodcomnm", DomDoc00.getElementsByTagName("BLODCOMNM")[i].sourceContent);
			ds_grid_grd_onedetail.setColumn(addRw, "blodcomstat", DomDoc00.getElementsByTagName("BLODCOMSTAT")[i].sourceContent);
			ds_grid_grd_onedetail.setColumn(addRw, "execdt", DomDoc00.getElementsByTagName("EXECDT")[i].sourceContent);
		}
	}	
}

function button1_onlbuttonup(obj:Button, e:MouseEventInfo)
{
	lf_getOnePint();
}

function button00_onclick(obj:Button,  e:ClickEventInfo)
{
	if(ds_grid_grd_getOnePint.rowcount>0){
		lf_setOuterExcel(grd_getOnePint,"1pint 수혈율");
	}
}

function btn_reset_onlbuttonup(obj:Button, e:MouseEventInfo)
{
	lf_setInit();
}

function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	if(grd_onedetail.rowcount>0){
		lf_setOuterExcel(grd_onedetail,"1pint 수혈 세부 내역");
	}
}

function group3_ipt_fromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	gf_checkFromToDate("FROM",group3.ipt_fromdd,group3.ipt_todd);
}

function group3_ipt_todd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	gf_checkFromToDate("TO",group3.ipt_fromdd,group3.ipt_todd);
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	
}
]]></Script>
  </Form>
</FDL>