YNU_JEUS/app_home/himed/xpapps/lis/donmngtxp/xp/SMLBD02200_Apheresis업무.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLBD02200" position="absolute 0 0 1200 800" titletext="Apheresis 업무" onload="SMLBD02200_onload" oninit="SMLBD02200_oninit">
    <Layouts>
      <Layout>
        <Tab id="swt_apheresis" taborder="4" tabindex="0" position="absolute 0 27 1200 796" anchor="all" onchanged="swt_apheresis_onchanged">
          <Tabpages>
            <Tabpage id="case1" text="대상환자">
              <Layouts>
                <Layout>
                  <Div id="grp" taborder="1" position="absolute 0 0 1200 35" class="div_SA2" anchor="left top right">
                    <Layouts>
                      <Layout width="1182" height="35">
                        <Button id="btn_search" taborder="6" text="조회" class="btn1" position="absolute 1132 8 1188 28" anchor="default" onclick="swt_apheresis_case1_grp_btn_search_onclick"/>
                        <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1114 7 1120 29" anchor="default"/>
                        <Static id="caption2" text="처방적용일자 :" class="search_name" position="absolute 14 8 117 28"/>
                        <Calendar id="input4" taborder="7" autoselect="true" dateformat="yyyy-MM-dd" position="absolute 125 8 210 28"/>
                        <Static id="caption3" text="~" position="absolute 215 8 230 28"/>
                        <Calendar id="input3" taborder="8" autoselect="true" dateformat="yyyy-MM-dd" position="absolute 227 8 312 28"/>
                        <Static id="caption6" text="시술종류:" class="search_name" position="absolute 366 8 445 28"/>
                        <Combo id="cmb_testkind" taborder="9" position="absolute 455 8 616 28" innerdataset="ds_UC00002" codecolumn="cdid" datacolumn="cdnm" onitemchanged="swt_apheresis_case1_grp_cmb_testkind_onitemchanged"/>
                        <Static id="caption10" text="등록번호:" class="search_name" position="absolute 662 9 731 29"/>
                        <Edit id="input1" taborder="10" autoselect="true" position="absolute 743 9 798 29" onkeyup="swt_apheresis_case1_grp_input1_onkeyup"/>
                        <Edit id="input2" taborder="11" enable="false" position="absolute 800 9 861 29"/>
                        <Button id="btn_patsrch" taborder="12" class="icon_search" position="absolute 862 9 882 29" onclick="swt_apheresis_case1_grp_btn_patsrch_onclick"/>
                        <Button id="btn_eraser01" taborder="13" class="icon_eraser" position="absolute 883 6 909 32" tooltiptext="등록번호 초기화" onclick="swt_apheresis_case1_grp_btn_eraser01_onclick"/>
                      </Layout>
                    </Layouts>
                  </Div>
                  <Button id="btn_excel" taborder="2" text="엑셀" class="btn7" position="absolute 1149 38 1200 58" onclick="swt_apheresis_case1_btn_excel_onclick" anchor="top right"/>
                  <Shape id="line38" linetype="horizontal" class="line_10" position="absolute 0 59 1200 65" anchor="left top right"/>
                  <Grid id="grd_trgtlist" taborder="26" useinputpanel="false" treeusecheckbox="false" position="absolute 0 65 1200 735" anchor="all" binddataset="ds_trgtlist" cellsizingtype="col" oncelldblclick="swt_apheresis_case1_grd_trgtlist_oncelldblclick">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="25"/>
                          <Column size="75"/>
                          <Column size="110"/>
                          <Column size="50"/>
                          <Column size="50"/>
                          <Column size="60"/>
                          <Column size="60"/>
                          <Column size="40"/>
                          <Column size="200"/>
                          <Column size="100"/>
                          <Column size="60"/>
                          <Column size="60"/>
                          <Column size="40"/>
                          <Column size="40"/>
                          <Column size="70"/>
                          <Column size="200"/>
                          <Column size="70"/>
                          <Column size="120"/>
                        </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="S/A"/>
                          <Cell col="8" text="진단명"/>
                          <Cell col="9" text="진료과"/>
                          <Cell col="10" text="담당교수"/>
                          <Cell col="11" text="담당의"/>
                          <Cell col="12" text="키"/>
                          <Cell col="13" text="몸무게"/>
                          <Cell col="14" text="처방코드"/>
                          <Cell col="15" text="처방명"/>
                          <Cell col="16" text="처방입력자"/>
                          <Cell col="17" text="처방입력시간"/>
                        </Band>
                        <Band id="body">
                          <Cell celltype="head" text="expr:currow + 1"/>
                          <Cell col="1" text="bind:prcpdd" mask="expr:utlf_isNull(prcpdd) ? &quot;&quot; : &quot;####-##-##&quot;"/>
                          <Cell col="2" text="bind:testkindnm"/>
                          <Cell col="3" text="bind:btype"/>
                          <Cell col="4" text="bind:roomcd"/>
                          <Cell col="5" text="bind:hngnm"/>
                          <Cell col="6" text="bind:pid"/>
                          <Cell col="7" text="bind:sa"/>
                          <Cell col="8" style="align:left middle;" text="bind:diagnm"/>
                          <Cell col="9" displaytype="text" text="bind:orddeptnm"/>
                          <Cell col="10" text="bind:orddrnm"/>
                          <Cell col="11" text="bind:atdoctnm"/>
                          <Cell col="12" text="bind:ht"/>
                          <Cell col="13" text="bind:wt"/>
                          <Cell col="14" displaytype="text" text="bind:prcpcd"/>
                          <Cell col="15" displaytype="normal" edittype="none" style="align:left middle;padding:1 2 1 2;" text="bind:prcpnm" treestartlevel="1" treelevel="bind:execprcplevel"/>
                          <Cell col="16" text="bind:rgstrnm"/>
                          <Cell col="17" text="bind:rgstdt" mask="expr:utlf_isNull(rgstdt) ? &quot;&quot; : &quot;####-##-## ##:##:##&quot;"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
            <Tabpage id="case2" text="실시환자">
              <Layouts>
                <Layout width="1196" height="700">
                  <Div id="grp" taborder="1" position="absolute 0 0 1200 35" class="div_SA" anchor="left top right">
                    <Layouts>
                      <Layout width="1182" height="35">
                        <Button id="btn_search" taborder="3" text="조회" class="btn1" position="absolute 1130 8 1186 28" anchor="default" onclick="swt_apheresis_case2_grp_btn_search_onclick"/>
                        <Shape id="line1" linetype="vertical" class="line_4" position="absolute 1115 6 1121 28" anchor="default"/>
                        <Static id="caption2" text="시술기록일자 :" class="search_name" position="absolute 14 8 117 28"/>
                        <Calendar id="input4" taborder="4" autoselect="true" dateformat="yyyy-MM-dd" position="absolute 125 8 210 28"/>
                        <Static id="caption3" text="~" position="absolute 215 8 230 28"/>
                        <Calendar id="input3" taborder="5" autoselect="true" dateformat="yyyy-MM-dd" position="absolute 227 8 312 28"/>
                        <Static id="caption6" text="시술종류:" class="search_name" position="absolute 366 8 445 28"/>
                        <Combo id="cmb_testkind" taborder="6" innerdataset="ds_UC00002" codecolumn="cdid" datacolumn="cdnm" position="absolute 455 8 616 28" onitemchanged="swt_apheresis_case2_grp_cmb_testkind_onitemchanged"/>
                        <Static id="caption10" text="등록번호:" class="search_name" position="absolute 662 9 731 29"/>
                        <Edit id="input1" taborder="7" autoselect="true" position="absolute 743 9 798 29" onkeyup="swt_apheresis_case2_grp_input1_onkeyup"/>
                        <Edit id="input2" taborder="8" enable="false" position="absolute 800 9 861 29"/>
                        <Button id="btn_patsrch" taborder="9" class="icon_search" position="absolute 862 9 882 29" onclick="swt_apheresis_case2_grp_btn_patsrch_onclick"/>
                        <Button id="btn_eraser01" taborder="10" class="icon_eraser" position="absolute 883 6 909 32" tooltiptext="등록번호 초기화" onclick="swt_apheresis_case2_grp_btn_eraser01_onclick"/>
                      </Layout>
                    </Layouts>
                  </Div>
                  <Button id="btn_excel" taborder="2" text="엑셀" class="btn7" position="absolute 1149 38 1200 58" onclick="swt_apheresis_case2_btn_excel_onclick" anchor="top right"/>
                  <Shape id="line2" linetype="horizontal" class="line_10" position="absolute 0 59 1200 65" anchor="left top right"/>
                  <Grid id="grd_execlist" taborder="3" binddataset="ds_execlist" useinputpanel="false" cellsizingtype="col" treeusecheckbox="false" position="absolute 0 65 1200 735" anchor="all" oncelldblclick="swt_apheresis_case2_grd_execlist_oncelldblclick" autofittype="col">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="25"/>
                          <Column size="75"/>
                          <Column size="110"/>
                          <Column size="50"/>
                          <Column size="50"/>
                          <Column size="60"/>
                          <Column size="60"/>
                          <Column size="40"/>
                          <Column size="200"/>
                          <Column size="100"/>
                          <Column size="60"/>
                          <Column size="60"/>
                          <Column size="40"/>
                          <Column size="40"/>
                          <Column size="70"/>
                          <Column size="120"/>
                        </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="S/A"/>
                          <Cell col="8" text="진단명"/>
                          <Cell col="9" text="진료과"/>
                          <Cell col="10" text="담당교수"/>
                          <Cell col="11" text="담당의"/>
                          <Cell col="12" text="키"/>
                          <Cell col="13" text="몸무게"/>
                          <Cell col="14" text="기록수정자"/>
                          <Cell col="15" text="기록수정시간"/>
                        </Band>
                        <Band id="body">
                          <Cell celltype="head" text="expr:currow + 1"/>
                          <Cell col="1" text="bind:lastformrecdd" mask="expr:utlf_isNull(lastformrecdd) ? &quot;&quot; : &quot;####-##-##&quot;"/>
                          <Cell col="2" text="bind:testkindnm"/>
                          <Cell col="3" text="bind:btype"/>
                          <Cell col="4" text="bind:roomcd"/>
                          <Cell col="5" text="bind:hngnm"/>
                          <Cell col="6" text="bind:pid"/>
                          <Cell col="7" text="bind:sa"/>
                          <Cell col="8" style="align:left middle;" text="bind:diagnm"/>
                          <Cell col="9" displaytype="text" text="bind:orddeptnm"/>
                          <Cell col="10" text="bind:orddrnm"/>
                          <Cell col="11" text="bind:atdoctnm"/>
                          <Cell col="12" text="bind:ht"/>
                          <Cell col="13" text="bind:wt"/>
                          <Cell col="14" text="bind:lastupdtnm"/>
                          <Cell col="15" text="bind:lastupdtdt" mask="expr:utlf_isNull(lastupdtdt) ? &quot;&quot; : &quot;####-##-## ##:##:##&quot;"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
          </Tabpages>
        </Tab>
        <Static id="caption6" text="Apheresis 업무" class="tit_1" position="absolute 0 0 136 25"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_cond_trgt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="testkind" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_cond_exec" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="testkind" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_UC00002" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_trgtlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="prcpno" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="testkind" type="STRING" size="256"/>
          <Column id="testkindnm" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="sa" type="STRING" size="256"/>
          <Column id="sex" type="STRING" size="256"/>
          <Column id="age" type="STRING" size="256"/>
          <Column id="btype" type="STRING" size="256"/>
          <Column id="ht" type="STRING" size="256"/>
          <Column id="wt" type="STRING" size="256"/>
          <Column id="ordtype" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="orddrnm" type="STRING" size="256"/>
          <Column id="atdoctnm" type="STRING" size="256"/>
          <Column id="diagnm" type="STRING" size="256"/>
          <Column id="roomcd" type="STRING" size="256"/>
          <Column id="prcpcd" type="STRING" size="256"/>
          <Column id="prcpnm" type="STRING" size="256"/>
          <Column id="rgstrnm" type="STRING" size="256"/>
          <Column id="rgstdt" type="STRING" size="256"/>
          <Column id="srchdd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_execlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="lastformrecdd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="testkind" type="STRING" size="256"/>
          <Column id="testkindnm" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="sa" type="STRING" size="256"/>
          <Column id="sex" type="STRING" size="256"/>
          <Column id="age" type="STRING" size="256"/>
          <Column id="btype" type="STRING" size="256"/>
          <Column id="ht" type="STRING" size="256"/>
          <Column id="wt" type="STRING" size="256"/>
          <Column id="ordtype" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="orddrnm" type="STRING" size="256"/>
          <Column id="atdoctnm" type="STRING" size="256"/>
          <Column id="diagnm" type="STRING" size="256"/>
          <Column id="roomcd" type="STRING" size="256"/>
          <Column id="lastupdtnm" type="STRING" size="256"/>
          <Column id="lastupdtdt" type="STRING" size="256"/>
          <Column id="srchdd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item11" compid="swt_apheresis.case1.grp.input4" propid="value" datasetid="ds_cond_trgt" columnid="fromdd"/>
      <BindItem id="item12" compid="swt_apheresis.case1.grp.input3" propid="value" datasetid="ds_cond_trgt" columnid="todd"/>
      <BindItem id="item0" compid="swt_apheresis.case1.grp.cmb_testkind" propid="value" datasetid="ds_cond_trgt" columnid="testkind"/>
      <BindItem id="item13" compid="swt_apheresis.case1.grp.input1" propid="value" datasetid="ds_cond_trgt" columnid="pid"/>
      <BindItem id="item14" compid="swt_apheresis.case1.grp.input2" propid="value" datasetid="ds_cond_trgt" columnid="hngnm"/>
      <BindItem id="item1" compid="swt_apheresis.case2.grp.input4" propid="value" datasetid="ds_cond_exec" columnid="fromdd"/>
      <BindItem id="item2" compid="swt_apheresis.case2.grp.input3" propid="value" datasetid="ds_cond_exec" columnid="todd"/>
      <BindItem id="item3" compid="swt_apheresis.case2.grp.cmb_testkind" propid="value" datasetid="ds_cond_exec" columnid="testkind"/>
      <BindItem id="item4" compid="swt_apheresis.case2.grp.input1" propid="value" datasetid="ds_cond_exec" columnid="pid"/>
      <BindItem id="item5" compid="swt_apheresis.case2.grp.input2" propid="value" datasetid="ds_cond_exec" columnid="hngnm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	SMLBD02200_Apheresis업무
 * Job Name 		:	
 * Creator 	    	:	엄영만 
 * Make Date 		:	2019-05-10
 * Description  	:	치료적 혈장교환술, 백혈구성분채집술, 조혈모세포수집 관련 업부 처리 화면
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2019-05-10      엄영만        Create
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include 'com_commonxp::comm_main.xjs';
include 'com_departmentcodexp::ZSD001.xjs';

//=======================================================================================
// Events
//---------------------------------------------------------------------------------------
function SMLBD02200_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMLBD02200_onload(obj:Form, e:LoadEventInfo)
{

	grdf_initGrid(swt_apheresis.case1.grd_trgtlist); 
	grdf_setToolTipBind(swt_apheresis.case1.grd_trgtlist);
    grdf_setGridSort(swt_apheresis.case1.grd_trgtlist); 
    
    grdf_initGrid(swt_apheresis.case2.grd_execlist); 
	grdf_setToolTipBind(swt_apheresis.case2.grd_execlist);
    grdf_setGridSort(swt_apheresis.case2.grd_execlist); 
    
	appf_getUserCodeList([{dsNm: "ds_UC00002", userCd: "00002"}], true);
	                 
	frmf_addComboItem("swt_apheresis.case1.grp.cmb_testkind");    //전체항목 추가
	
	ds_cond_trgt.setColumn(0, "fromdd"  , ((utlf_getCurrentDate().toDate()).getAddDate(-7,"D")).getDateFormat()); // 최근 7일
	ds_cond_trgt.setColumn(0, "todd"    , utlf_getCurrentDate()); //종료일자는 현재일자
	ds_cond_trgt.setColumn(0, "testkind", "-");

	ds_cond_exec.setColumn(0, "fromdd"  , ((utlf_getCurrentDate().toDate()).getAddDate(-7,"D")).getDateFormat()); // 최근 7일
	ds_cond_exec.setColumn(0, "todd"    , utlf_getCurrentDate()); //종료일자는 현재일자
	ds_cond_exec.setColumn(0, "testkind", "-");
	
	swt_apheresis.enableevent = false;
	swt_apheresis.tabindex = 0;
	swt_apheresis.enableevent = true;
	
	fGetApheresisTrgtList();
}

/****************************************************************************************
 * Argument			: 
 * Description		: case1 의 btn_search 버튼 클릭 이벤트
 ****************************************************************************************/
function swt_apheresis_case1_grp_btn_search_onclick(obj:Button,  e:ClickEventInfo){
	fGetApheresisTrgtList();
}

function swt_apheresis_case1_grp_cmb_testkind_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fGetApheresisTrgtList();
}

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

/****************************************************************************************
 * Argument			: 
 * Description		: case1 의 엑셀 버튼 클릭 이벤트
 ****************************************************************************************/
function swt_apheresis_case1_btn_excel_onclick(obj:Button,  e:ClickEventInfo){
	grdf_exportExcel(swt_apheresis.case1.grd_trgtlist, 'Apheresis대상환자', '대상환자', false, null, "user", true);
}

/****************************************************************************************
 * Argument			: 
 * Description		: case2 의 조회 버튼 클릭 이벤트
 ****************************************************************************************/
function swt_apheresis_case2_grp_btn_search_onclick(obj:Button,  e:ClickEventInfo){
	fGetApheresisExecList();
}

function swt_apheresis_case2_grp_cmb_testkind_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fGetApheresisExecList();
}

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

/****************************************************************************************
 * Argument			: 
 * Description		: case2 의 엑셀 버튼 클릭 이벤트
 ****************************************************************************************/
function swt_apheresis_case2_btn_excel_onclick(obj:Button,  e:ClickEventInfo){	
	grdf_exportExcel(swt_apheresis.case2.grd_execlist, 'Apheresis실시환자', '실시환자', false, null, "user", true);
}


function swt_apheresis_case1_grp_btn_patsrch_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SPPMC02500", "SPPMC02500", null, null, null, null, null, null, null, null, null, null, "M");

	if(!utlf_isNull(this.objects["ds_patinfolist"])) {
		var sPid   = ds_patinfolist.getColumn(0, "pid");
		var sHngnm = ds_patinfolist.getColumn(0, "hngnm");
		ds_cond_trgt.setColumn(0, "pid",   sPid);
		ds_cond_trgt.setColumn(0, "hngnm", sHngnm);
	}
}

function swt_apheresis_case2_grp_btn_patsrch_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SPPMC02500", "SPPMC02500", null, null, null, null, null, null, null, null, null, null, "M");

	if(!utlf_isNull(this.objects["ds_patinfolist"])) {
		var sPid   = ds_patinfolist.getColumn(0, "pid");
		var sHngnm = ds_patinfolist.getColumn(0, "hngnm");
		ds_cond_exec.setColumn(0, "pid",   sPid);
		ds_cond_exec.setColumn(0, "hngnm", sHngnm);
	}	
}

function swt_apheresis_case1_grp_btn_eraser01_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_cond_trgt.setColumn(0, "pid",   "");
	ds_cond_trgt.setColumn(0, "hngnm", "");	
}

function swt_apheresis_case2_grp_btn_eraser01_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_cond_exec.setColumn(0, "pid",   "");
	ds_cond_exec.setColumn(0, "hngnm", "");	
}

//=======================================================================================
// Local methods
//---------------------------------------------------------------------------------------
function fGetApheresisTrgtList() {
	ds_trgtlist.clearData();
	ds_trgtlist.addRow();
	
	var oParam = {};
		oParam.id          = "TRLBD02201";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqGetApheresisTrgtList";
		oParam.inds        = "req=ds_cond_trgt";
		oParam.outds       = "ds_trgtlist=trgtlist";
		oParam.async       = false;
		
	tranf_submit(oParam);
}

function fGetApheresisExecList() {
	ds_execlist.clearData();
	ds_execlist.addRow();
	
	var oParam = {};
		oParam.id          = "TRLBD02201";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqGetApheresisExecList";
		oParam.inds        = "req=ds_cond_exec";
		oParam.outds       = "ds_execlist=execlist";
		oParam.async       = false;
		
	tranf_submit(oParam);
}

function fSetPatInfos(sInstCd, sOrdType, sPid, sOrdDd, sCretNo, sSrchDd) {
	
	if( sOrdType == "D" ) { // DSC는 입원으로 처리
		sOrdType = "I";
    }
	
	var param = sOrdType + "▦" + sPid + "▦" + sOrdDd + "▦" +sCretNo + "▦" + sInstCd + "▦" + sSrchDd;
	
	frmf_setParameter("condparam",  param);
	appf_initPatientInfo(param);
}

// 부서별 기록 확럽
function fPopDeptRec(sPid, sOrdDd, sCretno, sOrdType, sOrdDeptCd, sOrdDrId, sHngNm, sAge, sSex, sTestKind, sTabFlag) {
	var sSuppDeptCd	= sysf_getUserInfo("dutplcecd");
	var sFormDeptCd	= "";
	var sFormCd	    = "";
	if(sTestKind == "00003") {         // 치료적 혈장교환술(TTE)
		sFormCd = "1900023402";
	} else if(sTestKind == "00004") {  // 치료적 백혈구성분채집술(Leukapheresis)
		sFormCd = "1900023403";
	} else if(sTestKind == "00005") {  // 동종 조혈모세포수집(PBSCC)
		sFormCd = "1900023942";
	} else if(sTestKind == "00010") {  // 자가 조혈모세포수집(PBSCC)
		sFormCd = "1900023401";
	}
	frmf_setParameter("SPMMR05400_parm_formcd",    sFormCd);
	frmf_setParameter("SPMMR05400_tabflag",        sTabFlag);  // formlist, reclist
	frmf_setParameter("SPMMR05400_parm_pinfo",     sPid + "▦" + sOrdDd + "▦" + sCretno + "▦" + sOrdType + "▦" + sOrdDeptCd + "▦" + sOrdDrId +"▦"+ sHngNm + "▦" + sAge + "▦" + sSex + "▦" + sSuppDeptCd + "▦" + sFormDeptCd);
	frmf_setParameter("SPMMR05400_parm_formrecdd", utlf_getCurrentDate()); 

	var curRecObj = frmf_findPopup("SPMMR05400");
	if(!utlf_isNull(curRecObj)){
		curRecObj.reload();
	} else {
	   frmf_open("SPMMR05400", "SPMMR05400", null, null, null, null, null, null, null, null, null, null, "M");
	}
}

function swt_apheresis_case1_grd_trgtlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var nRow        = ds_trgtlist.rowposition;
	var sInstCd     = ds_trgtlist.getColumn(nRow, "instcd");
	var sPid 		= ds_trgtlist.getColumn(nRow, "pid");
	var sOrdDd 		= ds_trgtlist.getColumn(nRow, "orddd");
	var sCretno		= ds_trgtlist.getColumn(nRow, "cretno");
	var sOrdType 	= ds_trgtlist.getColumn(nRow, "ordtype"); 
	var sSrchDd     = ds_trgtlist.getColumn(nRow, "srchdd"); 
	var sOrdDeptCd  = ds_trgtlist.getColumn(nRow, "orddeptcd");
	var sOrdDrId    = ds_trgtlist.getColumn(nRow, "orddrid"); 
	var sHngNm 	    = ds_trgtlist.getColumn(nRow, "hngnm"); 
	var sAge 	    = ds_trgtlist.getColumn(nRow, "age"); 
	var sSex 	    = ds_trgtlist.getColumn(nRow, "sex"); 
	var sTestKind 	= ds_trgtlist.getColumn(nRow, "testkind"); 
	
	// 상단정보 설정
	fSetPatInfos(sInstCd, sOrdType, sPid, sOrdDd, sCretno, sSrchDd);
	
	// 부서별 기록 화면 팝업
	fPopDeptRec(sPid, sOrdDd, sCretno, sOrdType, sOrdDeptCd, sOrdDrId, sHngNm, sAge, sSex, sTestKind, "formlist"); 
}

function swt_apheresis_case2_grd_execlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var nRow        = ds_execlist.rowposition;
	var sInstCd     = ds_execlist.getColumn(nRow, "instcd");
	var sPid 		= ds_execlist.getColumn(nRow, "pid");
	var sOrdDd 		= ds_execlist.getColumn(nRow, "orddd");
	var sCretno		= ds_execlist.getColumn(nRow, "cretno");
	var sOrdType 	= ds_execlist.getColumn(nRow, "ordtype"); 
	var sSrchDd     = ds_execlist.getColumn(nRow, "srchdd"); 
	var sOrdDeptCd  = ds_execlist.getColumn(nRow, "orddeptcd");
	var sOrdDrId    = ds_execlist.getColumn(nRow, "orddrid"); 
	var sHngNm 	    = ds_execlist.getColumn(nRow, "hngnm"); 
	var sAge 	    = ds_execlist.getColumn(nRow, "age"); 
	var sSex 	    = ds_execlist.getColumn(nRow, "sex"); 
	var sTestKind 	= ds_execlist.getColumn(nRow, "testkind"); 
	
	// 상단정보 설정
	fSetPatInfos(sInstCd, sOrdType, sPid, sOrdDd, sCretno, sSrchDd);
	
	// 부서별 기록 화면 팝업
	fPopDeptRec(sPid, sOrdDd, sCretno, sOrdType, sOrdDeptCd, sOrdDrId, sHngNm, sAge, sSex, sTestKind, "reclist"); 
}

function swt_apheresis_onchanged(obj:Tab, e:TabIndexChangeEventInfo)
{
	if(e.postindex == 0) { 
		fGetApheresisTrgtList();  // 대상자조회
	} else {
		fGetApheresisExecList();  // 실시자조회
	}
}
]]></Script>
  </Form>
</FDL>