YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SMMMB08300_임상시험프로토콜관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMMB08300" position="absolute 0 0 1187 790" titletext="임상시험 프로토콜 관리" oninit="SMMMB08300_oninit" onload="SMMMB08300_onload" onclose="SMMMB08300_onclose">
    <Layouts>
      <Layout>
        <Div position="absolute 234 28 1187 761" id="iviewer1" style="border:1 solid #bac5ccff ;" url="emr_prcpmngtxp::SMMMB00200_약속처방SET관리.xfdl"/>
        <Grid position="absolute 0 380 227 761" autofit="col" id="trv_prmsprcpsetlist" binddataset="ds_main_subjprtllist" selecttype="treecell" treeusecheckbox="false" style="border:1 solid #33bbbbff,0 solid #bac5ccff,1 solid #bac5ccff,0 solid #bac5ccff;" autosizingtype="col" userdata="0" onrbuttondown="trv_prmsprcpsetlist_onrbuttondown" cantreestatuschange="trv_prmsprcpsetlist_cantreestatuschange" oncellclick="trv_prmsprcpsetlist_oncellclick" treeinitstatus="expand,null" autofittype="col" ondrag="trv_prmsprcpsetlist_ondrag" ondragleave="trv_prmsprcpsetlist_ondragleave" ondragmove="trv_prmsprcpsetlist_ondragmove" ondrop="trv_prmsprcpsetlist_ondrop">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="225"/>
              </Columns>
              <Rows>
                <Row size="24"/>
              </Rows>
              <Band id="body">
                <Cell displaytype="tree" edittype="tree" style="line:0 none #808080ff ;background:EXPR(fDragOverColorChng(currow));background2:EXPR(fDragOverColorChng(currow));" text="bind:stepnm" treestartlevel="1" treelevel="bind:lev" autosizecol="limitmin"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static text="임상시험 프로토콜 관리" position="absolute 0 0 171 25" id="caption6" class="tit_1"/>
        <Grid position="absolute 0 28 227 201" id="grd_subjlist" binddataset="ds_main_subjlist" oncellclick="grd_subjlist_oncellclick" scrollpixel="all" onmousewheel="grd_subjlist_onmousewheel">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="120"/>
                <Column size="95"/>
                <Column size="83"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="과제번호"/>
                <Cell col="1" text="연구코드"/>
                <Cell col="2" text="종료일"/>
              </Band>
              <Band id="body">
                <Cell style="align:left middle;" text="bind:subjno"/>
                <Cell col="1" style="align:left middle;" text="bind:stdyno"/>
                <Cell col="2" style="align:left middle;" text="bind:subjenddd" mask="expr:(subjenddd == &quot;-&quot; || subjenddd == &quot;&quot;) ? &quot;&quot; : &quot;####-##-##&quot;"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static text="BSA 계산 =" position="absolute 230 770 324 790" id="caption3" class="search_name"/>
        <Static text="((신장                cm x 체중               kg) / 3600)^(1/2)  =" position="absolute 330 770 653 790" align="align:center middle;" id="caption11"/>
        <Button position="absolute 770 770 812 790" id="button1" class="btn5" text="계산"/>
        <Edit position="absolute 367 770 427 790" id="ipt_height"/>
        <Edit position="absolute 484 770 539 790" id="ipt_weight"/>
        <Edit readonly="true" position="absolute 663 770 763 790" id="opt_BSA"/>
        <PopupDiv id="pdiv_iptbox1" oncloseup="pdiv_iptbox_oncloseup" style="background:#99ccffff;border:1 solid #3366ffff ;" onkeydown="pdiv_iptbox_onkeydown" visible="false" position="absolute 8 485 222 540">
          <Layouts>
            <Layout>
              <Static id="caption4" text="폴더명" position="absolute 5 5 46 25" anchor="default"/>
              <Edit id="ipt_setnm" taborder="9" imemode="hangul" autoselect="true" onkeydown="pdiv_iptbox_ipt_setnm_onkeydown" position="absolute 55 5 207 25" anchor="left right"/>
              <Button id="btn_cnfm" taborder="10" text="확인" onclick="pdiv_iptbox_btn_cnfm_onclick" class="btn2" position="absolute 121 29 163 48" anchor="right"/>
              <Button id="button3" taborder="11" text="취소" onclick="pdiv_iptbox_button3_onclick" class="btn2" position="absolute 165 29 207 48" anchor="right"/>
            </Layout>
          </Layouts>
        </PopupDiv>
        <Div id="Div00" taborder="1" position="absolute 0 205 227 376" class="div_SA2">
          <Layouts>
            <Layout>
              <Static id="caption5" text="과제번호" class="search_name" position="absolute 10 9 81 29" anchor="default"/>
              <Edit id="opt_subjno" taborder="1" readonly="true" position="absolute 21 28 210 48" anchor="default" class="output"/>
              <Static id="caption2" text="과제명" class="search_name" position="absolute 10 52 96 72" anchor="default"/>
              <TextArea id="txt_subjnm" taborder="2" position="absolute 21 71 210 136" anchor="default" wordwrap="char"/>
              <Static id="caption1" text="총회차 :" class="search_name" position="absolute 10 146 75 163" anchor="default"/>
              <MaskEdit id="ipt_totstep" taborder="3" mask="##" position="absolute 92 145 138 164" anchor="default"/>
              <Button id="btn_savestep" taborder="4" text="최초생성" class="btn2" enable="false" position="absolute 143 145 210 165" anchor="default" onclick="Div00_btn_savestep_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <PopupMenu id="pmn_menu" innerdataset="@ds_menu" idcolumn="func" captioncolumn="label" levelcolumn="level" onmenuclick="pmn_menu_onmenuclick" position="absolute 1188 377 1288 440"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_subjlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="subjid" type="STRING" size="256" sumtext="과제ID(실제subjno)"/>
          <Column id="subjno" type="STRING" size="256" sumtext="과제ID"/>
          <Column id="stdyno" type="STRING" size="256" sumtext="연구번호"/>
          <Column id="subjenddd" type="STRING" size="256" sumtext="과제 종료일자"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="stdysubjnm" type="STRING" size="256" sumtext="과제명"/>
          <Column id="cpgno" type="STRING" size="256" sumtext="cp/cpg번호"/>
          <Column id="cpghistseq" type="STRING" size="256" sumtext="cp/cpg이력번호"/>
          <Column id="cpgnm" type="STRING" size="256" sumtext="cp명"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="입원/외래구분"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_subjlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="subjid" type="STRING" size="256" sumtext="과제ID(실제subjno)"/>
          <Column id="subjno" type="STRING" size="256" sumtext="과제ID"/>
          <Column id="stdyno" type="STRING" size="256" sumtext="연구번호"/>
          <Column id="subjenddd" type="STRING" size="256" sumtext="과제 종료일자"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="stdysubjnm" type="STRING" size="256" sumtext="과제명"/>
          <Column id="cpgno" type="STRING" size="256" sumtext="cp/cpg번호"/>
          <Column id="cpghistseq" type="STRING" size="256" sumtext="cp/cpg이력번호"/>
          <Column id="cpgnm" type="STRING" size="256" sumtext="cp명"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="입원/외래구분"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="subjid" type="STRING" size="256" sumtext="과제ID(실제subjno)"/>
          <Column id="subjno" type="STRING" size="256" sumtext="과제ID"/>
          <Column id="stdyno" type="STRING" size="256" sumtext="연구번호"/>
          <Column id="subjenddd" type="STRING" size="256" sumtext="과제 종료일자"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="stdysubjnm" type="STRING" size="256" sumtext="과제명"/>
          <Column id="cpgno" type="STRING" size="256" sumtext="cp/cpg번호"/>
          <Column id="cpghistseq" type="STRING" size="256" sumtext="cp/cpg이력번호"/>
          <Column id="cpgnm" type="STRING" size="256" sumtext="cp명"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="입원/외래구분"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_subjprtllist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="lev" type="STRING" size="256" sumtext="level번호"/>
          <Column id="cpgno" type="INT" size="256" sumtext="CP/CPG번호"/>
          <Column id="cpghistseq" type="INT" size="256" sumtext="CP/CPG이력순번"/>
          <Column id="stepno" type="INT" size="256" sumtext="회차번호"/>
          <Column id="stepnm" type="STRING" size="256" sumtext="회차명"/>
          <Column id="setno" type="INT" size="256" sumtext="약속set번호"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="외래입원"/>
          <Column id="refseq" type="INT" size="256" sumtext="실제회차"/>
          <Column id="status" type="STRING" size="256" sumtext="상태"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_menu" 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="func" type="STRING" size="256"/>
          <Column id="level" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">새폴더</Col>
            <Col id="func">fAddSubjPrtlSet</Col>
            <Col id="level">0</Col>
          </Row>
          <Row>
            <Col id="label">폴더이름 바꾸기</Col>
            <Col id="func">fUpdtPrtlSet</Col>
            <Col id="level">0</Col>
          </Row>
          <Row>
            <Col id="label">폴더삭제</Col>
            <Col id="func">fDelSubjPrtlSet</Col>
            <Col id="level">0</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="totstep" type="INT" size="256"/>
          <Column id="height" type="STRING" size="256"/>
          <Column id="weight" type="STRING" size="256"/>
          <Column id="BSA" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_TXMMB08303" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="totstep" type="INT" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_iptbox" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="setnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="setnm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_savedata_subj" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="subjno" type="STRING" size="256" sumtext="과제번호"/>
          <Column id="stdyno" type="STRING" size="256" sumtext="연구코드"/>
          <Column id="subjenddd" type="STRING" size="256" sumtext="과제종료일자"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="stdysubjnm" type="STRING" size="256" sumtext="과제명"/>
          <Column id="cpgno" type="INT" size="256" sumtext="cp/cpg번호"/>
          <Column id="cpghistseq" type="INT" size="256" sumtext="cp/cpg이력번호"/>
          <Column id="cpgnm" type="STRING" size="256" sumtext="cp명"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="입원/외래구분"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_savedata_subjprtl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="lev" type="STRING" size="256" sumtext="level번호"/>
          <Column id="cpgno" type="INT" size="256" sumtext="CP/CPG번호"/>
          <Column id="cpghistseq" type="INT" size="256" sumtext="CP/CPG이력순번"/>
          <Column id="stepno" type="INT" size="256" sumtext="회차번호"/>
          <Column id="stepnm" type="STRING" size="256" sumtext="회차명"/>
          <Column id="setno" type="INT" size="256" sumtext="약속set번호"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="외래입원"/>
          <Column id="refseq" type="INT" size="256" sumtext="실제회차"/>
          <Column id="status" type="STRING" size="256" sumtext="상태"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_TXMMB08304" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="lev" type="STRING" size="256" sumtext="level번호"/>
          <Column id="cpgno" type="INT" size="256" sumtext="CP/CPG번호"/>
          <Column id="cpghistseq" type="INT" size="256" sumtext="CP/CPG이력순번"/>
          <Column id="stepno" type="INT" size="256" sumtext="회차번호"/>
          <Column id="stepnm" type="STRING" size="256" sumtext="회차명"/>
          <Column id="setno" type="INT" size="256" sumtext="약속set번호"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="외래입원"/>
          <Column id="refseq" type="INT" size="256" sumtext="실제회차"/>
          <Column id="status" type="STRING" size="256" sumtext="상태"/>
          <Column id="srcindx" type="INT" size="256" sumtext="원래회차"/>
          <Column id="trgtindx" type="INT" size="256" sumtext="변경회차"/>
          <Column id="indxkind" type="INT" size="256" sumtext="변경종류"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="Div00.opt_subjno" propid="value" datasetid="ds_hidden_subjlist" columnid="subjno"/>
      <BindItem id="item1" compid="Div00.txt_subjnm" propid="value" datasetid="ds_hidden_subjlist" columnid="stdysubjnm"/>
      <BindItem id="item2" compid="Div00.ipt_totstep" propid="value" datasetid="ds_init" columnid="totstep"/>
      <BindItem id="item3" compid="ipt_height" propid="value" datasetid="ds_init" columnid="height"/>
      <BindItem id="item4" compid="ipt_weight" propid="value" datasetid="ds_init" columnid="weight"/>
      <BindItem id="item5" compid="opt_BSA" propid="value" datasetid="ds_init" columnid="BSA"/>
      <BindItem id="item6" compid="pdiv_iptbox1.ipt_setnm" propid="value" datasetid="ds_iptbox" columnid="setnm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-12-10
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-12-10      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

var g_prevmouserow = -1;


function SMMMB08300_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMMMB08300_onload(obj:Form, e:LoadEventInfo)
{
	var oParam = {};
		oParam.id       = "TRMMB08301";
		oParam.service  = "prcpbaseapp.PrcpClsMngt";
		oParam.method   = "reqGetUserSubjectList";
		oParam.outds    = "ds_main_subjlist=subjlist";
		oParam.async    = true;
	    oParam.callback = "cf_TXMMB08301";

	tranf_submit(oParam);
}

function cf_TXMMB08301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    
    ds_main_subjlist.rowposition = -1;
}

function SMMMB08300_onclose(obj:Form, e:CloseEventInfo)
{
	frmf_closeChildPop();
}

function grd_subjlist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	ds_send_reqdata.clearData();
	ds_send_reqdata.addRow();
	ds_send_reqdata.copyRow(0, ds_main_subjlist, e.row);
	
	var oParam = {};
		oParam.id       = "TXMMB08301";
		oParam.service  = "prcpbaseapp.PrcpClsMngt";
		oParam.method   = "reqGetSubjectProtocolList";
		oParam.inds     = "req=ds_send_reqdata";
		oParam.outds    = "ds_main_subjprtllist=subjprtllist";
		oParam.async    = false;

	tranf_submit(oParam);
	
	// 프로토콜정보(mmphcinf)에대해 조회된 정보를 그리드에 다시 세팅. (lev='1')
	ds_main_subjlist.setColumn(e.row, "cpgno",      ds_main_subjprtllist.lookup("lev", '1', "cpgno"));
	ds_main_subjlist.setColumn(e.row, "cpghistseq", ds_main_subjprtllist.lookup("lev", '1', "cpghistseq"));
	ds_main_subjlist.setColumn(e.row, "cpgnm",      ds_main_subjprtllist.lookup("lev", '1', "stepnm"));
	ds_main_subjlist.setColumn(e.row, "ioflag",     ds_main_subjprtllist.lookup("lev", '1', "ioflag"));
	
	ds_hidden_subjlist.clearData();
	ds_hidden_subjlist.addRow();
	ds_hidden_subjlist.copyRow(0, ds_main_subjlist, e.row);
	
	var findRow = ds_main_subjprtllist.findRow("lev", '1');
	if (findRow > -1)
		ds_main_subjprtllist.setColumn(findRow, "stepnm", ds_hidden_subjlist.getColumn(0, "subjno") + " " + ds_main_subjprtllist.lookup("lev", '1', "stepnm"));
	
	if ( ds_main_subjprtllist.rowcount > 0 ) {
		Div00.btn_savestep.enable = false;
		Div00.ipt_totstep.enable = false;
	} else {
		Div00.btn_savestep.enable = true;
		Div00.ipt_totstep.enable = true;
	}
}

function grd_subjlist_onmousewheel(obj:Grid, e:MouseWheelEventInfo)
{
	obj.vscrollbar.pos = obj.vscrollbar.pos - e.amount;
}

function trv_prmsprcpsetlist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	if(e.row < 0 || e.col < 0) return;
	
	obj.setFocus();

	grdf_setSelectedCell(obj, e);
	
	obj.oncellclick.fireEvent(obj, new GridClickEventInfo());
	
	pmn_menu.trackPopup(e.screenX,e.screenY);
}

function trv_prmsprcpsetlist_cantreestatuschange(obj:Grid, e:GridTreeStatusEventInfo)
{
	obj.userdata = 1;
}

function trv_prmsprcpsetlist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	// icon으로 tree를 컨트롤 하는 경우는 여기를 태우지 않는다.
	if(obj.userdata == 1) {
		obj.userdata = 0;
		return;
	}
	
	fReqSubjPrtlStepSet();
	
	var row = obj.getTreeRow(ds_main_subjprtllist.rowposition);
	if(obj.getTreeStatus(row) == 0)
		obj.setTreeStatus(row, true);
    
    obj.userdata = 0;
}

function Div00_btn_savestep_onclick(obj:Button,  e:ClickEventInfo)
{
	if ( utlf_isNull(ds_init.getColumn(0, "totstep")) || parseInt(ds_init.getColumn(0, "totstep")) == 0 ) {
		sysf_messageBox("총 회차를", "C001");
		return -1;
	} else if ( parseInt(ds_init.getColumn(0, "totstep")) >= 20 ) {
		sysf_messageBox("총 회차가 20 이 넘습니다.", "Q003");
		return -1;
	}	
	
	ds_TXMMB08303.copyData(ds_hidden_subjlist);	
	ds_TXMMB08303.addColumn("totstep", "INT");
	ds_TXMMB08303.setColumn(0, "totstep", ds_init.getColumn(0, "totstep"));

	var oParam = {};
		oParam.id       = "TXMMB08303";
		oParam.service  = "prcpbaseapp.PrcpClsMngt";
		oParam.method   = "reqExeSavePrtlStep";
		oParam.inds     = "req=ds_TXMMB08303";
		oParam.outds    = "ds_main_subjprtllist=subjprtllist";
		oParam.async    = false;

	tranf_submit(oParam);			//	회차 자동생성.
	
	var findRow = ds_main_subjprtllist.findRow("lev", '1');
	if (findRow > -1)
		ds_main_subjprtllist.setColumn(findRow, "stepnm", ds_hidden_subjlist.getColumn(0, "subjno") + " " + ds_main_subjprtllist.lookup("lev", '1', "stepnm"));
		
	if ( ds_main_subjprtllist.rowcount > 0 )
		obj.enable = false;
	else
		obj.enable = true;
}

function pmn_menu_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{
	eval(e.id + "()");
}

function pdiv_iptbox_ipt_setnm_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13) {
		obj.updateToDataset();
		frmf_inputEnterKey(obj.parent.name + ".btn_cnfm", "onclick", new ClickEventInfo);
	}
}

function pdiv_iptbox_btn_cnfm_onclick(obj:Button,  e:ClickEventInfo)
{
	fClkBtnCnfm(obj);
}

function pdiv_iptbox_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	obj.parent.ipt_setnm.setFocus();
	obj.parent.closePopup();
}

function pdiv_iptbox_oncloseup(obj:PopupDiv, e:EventInfo)
{
	trv_prmsprcpsetlist.setFocus();
}

function pdiv_iptbox_onkeydown(obj:PopupDiv, e:KeyEventInfo)
{
	if(e.keycode == 27) {
		obj.ipt_setnm.setFocus();
		obj.closePopup();
	}
}

/**
 * @desc   : 임상시험프로토콜 스텝별 상세조회
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fReqSubjPrtlStepSet(){
    var rowpos    = ds_main_subjprtllist.rowposition;

    var levl      = ds_main_subjprtllist.getColumn(rowpos, "lev");
    var setno     = ds_main_subjprtllist.getColumn(rowpos, "setno");
    var settypecd = "T"     // 임상시험프로토콜
    var setnm     = ds_main_subjprtllist.getColumn(rowpos, "stepnm");

    iviewer1.ds_prmsprcpsetdetlset.setColumn(0, "setno"    , setno);
    iviewer1.ds_prmsprcpsetdetlset.setColumn(0, "settypecd", settypecd);
    iviewer1.ds_prmsprcpsetdetlset.setColumn(0, "setnm"    , setnm);

    iviewer1.fReqGetPrmsSet();
}

/**
 * @desc   : 약속진단관리 폴더명을 입력할 InputBox를 보여줌.
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fShowWndIptBox() {
	var arrCellRect = trv_prmsprcpsetlist.getCellRect(trv_prmsprcpsetlist.getTreeRow(ds_main_subjprtllist.rowposition), trv_prmsprcpsetlist.getCellPos());
		
	var XPOS          = 6;
	var YPOS          = 0;
	
	var clientY = arrCellRect.bottom + 12;				// 시스템 좌표 구할 것이기 때문에 현재 위치 좌표만 구한다.
	if(clientY + trv_prmsprcpsetlist.position.top >= 720){	// 그리드 위치와 더해서 비교
		YPOS = arrCellRect.bottom - (pdiv_iptbox1.position.height + 36);
	}else{
		YPOS = clientY;
	}		
    
	var nDivX = system.clientToScreenX(trv_prmsprcpsetlist, XPOS);
	var nDivY = system.clientToScreenY(trv_prmsprcpsetlist, YPOS);
	
	pdiv_iptbox1.trackPopup(nDivX, nDivY);
}

/**
 * @desc   : 새폴더 추가
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fAddSubjPrtlSet(){
   ds_iptbox.setColumn(0, "setnm", "");

   if(fSetPrtlFolder(ds_main_subjprtllist.rowposition, "i") != -1){
       fShowWndIptBox();
   }
}

/**
 * @desc   : 폴더 삭제
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fDelSubjPrtlSet(){ 
    if(fSetPrtlFolder(ds_main_subjprtllist.rowposition, "d") != -1){
        fSaveFolderSet();
    }
    iviewer1.fClrGridData();
}

/**
 * @desc   : 폴더 이름 바꾸기
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fUpdtPrtlSet(){
    var currow = ds_main_subjprtllist.rowposition;

    var foldernm = ds_main_subjprtllist.getColumn(currow, "stepnm");
    var refseq   = ds_main_subjprtllist.getColumn(currow, "refseq");
    var subjno   = ds_hidden_subjlist.getColumn(0, "subjno");

    if (refseq == 0 )
        foldernm = foldernm.replace(subjno,  "").getTrim();
    else
        foldernm = foldernm.replace(refseq+"회",  "").getTrim();

    ds_iptbox.setColumn(0, "setnm", foldernm);

    if(fSetPrtlFolder(currow, "u") != -1){
        fShowWndIptBox();
    }
}

/**
 * @desc   : 폴더상태 변경 관련 세팅
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSetPrtlFolder(rowpos, status){
    var refseq = ds_main_subjprtllist.getColumn(rowpos, "refseq");
    var stepnm = ds_main_subjprtllist.getColumn(rowpos, "stepnm");

    if (status == "d") {          //삭제일 경우.
        if (refseq == 0) {
            sysf_messageBox("선택한 폴더는 삭제", "E001");
            return -1;
        }

        var rtnval = sysf_messageBox("[" + stepnm + "]내의 모든 처방이 지워집니다. " + "[" + stepnm + "]폴더를", "Q001");
        if(rtnval == 7){
            return -1;
        }
    }
    
    ds_main_subjprtllist.setColumn(rowpos, "status", status);
}

/**
 * @desc   : 폴더 저장 후, 저장된 폴더의 depth까지 펼친다
 * @
 * @param  :
 * @return :
 * @authur : 오지훈 2007. 10. 21
 * @---------------------------------------------------
 */
function fClkBtnCnfm(obj:Button){
    obj.parent.ipt_setnm.setFocus();
	obj.parent.closePopup();

    fSaveFolderSet();
}

/**
 * @desc   : 폴더정보 변경된 것에 대한 세팅.
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSaveFolderSet(){
    var currow = ds_main_subjprtllist.rowposition;

    var stepnm = ds_iptbox.getColumn(0, "setnm");
    var cpgno  = ds_main_subjprtllist.getColumn(currow, "cpgno");
    var refseq = ds_main_subjprtllist.getColumn(currow, "refseq");
    var status = ds_main_subjprtllist.getColumn(currow, "status");
    
    var rowposition;
    
    if ( status == "u" ) {
        if (refseq == 0 ){
            ds_hidden_subjlist.setColumn(0, "cpgnm", stepnm);
            
            ds_send_savedata_subj.copyData(ds_hidden_subjlist);
        } else {
			ds_main_subjprtllist.setColumn(currow, "stepnm", stepnm);
			
			ds_send_savedata_subjprtl.clearData();
			ds_send_savedata_subjprtl.addRow();
			ds_send_savedata_subjprtl.copyRow(0, ds_main_subjprtllist, currow);
        }
        
        rowposition = currow;
    } else if ( status == "i" ) {
		ds_main_subjprtllist.setColumn(currow, "stepno", ds_main_subjprtllist.getMax("stepno"));
        ds_main_subjprtllist.setColumn(currow, "refseq", ds_main_subjprtllist.getMax("refseq"));
        ds_main_subjprtllist.setColumn(currow, "stepnm", stepnm);
        
        ds_send_savedata_subjprtl.clearData();
		ds_send_savedata_subjprtl.addRow();
		ds_send_savedata_subjprtl.copyRow(0, ds_main_subjprtllist, currow);
		
		rowposition = ds_main_subjprtllist.rowcount;
    } else if ( status == "d" ) {
		ds_send_savedata_subjprtl.clearData();
		ds_send_savedata_subjprtl.addRow();
		ds_send_savedata_subjprtl.copyRow(0, ds_main_subjprtllist, currow);
		
		rowposition = -1;
    }

	var oParam = {};
		oParam.id       = "TXMMB08302";
		oParam.service  = "prcpbaseapp.PrcpClsMngt";
		oParam.method   = "reqExeSaveStepNm";
		oParam.inds     = "subj=ds_send_savedata_subj subjprtl=ds_send_savedata_subjprtl";
		oParam.outds    = "ds_main_subjprtllist=subjprtllist";
		oParam.async    = false;
		oParam.callback = "cf_TXMMB08302";

	tranf_submit(oParam);
	
	ds_main_subjprtllist.rowposition = rowposition;
}

function cf_TXMMB08302(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    
    var findRow = ds_main_subjprtllist.findRow("lev", '1');
	if (findRow > -1)
		ds_main_subjprtllist.setColumn(findRow, "stepnm", ds_hidden_subjlist.getColumn(0, "subjno") + " " + ds_main_subjprtllist.lookup("lev", '1', "stepnm"));
}

function trv_prmsprcpsetlist_ondrag(obj:Grid, e:GridDragEventInfo)
{
	if(e.row < 0 || e.col < 0) return false;
		
	return true;
}

function trv_prmsprcpsetlist_ondragleave(obj:Grid, e:DragEventInfo)
{
	g_prevmouserow = -1;
}

function trv_prmsprcpsetlist_ondragmove(obj:Grid, e:GridDragEventInfo)
{
	if(e.row != g_prevmouserow)
        g_prevmouserow = e.row;
}

function trv_prmsprcpsetlist_ondrop(obj:Grid, e:GridDragEventInfo)
{
	if(g_prevmouserow == -1) return false;
	
	fDropTrvItem(obj, e.row);
	g_prevmouserow = -1;
}

/**
 * @desc   : Mouse Drag Over중 선택한 treeview item의 색깔 변경
 * @
 * @param  :
 * @return :
 * @author : 오지훈 2007. 10. 30
 * @---------------------------------------------------
 */
function fDragOverColorChng(currow){    
    return (currow == g_prevmouserow) ? "#ccffff" : "#ffffff";
}

/**
 * @desc   : Mouse Drop시 treeview item의 순서 변경
 * @
 * @param  :
 * @return :
 * @author : 오지훈 2007. 10. 30
 * @---------------------------------------------------
 */
function fDropTrvItem(obj:Grid, trgtindx){
	//선택된 아이템
	var srcindx = ds_main_subjprtllist.rowposition;
	var srcval  = ds_main_subjprtllist.getColumn(srcindx, "setno");

	//드롭 위치의 아이템
	var trgtval  = ds_main_subjprtllist.getColumn(trgtindx, "setno");
	if (trgtval == 0){
		sysf_messageBox("선택된 폴더로 이동", "E001");
		return;
	}
	
	ds_TXMMB08304.clearData();
	ds_TXMMB08304.addRow();
	ds_TXMMB08304.copyRow(0, ds_main_subjprtllist, srcindx);
	
	ds_TXMMB08304.setColumn(0, "srcindx", srcindx);
	ds_TXMMB08304.setColumn(0, "trgtindx", trgtindx);

	if (srcindx > trgtindx) {
		ds_TXMMB08304.setColumn(0, "indxkind", 2);
	} else if (srcindx < trgtindx) {
		ds_TXMMB08304.setColumn(0, "indxkind", 1);
	} else {
		return;  
	}

	var oParam = {};
		oParam.id       = "TXMMB08304";
		oParam.service  = "prcpbaseapp.PrcpClsMngt";
		oParam.method   = "reqExeSaveStepChange";
		oParam.inds     = "req=ds_TXMMB08304";
		oParam.outds    = "ds_main_subjprtllist=subjprtllist";
		oParam.async    = false;

	tranf_submit(oParam);
	
	var findRow = ds_main_subjprtllist.findRow("lev", '1');
	if (findRow > -1)
		ds_main_subjprtllist.setColumn(findRow, "stepnm", ds_hidden_subjlist.getColumn(0, "subjno") + " " + ds_main_subjprtllist.lookup("lev", '1', "stepnm"));
		
	ds_main_subjprtllist.rowposition = trgtindx;
}
]]></Script>
  </Form>
</FDL>