YNU_JEUS/app_home/himed/xpapps/ast/hsctxp/xp/SMABS10400_HLA통계.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMABS10400" position="absolute 0 0 1200 792" titletext="HLA 통계" oninit="SMABS10400_oninit" onload="SMABS10400_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="HLA통계" class="tit_1" position="absolute 0 0 200 25"/>
        <Button id="btn_prt" taborder="1" text="출력" class="btn6" position="absolute 0 26 56 48" onclick="btn_prt_onclick"/>
        <Div id="grp_sea" anchor="left top right" taborder="2" class="div_SA2" position="absolute 0 50 1194 90">
          <Layouts>
            <Layout>
              <Static id="caption2" text="기간(이식일) :" class="search_name" position="absolute 15 12 127 29" anchor="default"/>
              <Static id="caption5" text="~" class="search_no_b" position="absolute 233 12 245 29" anchor="default"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1104 9 1110 31" anchor="top right"/>
              <Calendar id="input1" taborder="1" class="input_s_essential" position="absolute 130 10 230 29" anchor="default" autoselect="true" autoskip="true"/>
              <Calendar id="input25" taborder="2" class="input_s_essential" position="absolute 249 10 349 29" anchor="default" autoselect="true" autoskip="true"/>
              <Button id="btn_sea" taborder="3" text="조회" class="btn1" position="absolute 1123 9 1179 31" anchor="top right" onclick="grp_sea_btn_sea_onclick"/>
              <Radio id="rdo_trnptflag" taborder="4" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 480 9 610 30" anchor="default" onitemchanged="grp_sea_rdo_trnptflag_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">U</Col>
                      <Col id="datacolumn">UBMT</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">C</Col>
                      <Col id="datacolumn">CORD</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Combo id="cmb_assocd" taborder="5" innerdataset="@ds_temp_rcptbase_boneassocdlist_item" codecolumn="hsctmdlcd" datacolumn="hsctmdlnm" class="combo_search" position="absolute 690 10 830 29" anchor="default"/>
              <Static id="caption3" text="협회 :" class="search_name" position="absolute 623 11 683 28" anchor="default"/>
              <Static id="caption4" text="UBMT/CORD :" class="search_name" position="absolute 369 12 486 29" anchor="default"/>
              <Edit id="ipt_pid" taborder="6" class="input_essential" position="absolute 940 10 1040 29" anchor="default" autoselect="true" autoskip="true" onkeyup="grp_sea_ipt_pid_onkeyup"/>
              <Static id="caption16" text="등록번호 :" class="search_name" position="absolute 851 11 937 28" anchor="default"/>
              <Button id="btn_pid" taborder="7" onclick="grp_sea_btn_pid_onclick" position="absolute 1024 13 1037 26"/>
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_excsave" taborder="3" text="엑셀저장" class="btn7" position="absolute 1114 97 1194 116" anchor="top right" onclick="btn_excsave_onclick"/>
        <Static id="caption1" text="HLA통계" class="tit_2" position="absolute 0 100 120 121"/>
        <Grid id="grd_hlalist" class="datagrid1" taborder="4" binddataset="ds_main_hlalist_hlastats" useinputpanel="false" position="absolute 0 121 1194 786" autoenter="select" cellsizingtype="both" anchor="all" extendsizetype="row" autosizingtype="row">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="22"/>
                <Column size="74"/>
                <Column size="80"/>
                <Column size="100"/>
                <Column size="80"/>
                <Column size="86"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell rowspan="2" taborder="undefined"/>
                <Cell col="1" rowspan="2" text="환자명" taborder="undefined"/>
                <Cell col="2" rowspan="2" text="협회" taborder="undefined"/>
                <Cell col="3" rowspan="2" text="등록번호" taborder="undefined"/>
                <Cell col="4" rowspan="2" text="공여자 ID" taborder="undefined"/>
                <Cell col="5" rowspan="2" text="이식일" taborder="undefined"/>
                <Cell col="6" colspan="12" text="환자" taborder="undefined"/>
                <Cell col="18" colspan="11" text="공여자" taborder="undefined"/>
                <Cell col="29" text="소요기간"/>
                <Cell col="30"/>
                <Cell col="31"/>
                <Cell row="1" col="6" colspan="2" text="A" taborder="undefined"/>
                <Cell row="1" col="8" colspan="2" text="B" taborder="undefined"/>
                <Cell row="1" col="10" colspan="2" text="C" taborder="undefined"/>
                <Cell row="1" col="12" colspan="2" text="BRB1" taborder="undefined"/>
                <Cell row="1" col="14" colspan="2" text="DQ" taborder="undefined"/>
                <Cell row="1" col="16" colspan="2" text="DP" taborder="undefined"/>
                <Cell row="1" col="18" colspan="2" text="A" taborder="undefined"/>
                <Cell row="1" col="20" colspan="2" text="B" taborder="undefined"/>
                <Cell row="1" col="22" text="C"/>
                <Cell row="1" col="23" colspan="2" text="BRB1" taborder="undefined"/>
                <Cell row="1" col="25" colspan="2" text="DQ" taborder="undefined"/>
                <Cell row="1" col="27" colspan="2" text="DP" taborder="undefined"/>
                <Cell row="1" col="29" text="등록일"/>
                <Cell row="1" col="30" text="종결일"/>
                <Cell row="1" col="31" text="소요기간"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" edittype="none" text="bind:hngnm"/>
                <Cell col="2" text="bind:boneassonm"/>
                <Cell col="3" text="bind:pid"/>
                <Cell col="4" edittype="none" text="bind:dnorid"/>
                <Cell col="5" displaytype="date" text="bind:trnptdd" calendardisplaynulltype="nulltext"/>
                <Cell col="6" style="align:center middle;padding:2 2 2 2;" text="bind:pata1" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="7" style="align:center middle;padding:2 2 2 2;" text="bind:pata2" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="8" style="align:center middle;padding:2 2 2 2;" text="bind:patb1" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="9" style="align:center middle;padding:2 2 2 2;" text="bind:patb2" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="10" style="align:center middle;padding:2 2 2 2;" text="bind:patcw1" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="11" style="align:center middle;padding:2 2 2 2;" text="bind:patcw2" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="12" style="align:center middle;padding:2 2 2 2;" text="bind:patdrb11" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="13" style="align:center middle;padding:2 2 2 2;" text="bind:patdrb12" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="14" style="align:center middle;padding:2 2 2 2;" text="bind:patdq1" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="15" style="align:center middle;padding:2 2 2 2;" text="bind:patdq2" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="16" style="align:center middle;padding:2 2 2 2;" text="bind:patdp1" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="17" style="align:center middle;padding:2 2 2 2;" text="bind:patdp2" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="18" style="align:center middle;padding:2 2 2 2;" text="bind:dnora1" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="19" style="align:center middle;padding:2 2 2 2;" text="bind:dnora2" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="20" style="align:center middle;padding:2 2 2 2;" text="bind:dnorb1" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="21" style="align:center middle;padding:2 2 2 2;" text="bind:dnorb2" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="22" style="align:center middle;padding:2 2 2 2;" text="bind:dnorcw1" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="23" style="align:center middle;padding:2 2 2 2;" text="bind:dnorcw2" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="24" style="align:center middle;padding:2 2 2 2;" text="bind:dnordrb11" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="25" style="align:center middle;padding:2 2 2 2;" text="bind:dnordrb12" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="26" style="align:center middle;padding:2 2 2 2;" text="bind:dnordq1" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="27" style="align:center middle;padding:2 2 2 2;" text="bind:dnordq2" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="28" style="align:center middle;padding:2 2 2 2;" text="bind:dnordp1" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="29" text="bind:rgstdd"/>
                <Cell col="30" text="bind:prcsenddd"/>
                <Cell col="31" style="align:center middle;" text="bind:termdd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line1" linetype="horizontal" class="line_10" position="absolute 0 116 1194 122" anchor="left top right"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="trnptfromdd" type="STRING" size="256"/>
          <Column id="trnpttodd" type="STRING" size="256"/>
          <Column id="trnptyn" type="STRING" size="256"/>
          <Column id="trnptflag" type="STRING" size="256"/>
          <Column id="boneassocd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="trnptfromdd"/>
            <Col id="trnpttodd"/>
            <Col id="trnptyn"/>
            <Col id="trnptflag"/>
            <Col id="boneassocd"/>
            <Col id="pid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_hlalist_hlastats" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="boneassonm" type="STRING" size="256" sumtext="협회명"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="dnorid" type="STRING" size="256" sumtext="공여자ID"/>
          <Column id="trnptdd" type="STRING" size="256" sumtext="이식일자"/>
          <Column id="pata1" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="pata2" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="patb1" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="patb2" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="patcw1" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="patcw2" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="patdrb11" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="patdrb12" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="patdq1" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="patdq2" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="patdp1" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="patdp2" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="dnora1" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="dnora2" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="dnorb1" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="dnorb2" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="dnorcw1" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="dnorcw2" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="dnordrb11" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="dnordrb12" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="dnordq1" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="dnordq2" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="dnordp1" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="dnordp2" type="STRING" size="256" sumtext="HLA Result"/>
          <Column id="termdd" type="STRING" size="256" sumtext="HLA Result"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_temp_rcptbase_boneassocdlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmbinfo_boneassocd_A0164" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_cmbinfo_boneassocd2_A0165" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_paminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_hsctinfo_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_bmtpatientinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.input1" propid="value" datasetid="ds_send_req" columnid="trnptfromdd"/>
      <BindItem id="item1" compid="grp_sea.input25" propid="value" datasetid="ds_send_req" columnid="trnpttodd"/>
      <BindItem id="item2" compid="grp_sea.rdo_trnptflag" propid="value" datasetid="ds_send_req" columnid="trnptflag"/>
      <BindItem id="item3" compid="grp_sea.cmb_assocd" propid="value" datasetid="ds_send_req" columnid="boneassocd"/>
      <BindItem id="item4" compid="grp_sea.ipt_pid" propid="value" datasetid="ds_send_req" columnid="pid"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "ast_hsctxp::bmtcommon.xjs";
function SMABS10400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMABS10400_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_hlalist);
	
	var arrParam 	= [{dsNm: "ds_init_cmbinfo_boneassocd_A0164", cdGrpId: "A0164"}
					  ,{dsNm: "ds_init_cmbinfo_boneassocd2_A0165", cdGrpId: "A0165"}];
	aboGetCodeList(arrParam);
	
	var scurrentdd   = utlf_getCurrentDate();

	ds_send_req.setColumn(0, "trnptfromdd", scurrentdd.toDate().getAddDate(-30,"D").getDateFormat("YYYYMMDD"));
	ds_send_req.setColumn(0, "trnpttodd", scurrentdd.toDate().getAddDate(30,"D").getDateFormat("YYYYMMDD"));
	
	if(utlf_isNull(ds_send_req.getColumn(0, "trnptflag")))
	{
		ds_send_req.setColumn(0, "trnptflag", "U");
	}
	
	fSetBoneAssocd();

	if ( frmf_checkOpener())
	{
		var param = opener.frmf_getParameter("opener_parameter_id");
		if(!utlf_isNull(param))
		{
			condarray = param.split("▦");
			ds_send_req.setColumn(0, "pid", condarray[0]);

			return;
		}
	}

	var paminfo = sysf_getGlobalVariable("paminfo");
	
	if (!utlf_isNull(paminfo))
	{
		ds_temp_paminfo.clearData();
		dsf_setCSVToDs("ds_temp_paminfo", paminfo);
		
		var pid = ds_temp_paminfo.getColumn(0, "pid");
		
		ds_send_req.setColumn(0, "pid", pid);
	} 
	else 
	{
		var gv_pid = sysf_getGlobalVariable("gv_pid", "A");
		if(!utlf_isNull(gv_pid))
		{
			ds_send_req.setColumn(0, "pid", gv_pid);
		}
	}
}

function fSetBoneAssocd()
{
	if(ds_send_req.getColumn(0, "trnptflag") == "U")
	{
		ds_temp_rcptbase_boneassocdlist_item.copyData(ds_init_cmbinfo_boneassocd_A0164);
	}
	else
	{
		ds_temp_rcptbase_boneassocdlist_item.copyData(ds_init_cmbinfo_boneassocd2_A0165);
	}
	
	ds_temp_rcptbase_boneassocdlist_item.insertRow(0);
}	

function grp_sea_rdo_trnptflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	fSetBoneAssocd(); 
}

function grp_sea_ipt_pid_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		grp_sea.btn_sea.click();
	}
}	

function grp_sea_btn_pid_onclick(obj:Button,  e:ClickEventInfo)
{
	abofGetBmtPatientSearch("ds_main_hsctinfo_patinfolist", "ds_temp_bmtpatientinfo");
	ds_send_req.setColumn(0, "pid", ds_main_hsctinfo_patinfolist.getColumn(0, "pid"));
}

function grp_sea_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	var oParam = {};
		oParam.id          = "TRABS10401";
		oParam.service     = "hsctcoordinatorapp.DonorSearch";
		oParam.method      = "reqGetHLAStats";
		oParam.inds        = "req=ds_send_req";
		oParam.outds       = "ds_main_hlalist_hlastats=hlastats ds_=message";
		oParam.async       = false;
		//oParam.callback    = "cf_TRABS10401";

	tranf_submit(oParam);
}

function btn_prt_onclick(obj:Button,  e:ClickEventInfo)
{
	//기능없음
}

function btn_excsave_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_hlalist, "HLA통계", "see");
}
]]></Script>
  </Form>
</FDL>