YNU_JEUS/app_home/himed/xpapps/lis/plgyacptmngtxp/xp/SPLPJ01500_조직검사의뢰지.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLPJ01500" position="absolute 0 0 771 735" titletext="조직검사 의뢰지" onload="SPMPJ01500_onload">
    <Layouts>
      <Layout>
        <Static id="Static03" class="sta_DA_box" position="absolute 2 24 366 102"/>
        <Static id="caption2" text="처방정보" class="tit_2" position="absolute 3 6 82 23"/>
        <Static id="caption25" text="처방명" class="cell_1" position="absolute 3 25 103 49"/>
        <Static id="caption6" text="대표검체" class="cell_1" position="absolute 3 50 103 74"/>
        <Edit id="output2" taborder="10" readonly="true" position="absolute 106 27 366 47"/>
        <Grid id="grd_choispc" taborder="4" useinputpanel="false" position="absolute 374 24 765 434" autoenter="none" binddataset="ds_rslt_choispclist" onexpanddown="grd_choispc_onexpanddown" onkillfocus="grd_choispc_onkillfocus" selecttype="multirow" autofittype="col" onrbuttonup="grd_choispc_onrbuttonup">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="37"/>
                <Column size="0"/>
                <Column size="225"/>
                <Column size="0"/>
                <Column size="125"/>
              </Columns>
              <Rows>
                <Row size="22" band="head"/>
                <Row size="20"/>
              </Rows>
              <Band id="head">
                <Cell text="선택"/>
                <Cell col="1" text="번호"/>
                <Cell col="2" text="검체코드"/>
                <Cell col="3" text="검체명" taborder="undefined"/>
                <Cell col="4" text="존재여부"/>
                <Cell col="5" text="슬라이드갯수"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:choi"/>
                <Cell col="1" class="text_center" text="bind:spcseqno" editscrollbar="fixedvert"/>
                <Cell col="2" text="bind:spccd"/>
                <Cell col="3" displaytype="text" edittype="text" style="padding:0 0 0 10;" text="bind:spcnm" editautoselect="true" expandshow="show" expandsize="15"/>
                <Cell col="4" text="bind:existyn"/>
                <Cell col="5" displaytype="normal" edittype="masknumber" editfilter="number" style="align:center middle;" text="bind:slidno" editautoselect="true"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption5" text="검체명" class="tit_2" position="absolute 374 6 441 26" onclick="caption5_onclick"/>
        <Combo id="cmb_reprspccd" taborder="0" position="absolute 106 52 286 72" onitemchanged="cmb_reprspccd_onitemchanged" value="-" index="-1" type="filter" inputmode="lower" innerdataset="@ds_popup_list" codecolumn="spccd" datacolumn="spcnm" style="itemheight:15;"/>
        <Static id="caption7" text="임상소견" class="tit_2" position="absolute 3 437 78 453"/>
        <Static id="caption20" text="검체명 목록(예문)" class="tit_2" position="absolute 2 106 136 126" onclick="caption20_onclick"/>
        <Button id="btn_save" taborder="9" text="확인" class="btn4" position="absolute 653 712 709 732" onclick="btn_save_onclick"/>
        <Button id="btn_cls111" taborder="18" text="닫기" class="btn4" position="absolute 711 712 767 732" visible="true" onclick="btn_cls111_onclick"/>
        <Grid id="grd_spclist" taborder="7" useinputpanel="false" position="absolute 3 125 366 433" onclick="grd_spclist_onclick" oncellclick="grd_spclist_oncellclick" visible="true" binddataset="ds_init_detlspclist" onheadclick="grd_spclist_onheadclick" autofittype="col" selectbandtype="default" cellclickbound="cell">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="55"/>
                <Column size="0"/>
                <Column size="306"/>
              </Columns>
              <Rows>
                <Row size="22" band="head"/>
                <Row size="20"/>
              </Rows>
              <Band id="head">
                <Cell celltype="none" displaytype="checkbox" edittype="checkbox"/>
                <Cell col="1" text="검체코드"/>
                <Cell col="2" text="검체명(예문)"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" style="align:center middle;" text="bind:choi" editscrollbar="fixedvert"/>
                <Cell col="1" text="bind:spccd"/>
                <Cell col="2" style="align:left middle;" text="bind:spcnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_allspc" taborder="14" text="전체검체" class="btn2" position="absolute 298 103 366 123" onclick="btn_allspc_onclick" visible="true"/>
        <Button id="btn_spcadd" taborder="20" text="검체추가" class="btn2" visible="false" position="absolute 698 1 765 21" onclick="btn_spcadd_onclick"/>
        <Button id="btn_img" taborder="21" onclick="imgButton_onclick" class="btn_picture" position="absolute 102 437 122 457" anchor="top right" visible="true" enable="true"/>
        <Static id="caption00" class="cell_1" position="absolute 3 76 103 100"/>
        <Radio id="rdo_ltrt" taborder="23" columncount="3" rowcount="0" position="absolute 109 76 354 98" codecolumn="codecolumn" datacolumn="datacolumn" value="2" index="2">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" size="256"/>
              <Column id="datacolumn" size="256"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">0</Col>
                <Col id="datacolumn">RT</Col>
              </Row>
              <Row>
                <Col id="codecolumn">1</Col>
                <Col id="datacolumn">LT</Col>
              </Row>
              <Row>
                <Col id="codecolumn">2</Col>
                <Col id="datacolumn">Other</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Button id="btn_exmp" taborder="24" position="absolute 81 437 101 457" onclick="btn_exmp_onclick" class="btn_list"/>
        <Static id="Static00" position="absolute 1 459 766 606" class="sta_DA_box"/>
        <TextArea id="tar_prcpcnts" taborder="25" wordwrap="word" usecontextmenu="false" position="absolute 372 486 764 603" style="padding:10 10 10 10;" scrollbars="autovert"/>
        <Grid id="grd_resncd" taborder="26" useinputpanel="false" position="absolute 4 462 370 605" binddataset="ds_grd_resncd" oncellclick="grd_resncd_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="54"/>
                <Column size="310"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="임상소견"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:choi"/>
                <Cell col="1" style="align:left middle;" text="bind:resnnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="Static01" text="기타임상소견" position="absolute 373 463 764 487" style="background:#00939373;align:center middle;gradation:none 0,0 white 100,100 black;"/>
        <Static id="caption01" text="Character" class="tit_2" position="absolute 2 614 134 634"/>
        <Static id="Static02" class="sta_DA_box" position="absolute 2 630 765 708"/>
        <Static id="caption03" text="Viscosity :" class="cell_1" position="absolute 3 631 103 655"/>
        <Static id="caption04" text="Color :" class="cell_1" position="absolute 3 656 103 680"/>
        <Static id="caption08" class="cell_1" position="absolute 3 682 103 706" text="Turbidity :"/>
        <Static id="Static04" text="&gt;&gt; Character 및 Remark는 선택적으로 입력하십시오. &lt;&lt;" position="absolute 155 611 575 634" style="color:red;font:돋움,9,bold;"/>
        <Static id="caption09" text="Remark" class="tit_2" position="absolute 666 614 749 634" visible="false"/>
        <Shape id="line1" position="absolute 9 654 765 655" style="border:1 solid #808080ff ;"/>
        <Shape id="line00" position="absolute 8 680 759 681" style="border:1 solid #808080ff ;"/>
        <CheckBox id="chk_viscosity1" taborder="27" text="Watery" position="absolute 111 636 193 650" truevalue="0" visible="false"/>
        <Static id="caption14" text="Slide           장" position="absolute 671 637 762 651" visible="false"/>
        <MaskEdit id="input2" taborder="28" position="absolute 703 632 742 653" mask="#,###" visible="false"/>
        <CheckBox id="chk_viscosity2" taborder="29" text="Viscous" value="0" truevalue="0" position="absolute 194 636 276 650" visible="false"/>
        <CheckBox id="chk_color1" taborder="30" text="Colorless" value="0" truevalue="0" visible="false" position="absolute 112 661 194 675"/>
        <CheckBox id="chk_color2" taborder="31" text="White" value="0" truevalue="0" visible="false" position="absolute 194 661 276 675"/>
        <CheckBox id="chk_color3" taborder="32" text="Yellow" value="0" truevalue="0" visible="false" position="absolute 298 661 366 675"/>
        <CheckBox id="chk_color4" taborder="33" text="Red" value="0" truevalue="0" visible="false" position="absolute 368 661 416 675"/>
        <CheckBox id="chk_color5" taborder="34" text="Others" value="0" truevalue="0" visible="false" position="absolute 424 661 494 675"/>
        <CheckBox id="chk_clear1" taborder="35" text="Clear" value="0" truevalue="0" visible="false" position="absolute 112 686 194 700"/>
        <CheckBox id="chk_clear2" taborder="36" text="Ground glass" value="0" truevalue="0" visible="false" position="absolute 195 686 296 700"/>
        <CheckBox id="chk_clear3" taborder="37" text="Turbid" value="0" truevalue="0" visible="false" position="absolute 299 686 381 700"/>
        <Edit id="edit_Other" taborder="38" position="absolute 487 657 640 677" visible="false"/>
        <Button id="btn_spcsave" taborder="39" text="검체등록" position="absolute 287 53 362 72" class="btn2" onclick="btn_spcsave_onclick"/>
        <Button id="btn_allspc00" taborder="40" text="BREAST의뢰지" class="btn2" position="absolute 657 436 758 456" onclick="btn_allspc00_onclick"/>
        <Button id="btn_allspc01" taborder="41" text="COLON의뢰지" class="btn2" position="absolute 553 436 654 456" onclick="btn_allspc01_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_rslt_choispclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING" size="256"/>
          <Column id="spcseqno" type="STRING" size="256"/>
          <Column id="spccd" type="STRING" size="256"/>
          <Column id="spcnm" type="STRING" size="256"/>
          <Column id="existyn" type="STRING" size="256"/>
          <Column id="slidno" type="STRING" size="256"/>
          <Column id="spccmt" type="STRING" size="256"/>
          <Column id="resnnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_SMMMR03600_modalif" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" onvaluechanged="ds_SMMMR03600_modalif_onvaluechanged">
        <ColumnInfo>
          <Column id="openmode" type="STRING" size="256"/>
          <Column id="imgecd" type="STRING" size="256"/>
          <Column id="base64" type="BLOB"/>
          <Column id="shape" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="openmode">OneImge</Col>
            <Col id="imgecd"/>
            <Col id="base64"/>
            <Col id="shape"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_imgmenu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="item" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="item">신규등록</Col>
          </Row>
          <Row>
            <Col id="item">이미지 조회</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_grd_resncd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING" size="256"/>
          <Column id="resnnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="choi">false</Col>
            <Col id="resnnm">Non - neoplastic lesion</Col>
          </Row>
          <Row>
            <Col id="choi">false</Col>
            <Col id="resnnm">Benign neoplasm</Col>
          </Row>
          <Row>
            <Col id="choi">false</Col>
            <Col id="resnnm">Atypical neoplasm</Col>
          </Row>
          <Row>
            <Col id="choi">false</Col>
            <Col id="resnnm">Malignant neoplasm</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_reqfrminfo" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="prcpcd" type="STRING" size="256"/>
          <Column id="prcpnm" type="STRING" size="256"/>
          <Column id="opnm" type="STRING" size="256"/>
          <Column id="spccd" type="STRING" size="256"/>
          <Column id="spcnm" type="STRING" size="256"/>
          <Column id="reqno" type="STRING" size="256"/>
          <Column id="reqhistno" type="STRING" size="256"/>
          <Column id="prcpstatcd" type="STRING" size="256"/>
          <Column id="xrwGBN" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="execprcpuniqno" type="STRING" size="256"/>
          <Column id="spccnt" type="STRING" size="256"/>
          <Column id="spcseqno" type="STRING" size="256"/>
          <Column id="spcseqnm" type="STRING" size="256"/>
          <Column id="spcstrno" type="STRING" size="256"/>
          <Column id="spcendno" type="STRING" size="256"/>
          <Column id="Column0" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_reqfrminfo_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_seaspc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="spccd" type="STRING" size="256"/>
          <Column id="spcnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_detlspclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING" size="256"/>
          <Column id="spccd" type="STRING" size="256"/>
          <Column id="spcnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_reqfrminfo_back" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="prcpcd" type="STRING" size="256"/>
          <Column id="prcpnm" type="STRING" size="256"/>
          <Column id="opnm" type="STRING" size="256"/>
          <Column id="spccd" type="STRING" size="256"/>
          <Column id="spcnm" type="STRING" size="256"/>
          <Column id="reqno" type="STRING" size="256"/>
          <Column id="reqhistno" type="STRING" size="256"/>
          <Column id="prcpstatcd" type="STRING" size="256"/>
          <Column id="xrwGBN" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="execprcpuniqno" type="STRING" size="256"/>
          <Column id="spccnt" type="STRING" size="256"/>
          <Column id="spcseqno" type="STRING" size="256"/>
          <Column id="spcseqnm" type="STRING" size="256"/>
          <Column id="spcstrno" type="STRING" size="256"/>
          <Column id="spcendno" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_lpcmspcm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_popup_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="spccd" type="STRING" size="256"/>
          <Column id="spcnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_grd_resncdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_data_resncdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_data_reqfrminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="reqcnts" type="STRING" size="256"/>
          <Column id="spcsite" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="output2" propid="value" datasetid="ds_hidden_reqfrminfo" columnid="prcpnm"/>
      <BindItem id="item1" compid="cmb_reprspccd" propid="value" datasetid="ds_hidden_reqfrminfo"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-04-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-04-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LPZ001.xjs";
include "lis_commonxp::LZZ001.xjs";
include "lis_commonxp::LZZ003.xjs";
include "com_commodulexp::SSZFM00901.xjs";
//=======================================================================================
// local golval variable
//---------------------------------------------------------------------------------------

var lgv_openmode = "" ;
var lgv_imgecd = "" ; 
var lgv_base64 = "" ; 
var lgv_shape = "" ; 
var lgv_chgrespspccd = "-";
var workflagcd = "";
//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/**********************************************************************************
 * Name: fExeInitialize
 * Description: 초기화 Function
 * Argument: null
 * return Type: null
 * Author: Autumn
**********************************************************************************/

function fExeInitialize()
{
	// 데이터 초기화
	// 프로그램 주문제작.`
	dsf_createDs("ds_init_lpcmspcm"); //과별검체목록
	dsf_createDs("ds_init_totlpcmspcmlist"); //과별검체목록
	dsf_createDs("ds_init_reprspclist"); //대표검체목록
	dsf_createDs("ds_init_detlspclist"); //세부검체목록
	dsf_createDs("ds_rslt_rtnvalinfo"); //저장결과
	dsf_createDs("ds_rslt_reqfrminfo"); //의뢰내용
	
	//과별검체목록조회
	var sInDsName = dsf_createDsRow("ds_temp_search1", [{col : "cond1", val : sysf_getUserInfo("dutplcecd")},
													   {col : "cond2", val : "1"}]);
													   
	var oParam = {};
		oParam.id          = "TRMMB02302";
		oParam.service     = "prcpbaseapp.OrdPrcpMngt";
		oParam.method      = "reqGetUseLpcmspcm";
		oParam.inds        = "req=ds_temp_search1";
		oParam.outds       = "ds_init_lpcmspcm=lpcmspcmlist ds_init_totlpcmspcmlist=totlpcmspcmlist";
		oParam.async       = false;
		oParam.callback    = "cbf_SPLPJ01500";
	tranf_submit(oParam);

	// 대표검체목록조회
	var sInDsName = dsf_createDsRow("ds_temp_search2", [{col : "instcd",    val : sysf_getUserInfo("dutplceinstcd")},
													   {col : "testcd",    val : ds_hidden_reqfrminfo.getColumn(0, "prcpcd")},
													   {col : "reprspccd", val : ds_hidden_reqfrminfo.getColumn(0, "spccd")},
													   {col : "spcflagcd", val : "0"}]);
	var oParam = {};
		oParam.id          = "TRLPJ01501";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetTestInfoList";
		oParam.inds        = "refData="+sInDsName;
		oParam.outds       = "ds_init_reprspclist=refrslt";
		oParam.async       = false;
		oParam.callback    = "cbf_SPLPJ01500";
	tranf_submit(oParam);												   
	
	// 세부검체목록조회
	var sInDsName = dsf_createDsRow("ds_temp_search3", [{col : "instcd",    val : sysf_getUserInfo("dutplceinstcd")},
													   {col : "testcd",    val : ds_hidden_reqfrminfo.getColumn(0, "prcpcd")},
													   {col : "reprspccd", val : ds_hidden_reqfrminfo.getColumn(0, "spccd")},
													   {col : "spcflagcd", val : "1"}]);
	
	var oParam = {};
		oParam.id          = "TRLPJ01501";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetTestInfoList";
		oParam.inds        = "refData="+sInDsName;
		oParam.outds       = "ds_init_detlspclist=refrslt";
		oParam.async       = false;
		//oParam.callback    = "cbf_SPLPJ01500";
	tranf_submit(oParam);	
	
	var sReqFrmNo = ds_hidden_reqfrminfo.getColumn(0, "reqno");
	sReqFrmNo = sReqFrmNo.getLeftPad(1, "0");
	
	
	if(!utlf_isNull(sReqFrmNo) || sReqFrmNo!="0")//의뢰지내용조회
	{
		var sInDsName = dsf_createDsRow("ds_temp_search4", [{col : "instcd", val : sysf_getUserInfo("dutplceinstcd")},
														   {col : "pid",    val : ds_hidden_reqfrminfo.getColumn(0, "pid")},
														   {col : "reqno",  val : ds_hidden_reqfrminfo.getColumn(0, "reqno")}]);
		
		var oParam = {};
			oParam.id          = "TRLPJ01502";
			oParam.service     = "plgyrelapplib.PlgyAcptLib";
			oParam.method      = "reqGetReqFrmInfo";
			oParam.inds        = "refData="+sInDsName;
			oParam.outds       = "ds_rslt_reqfrminfo=refrslt";
			oParam.async       = false;
			oParam.callback    = "cbf_SPLPJ01500";
		tranf_submit(oParam);

		if(ds_rslt_reqfrminfo.rowcount > 0)
		{
			var ChkNullTag    = ds_rslt_reqfrminfo.getColumn(0, "reqcnts");
			var ChkimgNullTag = ds_rslt_reqfrminfo.getColumn(0, "imgcnts");
			var parser        = new DomParser;
			var reqfrminfoDOC = parser.parseFromString(ds_rslt_reqfrminfo.getColumn(0, "reqcnts"));
			var reqfrminfoXML = reqfrminfoDOC.documentElement;
			var reqimginfoDOC = parser.parseFromString(ds_rslt_reqfrminfo.getColumn(0, "imgcnts"));
			var reqimginfoXML = reqimginfoDOC.documentElement;

            var vXML = ds_rslt_reqfrminfo.getColumn(0, "reqcnts");

			if(ChkimgNullTag.indexOf("openmode") != -1)
			{
				lgv_openmode = (!utlf_isNull(reqimginfoXML.getElementsByTagName('openmode').get_item(0).firstChild)) ? reqimginfoXML.getElementsByTagName('openmode').get_item(0).firstChild.data : "";
				ds_SMMMR03600_modalif.setColumn(0, "openmode", lgv_openmode);
			}
			if(ChkimgNullTag.indexOf("imgecd") != -1)
			{
				lgv_imgecd = (!utlf_isNull(reqimginfoXML.getElementsByTagName('imgecd').get_item(0).firstChild)) ? reqimginfoXML.getElementsByTagName('imgecd').get_item(0).firstChild.data : "";
				ds_SMMMR03600_modalif.setColumn(0,"imgecd", lgv_imgecd);
				//trace("lgv_imgecd : "+lgv_imgecd);
			}
			if(ChkimgNullTag.indexOf("shape") != -1)
			{
				lgv_shape = (!utlf_isNull(reqimginfoXML.getElementsByTagName('shape').get_item(0).firstChild)) ? reqimginfoXML.getElementsByTagName('shape').get_item(0).firstChild.data : "";
				ds_SMMMR03600_modalif.setColumn(0,"shape", lgv_shape);
			}
			if(ChkimgNullTag.indexOf("base64") != -1)
			{
				lgv_base64 = (!utlf_isNull(reqimginfoXML.getElementsByTagName('base64').get_item(0).firstChild)) ? reqimginfoXML.getElementsByTagName('base64').get_item(0).firstChild.data : "";
				//trace("lgv_base64 : "+lgv_base64);
				var buf = new Buffer("empty");
				ds_SMMMR03600_modalif.setColumn(0, "base64", buf.data);
				var transXML = ds_SMMMR03600_modalif.saveXML();
				var XML_length = transXML.length;
				var startidx = transXML.indexOf("<Col id="+"\u0022"+"base64"+"\u0022"+">");
				var endidx = transXML.indexOf("<Col id="+"\u0022"+"shape"+"\u0022"+">");
				var BLOB_STRINNG = transXML.substring(startidx+17,endidx-11);
				var rsltXML = transXML.substring(0,startidx+17) + lgv_base64 + transXML.substring(endidx-11,XML_length);
				//trace(rsltXML);
				ds_SMMMR03600_modalif.loadXML(rsltXML);
				
			}
			
			if(ChkNullTag.indexOf("reqcnts") != -1)
			{
				tar_prcpcnts.value = (!utlf_isNull(reqfrminfoXML.getElementsByTagName('reqcnts').get_item(0).firstChild)) ? reqfrminfoXML.getElementsByTagName('reqcnts').get_item(0).firstChild.data : "";
			}
			var choiSpcList = reqfrminfoXML.getElementsByTagName('choispclist');
			
			
			for(var i = 0; i < choiSpcList.length; i++)
			{
				var ds_i = ds_rslt_choispclist.addRow();
				if(ChkNullTag.indexOf("choi") != -1) {
					ds_rslt_choispclist.setColumn(ds_i, "choi", (!utlf_isNull(choiSpcList.get_item(i).getElementsByTagName('choi').get_item(0).firstChild)) ? choiSpcList.get_item(i).getElementsByTagName('choi').get_item(0).firstChild.data : "");
				}
				if(ChkNullTag.indexOf("spcseqno") != -1) {
					ds_rslt_choispclist.setColumn(ds_i, "spcseqno", (!utlf_isNull(choiSpcList.get_item(i).getElementsByTagName('spcseqno').get_item(0).firstChild)) ? choiSpcList.get_item(i).getElementsByTagName('spcseqno').get_item(0).firstChild.data : "");
				}
				if(ChkNullTag.indexOf("spccd") != -1) {
					ds_rslt_choispclist.setColumn(ds_i, "spccd", (!utlf_isNull(choiSpcList.get_item(i).getElementsByTagName('spccd').get_item(0).firstChild)) ? choiSpcList.get_item(i).getElementsByTagName('spccd').get_item(0).firstChild.data : "");
				}
				if(ChkNullTag.indexOf("spcnm") != -1) {
					ds_rslt_choispclist.setColumn(ds_i, "spcnm", (!utlf_isNull(choiSpcList.get_item(i).getElementsByTagName('spcnm').get_item(0).firstChild)) ? choiSpcList.get_item(i).getElementsByTagName('spcnm').get_item(0).firstChild.data : "");
				}
				if(ChkNullTag.indexOf("existyn") != -1) {
					ds_rslt_choispclist.setColumn(ds_i, "existyn", (!utlf_isNull(choiSpcList.get_item(i).getElementsByTagName('existyn').get_item(0).firstChild)) ? choiSpcList.get_item(i).getElementsByTagName('existyn').get_item(0).firstChild.data : "");
				}
				if(ChkNullTag.indexOf("slidno") != -1) {
					ds_rslt_choispclist.setColumn(ds_i, "slidno", (!utlf_isNull(choiSpcList.get_item(i).getElementsByTagName('slidno').get_item(0).firstChild)) ? choiSpcList.get_item(i).getElementsByTagName('slidno').get_item(0).firstChild.data : "");
				}
				
			}
			var resncdlist = reqfrminfoXML.getElementsByTagName('resncdlist');


			var pParamObj = new Object();
           ds_data_resncdlist.clearData();
 		   lf_convertXmlToDs(vXML,pParamObj);
 		   
 		   var iFindRow = "";
 		   var vReqcnts = "";
 		   iFindRow = ds_data_resncdlist.findRow("choi", "true");
 		   vReqcnts = ds_data_reqfrminfo.getColumn(0, "reqcnts");
 		   vSpcsite = ds_data_reqfrminfo.getColumn(0, "spcsite");
 		   
 		   if (iFindRow >= 0)
 		   {
 		       ds_grd_resncd.setColumn(iFindRow, "choi", "true");
 		   }
 		   if (!utlf_isNull(vReqcnts))
 		   {
 		      tar_prcpcnts.enable = true;
 		   }
 		   else
 		   {
 		      tar_prcpcnts.enable = false;
 		   }
 		   if (!utlf_isNull(vSpcsite))
 		   {
 		      rdo_ltrt.value = vSpcsite;
 		   }
			fExeAddLastRow();
		}
	}
	else
	{
		if (ds_init_detlspclist.rowcount <= 0) fExeSpcNodeAdd();							
		if (ds_init_detlspclist.rowcount == 1)
		{		        		
		   dsf_makeValue(ds_init_detlspclist, "choi", "string", "1");
		   lf_fExeDetlSpcClick_copy(0);
		   lf_fExeResnChoi_flt();   
		} 															
	}
	
	ds_init_lpcmspcm.addColumn("choi", "int");
	ds_init_reprspclist.addColumn("choi", "int");
	var spccd = ds_hidden_reqfrminfo.getColumn(0,"spccd");
	trace("======================================");
	trace("rowcount = " +ds_init_lpcmspcm.rowcount);
	trace("======================================");
	if(ds_init_lpcmspcm.rowcount > 0)
	{
	    dsf_addDsItem(ds_init_lpcmspcm,"spccd","spcnm",spccd,spccd);
		ds_popup_list.copyData(ds_init_lpcmspcm);
	}
	else
	{ 
		dsf_addDsItem(ds_init_reprspclist,"spccd","spcnm",spccd,spccd);
		ds_popup_list.copyData(ds_init_reprspclist);
	}

    cmb_reprspccd.index = 0;
	ds_init_detlspclist.addColumn("choi", "int");
	
	trace('111');
	trace("prcpstatcd:"+ds_hidden_reqfrminfo.getColumn(0,"prcpstatcd"));
// 	trace("xrwGBN:"+ds_hidden_reqfrminfo.getColumn(0,"xrwGBN"));
// 	trace("workflagcd:"+ds_hidden_reqfrminfo.getColumn(0,"workflagcd"));
// 	trace("bcgbn:"+ds_hidden_reqfrminfo.getColumn(0,"bcgbn"));
	
	//세부검체가 없을 경우 대표검체를 세부검체 목록 상단에 추가
	if(ds_init_detlspclist.rowcount == 0) 
	{
		fExeSpcNodeAdd();
	}
	else
	{
		if(ds_rslt_choispclist.rowcount == 0)
		{
			ds_init_detlspclist.rowposition = 0;
			ds_init_detlspclist.setColumn(0, "choi", 1);
			sysf_trace(ds_rslt_choispclist.rowcount);	
			ds_rslt_choispclist.addRow();
			ds_rslt_choispclist.setColumn(0, "choi", 1);
			ds_rslt_choispclist.setColumn(0, "spcseqno", "");
			ds_rslt_choispclist.setColumn(0, "spccd", ds_init_detlspclist.getColumn(0, "spccd"));
			ds_rslt_choispclist.setColumn(0, "spcnm", ds_init_detlspclist.getColumn(0, "spcnm"));
			ds_rslt_choispclist.setColumn(0, "existyn", "N");
			ds_rslt_choispclist.setColumn(0, "slidno", "0");
		}
		fExeSeqNoSet(1);
		
	}
	//  410 채혈완료상태일결우 대표검체 및 세부검체 수정 불가. 
	
	if(Number(ds_hidden_reqfrminfo.getColumn(0, "prcpstatcd")) >= 400)
	{
		//바코드가 접수되었더라도 프로즌검체는 검체를 추가할 수 있도록 허용한다.
		if((ds_hidden_reqfrminfo.getColumn(0, "xrwGBN") == "inbcoll") && (ds_hidden_reqfrminfo.getColumn(0, "workflagcd") == "1002")
			&& (ds_hidden_reqfrminfo.getColumn(0, "bcgbn") == "true"))
		{
			cmb_reprspccd.enable = true;
			btn_img.enable    = true;
			btn_save.enable   = true;
			btn_allspc.enable = true;				
		}
		else
		{
			cmb_reprspccd.enable = false;
			btn_img.enable    = false;
			btn_save.enable   = false;
			btn_allspc.enable = false;
		}
	}
	else
	{
		if(Number(ds_hidden_reqfrminfo.getColumn(0,"prcpstatcd")) >= 400)
		{
			trace('a1');
			//바코드가 접수되었더라도 프로즌검체는 검체를 추가할 수 있도록 허용한다.
			if(Number(workflagcd) == 1002)
			{
				trace('a2');
				cmb_reprspccd.enable = true;
				btn_img.enable    = true;
				btn_save.enable   = true;
				btn_allspc.enable = true;
			}
			else
			{
				trace('a3');
				cmb_reprspccd.enable = false;
				btn_img.enable    = false;
				btn_save.enable   = false;
				btn_allspc.enable = false;
			}
		}
		else
		{
			trace('a4');
			cmb_reprspccd.enable = true;
			btn_img.enable    = true;
			btn_save.enable   = true;
			btn_allspc.enable = true;
		}
	}
	for(var iNo = 0; iNo < ds_grd_resncd.rowcount; iNo++)
	{
		//trace("ds_grd_resncd1");
		if(ds_grd_resncd.getColumn(iNo, "choi") == true)
		{
			tar_prcpcnts.enable = true;
		}
	}
	if(ds_rslt_choispclist.rowcount == 0)
	{
		ds_rslt_choispclist.addRow();
	}
		
	dsf_setDefaultVal(ds_rslt_choispclist, "all");	// 슬라이드 갯수에 undefined 나오는 현상 방지
}

 /* @group  : 조직검사의뢰지
 * @-----------------------------------
 * @type   : function
 * @access : public
 * @desc   : 세부검체목록 Row Click처리 Function
*/
function lf_fExeDetlSpcClick_copy(iRowNo)
{
	var iBlankNo  = 0;
	var iFindRow  = -1;
	var iMaxSeqNo = -1;
	
	//-----------------------
	// 선택 컬럼 체크유무 검사
	//--------------------------------------------------------------------------------------
	// 대표검체의 존재유무 검사(대표검체가 처방에서 넘어오지 않은 경우 세부검체를 추가 금지)
			
	if(utlf_isNull(cmb_reprspccd.value))
	{
		sysf_messageBox("대표검체를 먼저 ", "C002");
		return;
	}
	
	// 기존 선택된 검체인지 유무 검사
	iFindRow = ds_rslt_choispclist.findRow("spccd == '" + ds_init_detlspclist.getColumn(iRowNo, "spccd") + "'");
	//-------------------------------------------------------------------
	if (ds_init_detlspclist.getColumn(iRowNo, "choi") == 1)
	{
		//-----------------------------
		// 검색되지 않은 검체는 추가처리
			iBlankNo = lf_fExeFindRow();
			
			if (iBlankNo <= -1)
			{
				iBlankNo = ds_rslt_choispclist.addRow();
			}

			ds_rslt_choispclist.setColumn(iBlankNo, "choi", 1);
			ds_rslt_choispclist.setColumn(iBlankNo, "spcseqno", "");
			ds_rslt_choispclist.setColumn(iBlankNo, "spccd", grd_spclist.getCellValue(iRowNo, grd_spclist.getBindCellIndex("body", "spccd")));
			ds_rslt_choispclist.setColumn(iBlankNo, "spcnm", grd_spclist.getCellValue(iRowNo, grd_spclist.getBindCellIndex("body", "spcnm")));
			ds_rslt_choispclist.setColumn(iBlankNo, "existyn", "N");
			ds_rslt_choispclist.setColumn(iBlankNo, "slidno", "0");
			//--------------------
			// 세부검체번호 재 설정
			iMaxSeqNo = fExeSeqNoSet(1);
			
			fExeAddLastRow();

	} 
}
/* @group  : 조직검사의뢰지
 * @-----------------------------------
 * @type   : function
 * @access : public
 * @desc   : 마지막 라인 추가 처리 Function
*/
function fExeAddLastRow()
{
	if (ds_rslt_choispclist.rowposition == ds_rslt_choispclist.rowcount - 1)
	{
		ds_rslt_choispclist.addRow();
	}
}
				
/* @group  : 조직검사의뢰지
 * @-----------------------------------
 * @type   : function
 * @access : public
 * @desc   : 선택검체 그리드의 빈 Row을 검색 Function
*/
function lf_fExeFindRow()
{
	var iFindNo = -1;

	for (var iRowNo = 0; iRowNo < ds_rslt_choispclist.rowcount; iRowNo++)
	{
		
		if (utlf_isNull(ds_rslt_choispclist.getColumn(iRowNo, "spccd")))
		{
			return iRowNo;
		}
	}
	return iFindNo;
}
/* @group  : 조직검사의뢰지
 * @-----------------------------------
 * @type   : function
 * @access : public
 * @desc   : 임상소견 선택 처리 Function
*/
function lf_fExeResnChoi_flt()
{	
	var iFindNo = 0;
	var sNode   = "/root/main/reqfrm/reqfrmtbl/reqfrminfo/resncd/resncdlist";

	for (var iNo = 0; iNo < ds_grd_resncd.rowcount; iNo++)
	{
		ds_grd_resncd.setColumn(iNo, "choi", false);
	}
	//trace("ds_grd_resncd2");
	ds_grd_resncd.setColumn(0, "choi", true);
	
	tar_prcpcnts.enable = true;
}
				
/**********************************************************************************
 * Name: fExeSpcNodeAdd
 * Description: 선택된 대표검체를 세부검체 목록에 추가
 * Argument: Null
 * return Type: Null
 * Author: Autumn
**********************************************************************************/
function fExeSpcNodeAdd()
{
	var sSpcCd = cmb_reprspccd.value;
	var sSpcNm = "";
	
// 	trace("sSpcCd="+sSpcCd);
// 	trace("sSpcNm="+sSpcNm);
	if(sSpcCd == "-" || utlf_isNull(sSpcCd)) 
	{
		return false;
	}
	for(var i = 0; i < ds_init_reprspclist.rowcount; i++)
	{
		if(ds_init_reprspclist.getColumn(i, "spccd") == sSpcCd) 
		{
			sSpcNm = ds_init_reprspclist.getColumn(i, "spcnm");
		}
	}
	
	for(var i = 0; i < ds_init_detlspclist.rowcount; i++)
	{
		sSpcCd = ds_init_detlspclist.getColumn(i, "spccd");
		sSpcNm = ds_init_detlspclist.getColumn(i, "spcnm");
	}
	
	// 검사별 대표검체 정보의 부재시 검체명이 존재할 수 없음. 
	// 검체명이 없을 경우 경고 메시지 처리
	if(sSpcNm == "-" || utlf_isNull(sSpcNm))
	{
		var sMsg = ds_hidden_reqfrminfo.getColumn(0, "prcpnm") + " 처방에 해당하는 검체가 아닙니다. 검체를 지정";
		ds_init_detlspclist.clearData();
		sysf_messageBox(sMsg, "E001");
		return false;
	}
	if(utlf_isNull(cmb_reprspccd.value))
	{
			sysf_messageBox("대표검체를 먼저 ", "C002");
			return;
	}
	if(ds_rslt_choispclist.rowcount == 0)
	{
		var iRow = ds_rslt_choispclist.addRow();
		ds_rslt_choispclist.setColumn(0, "choi", 1);
		ds_rslt_choispclist.setColumn(0, "spcseqno", "");
		ds_rslt_choispclist.setColumn(0, "spccd", sSpcCd);
		ds_rslt_choispclist.setColumn(0, "spcnm", sSpcNm);
		ds_rslt_choispclist.setColumn(0, "existyn", "N");
		ds_rslt_choispclist.setColumn(0, "slidno", "0");
	}
	fExeSeqNoSet(1);
}

/**********************************************************************************
 * Name: fsetPopMenu
 * Description: 팝업메뉴.
 * Argument: Null
 * return Type: Null
 * Author: Autumn
**********************************************************************************/
function fsetPopMenu()
{
	// 부서별 상용구 조회
	
	frmf_createPopupMenu("pmn_popupMenu", "pmn_popupMenu_onmenuclick", [{id : "fExeSpcDel", level : "1", title : "검체삭제"},
	                                                                    {id : "fExeSpcAdd", level : "1", title : "검체추가"}]);
}

/**********************************************************************************
 * Name: fExeSeqNoSet
 * Description: 세부검체 일련번호 재 설정 
 * Argument: iStartNo
 * return Type: iSeqNo
 * Author: Autumn
**********************************************************************************/
function fExeSeqNoSet(iStartNo)
{
	for(var i = 0; i < ds_rslt_choispclist.rowcount; i++)
	{
		ds_rslt_choispclist.setColumn(i, "spcseqno", utlf_lPad(iStartNo.toString(), 3, "0"));
		iStartNo++;
	}
	return iStartNo;
}

function fExeSeqNoSet1(iStartNo)
{
	for(var i = 0; i < ds_rslt_choispclist.rowcount-1; i++)
	{
		ds_rslt_choispclist.setColumn(i, "spcseqno", utlf_lPad(iStartNo.toString(), 3, "0"));
		iStartNo++;
	}
	return iStartNo;
}

/**********************************************************************************
 * Name: fExePopupCall
 * Description: 임상소견 팝업창 호출
 * Argument: pFlag
 * return Type: Null
 * Author: Autumn
**********************************************************************************/
function fExePopupCall(pFlag) {
	trace("pFlag = " + pFlag)
	if (pFlag == "P") {
		frmf_setParameter("SPMMB02200_cond2", "1");	
						
		//frmf_modal("SPMMB02200", "SPMMB02200", "", "", "", application.mainframe.position.left + xpos, application.mainframe.position.top + ypos);
		frmf_modal("SPMMB02200", "SPMMB02200", "", "", "", "","","","","","","","M");//application.mainframe.position.left + xpos, application.mainframe.position.top + ypos);
		if (utlf_isNull(frmf_getParameter("SPMMB02200_clinccmt"))) {
			// Continue
		} else {
			tar_prcpcnts.value = frmf_getParameter("SPMMB02200_clinccmt");
		}
	}
	 else 
	 {			
			//frmf_modal("SPMMB02300", "SPMMB02300", "", "", "", application.mainframe.position.left + xpos, application.mainframe.position.top + ypos,"","","","","","M");
			frmf_modal("SPMMB02300", "SPMMB02300", "", "", "", "","","","","","","","M");//
			var sInDsName = dsf_createDsRow("ds_send", [{
					col : "cond1",
					val : sysf_getUserInfo("dutplcecd")
				}, {
					col : "cond2",
					val :"1"
				}
			]);
					
			var oParam = {};
				oParam.id          = "TRMMB02302";
				oParam.service     = "prcpbaseapp.OrdPrcpMngt";
				oParam.method      = "reqGetUseLpcmspcm";
				oParam.inds        = "req=" + sInDsName;
				oParam.outds       = "ds_init_lpcmspcm=lpcmspcmlist, ds_init_totlpcmspcmlist=totlpcmspcmlist";
				oParam.async       = false;
				oParam.callback    = "cbf_SPLPJ01500";

			tranf_submit(oParam);

							
	}
}


function lf_ExeResnChoi() {
					
	var iFindNo = 0;
	
	
	//------------------------------------

	if (grd_resncd.currentcol != 0)  return false;
	
	//-----------------------------------------------------
	for (var iNo=0; iNo < ds_grd_resncd.rowcount; iNo++) {
	//trace("ds_grd_resncd3");
		ds_grd_resncd.setColumn(iNo,"choi", false);
	}
	
	//---------------------------------------------------------
//trace("ds_grd_resncd4");
	ds_grd_resncd.setColumn(ds_grd_resncd.rowposition,"choi", true);
	

	tar_prcpcnts.enable = true;
}
				
/**********************************************************************************
 * Name: cbf_SPLPJ01500
 * Description: 조직검사의뢰지 콜백함수.
 * Argument: string:strSvcID, string:nErrorCode, string:strErrorMag
 * return Type: Null
 * Author: Autumn
**********************************************************************************/
function cbf_SPLPJ01500(strSvcID, nErrorCode, strErrorMag) {
	if(nErrorCode != 0) 
		sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
		
}

//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components: PopupMenu
 * Components ID: pmn_popupMenu
 * Event: onmenuclick
 * Argument: 01.obj: PopupMenu
 *: 02.e: MenuClickEventInfo
 * Description: 
 ****************************************************************************************/
function pmn_popupMenu_onmenuclick(obj : PopupMenu, e : MenuClickEventInfo) {
	switch(e.id) {
	case "fExeSpcDel":
// 		if(ds_rslt_choispclist.rowposition == 0)
// 		{
// 			sysf_messageBox("대표검체는 삭제할 수 없습니다"); return;
// 		}		
		//ds_rslt_choispclist.deleteRow(ds_rslt_choispclist.rowposition);
		var selRows = grdf_getSelectedRows(grd_choispc);
// 		if (utlf_isNull(selRows)) {
// 		trace('22222');
// 		    var selRows2 = ds_rslt_choispclist.rowposition
// 		    ds_rslt_choispclist.rowposition = selRows2;
// 		    selRows = grdf_getSelectedRows(grd_choispc);
// 		}
		trace("selRows :"+selRows+' / '+selRows.length);
		for ( var iNo = selRows.length - 1; iNo >= 0; iNo-- ) {			
			ds_rslt_choispclist.deleteRow(selRows[iNo]);
		}
		fExeSeqNoSet(1);
		break;
	case "fExeSpcAdd": 
		ds_rslt_choispclist.addRow();
		break;
	default : 
		break;
	}
}

/****************************************************************************************
 * Components: PopupMenu2
 * Components ID: pmn_popupMenu2
 * Event: onmenuclick
 * Argument: 01.obj: PopupMenu
 *: 02.e: MenuClickEventInfo
 * Description: 
 ****************************************************************************************/
function pmn_popupMenu2_onmenuclick(obj : PopupMenu, e : MenuClickEventInfo) {
	var inputText = ds_pop_autotext_list.getColumn(e.id,"type");
	var orgBfCaretText = textarea4.text.substr(0, textarea4.getCaretPos());
	var orgAftCaretText = textarea4.text.substr(textarea4.getCaretPos());
	var carotPosReturn = (orgBfCaretText+inputText).length
	textarea4.value = orgBfCaretText+inputText+orgAftCaretText;
	
	textarea4.setCaretPos(carotPosReturn);
	
}
/****************************************************************************************
 * Components: PopupMenu3
 * Components ID: pmn_popupMenu3
 * Event: onmenuclick
 * Argument: 01.obj: PopupMenu
 *: 02.e: MenuClickEventInfo
 * Description: 
 ****************************************************************************************/
function pmn_popupMenu3_onmenuclick(obj : PopupMenu, e : MenuClickEventInfo) {
	var inputText = ds_pop_autotext_list.getColumn(e.id,"type");
	var orgBfCaretText = textarea2.text.substr(0, textarea2.getCaretPos());
	var orgAftCaretText = textarea2.text.substr(textarea2.getCaretPos());
	var carotPosReturn = (orgBfCaretText+inputText).length
	textarea2.value = orgBfCaretText+inputText+orgAftCaretText;
	
	textarea2.setCaretPos(carotPosReturn);
	
}
/****************************************************************************************
 * Components: PopupMenu3
 * Components ID: pmn_popupMenu3
 * Event: onmenuclick
 * Argument: 01.obj: PopupMenu
 *: 02.e: MenuClickEventInfo
 * Description: 
 ****************************************************************************************/
function pmn_popupMenu4_onmenuclick(obj : PopupMenu, e : MenuClickEventInfo) {
	var inputText = ds_pop_autotext_list.getColumn(e.id,"type");
	var orgBfCaretText = textarea1.text.substr(0, textarea1.getCaretPos());
	var orgAftCaretText = textarea1.text.substr(textarea1.getCaretPos());
	var carotPosReturn = (orgBfCaretText+inputText).length
	textarea1.value = orgBfCaretText+inputText+orgAftCaretText;
	
	textarea1.setCaretPos(carotPosReturn);
	
}
/****************************************************************************************
 * Components: DataGrid
 * Components ID: grd_choispc
 * Event: onrbuttondown
 * Argument: 01.obj: PopupMenu
 *: 02.e: MenuClickEventInfo
 * Description: 
 ****************************************************************************************/
function grd_choispc_onrbuttondown(obj : Grid, e : GridMouseEventInfo) {


		pmn_popupMenu.trackPopup(e.screenX, e.screenY);

}



/****************************************************************************************
 * Components    : 
 * Components ID  : SPMPJ01500
 * Event     : onload
 * Argument: 01.obj: Object Event has occurred
 *: 02.e: Event Object
 * Description: 화면로드
 ****************************************************************************************/
function SPMPJ01500_onload(obj : Form, e : LoadEventInfo) {
	frmf_initForm(obj);
	ds_hidden_reqfrminfo.copyData(arg_ds_hidden_reqfrminfo);
		//ds_hidden_reqfrminfo_prcplist.copyData(arg_ds_hidden_reqfrminfo_prcplist);
// 	ds_hidden_reqfrminfo.addColumn("xrwGBN", "string"); 
// 	ds_hidden_reqfrminfo.addColumn("prcpdd", "string"); 
// 	ds_hidden_reqfrminfo.addColumn("execprcpuniqno", "string"); 
	fExeInitialize();
	fsetPopMenu();
}

/****************************************************************************************
 * Components    : 
 * Components ID  : btn_close
 * Event     : onclick
 * Argument: 01.obj: Object Event has occurred
 *: 02.e: Event Object
 * Description: 화면닫기
 ****************************************************************************************/
function btn_close_onclick(obj : Button, e : ClickEventInfo) {
	this.close();
}

/****************************************************************************************
 * Components    : 
 * Components ID  : btn_cls111
 * Event     : onclick
 * Argument: 01.obj: Object Event has occurred
 *: 02.e: Event Object
 * Description: 화면닫기
 ****************************************************************************************/
function btn_cls111_onclick(obj : Button, e : ClickEventInfo) {
	this.close();
}

/****************************************************************************************
 * Components    : 
 * Components ID  : btn_cls111
 * Event     : onclick
 * Argument: 01.obj: Object Event has occurred
 *: 02.e: Event Object
 * Description: 검체코드 검색 팝업
 ****************************************************************************************/
function grd_choispc_oncellclick(obj : Grid, e : GridClickEventInfo) {
	if(e.col == 4) {
		
		
	}
}

/****************************************************************************************
 * Components    : 
 * Components ID  : grd_spclist
 * Event     : oncellclick
 * Argument: 01.obj: Object Event has occurred
 *: 02.e: Event Object
 * Description: 검체코드 등록
 ****************************************************************************************/
function grd_spclist_oncellclick(obj : Grid, e : GridClickEventInfo) {
	
	if(e.col == 0) 
	{
		// 대표검체의 존재유무 검사(대표검체가 처방에서 넘어오지 않은 경우 세부검체를 추가 금지)
		if(utlf_isNull(cmb_reprspccd.value)) {
			sysf_messageBox("대표검체를 먼저 ", "C002");
			return;
		}
		
		if(obj.getCellValue(e.row, obj.getBindCellIndex("body", "choi")) == 1)
		{
			if(ds_rslt_choispclist.rowcount <= 0)
			{	
				ds_rslt_choispclist.addRow();
			}
			var iRow = ds_rslt_choispclist.rowcount -1;
			
			ds_rslt_choispclist.setColumn(iRow, "choi", 1);
			ds_rslt_choispclist.setColumn(iRow, "spcseqno", "");
			ds_rslt_choispclist.setColumn(iRow, "spccd", obj.getCellValue(e.row, obj.getBindCellIndex("body", "spccd")));
			ds_rslt_choispclist.setColumn(iRow, "spcnm", obj.getCellValue(e.row, obj.getBindCellIndex("body", "spcnm")));
			ds_rslt_choispclist.setColumn(iRow, "existyn", "N");
			ds_rslt_choispclist.setColumn(iRow, "slidno", "0");
			fExeAddLastRow();
		}
		fExeSeqNoSet1(1);
		
	}
}


/****************************************************************************************
 * Components    : 
 * Components ID  : btn_spcsave
 * Event     : onclick
 * Argument: 01.obj: Object Event has occurred
 *: 02.e: Event Object
 * Description: 임상소견 팝업창 호출
 ****************************************************************************************/
function btn_spcsave_onclick(obj : Button, e : ClickEventInfo) {
	fExePopupCall("S");
}

/****************************************************************************************
 * Components     : PROGRAMMING GEAR
 * Components ID  : cmb_reprspccd
 * Event          : onitemchanged
 * Argument: 01.obj: Object Event has occurred
 *: 02.e: Event Object
 * Description: 대표검체 선택
 ****************************************************************************************/
function cmb_reprspccd_onitemchanged(obj : Combo, e : ItemChangeEventInfo) {
	
	ds_rslt_choispclist.clearData();
	dsf_createDs("ds_init_detlspclist");
		
	// 세부검체목록조회
	dsf_createDsRow("ds_temp_search", [{ col : "instcd",    val : sysf_getUserInfo("dutplceinstcd")}, 
									   { col : "testcd",    val : ds_hidden_reqfrminfo.getColumn(0,"prcpcd")},
									   //{ col : "reprspccd", val : ds_hidden_reqfrminfo.getColumn(0, "spccd")},
									   { col : "reprspccd", val : cmb_reprspccd.value},
									   { col : "spcflagcd", val : "1"}]);
	                                                   
	var oParam = {};
		oParam.id          = "TRLPJ01501";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetTestInfoList";
		oParam.inds        = "refData=ds_temp_search";
		oParam.outds       = "ds_init_detlspclist=refrslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPJ01501";
	tranf_submit(oParam);
	
	
	ds_init_detlspclist.addColumn("choi", "Int");

	if(ds_init_detlspclist.rowcount == 0)
 	{
// 		var sSpcCd = cmb_reprspccd.value;
// 		var iRow2 = ds_init_detlspclist.addRow();
// 		ds_init_detlspclist.setColumn(0, "choi", 1);
// 		ds_init_detlspclist.setColumn(0, "spccd", sSpcCd);
		//ds_init_detlspclist.setColumn(0, "spcnm", sSpcNm);
		fExeSpcNodeAdd();
		ds_init_detlspclist.copyData(ds_rslt_choispclist);
		ds_rslt_choispclist.addRow();
		fExeSeqNoSet1(1);
	}
	else if(ds_init_detlspclist.rowcount == 1)
	{		        		
	   ds_init_detlspclist.setColumn(0,"choi",1);
	   
	   lf_fExeDetlSpcClick_copy(0);
	}
}

/****************************************************************************************
 * Components    : 
 * Components ID  : cmb_reprspccd
 * Event     : onitemchanged
 * Argument: 01.obj: Object Event has occurred
 *: 02.e: Event Object
 * Description: 전체검체 팝업
 ****************************************************************************************/
function btn_allspc_onclick(obj : Button, e : ClickEventInfo)
{
	var objArg = new Object();
	objArg.testcd = ds_hidden_reqfrminfo.getColumn(0,"prcpcd");
	
	frmf_setParameter("SPLPJ02400_spccd", "");
	frmf_setParameter("SPLPJ02400_spcnm", "");
	frmf_modal("SPLPJ02400", "SPLPJ02400", objArg, "", "", "", "", "", "", "", "", "", "M");
	
	trace("paramter = " +frmf_getParameter("SPLPJ02400_spccd"));
	trace("paramter(2) = " +frmf_getParameter("SPLPJ02400_spcnm"));
	if(!utlf_isNull(frmf_getParameter("SPLPJ02400_spccd")))
	{
		cmb_reprspccd.value = frmf_getParameter("SPLPJ02400_spccd"); // 전체검체에서 가져온검체를 대표검체에 set
		if(ds_init_lpcmspcm.rowcount > 0)
		{
			var bState = false;
			for(var i = 0; i < ds_init_lpcmspcm.rowcount; i++)
			{
				if(ds_init_lpcmspcm.getColumn(i, "spccd") == frmf_getParameter("SPLPJ02400_spccd")) 
					bState = true;
				break;
			}
			if(!(bState))
			{
				var ds_i = ds_init_lpcmspcm.addRow();
				ds_init_lpcmspcm.setColumn(ds_i, "status", "1");
				ds_init_lpcmspcm.setColumn(ds_i, "spccd", frmf_getParameter("SPLPJ02400_spccd"));
				ds_init_lpcmspcm.setColumn(ds_i, "spcnm", frmf_getParameter("SPLPJ02400_spcnm"));
				ds_init_lpcmspcm.setColumn(ds_i, "orddeptcd", ds_init_lpcmspcm.getColumn(ds_i - 1, "orddeptcd"));
				ds_init_lpcmspcm.setColumn(ds_i, "spckind", ds_init_lpcmspcm.getColumn(ds_i - 1, "spckind"));
				ds_init_lpcmspcm.setColumn(ds_i, "spckindno", ds_init_lpcmspcm.getColumn(ds_i - 1, "spckindno"));
			}
		}
	}
	ds_popup_list.copyData(ds_init_lpcmspcm);
	cmb_reprspccd.text =  frmf_getParameter("SPLPJ02400_spcnm");
	var ev = new ItemChangeEventInfo;
	frmf_inputEnterKey("cmb_reprspccd", "onitemchanged", ev ); //대표검체로 예문 조회
		
	
}

/****************************************************************************************
 * Components    : 
 * Components ID  : cmb_reprspccd
 * Event     : onitemchanged
 * Argument: 01.obj: Object Event has occurred
 *: 02.e: Event Object
 * Description: 설정값 저장
 ****************************************************************************************/
function btn_save_onclick(obj : Button, e : ClickEventInfo) {

	var iFindNo = 0;
	if(cmb_reprspccd.value == "-" || utlf_isNull(cmb_reprspccd.value)) {
		//messageBox("대표검체를 ", "C002");
		sysf_messageBox("대표검체를 선택하여 주십시오.", "I");
		cmb_reprspccd.setFocus();
		return false;
	}
	//--------------------------------
	if(ds_rslt_choispclist.rowcount < 1 || utlf_isNull(ds_rslt_choispclist.getColumn(0,"spcnm"))) {
		
		sysf_messageBox("검체명은 필수입력사항입니다.", "I");
		grd_choispc.setFocus();
		return false;
	}

	iFindNo = ds_grd_resncd.getCaseCount("choi == 1 || choi == 'true'");
	
	trace("iFindNo :"+iFindNo);
	if (Number(iFindNo) <= 0) {
		sysf_messageBox("임상소견은 ", "I003");
		return false;
	} 

                    
	var transXML = ds_SMMMR03600_modalif.saveXML();
 	var XML_length = transXML.length;
 	var startidx = transXML.indexOf("<Col id="+"\u0022"+"base64"+"\u0022"+">");
 	var endidx = transXML.indexOf("<Col id="+"\u0022"+"shape"+"\u0022"+">");
 	var BLOB_STRINNG = "<![CDATA["+transXML.substring(startidx+17,endidx-11)+"]]]]><![CDATA[>"
	if(ds_SMMMR03600_modalif.getColumn(0,"openmode") == "OneImge"){
		lgv_openmode = "<![CDATA["+ds_SMMMR03600_modalif.getColumn(0,"openmode")+"]]]]><![CDATA[>"
		lgv_imgecd = "<![CDATA["+ds_SMMMR03600_modalif.getColumn(0,"imgecd")+"]]]]><![CDATA[>"
		lgv_shape = "<![CDATA["+ds_SMMMR03600_modalif.getColumn(0,"shape")+"]]]]><![CDATA[>"
	}else{
		lgv_openmode = ""
		lgv_imgecd = ""
		lgv_shape = ""
		BLOB_STRINNG = ""
	}
	
	var imgnodeXmlText = "<SMMMR03600_modalif>"
	imgnodeXmlText = imgnodeXmlText + "<openmode>" + lgv_openmode +  "</openmode>";
	imgnodeXmlText = imgnodeXmlText + "<imgecd>" + lgv_imgecd +  "</imgecd>";
	imgnodeXmlText = imgnodeXmlText + "<base64>" + BLOB_STRINNG +  "</base64>";
	imgnodeXmlText = imgnodeXmlText + "<shape>" + lgv_shape +  "</shape>";
	imgnodeXmlText = imgnodeXmlText + "</SMMMR03600_modalif>"
	

	var sReqcntsXmlText = "<reqfrminfo>";
	sReqcntsXmlText = sReqcntsXmlText + "<spcsite>" + rdo_ltrt.value + "</spcsite>";
	if(utlf_isNull(tar_prcpcnts.value))
	{
		sReqcntsXmlText = sReqcntsXmlText + "<reqcnts/>";
	}
	else
	{
	trace('ssss');
		sReqcntsXmlText = sReqcntsXmlText + "<reqcnts>" + "<![CDATA["+tar_prcpcnts.value +"]]]]><![CDATA[>"+ "</reqcnts>";
	}
	sReqcntsXmlText = sReqcntsXmlText + "<choispc>";
	for(var i = 0; i < ds_rslt_choispclist.rowcount; i++) {
		if (!utlf_isNull(ds_rslt_choispclist.getColumn(i, "spccd")))
		{
			sReqcntsXmlText = sReqcntsXmlText + "<choispclist>";
			sReqcntsXmlText = sReqcntsXmlText + "<choi>" + ((ds_rslt_choispclist.getColumn(i, "choi")=="1")?"true":"false") + "</choi>";
			sReqcntsXmlText = sReqcntsXmlText + "<spcseqno>" + ds_rslt_choispclist.getColumn(i, "spcseqno") + "</spcseqno>";
			sReqcntsXmlText = sReqcntsXmlText + "<spccd>" + ds_rslt_choispclist.getColumn(i, "spccd") + "</spccd>";
			sReqcntsXmlText = sReqcntsXmlText + "<spcnm>" +"<![CDATA["+ ds_rslt_choispclist.getColumn(i, "spcnm") + "]]]]><![CDATA[>"+"</spcnm>";
			sReqcntsXmlText = sReqcntsXmlText + "<existyn>" + ds_rslt_choispclist.getColumn(i, "existyn") + "</existyn>";
			sReqcntsXmlText = sReqcntsXmlText + "<slidno>" + ds_rslt_choispclist.getColumn(i, "slidno") + "</slidno>";
			sReqcntsXmlText = sReqcntsXmlText + "</choispclist>";
		}
	}
	sReqcntsXmlText = sReqcntsXmlText + "</choispc>";
	sReqcntsXmlText = sReqcntsXmlText + "<resncd>";
	for(var i=0;i < ds_grd_resncd.rowcount;i++)
	{
	trace("aa "+i+ds_grd_resncd.getColumn(i,"choi"));
		sReqcntsXmlText = sReqcntsXmlText + "<resncdlist>";
		sReqcntsXmlText = sReqcntsXmlText + "<choi>" + ((ds_grd_resncd.getColumn(i,"choi")=="true") ||(ds_grd_resncd.getColumn(i,"choi")=="1")  ?"true":"false") + "</choi>";
		sReqcntsXmlText = sReqcntsXmlText + "<resnnm>" + ds_grd_resncd.getColumn(i,"resnnm") + "</resnnm>";
		sReqcntsXmlText = sReqcntsXmlText + "</resncdlist>";
	}
	trace("sReqcntsXmlText :"+sReqcntsXmlText);
	sReqcntsXmlText = sReqcntsXmlText + "</resncd>";
	sReqcntsXmlText = sReqcntsXmlText + "<endono>0</endono>";
	sReqcntsXmlText = sReqcntsXmlText + "<watery/>";
	sReqcntsXmlText = sReqcntsXmlText + "<viscous/>";
	sReqcntsXmlText = sReqcntsXmlText + "<colorless/>";
	sReqcntsXmlText = sReqcntsXmlText + "<white/>";
	sReqcntsXmlText = sReqcntsXmlText + "<yellow/>";
	sReqcntsXmlText = sReqcntsXmlText + "<red/>";
	sReqcntsXmlText = sReqcntsXmlText + "<others/>";
	sReqcntsXmlText = sReqcntsXmlText + "<othercont/>";
	sReqcntsXmlText = sReqcntsXmlText + "<clear/>";
	sReqcntsXmlText = sReqcntsXmlText + "<ground/>";
	sReqcntsXmlText = sReqcntsXmlText + "<turbid/>";
	sReqcntsXmlText = sReqcntsXmlText + "<slidecnt/>";
	sReqcntsXmlText = sReqcntsXmlText + "</reqfrminfo>";
	
		
    trace("sReqcntsXmlText :"+sReqcntsXmlText);
	var sInDsName = dsf_createDsRow("ds_temp_search", [{col : "pid", val : ds_hidden_reqfrminfo.getColumn(0,"pid")}, 
													   {col : "reqno",val : utlf_lPad(ds_hidden_reqfrminfo.getColumn(0,"reqno").toString(), 1, "0")}, 
													   {col : "reqcnts", val : sReqcntsXmlText}, 
													   {col : "imgcnts",val : imgnodeXmlText},
													   {col : "instcd", val : sysf_getUserInfo("dutplceinstcd")},
													   {col : "scrno",val : "10"},
													   {col : "prcpdd", val : ds_hidden_reqfrminfo.getColumn(0,"prcpdd")},
													   {col : "execprcpuniqno",val : ds_hidden_reqfrminfo.getColumn(0,"execprcpuniqno")},
													   {col : "scrnflagcd", val : "SPCREQ"}]);
		
	tranf_submit({
			id : "TXLPJ01501",
			service : "plgyrelapplib.PlgyAcptLib",
			method : "reqExeReqFrmInfo",
			inds : "refData=" + sInDsName,
			outds : "ds_rslt_rtnvalinfo=reflist",
			callback : "cbf_SPLPJ01500",
			async : false
		});


	if(ds_rslt_rtnvalinfo.rowcount > 0) {

		sReqno = ds_rslt_rtnvalinfo.getColumn(0, "lstreqno"); //의뢰지번호
	}
	var sSpcCdList = "";
	var sSpcNmList = "";
	for(var i = 0; i < ds_rslt_choispclist.rowcount; i++) {
		sSpcCdList += ds_rslt_choispclist.getColumn(i, "spcseqno") + "▨";
		sSpcNmList += ds_rslt_choispclist.getColumn(i, "spcnm") + "▨";
	}

	opener.ds_hidden_reqfrminfo.setColumn(0,"spccd", cmb_reprspccd.value);
	opener.ds_hidden_reqfrminfo.setColumn(0,"spcnm", cmb_reprspccd.text);
	opener.ds_hidden_reqfrminfo.setColumn(0,"spccnt", ds_rslt_choispclist.rowcount);
	opener.ds_hidden_reqfrminfo.setColumn(0,"spcseqno", sSpcCdList);
	opener.ds_hidden_reqfrminfo.setColumn(0,"spcseqnm", sSpcNmList);
	opener.ds_hidden_reqfrminfo.setColumn(0,"reqno", sReqno);
	opener.ds_hidden_reqfrminfo.setColumn(0,"spcstrno", ds_rslt_rtnvalinfo.getColumn(0, "spcstrno"));
	opener.ds_hidden_reqfrminfo.setColumn(0,"spcendno", ds_rslt_rtnvalinfo.getColumn(0, "spcendno"));
	this.close();
}





function pdv_quickadd_btn_SlideClose_onclick(obj:Button,  e:ClickEventInfo)
{
	pdv_quickadd.closePopup();
}



function pdv_quickadd_Edit00_ontextchanged(obj:Edit,  e:TextChangedEventInfo)
{

	ds_popup_list.filter("String(spcnm).indexOf('" + (e.posttext).replace("''","\\'") + "')>=0");	
	
}

function pdv_quickadd_btn_spcadd_onclick(obj:Button,  e:ClickEventInfo)
{

		if( ds_rslt_choispclist.rowcount == 0){		
				sysf_messageBox("대표검체를 지정하지 않았습니다. 세부검체를 등록", "E001"); return;
				
		}

		for(var x = 0 ; x < ds_popup_list.rowcount; x++){
		
				if(ds_popup_list.getColumn(x,"choi") == "1"){
					
						var iRow = ds_rslt_choispclist.addRow();
						
						ds_rslt_choispclist.setColumn(iRow, "choi", 1);
						ds_rslt_choispclist.setColumn(iRow, "spcseqno", "");
						ds_rslt_choispclist.setColumn(iRow, "spccd", ds_popup_list.getColumn(x,"spccd"));
						ds_rslt_choispclist.setColumn(iRow, "spcnm", ds_popup_list.getColumn(x,"spcnm"));
						ds_rslt_choispclist.setColumn(iRow, "existyn", "N");
						ds_rslt_choispclist.setColumn(iRow, "slidno", "0");	
					
				}
		
		}
		
		fExeSeqNoSet(1);
		
}

function pdv_quickadd_oncloseup(obj:PopupDiv, e:EventInfo)
{
	for (var i = 0; i < ds_popup_list.rowcount; i++) {
        ds_popup_list.setColumn(i, "choi", "0") ;
	}
}


function imgButton_onclick(obj:Button,  e:ClickEventInfo)
{
	var objArg = new Object();
	objArg.arg_ds_SMMMR03600_modalif = ds_SMMMR03600_modalif;
	frmf_modal("SMMMR03600", "SMMMR03600", objArg, null, null, null, null, null, null, null, null, null, "M");

}

function ds_SMMMR03600_modalif_onvaluechanged(obj:Dataset,  e:DSColChangeEventInfo)
{
	if(utlf_isNull(ds_SMMMR03600_modalif.getColumn(0,"imgecd"))){
		btn_img.class = "btn_picture";
	}else{
		btn_img.class = "btn_picture_s";
	}
}


function btn_exmp_onclick(obj:Button,  e:ClickEventInfo)
{
	fExePopupCall("P");		
}

function grd_resncd_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	lf_ExeResnChoi();
}

function btn_spcadd_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_rslt_choispclist.addRow();
}

function grd_choispc_onexpanddown(obj:Grid, e:GridMouseEventInfo)
{
	var objArg = new Object();
		
		if((ds_hidden_reqfrminfo.getColumn(0,"xrwGBN") == "inbcoll") && (ds_hidden_reqfrminfo.getColumn(0,"workflagcd") == "1002") && (ds_hidden_reqfrminfo.getColumn(0,"bcgbn") == "true"))
		{
			objArg.reprspccd = "";
		}
		else
		{
			objArg.reprspccd = ds_hidden_reqfrminfo.getColumn(0,"spccd");
		}
		objArg.xcrn_kind = "spccd_sub"
		objArg.scrnflagcd = "ACPT";
		objArg.spccd = "";
		objArg.spcnm = "";
		
		flpzfExeComnOpenScrn(objArg);
		
		if(!utlf_isNull(ds_hidden_scrndata.getColumn(0,"spccd")))
		{
			eval(obj.binddataset).setColumn(e.row, "choi", 1);
			eval(obj.binddataset).setColumn(e.row, "spcseqno", "");
			eval(obj.binddataset).setColumn(e.row, "spccd", ds_hidden_scrndata.getColumn(0,"spccd"));
			eval(obj.binddataset).setColumn(e.row, "spcnm", ds_hidden_scrndata.getColumn(0,"spcnm"));
			eval(obj.binddataset).setColumn(e.row, "existyn", "N");

		}
		fExeAddLastRow();
		fExeSeqNoSet1(1);
}

/* @group  : 조직검사의뢰지
 * @ver    : 2007.10.13 (CMCDEV-0001)
 * @by     : 유동철(ACK)
 * @-----------------------------------
 * @type   : function
 * @access : public
 * @desc   : 검체명 병경 처리 Function
*/
function fExeSpcNmChange() {
	
	var sSpcCd    = "";
	var sOrgName  = "";
	var sDescName = "";
	
	var sSrcNode  = ds_init_detlspclist;	//"/root/main/detlspc/detlspclist";
	var sDescNode = ds_rslt_choispclist;		//"/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist";
	var currow = ds_rslt_choispclist.rowposition;
	
	//------------------------------------------------------------------
		// model.getValue(sDescNode+"["+grd_choispc.row+"]/spccd") == "" || model.getValue(sDescNode+"["+grd_choispc.row+"]/spccd") == "-"		
	if ( utlf_isNull(ds_rslt_choispclist.getColumn(currow, "spccd")) || ds_rslt_choispclist.getColumn(currow, "spccd") == "-" ) {	
			// Continue
	} else {
		fExeAddLastRow();
		return true;
	}
	
	//------------------------------------------------------------------
	if ( utlf_isNull(ds_rslt_choispclist.getColumn(currow, "spcnm")) ) { 	// model.getValue(sDescNode+"["+grd_choispc.row+"]/spcnm") == ""
		return true;
	}
	
	//----------------------------------------
	// 대표검체가 선택되지 않은 경우 처리 불가
	if ( utlf_isNull(ds_hidden_reqfrminfo.getColumn(0, "spccd")) ) {	// model.getValue("/root/hidden/reqfrminfo/spccd") == ""
		sysf_messageBox("대표검체를 선택하여 주십시오! 검체를 추가", "E001");
		ds_rslt_choispclist.setColumn(currow, "spccd", "");		// model.setValue(sDescNode+"["+grd_choispc.row+"]/spccd", "");
		ds_rslt_choispclist.setColumn(currow, "spcnm", "");		// model.setValue(sDescNode+"["+grd_choispc.row+"]/spcnm", "");
				// model.refresh();
		return false;
	}
	
	//------------------------------------------------------------------
	sDescName = ds_rslt_choispclist.getColumn(currow, "spcnm");	//model.getValue(sDescNode+"["+grd_choispc.row+"]/spcnm");
	sDescName = sDescName.toUpperCase();
	
	//----------------------------------------------------------
	// 대표검체의 세부검체 Other,와 비교하여 Other가 존재할 경우
	// 입력된 검체명에 세부 Other 검체코드를 할당한다.
	for ( var iNo = 0; iNo < ds_init_detlspclist.rowcount; iNo++ ) {	// var iNo = 1; iNo <= getNodesetCount(sSrcNode); iNo++ 
		
		//----------------------------------------------------
		sOrgName = ds_init_detlspclist.getColumn(iNo, "spcnm");	//model.getValue(sSrcNode+"["+iNo+"]/spcnm");
		
		//---------------------------------------------------
		if (sOrgName.toUpperCase().indexOf("OTHER", 0) > -1) {
			ds_rslt_choispclist.setColumn(currow, "choi", "true");	// 	model.setValue(sDescNode+"["+grd_choispc.row+"]/choi",     "true");			
			ds_rslt_choispclist.setColumn(currow, "spccd", ds_init_detlspclist.getColumn(iNo, "spccd"));	// 	model.setValue(sDescNode+"["+grd_choispc.row+"]/spccd",    model.getValue(sSrcNode+"["+iNo+"]/spccd"));
			fExeSeqNoSet(0);
			
			//-----------------------
			// 마지막 1라인 공백 유지
			fExeAddLastRow();
			
			//----------
			return true;
		}
	}
	
	//--------------------------------------------------------------------------------------------------------
	sysf_messageBox("Others에 대한 세부검체가 존재하지 않습니다! 병리과에 문의하여 주십시오. 검체를 추가", "E001");
	ds_rslt_choispclist.setColumn(currow, "spccd", "");		// 	model.setValue(sDescNode+"["+grd_choispc.row+"]/spccd", "");
	ds_rslt_choispclist.setColumn(currow, "spcnm", "");		// 	model.setValue(sDescNode+"["+grd_choispc.row+"]/spcnm", "");
			// 	model.refresh();			
}

function grd_choispc_onkillfocus(obj:Grid, e:KillFocusEventInfo)
{
	fExeSpcNmChange();
	fExeSeqNoSet(1);
}

function grd_spclist_onheadclick(obj:Grid, e:GridClickEventInfo)
{
	if(e.row < 0 && e.col==0)
	{
		grdf_setGridCheckAll(obj,e);
		//grd_spclist_oncellclick(
		fExeSpcAllChoi();
	}
}

function fExeSpcAllChoi()
{	
	
	//for (var iNo=1; iNo <= getNodesetCount("/root/main/detlspc/detlspclist"); iNo++)
	for(var iNo = 0; iNo < ds_init_detlspclist.rowcount; iNo++)
	{
		lf_fExeDetlSpcClick_copy(iNo);
	}
}

function grd_choispc_onrbuttonup(obj:Grid, e:GridMouseEventInfo)
{
	if(e.row > -1){
		grdf_setSelectedCell(obj, e);		// 선택된 행 확실히 선택해줌
		
		pmn_popupMenu.trackPopup(e.screenX, e.screenY);
	}
	
	return true;
	
}




function btn_allspc00_onclick(obj:Button,  e:ClickEventInfo)
{
	var objArg = new Object();
	frmf_setParameter("SPLPJ02400_spccd", "");
	//frmf_setParameter("SPLPJ02400_spcnm", "");
	frmf_modal("SPLPJ01410", "SPLPJ01410", objArg, "", "", "", "", "", "", "", "", "", "M");
	
	trace("paramter = " +frmf_getParameter("SPLPJ02400_spccd"));
	if(!utlf_isNull(frmf_getParameter("SPLPJ02400_spccd")))
	{
		tar_prcpcnts.value = frmf_getParameter("SPLPJ02400_spccd"); // 전체검체에서 가져온검체를 대표검체에 set

	}	
}

function btn_allspc01_onclick(obj:Button,  e:ClickEventInfo)
{
	var objArg = new Object();
	frmf_setParameter("SPLPJ02400_spccd", "");
	frmf_modal("SPLPJ01420", "SPLPJ01420", objArg, "", "", "", "", "", "", "", "", "", "M");
	
		trace("paramter = " +frmf_getParameter("SPLPJ02400_spccd"));
	if(!utlf_isNull(frmf_getParameter("SPLPJ02400_spccd")))
	{
		tar_prcpcnts.value = frmf_getParameter("SPLPJ02400_spccd"); // 전체검체에서 가져온검체를 대표검체에 set

	}	
}
]]></Script>
  </Form>
</FDL>