YNU_JEUS/app_home/himed/xpapps/lis/qcmngtxp/xp/SMLQF10300_핵의학QC검사코드관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLQF10300" position="absolute 0 0 1200 769" titletext="QC검사코드관리" oninit="SMLQF10300_oninit" onload="SMLQF10300_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="QC검사코드관리" class="tit_1" position="absolute 0 0 232 23"/>
        <Shape id="line32" class="line_6" position="absolute 0 45 1194 51" anchor="left top right"/>
        <Button id="btn_exec" taborder="1" text="저장" class="btn4" position="absolute 1068 24 1124 46" anchor="top right" onclick="btn_exec_onclick"/>
        <Button id="button5" taborder="2" text="초기화" class="btn4" position="absolute 1127 24 1195 46" anchor="top right" onclick="button5_onclick"/>
        <Shape id="line1" class="line_10" position="absolute 0 110 1194 116" anchor="left top right"/>
        <Grid id="grd_testList" class="datagrid2" taborder="3" binddataset="ds_main_testlist" useinputpanel="false" position="absolute 0 115 892 762" cellsizingtype="col" anchor="left top bottom">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="20"/>
                <Column size="95"/>
                <Column size="180"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <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"/>
                <Cell col="2" text="검사코드"/>
                <Cell col="3" text="검사명"/>
                <Cell col="4" text="Lab No"/>
                <Cell col="5" text="항목코드"/>
                <Cell col="6" text="OnCall항목"/>
                <Cell col="7" text="방법코드"/>
                <Cell col="8" text="OnCall방법"/>
                <Cell col="9" text="시약코드"/>
                <Cell col="10" text="OnCall시약"/>
                <Cell col="11" text="온도코드"/>
                <Cell col="12" text="OnCall온도"/>
                <Cell col="13" text="단위코드"/>
                <Cell col="14" text="OnCall단위"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                <Cell col="1" celltype="head"/>
                <Cell col="2" style="align:left middle;" text="bind:testcd"/>
                <Cell col="3" style="align:left middle;" text="bind:testnm" wordwrap="word"/>
                <Cell col="4" displaytype="text" edittype="text" style="align:left middle;" text="bind:labno"/>
                <Cell col="5" displaytype="text" edittype="text" text="bind:ocitemcd"/>
                <Cell col="6" text="bind:ocitemnm"/>
                <Cell col="7" displaytype="text" edittype="text" text="bind:ocmthdcd"/>
                <Cell col="8" text="bind:ocmthdnm"/>
                <Cell col="9" displaytype="text" edittype="text" text="bind:ocreagentcd"/>
                <Cell col="10" text="bind:ocreagentnm"/>
                <Cell col="11" displaytype="text" edittype="text" text="bind:octmprcd"/>
                <Cell col="12" text="bind:octmprnm"/>
                <Cell col="13" displaytype="text" edittype="text" text="bind:ocunitcd"/>
                <Cell col="14" text="bind:ocunitnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption2" text="검사코드상세내역" class="tit_2" position="absolute 0 94 173 116"/>
        <Button id="btn_add" taborder="4" text="행추가" class="btn2" enable="false" position="absolute 767 90 820 109"/>
        <Div id="group1" taborder="5" class="div_SA" position="absolute 0 50 1195 85" anchor="left top right">
          <Layouts>
            <Layout>
              <Shape id="line3" linetype="vertical" class="line_4" position="absolute 757 7 763 29" anchor="top right"/>
              <Button id="button1" taborder="1" text="검색" class="btn1" position="absolute 775 7 831 29" anchor="top right" onclick="group1_button1_onclick"/>
              <Static id="caption1" text="검색구분 :" class="search_name" position="absolute 15 11 105 28"/>
              <Combo id="cbo_searchFlag" taborder="2" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 108 9 225 28">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">검사코드</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">검사명</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Edit id="ipt_search" taborder="3" class="input_s_button" position="absolute 230 9 340 28" onkeydown="group1_ipt_search_onkeydown"/>
              <Static id="caption25" text="조회구분 :" class="search_name" position="absolute 866 11 953 28" anchor="top right"/>
              <Combo id="cmb_testLrgCd" taborder="4" innerdataset="@ds_init_lb0104" codecolumn="cd" datacolumn="nm" class="combo_s_essential" position="absolute 955 9 1065 28" anchor="top right" onitemchanged="group1_cmb_testLrgCd_onitemchanged"/>
              <Combo id="cmb_testMdlCd" taborder="5" innerdataset="@ds_init_lb0102" codecolumn="cd" datacolumn="nm" class="combo_s_essential" position="absolute 1070 9 1185 28" anchor="top right" onitemchanged="group1_cmb_testMdlCd_onitemchanged"/>
              <Radio id="rdo_refFlag" taborder="6" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" visible="false" position="absolute 799 9 889 25" anchor="top right">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">QC</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">코드</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Shape id="line2" linetype="vertical" class="line_4" position="absolute 352 7 358 29"/>
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_up" taborder="6" class="icon_left" position="absolute 895 435 921 454" anchor="left top" onclick="btn_up_onclick"/>
        <Static id="caption3" text="검사항목코드목록" class="tit_2" position="absolute 925 94 1098 115" anchor="left top"/>
        <Grid id="grd_tclsList" class="datagrid2" taborder="7" binddataset="ds_main_tclscdlist" useinputpanel="false" position="absolute 925 115 1193 762" anchor="all" oncelldblclick="grd_tclsList_oncelldblclick" oncellclick="grd_tclsList_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="23"/>
                <Column size="20"/>
                <Column size="65"/>
                <Column size="135"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="29"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1"/>
                <Cell col="2" text="검사코드"/>
                <Cell col="3" text="검사명"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk" expr="expr:chk == 'true' ? 1 : 0"/>
                <Cell col="2" style="align:left middle;" text="bind:tclscd"/>
                <Cell col="3" style="align:left middle;padding:0 0 0 1;" text="bind:tclsnm" wordwrap="word"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_del" taborder="8" text="행삭제" class="btn2" position="absolute 827 90 880 109" onclick="btn_del_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_hidden_search" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="searchflag" type="STRING" size="256"/>
          <Column id="searchtext" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="searchflag">1</Col>
            <Col id="searchtext"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="testlrg" type="STRING" size="256"/>
          <Column id="detlmdlcd" type="STRING" size="256"/>
          <Column id="refflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="testlrg">00</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_testmdl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cd">00</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_testlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="testcd" type="STRING" size="256" sumtext="검사코드"/>
          <Column id="testnm" type="STRING" size="256" sumtext="검사명"/>
          <Column id="ocitemcd" type="STRING" size="256" sumtext="OnCall항목"/>
          <Column id="ocmthdcd" type="STRING" size="256" sumtext="OnCall방법"/>
          <Column id="ocreagentcd" type="STRING" size="256" sumtext="시약"/>
          <Column id="octmprcd" type="STRING" size="256" sumtext="OnCall온도"/>
          <Column id="ocunitcd" type="STRING" size="256" sumtext="OnCall단위"/>
          <Column id="ocitemnm" type="STRING" size="256" sumtext="OnCall항목"/>
          <Column id="ocmthdnm" type="STRING" size="256" sumtext="OnCall방법"/>
          <Column id="ocreagentnm" type="STRING" size="256" sumtext="시약"/>
          <Column id="octmprnm" type="STRING" size="256" sumtext="OnCall온도"/>
          <Column id="ocunitnm" type="STRING" size="256" sumtext="OnCall단위"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_tclscdlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_tclscdlist_oncolumnchanged">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256" sumtext="chk"/>
          <Column id="tclscd" type="STRING" size="256" sumtext="검사코드"/>
          <Column id="spccd" type="STRING" size="256" sumtext="검체코드"/>
          <Column id="tclsnm" type="STRING" size="256" sumtext="검사명"/>
          <Column id="tclskind" type="STRING" size="256" sumtext="검사구분"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_lb0102" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_lb0104" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_lb0000" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </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="codeflag" type="STRING" size="256"/>
          <Column id="testmdlcd" type="STRING" size="256"/>
          <Column id="testlrgcd" type="STRING" size="256"/>
          <Column id="deptflag" type="STRING" size="256"/>
          <Column id="refgbn" type="STRING" size="256"/>
          <Column id="refcont" type="STRING" size="256"/>
          <Column id="testlist" type="STRING" size="256"/>
          <Column id="colno" type="STRING" size="256"/>
          <Column id="itemcd" type="STRING" size="256"/>
          <Column id="selectgbn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="codeflag"/>
            <Col id="testmdlcd"/>
            <Col id="testlrgcd"/>
            <Col id="deptflag"/>
            <Col id="refgbn"/>
            <Col id="refcont"/>
            <Col id="testlist"/>
            <Col id="colno"/>
            <Col id="itemcd"/>
            <Col id="selectgbn"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.cbo_searchFlag" propid="value" datasetid="ds_hidden_search" columnid="searchflag"/>
      <BindItem id="item1" compid="group1.ipt_search" propid="value" datasetid="ds_hidden_search" columnid="searchtext"/>
      <BindItem id="item2" compid="group1.rdo_refFlag" propid="value" datasetid="ds_hidden" columnid="refflag"/>
      <BindItem id="item3" compid="group1.cmb_testLrgCd" propid="value" datasetid="ds_hidden" columnid="testlrg"/>
      <BindItem id="item4" compid="group1.cmb_testMdlCd" propid="value" datasetid="ds_hidden_testmdl" columnid="cd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LLZ001.xjs";
function SMLQF10300_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMLQF10300_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_tclsList);
	grdf_initGrid(grd_testList);
	grdf_setRowTypeIcon(grd_testList, 1);
	
	fSetInit();
}

function fSetInit()
{
	ds_main_tclscdlist.clearData();
	ds_main_testlist.clearData();
	
	lf_getDbDeptcd("0102|0104|0000|", "")
	
	fGetHospTclscd(); 
}

function fGetHospTclscd()
{
	if(utlf_isNull(ds_hidden_search.getColumn(0, "searchtext")))
	{
		ds_main_testlist.clearData();
		
		ds_send.setColumn(0, "refgbn", ds_hidden_search.getColumn(0, "searchflag"));
		ds_send.setColumn(0, "refcont", ds_hidden_search.getColumn(0, "searchtext"));
		ds_send.setColumn(0, "deptflag", ds_init_lb0000.getColumn(0, "nm"));
		ds_send.setColumn(0, "testlrgcd", utlf_transNullToEmpty(ds_hidden.getColumn(0, "testlrg")));
		
		var oParam = {};
			oParam.id          = "TRLQF00301";
			oParam.service     = "grademngtbasemngtapp.TclscdMngt";
			oParam.method      = "reqGetTclscd";
			oParam.inds        = "cond=ds_send";
			oParam.outds       = "ds_main_testlist=testlist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLQF00301";

		tranf_submit(oParam);
	}
	else
	{
		ds_send.setColumn(0, "refgbn", ds_hidden_search.getColumn(0, "searchflag"));
		ds_send.setColumn(0, "refcont", ds_hidden_search.getColumn(0, "searchtext"));
		ds_send.setColumn(0, "deptflag", ds_init_lb0000.getColumn(0, "nm"));
		ds_send.setColumn(0, "testlrgcd", utlf_transNullToEmpty(ds_hidden.getColumn(0, "testlrg")));
			
		var oParam = {};
			oParam.id          = "TRLQF00304";
			oParam.service     = "grademngtbasemngtapp.TclscdMngt";
			oParam.method      = "reqGetTestOnly";
			oParam.inds        = "cond=ds_send";
			oParam.outds       = "ds_main_testlist=testlist ds_main_tclscdlist=gettclscdlist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLQF00304";

		tranf_submit(oParam);
	}
}

function ds_main_tclscdlist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "chk")
	{
		obj.setColumn(e.row, "chk", (e.newvalue == "true" || e.newvalue == 1) ? "true" : "false");
	}
}

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

function fKeyEvent()
{	
	fGetHospTclscd();
}

function fGetHospTclscd()
{
	if(utlf_isNull(ds_hidden_search.getColumn(0, "searchtext")))
	{
		ds_main_testlist.clearData();
		
		ds_send.setColumn(0, "refgbn", ds_hidden_search.getColumn(0, "searchflag"));
		ds_send.setColumn(0, "refcont", ds_hidden_search.getColumn(0, "searchtext"));
		ds_send.setColumn(0, "deptflag", ds_init_lb0000.getColumn(0, "nm"));
		
		var oParam = {};
			oParam.id          = "TRLQF00301";
			oParam.service     = "grademngtbasemngtapp.TclscdMngt";
			oParam.method      = "reqGetTclscd";
			oParam.inds        = "cond=ds_send";
			oParam.outds       = "ds_main_testlist=testlist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLQF00301";

		tranf_submit(oParam);
	}
	else
	{
		ds_send.setColumn(0, "refgbn", ds_hidden_search.getColumn(0, "searchflag"));
		ds_send.setColumn(0, "refcont", ds_hidden_search.getColumn(0, "searchtext"));
		ds_send.setColumn(0, "deptflag", ds_init_lb0000.getColumn(0, "nm"));
		
		var oParam = {};
			oParam.id          = "TRLQF00304";
			oParam.service     = "grademngtbasemngtapp.TclscdMngt";
			oParam.method      = "reqGetTestOnly";
			oParam.inds        = "cond=ds_send";
			oParam.outds       = "ds_main_testlist=testlist ds_main_tclscdlist=gettclscdlist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLQF00304";

		tranf_submit(oParam);
	}
}

function group1_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetHospTclscd();
}

function group1_cmb_testLrgCd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fSetTestLrgCd();
}

function fSetTestLrgCd()
{
	var lrg = group1.cmb_testLrgCd.value;
		
	if(lrg == "00")
	{
		ds_init_lb0102.filterstr = "";
		ds_hidden_testmdl.setColumn(0, "cd", "00");
	}
	else
	{	
		ds_hidden_testmdl.setColumn(0, "cd", "00");
		ds_init_lb0102.filterstr = "cd == '00'||etc01 == '"+lrg+"'";
	}
	fGetTclscdList();
}

function group1_cmb_testMdlCd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fGetTclscdList();	
}

function fGetTclscdList()
{
	ds_main_tclscdlist.clearData();
	
	ds_send.setColumn(0, "selectgbn", "1");
	ds_send.setColumn(0, "testlrgcd", ds_hidden.getColumn(0, "testlrg"));
	ds_send.setColumn(0, "testmdlcd", ds_hidden_testmdl.getColumn(0, "cd"));
	ds_send.setColumn(0, "deptflag", ds_init_lb0000.getColumn(0, "nm"));
		
	var oParam = {};
		oParam.id          = "TRLLF00608";
		oParam.service     = "diagtestbaseinfomngtapp.GeneralTestBaseInfoMngt";
		oParam.method      = "reqGetHospTclscdList2";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_main_tclscdlist=gettclscdlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLLF00608";

	tranf_submit(oParam);		
}

function grd_tclsList_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fSetTclsCopy();
}

function fSetTclsCopy()
{
	var sTestcd = ds_main_tclscdlist.getColumn(ds_main_tclscdlist.rowposition, "tclscd");
	var findrow = ds_main_testlist.findRow("testcd",sTestcd);
	
	if(findrow > -1) 
	{
		alert("이미 선택된 검사코드입니다.");
		ds_main_tclscdlist.setColumn(ds_main_tclscdlist.rowposition, "chk", "false");
		return;
	}
	
	var row = ds_main_testlist.addRow();
	ds_main_testlist.setColumn(row, "testcd", ds_main_tclscdlist.getColumn(ds_main_tclscdlist.rowposition, "tclscd"));
	ds_main_testlist.setColumn(row, "testnm", ds_main_tclscdlist.getColumn(ds_main_tclscdlist.rowposition, "tclsnm"));
	ds_main_tclscdlist.setColumn(ds_main_tclscdlist.rowposition, "chk", "false");
}

function grd_tclsList_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	fTclsListClick();
}

function fTclsListClick()
{
	if(grd_tclsList.currentcol != "1")
	{
		if(ds_main_tclscdlist.getColumn(ds_main_tclscdlist.rowposition, "chk") != "true")
		{
			ds_main_tclscdlist.setColumn(ds_main_tclscdlist.rowposition, "chk", "true");
		}
		else
		{
			ds_main_tclscdlist.setColumn(ds_main_tclscdlist.rowposition, "chk", "false");
		}					
	}
}

function btn_del_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_testlist.updatecontrol = false;
	ds_main_testlist.setRowType(ds_main_testlist.rowposition, "d");
	ds_main_testlist.updatecontrol = true;
}

function btn_exec_onclick(obj:Button,  e:ClickEventInfo)
{
	if(sysf_messageBox("", "Q002")==6)
	{
		var upd = grdf_getGridUpdateData(grd_testList).rowcount;
		
		if(upd == 0) 
		{
			alert("저장할 자료가 존재하지 않습니다.");
			return;
		}

		ds_send.setColumn(0, "deptflag", ds_init_lb0000.getColumn(0, "nm"));
		
		var oParam = {};
			oParam.id          = "TXLQF00301";
			oParam.service     = "grademngtbasemngtapp.TclscdMngt";
			oParam.method      = "reqExeTclscd";
			oParam.inds        = "data=ds_main_testlist:u cond=ds_send";
			oParam.async       = false;
			oParam.callback    = "cf_TXLQF00301";

		tranf_submit(oParam);
	}		
}

function cf_TXLQF00301(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) 
    {
		return;
	}
	else
	{
		fGetHospTclscd();
	}
}

function button5_onclick(obj:Button,  e:ClickEventInfo)
{
	this.reload();
}

function btn_up_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetChoiTestList();
}

function fSetChoiTestList() 
{						
	var vChk = ""
	var vTestCd = ""
	var vTestNm = ""
	
	for(var i = 0; i < ds_main_tclscdlist.rowcount; i++)
	{
		vChk 		= ds_main_tclscdlist.getColumn(i, "chk");
		vTclsCd 	= ds_main_tclscdlist.getColumn(i, "tclscd");
		vTclsNm 	= ds_main_tclscdlist.getColumn(i, "tclsnm");
	
		if(vChk == "true")
		{
			if(ds_main_testlist.findRow("testcd", vTclsCd) == "-1")
			{
				var row = ds_main_testlist.addRow();
				
				ds_main_testlist.setColumn(row, "testcd", vTclsCd);
				ds_main_testlist.setColumn(row, "testnm", vTclsNm);
				ds_main_tclscdlist.setColumn(i, "chk", "false");
			}
			else
			{
				alert(vTclsCd + " 항목이 중복되었습니다");
				ds_main_tclscdlist.setColumn(i, "chk", "false");
			}
		}
	}
}]]></Script>
  </Form>
</FDL>