YNU_JEUS/app_home/himed/xpapps/ast/hsctxp/xp/SPABO62000_항암프로토콜이력조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPABO62000" position="absolute 0 0 647 391" titletext="항암프로토콜이력조회" oninit="SPABO62000_oninit" onload="SPABO62000_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="항암프로토콜이력조회" class="tit_1" position="absolute 0 0 200 23"/>
        <Static id="caption1" text="항암프로토콜이력" class="tit_2" position="absolute 0 68 200 90"/>
        <Shape id="line1" class="line_10" position="absolute 0 84 642 90" anchor="left top right"/>
        <Div id="grp_sea" taborder="1" class="div_SA" position="absolute 0 24 643 59" anchor="left top right">
          <Layouts>
            <Layout>
              <Static id="caption2" text="등록번호 :" class="search_name" position="absolute 15 9 101 26"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 552 7 558 29" anchor="top right"/>
              <Button id="btn_sea" taborder="1" text="조회" class="btn1" position="absolute 575 7 631 29" anchor="top right" onclick="grp_sea_btn_sea_onclick"/>
              <Edit id="input1" taborder="2" class="output" position="absolute 104 9 204 28" autoselect="true" onkeyup="grp_sea_input1_onkeyup"/>
              <Edit id="output1" taborder="3" readonly="true" position="absolute 207 9 287 28" class="output"/>
              <Edit id="output3" taborder="4" readonly="true" position="absolute 353 9 403 28" class="output"/>
              <Combo id="combo1" taborder="5" innerdataset="@ds_init_cmbinfo_sex_P0313" codecolumn="cdid" datacolumn="cdnm" class="combo_default" enable="false" position="absolute 290 9 350 28"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_list" taborder="2" binddataset="ds_main_prtlhislist_item" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 0 89 642 389" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="22"/>
                <Column size="42"/>
                <Column size="45"/>
                <Column size="175"/>
                <Column size="73"/>
                <Column size="73"/>
                <Column size="85"/>
                <Column size="50"/>
                <Column size="73"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" colspan="2" text="항암차수" taborder="undefined"/>
                <Cell col="3" text="프로토콜"/>
                <Cell col="4" text="시작일자"/>
                <Cell col="5" text="적용기간"/>
                <Cell col="6" text="진행상황"/>
                <Cell col="7" text="I/O구분"/>
                <Cell col="8" text="종료일자"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" text="bind:drugstage"/>
                <Cell col="2" text="bind:drugcycle"/>
                <Cell col="3" text="bind:prtlnm"/>
                <Cell col="4" displaytype="date" text="bind:appdd" calendardisplaynulltype="nulltext"/>
                <Cell col="5" text="bind:appterm" enable="false"/>
                <Cell col="6" text="bind:acptno" enable="false"/>
                <Cell col="7" displaytype="combo" edittype="combo" text="bind:ioflag" combodataset="ds_cmb_ioflag" combocodecol="value" combodatacol="label"/>
                <Cell col="8" displaytype="date" text="bind:todd" calendardisplaynulltype="nulltext"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_excsave" taborder="3" text="엑셀저장" class="btn7" position="absolute 563 65 643 84" anchor="top right" onclick="btn_excsave_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" 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="sex" type="STRING" size="256"/>
          <Column id="age" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="sex"/>
            <Col id="age"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_cmbinfo_sex_P0313" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_cmb_ioflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">입원</Col>
            <Col id="value">I</Col>
          </Row>
          <Row>
            <Col id="label">외래</Col>
            <Col id="value">O</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_prtlhislist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="drugstage" type="STRING" size="256" sumtext="투여단계"/>
          <Column id="drugcycle" type="STRING" size="256" sumtext="Cycle"/>
          <Column id="prtlnm" type="STRING" size="256" sumtext="프로토콜명"/>
          <Column id="appdd" type="STRING" size="256" sumtext="시작일"/>
          <Column id="appterm" type="STRING" size="256" sumtext="적용기간"/>
          <Column id="acptno" type="STRING" size="256" sumtext="진행상황"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="입원외래구분"/>
          <Column id="todd" type="STRING" size="256" sumtext="종료일자"/>
          <Column id="cpgappno" type="STRING" size="256" sumtext="CPG번호"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
          <Column id="sickclscd" type="STRING" size="256" sumtext="질병구분"/>
          <Column id="prtlcd" type="STRING" size="256" sumtext="프로토콜코드"/>
          <Column id="antimetprtlcd" type="STRING" size="256" sumtext="진토제코드"/>
          <Column id="fromday" type="STRING" size="256" sumtext="시작차수"/>
          <Column id="prtlterm" type="STRING" size="256" sumtext="프로토콜기간"/>
          <Column id="ht" type="STRING" size="256" sumtext="키"/>
          <Column id="wtflag" type="STRING" size="256" sumtext="체중구분"/>
          <Column id="wt" type="STRING" size="256" sumtext="체붕"/>
          <Column id="ibw" type="STRING" size="256" sumtext="IBW"/>
          <Column id="bsa" type="STRING" size="256" sumtext="BSA"/>
          <Column id="gfrflag" type="STRING" size="256" sumtext="GFR구분"/>
          <Column id="gfr" type="STRING" size="256" sumtext="GFR"/>
          <Column id="age" type="STRING" size="256" sumtext="나이"/>
          <Column id="sexrate" type="STRING" size="256" sumtext="성별별환산값"/>
          <Column id="sc" type="STRING" size="256" sumtext="SC"/>
          <Column id="urvol" type="STRING" size="256" sumtext="UR"/>
          <Column id="urcr" type="STRING" size="256" sumtext="Urine Creatine"/>
          <Column id="auc" type="STRING" size="256" sumtext="AUC"/>
          <Column id="carbovol" type="STRING" size="256" sumtext="Carbo용량"/>
          <Column id="appstat" type="STRING" size="256" sumtext="적용상태"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_paminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_patinfo" 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" columnid="pid"/>
      <BindItem id="item1" compid="grp_sea.output1" propid="value" datasetid="ds_send" columnid="hngnm"/>
      <BindItem id="item2" compid="grp_sea.combo1" propid="value" datasetid="ds_send" columnid="sex"/>
      <BindItem id="item3" compid="grp_sea.output3" propid="value" datasetid="ds_send" columnid="age"/>
    </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";
function SPABO62000_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPABO62000_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_list);
	
	var arrParam = [{dsNm: "ds_init_cmbinfo_sex_P0313", cdGrpId: "P0313"}]
	appf_getCodeList(arrParam);
	
	if (frmf_checkOpener())
	{
		var param = opener.frmf_getParameter("opener_parameter_id");

		if(!utlf_isNull(param))
		{
			condarray = param.split("▦");
			
			ds_send.setColumn(0, "pid", condarray[0]);
			ds_send.setColumn(0, "hngnm", condarray[1]);
			ds_send.setColumn(0, "sex", condarray[2]);
			ds_send.setColumn(0, "age", condarray[3]);
		} 
		else 
		{
			var paminfo = sysf_getGlobalVariable("paminfo");
			
			if(!utlf_isNull(paminfo))
			{
				ds_paminfo.clearData();
				dsf_setCSVToDs("ds_paminfo", paminfo);

				var pid = ds_paminfo.getColumn(0, "pid");
				ds_send.setColumn(0, "pid", pid);
			}
			else
			{
				if(!utlf_isNull(ds_temp_patinfo.getColumn(0, "pid")))
				{
					ds_send.setColumn(0, "pid", ds_temp_patinfo.getColumn(0, "pid"));
				}
			}
		}
	} 
	else 
	{
		if (!utlf_isNull(ds_temp_patinfo.getColumn(0, "pid")))
		{
			ds_send.setColumn(0, "pid", ds_temp_patinfo.getColumn(0, "pid"));
		}
	}

	var oParam = {};
		oParam.id          = "TRABO62000";
		oParam.service     = "hsctcoordinatorapp.HsctPatient";
		oParam.method      = "reqGetAnticancerProtocolOrderHis";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_prtlhislist_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRABO62000";

	tranf_submit(oParam);
}

function grp_sea_input1_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		
		grp_sea_btn_sea_onclick();
	}
}

function grp_sea_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	var oParam = {};
		oParam.id          = "TRABO62000";
		oParam.service     = "hsctcoordinatorapp.HsctPatient";
		oParam.method      = "reqGetAnticancerProtocolOrderHis";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_prtlhislist_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRABO62000";

	tranf_submit(oParam);
}

function btn_excsave_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_list, "항암프로토콜이력", "항암프로토콜이력", false, "", "", false);
}
]]></Script>
  </Form>
</FDL>