YNU_JEUS/app_home/himed/xpapps/pam/ipatmngtxp/xp/SPPMI03700_임상시험대상자정보조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPMI03700" position="absolute 0 0 610 265" titletext="임상시험대상자정보" onload="SPPMI03700_onload">
    <Layouts>
      <Layout>
        <Grid position="absolute 0 59 600 254" id="grd_stdy" visible="true" binddataset="ds_main_stdylist" oncelldblclick="grd_stdy_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="73"/>
                <Column size="65"/>
                <Column size="124"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="76"/>
                <Column size="400"/>
              </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="과제명칭"/>
              </Band>
              <Band id="body">
                <Cell style="align:center middle;" text="bind:pid"/>
                <Cell col="1" style="align:center middle;" text="bind:hngnm"/>
                <Cell col="2" style="align:center middle;" text="bind:subjno"/>
                <Cell col="3" style="align:center middle;" text="bind:ioflag"/>
                <Cell col="4" style="align:center middle;" text="bind:addflag"/>
                <Cell col="5" displaytype="date" style="align:center middle;" text="bind:orddd" mask="yyyy-MM-dd" calendardisplaynulltype="none"/>
                <Cell col="6" displaytype="date" text="bind:enddd" mask="yyyy-MM-dd" calendardisplaynulltype="none"/>
                <Cell col="7" style="align:center middle;" text="bind:medfeeyn"/>
                <Cell col="8" text="bind:stdysubjnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static text="임상시험대상자정보" position="absolute 0 0 160 25" id="caption1" class="tit_1"/>
        <Div id="grp" taborder="4" position="absolute 0 25 600 55" class="div_SA">
          <Layouts>
            <Layout width="600" height="30">
              <Static id="caption2" text="차트번호" class="search_name" position="absolute 12 7 112 24" anchor="default"/>
              <Static id="caption3" text="진료(입원)일자" class="search_name" position="absolute 320 7 420 24" anchor="default"/>
              <Edit id="input1" taborder="1" enable="false" position="absolute 81 6 151 25" anchor="default"/>
              <Calendar id="input2" taborder="2" enable="false" position="absolute 425 6 525 25" anchor="default" dateformat="yyyy-MM-dd" value="null"/>
              <Button id="btn_search" taborder="3" text="조회" class="btn1" position="absolute 536 4 592 26" anchor="default" onclick="grp_btn_search_onclick"/>
              <Static id="caption4" text="구분" class="search_name" position="absolute 172 7 227 24" anchor="default"/>
              <Radio id="radio1" taborder="4" columncount="-1" rowcount="-1" codecolumn="codecolumn" datacolumn="datacolumn" enable="false" position="absolute 213 7 305 23" anchor="default" style=":disabled {textpadding:0 2 0 3;}">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">I</Col>
                      <Col id="datacolumn">입원</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">O</Col>
                      <Col id="datacolumn">외래</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_stdylist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="성명"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
          <Column id="enddd" type="STRING" size="256" sumtext="종료일자"/>
          <Column id="stdyno" type="STRING" size="256" sumtext="연구번호"/>
          <Column id="medfeeyn" type="STRING" size="256" sumtext="진찰료지원여부"/>
          <Column id="chrgfoodyn" type="STRING" size="256" sumtext="식대지원여부"/>
          <Column id="roomfeeyn" type="STRING" size="256" sumtext="병실료지원여부"/>
          <Column id="carecureyn" type="STRING" size="256" sumtext="간호처치료지원여부"/>
          <Column id="subjno" type="STRING" size="256" sumtext="과제번호"/>
          <Column id="stdysubjnm" type="STRING" size="256" sumtext="과제명칭"/>
          <Column id="addflag" type="STRING" size="256" sumtext="가산여부"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="입원외래구분"/>
        </ColumnInfo>
      </Dataset>
      <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="orddd" type="STRING" size="256"/>
          <Column id="mode" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="orddd"/>
            <Col id="mode"/>
            <Col id="ioflag"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp.input1" propid="value" datasetid="ds_send" columnid="pid"/>
      <BindItem id="item1" compid="grp.radio1" propid="value" datasetid="ds_send" columnid="ioflag"/>
      <BindItem id="item2" compid="grp.input2" propid="value" datasetid="ds_send" columnid="orddd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include 'com_commonxp::comm_main.xjs';

var arErrorCode = new HashArray();
//=======================================================================================
// Local methods
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: 
 * Description		: 
 ****************************************************************************************/


//=======================================================================================
// callback
//---------------------------------------------------------------------------------------
function callback(sSvcId, nErrorCode, sErrorMsg){
	arErrorCode.push(sSvcId, nErrorCode);
}

//=======================================================================================
// Events
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: 
 * Description		: onload
 ****************************************************************************************/
function SPPMI03700_onload(obj:Form, e:LoadEventInfo){
	frmf_initForm(obj);

	opener.frmf_setParameter('SPPMI03700_STDYNO', '');
	opener.frmf_setParameter('SPPMI03700_MEDFEEYN', '');
	opener.frmf_setParameter('SPPMI03700_ADDFLAG', '');
	
	var pid = utlf_transNullToEmpty(opener.frmf_getParameter('SPPMI03700_PID'));
	var ioflag = opener.frmf_getParameter('SPPMI03700_IOFLAG');
	var orddd = opener.frmf_getParameter('SPPMI03700_ORDDD');
	
	if(pid != ''){
		ds_send.setColumn(0, 'pid', pid);
		ds_send.setColumn(0, 'ioflag', ioflag);
		ds_send.setColumn(0, 'orddd', orddd);
		
		grp.btn_search.click();
	}
}

/****************************************************************************************
 * Argument			: 
 * Description		: 조회 버튼 클릭 이벤트
 ****************************************************************************************/
function grp_btn_search_onclick(obj:Button,  e:ClickEventInfo){
	ds_send.setColumn(0, 'mode', '13');
	
	var oParam = {};
		oParam.id          = "TRPMI03700";
		oParam.service     = "ipatmngtapp.InRgst";
		oParam.method      = "reqGetInRgPatInfo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_stdylist=stdy";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPMI03700";

	tranf_submit(oParam);
}

/****************************************************************************************
 * Argument			: 
 * Description		: 그리드 더블 클릭 이벤트
 ****************************************************************************************/
function grd_stdy_oncelldblclick(obj:Grid, e:GridClickEventInfo){
	var row = obj.currentrow;
	
	if(row >= 0){
		opener.frmf_setParameter('SPPMI03700_STDYNO', ds_main_stdylist.getColumn(row, 'subjno'));
		opener.frmf_setParameter('SPPMI03700_MEDFEEYN', ds_main_stdylist.getColumn(row, 'medfeeyn'));
		opener.frmf_setParameter('SPPMI03700_ADDFLAG', ds_main_stdylist.getColumn(row, 'addflag'));
		
		this.close();
	}
	else{
		sysf_messageBox('결과가 존재하지 않습니다.', 'E999');
	}
}
]]></Script>
  </Form>
</FDL>