YNU_JEUS/app_home/himed/xpapps/ast/crccxp/xp/SMATP00200_피험자조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMATP00200" position="absolute 0 0 776 457" titletext="피험자조회" oninit="SMATP00200_oninit" onload="SMATP00200_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 775 420" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="피험자조회" position="absolute 0 7 95 23" id="caption1" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 23 775 29" linetype="horizontal" id="line1" class="line_1" anchor="default" style="strokepen:3 solid #33bbbbff;"/>
              <Grid position="absolute 0 28 775 186" id="grd_subjlist" binddataset="ds_main_subjlist_item" anchor="default" onlbuttonup="grp_biz_grd_subjlist_onlbuttonup" cellsizingtype="both" selecttype="multirow" extendsizetype="row">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="25" band="left"/>
                      <Column size="106"/>
                      <Column size="69"/>
                      <Column size="159"/>
                      <Column size="156"/>
                      <Column size="126"/>
                      <Column size="60"/>
                      <Column size="0"/>
                      <Column size="73"/>
                      <Column size="72"/>
                      <Column size="48"/>
                      <Column size="50"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <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="caption3"/>
                      <Cell col="8" text="시작일"/>
                      <Cell col="9" text="종료일"/>
                      <Cell col="10" text="단계"/>
                      <Cell col="11" text="회차"/>
                      <Cell col="12" text="caption1"/>
                      <Cell col="13" text="caption2"/>
                      <Cell col="14" text="과제ID"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head"/>
                      <Cell col="1" style="align:left;padding:0 2 0 2;" text="bind:subjno" wordwrap="none"/>
                      <Cell col="2" style="align:left;padding:0 2 0 2;" text="bind:stdyno" wordwrap="none"/>
                      <Cell col="3" style="align:left top;padding:5 2 0 2;" text="bind:itemnm" wordwrap="char"/>
                      <Cell col="4" style="align:left top;padding:5 2 0 2;" text="bind:stdysubjnm" wordwrap="char"/>
                      <Cell col="5" style="align:left;padding:0 2 0 2;" text="bind:reqnm" wordwrap="none"/>
                      <Cell col="6" text="bind:empnm" wordwrap="none"/>
                      <Cell col="7" text="bind:empid"/>
                      <Cell col="8" displaytype="date" text="bind:stdytermfrom"/>
                      <Cell col="9" displaytype="date" text="bind:stdytermto"/>
                      <Cell col="10" text="bind:clincflag"/>
                      <Cell col="11" text="bind:judgdg"/>
                      <Cell col="12" text="bind:ioflag"/>
                      <Cell col="13" text="bind:pid"/>
                      <Cell col="14" text="bind:subjid"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Grid position="absolute 0 195 775 420" id="grd_testeelist" binddataset="ds_main_testeelist_item" anchor="default" onrbuttondown="grp_biz_grd_testeelist_onrbuttondown" oncelldblclick="grp_biz_grd_testeelist_oncelldblclick" cellsizingtype="both" extendsizetype="row">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="0" band="left"/>
                      <Column size="25" band="left"/>
                      <Column size="106"/>
                      <Column size="106"/>
                      <Column size="106"/>
                      <Column size="115"/>
                      <Column size="107"/>
                      <Column size="106"/>
                      <Column size="106"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1"/>
                      <Cell col="2" text="등록번호"/>
                      <Cell col="3" text="환자명"/>
                      <Cell col="4" text="입원/등록일"/>
                      <Cell col="5" text="Screening No"/>
                      <Cell col="6" text="Random No"/>
                      <Cell col="7" text="피험자약어"/>
                      <Cell col="8" text="종료일"/>
                      <Cell col="9" text="caption1"/>
                      <Cell col="10"/>
                    </Band>
                    <Band id="body">
                      <Cell displaytype="checkbox" edittype="checkbox" text="bind:sel"/>
                      <Cell col="1" celltype="head" text="expr:currow+1"/>
                      <Cell col="2" text="bind:pid"/>
                      <Cell col="3" text="bind:patnm"/>
                      <Cell col="4" displaytype="date" text="bind:orddd"/>
                      <Cell col="5" text="bind:screenno"/>
                      <Cell col="6" text="bind:subtesteephosid"/>
                      <Cell col="7" text="bind:subtesteephosnm"/>
                      <Cell col="8" displaytype="date" text="bind:enddd"/>
                      <Cell col="9" text="bind:ioflag"/>
                      <Cell col="10" text="bind:pamorddd"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 423 775 450" id="grp_btn" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 719 5 775 27" id="btn_cls" class="btn4" text="닫기" anchor="default" onclick="grp_btn_btn_cls_onclick"/>
              <Button position="absolute 187 4 243 26" id="button1" class="btn3" visible="false" text="전송" anchor="default" onclick="grp_btn_button1_onclick"/>
              <Static text="전송일자 :" position="absolute 5 6 80 23" id="caption3" class="search_name" visible="false" anchor="default"/>
              <Calendar position="absolute 87 5 177 24" id="input1" class="input_s_essential" visible="false" anchor="default"/>
              <Button id="button51" taborder="1" text="엑셀" class="btn7" position="absolute 662 5 717 27" onclick="grp_btn_button51_onclick"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_subjlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="subjno" type="STRING" size="256"/>
          <Column id="stdyno" type="STRING" size="256"/>
          <Column id="itemnm" type="STRING" size="256"/>
          <Column id="stdysubjnm" type="STRING" size="256"/>
          <Column id="reqnm" type="STRING" size="256"/>
          <Column id="stdytermfrom" type="STRING" size="256"/>
          <Column id="stdytermto" type="STRING" size="256"/>
          <Column id="clincflag" type="STRING" size="256"/>
          <Column id="judgdg" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="subjid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_testeelist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sel" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="patnm" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="screenno" type="STRING" size="256"/>
          <Column id="subtesteephosid" type="STRING" size="256"/>
          <Column id="subtesteephosnm" type="STRING" size="256"/>
          <Column id="enddd" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="pamorddd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_paminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_miginfo_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pidold011" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="rrgstno1" type="STRING" size="256"/>
          <Column id="rrgstno2" type="STRING" size="256"/>
          <Column id="pidnew012" type="STRING" size="256"/>
          <Column id="pidold012" type="STRING" size="256"/>
          <Column id="bmtflag" type="STRING" size="256"/>
          <Column id="motionflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pidold011"/>
            <Col id="hngnm"/>
            <Col id="rrgstno1"/>
            <Col id="rrgstno2"/>
            <Col id="pidnew012"/>
            <Col id="pidold012"/>
            <Col id="bmtflag"/>
            <Col id="motionflag"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_miginfo_transpatinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pidold011" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="rrgstno1" type="STRING" size="256"/>
          <Column id="rrgstno2" type="STRING" size="256"/>
          <Column id="pidnew012" type="STRING" size="256"/>
          <Column id="pidold012" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="orddrnm" type="STRING" size="256"/>
          <Column id="drddeptcd" type="STRING" size="256"/>
          <Column id="orddeptas" type="STRING" size="256"/>
          <Column id="maxdate" type="STRING" size="256"/>
          <Column id="motionflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pidold011"/>
            <Col id="hngnm"/>
            <Col id="rrgstno1"/>
            <Col id="rrgstno2"/>
            <Col id="pidnew012"/>
            <Col id="pidold012"/>
            <Col id="orddrid"/>
            <Col id="orddrnm"/>
            <Col id="drddeptcd"/>
            <Col id="orddeptas"/>
            <Col id="maxdate"/>
            <Col id="motionflag"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_data_testeedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_srchdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchflag" type="STRING" size="256"/>
          <Column id="reqphos" type="STRING" size="256"/>
          <Column id="subjno" type="STRING" size="256"/>
          <Column id="srchsubjno" type="STRING" size="256"/>
          <Column id="srchsubjendyn" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="srchmode" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchflag">1</Col>
            <Col id="reqphos"/>
            <Col id="subjno"/>
            <Col id="srchsubjno"/>
            <Col id="srchsubjendyn"/>
            <Col id="pid"/>
            <Col id="srchmode"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_req" 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="orddept" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_smartdata" 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="screenno" type="STRING" size="256"/>
          <Column id="smartdate" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="screenno"/>
            <Col id="smartdate"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_ret" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_stdydata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="empno" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="empno"/>
            <Col id="pid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_data" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_btn.input1" propid="value" datasetid="ds_send_smartdata" columnid="smartdate"/>
    </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                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs"
//var sTESTEELIST_PATH="ds_main_testeelist_item"

//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var arErrorCode = new HashArray();

//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: N/A
 * Description		: 통합기록조회 화면 open
 ****************************************************************************************/
function fOpenMedirecList(){
	var currow = ds_main_testeelist_item.rowposition; 
	
	if(currow < 1){
	    return;
	}
	
	var pid		 = ds_main_testeelist_item.getColumn(currow,"pid");
	var authflag = "N";
	
	frmf_clearParameter("SMMRI00400_param_pid");
	frmf_setParameter("SMMRI00400_param_pid" 	 , pid);
	frmf_setParameter("SMMRI00400_param_authflag", authflag);
	
	frmf_open("SMMRI00400", "SMMRI00400", null, null, null, null, null, null, null, null, null, null, "M");
}

/****************************************************************************************
 * Argument			: N/A
 * Description		: 통합결과조회 화면 open
 ****************************************************************************************/
function fOpenMediresList(){
	var currow = ds_main_testeelist_item.rowposition;
	
	if(currow < 1){
	    return;
	}
	
	var pid		 = ds_main_testeelist_item.getColumn(currow,"pid");
	var authflag = "N";

	frmf_clearParameter("opener_parameter_id");
	frmf_setParameter("opener_parameter_id" 	 , pid);
	frmf_setParameter("opener_parameter_authflag", authflag);
	
	frmf_modal("SMAER00800", "SMAER00800", "", "", "", "", "", "", "", "", "", "", "M");
}
 
//  /**
//  * @desc   : 성모 영상차트 화면 open
//  * @
//  * @param  :
//  * @return :
//  * @author : 김소정 
//  * @---------------------------------------------------
//  */
// function fOpenSMMediRecList(){
// 	var currow = grd_testeelist.row;
// 	if(currow < 1){
// 	    return;
// 	}
// 	var pid       = model.getValue(sTESTEELIST_PATH + "[" + currow + "]/pid");
//     if ( ! fOpenSMPatInfo(pid, "1") )
//         return;
// }
// 
// 
// /**
//  * @desc   : 성모 처방리스트 조회 화면 open
//  * @
//  * @param  :
//  * @return :
//  * @author : 김소정 
//  * @---------------------------------------------------
//  */
// function fOpenPrcpList(){
// 	var currow = grd_testeelist.row;
// 	if(currow < 1){
// 	    return;
// 	}
// 	var pid       = model.getValue(sTESTEELIST_PATH + "[" + currow + "]/pid");
//     if ( ! fOpenSMPatInfo(pid, "2") )
//         return;
// }
// 
// /**
//  * @desc   : 성모 결과조회 화면 open
//  * @
//  * @param  :
//  * @return :
//  * @author : 김소정 
//  * @---------------------------------------------------
//  */
// function fOpenSMMediResList(){
// 	var currow = grd_testeelist.row;
// 	if(currow < 1){
// 	    return;
// 	}
// 	var pid       = model.getValue(sTESTEELIST_PATH + "[" + currow + "]/pid");
//     if ( ! fOpenSMPatInfo(pid, "3") )
//         return;
// }
// 
// /**
//  * @desc   : 성모 data조회 체크 
//  * @
//  * @param  :
//  * @return :
//  * @author : 김소정 
//  * @---------------------------------------------------
//  */
// function fOpenSMPatInfo(spid, kindcd){
//     var motionflag; 
//     var pidold011;
// 
//     model.setValue ("/root/send/req/pid" , spid);
// 
//     // BMT환자여부 확인
//     submit("TRMRC03191");
// 
//     // 동의서 여부 확인
//     //submit("TRMRC03192")						
// 
//     pidold011 = model.getValue("/root/main/miginfo/patinfolist/pidold011");
//     //motionflag = model.getValue ("/root/main/miginfo/transpatinfolist/motionflag");
//     
//     // 성모환자가 확인되면 as-is 프로그램을 조회가능하게 한다.
//     if (pidold011 != "" ) {				
// //        if (motionflag != "") {
// //            if (motionflag =='N' || motionflag =='-'){ 
// //                alert('성모병원 의료정보 조회를 위한 환자의 동의가 필요합니다.');
// //            }
// //        } else {
// //            alert('성모병원 의료정보 조회를 위한 환자의 동의가 필요합니다.');
// //        }				
//         if (kindcd == "1") {
//             var param = spid+'/'+getUserInfo("userid")+'/_/0/0/004/0';
//             window.exec("c:\\Program Files\\himed\\components\\CMC\\bitnixviewer\\ViewerUpdate.exe ", param);
//         } else if ( kindcd == "2") {
//             window.exec("C:\\Program Files\\himed\\components\\CMC\\ASIS\\DrChart_BMT.exe", spid);
//         } else if ( kindcd == "3") {
//             window.exec("C:\\Program Files\\himed\\components\\CMC\\ASIS\\Result_BMT.exe", spid);
//         }
//     } else {
//         alert('성모병원 전환환자가 아닙니다.');
//     }
// }
 
//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Components ID	: SMATP00200
 * Event			: oninit
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SMATP00200_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);  		// 폼 초기화 
}

/****************************************************************************************
 * Components		: Form
 * Components ID	: SMATP00200
 * Event			: oninit
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SMATP00200_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grp_biz.grd_subjlist); 	// 그리드 소트만
	grdf_initGrid(grp_biz.grd_testeelist); 	// 그리드 소트만
	grdf_setRowTypeIcon(grp_biz.grd_subjlist, 0); // 그리드 상태 표시

	//opener 화면에서 파라메터값을 넘겨주면, 해당 조건으로 검색하도록 추가 (2009.09.28 JJE)
	if( !utlf_isNull(frmf_getOpenerUID()) ){	//Opener의 UID가 존재하면,
		var param_subjno = opener.frmf_getParameter("param_subjno");
		
		if( !utlf_isNull(param_subjno) ){
			ds_send_srchdata.setColumn(0,"srchsubjno", param_subjno);
			ds_send_srchdata.setColumn(0,"srchflag"	 , "2");  // 검색 조건이 '일치' (equal 비교)
			ds_send_srchdata.setColumn(0,"srchmode"	 , "A");  // 진료조회모드:E(로그인 의사의 피험자만 조회)/약국조회모드:A(모든 피험자 조회)
		}
	} else {
		var menuparam = frmf_getMenuParam();
		
 		if (menuparam == "CRC") {
		}else if (menuparam == "CRA") {
			ds_send_srchdata.setColumn(0,"reqphos" , sysf_getUserId() );
			ds_send_srchdata.setColumn(0,"srchmode", "CRA" );
		}
	}
	// 20120130_laboru_전송일자 오늘로 셋팅
	ds_send_smartdata.setColumn(0,"smartdate", utlf_getCurrentDate());
	
	frmf_createPopupMenu("grd_testeelist_popupmenu"
						,"fPopupMenu" 
						,[{id: "popupA"	, level: "0", title: "통합기록조회"}
						 ,{id: "popupB"	, level: "0", title: "통합결과조회"}
// 						 ,{id: "fOpenSMMediRecList"	, level: "0", title: "여의도성모-영상차트조회"}
// 						 ,{id: "fOpenPrcpList"		, level: "0", title: "여의도성모-처방조회"}
// 						 ,{id: "fOpenSMMediResList"	, level: "0", title: "여의도성모-결과조회"}
						 ]  //항목추가
						);

	var oParam = {};
		oParam.id          = "TRATB00104";
		oParam.service     = "crccbaseapp.CrccBase";
		oParam.method      = "reqGetUserSubjectList";
		oParam.inds        = "req=ds_send_srchdata";
		oParam.outds       = "ds_main_subjlist_item=subjinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRATB00104";

	tranf_submit(oParam);
}

/****************************************************************************************
 * Function			: fPopupMenu
 * Description		: 팝업메뉴 선택시 실행함수
 * Argument			: 
 * return type		: 
 * Creator			: 
 ****************************************************************************************/
function fPopupMenu(obj:PopupMenu, e:MenuClickEventInfo) {
	if(e.id == "popupA") {
		fOpenMedirecList();
	}
	
	if(e.id == "popupB") {
		fOpenMediresList();
	}
}

/****************************************************************************************
 * Components		: Grid
 * Components ID	: grp_biz.grd_subjlist
 * Event			: onlbuttonup
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 과제리스트 선택시 환자조회
 ****************************************************************************************/
function grp_biz_grd_subjlist_onlbuttonup(obj:Grid, e:GridMouseEventInfo)
{
	if( e.row > -1 ) {	
		ds_send_data.setColumn(0,"subjno", ds_main_subjlist_item.getColumn(e.row,"subjid"));
		ds_send_srchdata.setColumn(0,"subjno", ds_main_subjlist_item.getColumn(e.row,"subjid"));
		
		var oParam = {};
			oParam.id          = "TRATP00101";
			oParam.service     = "subtesteeapp.SubTestee";
			oParam.method      = "reqGetSubTesteeList";
			oParam.inds        = "req=ds_send_srchdata";
			oParam.outds       = "ds_main_testeelist_item=item";
			oParam.async       = false;
			//oParam.callback    = "cf_TRATP00101";

		tranf_submit(oParam);
	}
}

/****************************************************************************************
 * Components		: Grid
 * Components ID	: grp_biz.grd_testeelist
 * Event			: onrbuttondown
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 환자 우클릭 팝업메뉴
 ****************************************************************************************/
function grp_biz_grd_testeelist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	if(e.row > -1) {
		grdf_setSelectedCell(obj, e);		// 선택된 행 확실히 선택해줌
		grd_testeelist_popupmenu.trackPopup(e.screenX,e.screenY); 
	}
	return true;
}

/****************************************************************************************
 * Components		: Grid
 * Components ID	: grp_biz.grd_testeelist
 * Event			: oncelldblclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 환자 더블클릭
 ****************************************************************************************/
function grp_biz_grd_testeelist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var pamorddd = utlf_transNullToEmpty(ds_main_testeelist_item.getColumn(e.row,"pamorddd"));
	var pamkey 	 = pamorddd.split("^");
	var schk 	 = "N";

	if ( pamkey[2] == "O" || pamkey[2] == "S"){
		var pat_info = "O▦"+ ds_main_testeelist_item.getColumn(e.row,"pid") +"▦"+pamkey[0]+"▦"+pamkey[1]+"▦"+sysf_getUserInfo("dutplcecd")+"▦1▦"+pamkey[0];	
		schk 		 = "Y";
	} 

	else if ( pamkey[2]=="I" ){
		var pat_info = "I▦"+ ds_main_testeelist_item.getColumn(e.row,"pid") +"▦"+pamkey[0]+"▦"+pamkey[1]+"▦"+sysf_getUserInfo("dutplcecd")+"▦"+pamkey[0];	
		schk 		 = "Y";
	}

	else if ( pamkey[2]=="E" ){
		var pat_info = "E▦"+ ds_main_testeelist_item.getColumn(e.row,"pid") +"▦"+pamkey[0]+"▦"+pamkey[1]+"▦"+sysf_getUserInfo("dutplcecd");	
		schk 		 = "Y";
	}

	if (schk == "Y"){
// 		frmf_setParameter("condparam", pat_info);
// 		modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");
		appf_initPatientInfo(pat_info);
	}	
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_btn.button1
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 전송
 ****************************************************************************************/
function grp_btn_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var check = "";

	for ( var i = 0 ; i < ds_main_testeelist_item.rowcount ; i++){	
		if(ds_main_testeelist_item.getColumn(i,"sel")=="Y"){
			if(!utlf_isNull(ds_main_testeelist_item.getColumn(i,"screenno")) && ds_main_testeelist_item.getColumn(i,"screenno") != "-") {
				ds_send_smartdata.setColumn(0,"pid"		, ds_main_testeelist_item.getColumn(i,"pid"));
				ds_send_smartdata.setColumn(0,"screenno", ds_main_testeelist_item.getColumn(i,"screenno"));
				
				var oParam = {};
					oParam.id          = "TRATP00201";
					oParam.service     = "subtesteeapp.SubTestee";
					oParam.method      = "reqSetSmartData";
					oParam.inds        = "req=ds_send_smartdata";
					oParam.outds       = "";
					oParam.async       = false;
					//oParam.callback    = "cf_TRATP00201";

				tranf_submit(oParam);
			} else {
				check = "Y";
			}							
		} else {
		}						
	}

	if(check == "Y") {
		sysf_messageBox("Screening No 가 없는 환자가 존재합니다.","I999");	
	} else {
	}	
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_btn.button51
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 엑셀저장
 ****************************************************************************************/
function grp_btn_button51_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_main_testeelist_item.rowcount > 0 ){
		grdf_exportExcel(grp_biz.grd_testeelist, "피험자리스트", "피험자리스트", false, "", "user", false);
	} else {
		sysf_messageBox("조회된 데이터가 ", "I004");
	}
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_btn.btn_cls
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 닫기
 ****************************************************************************************/
function grp_btn_btn_cls_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}
]]></Script>
  </Form>
</FDL>