YNU_JEUS/app_home/himed/xpapps/lis/commonxp/xp/SPLLJ90100_부적합검체등록.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLLJ90100" position="absolute 0 0 313 453" titletext="부적합검체등록" oninit="SPLLJ90100_oninit" onload="SPLLJ90100_onload">
    <Layouts>
      <Layout>
        <Static text="※  피통보자 이름만 입력하셔도 등록가능합니다." position="absolute 15 428 307 448" id="caption13" style="color:#0000ffff;font:bold,9,bold;"/>
        <Static id="caption1" text="부적합검체내역" class="tit_2" position="absolute 1 11 118 28"/>
        <Shape id="line1" class="line_1" position="absolute 0 27 309 33" style="strokepen:3 solid #33bbbbff;"/>
        <Static id="caption10" text="조치사항" class="cell_1" position="absolute 0 307 100 389"/>
        <Shape id="line2" class="line_2" position="absolute 0 123 309 129"/>
        <Shape id="line3" class="line_2" position="absolute 0 147 309 153"/>
        <Shape id="line4" class="line_2" position="absolute 0 99 309 105"/>
        <Shape id="line5" class="line_2" position="absolute 0 171 309 177"/>
        <Shape id="line6" class="line_2" position="absolute 0 195 309 201"/>
        <Shape id="line7" class="line_2" position="absolute 0 219 309 225"/>
        <Shape id="line9" class="line_2" position="absolute 0 218 310 224"/>
        <Shape id="line10" class="line_2" position="absolute 103 243 309 249"/>
        <Shape id="line11" class="line_2" position="absolute 104 326 308 332"/>
        <Shape id="line8" class="line_3" position="absolute 0 386 309 392" style="strokepen:2 solid #33bbbbff;"/>
        <Shape id="line12" class="line_2" position="absolute 0 75 309 81"/>
        <Shape id="line13" linetype="vertical" class="line_2" position="absolute 103 267 309 273"/>
        <Static id="caption2" text="환자명" class="cell_1" position="absolute 0 104 100 127"/>
        <Static id="caption11" text="취소구분" class="cell_1" position="absolute 0 31 100 54"/>
        <Static id="caption3" text="검체번호" class="cell_1" position="absolute 0 80 100 103"/>
        <Static id="caption4" text="등록번호" class="cell_1" position="absolute 0 128 100 151"/>
        <Static id="caption5" text="진료과" class="cell_1" position="absolute 0 152 100 175"/>
        <Static id="caption6" text="병실" class="cell_1" position="absolute 0 176 100 199"/>
        <Static id="caption8" text="통보시간" class="cell_1" position="absolute 0 200 100 223"/>
        <Static id="caption9" text="검체상태" class="cell_1" position="absolute 0 224 100 306"/>
        <Edit id="ipt_bcno" taborder="1" class="input_button" position="absolute 103 81 309 100" onkeydown="ipt_bcno_onkeydown" autoselect="true" inputtype="numberandenglish" inputmode="upper" imemode="alpha" useime="none"/>
        <Combo id="cmb_cancel" taborder="2" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_essential" position="absolute 103 32 309 51">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">0</Col>
                <Col id="datacolumn">-</Col>
              </Row>
              <Row>
                <Col id="codecolumn">2</Col>
                <Col id="datacolumn">접수취소</Col>
              </Row>
              <Row>
                <Col id="codecolumn">1</Col>
                <Col id="datacolumn">채혈취소</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Edit id="opt_patnm" taborder="3" readonly="true" position="absolute 103 105 309 124"/>
        <Edit id="opt_pid" taborder="4" readonly="true" position="absolute 103 129 309 148"/>
        <Edit id="opt_orddept" taborder="5" readonly="true" position="absolute 103 153 309 172"/>
        <Edit id="opt_wardroom" taborder="6" readonly="true" position="absolute 103 177 309 196"/>
        <MaskEdit id="opt_notidt" taborder="7" readonly="true" mask="####-##-## ##:##" position="absolute 103 201 309 220" type="string" style="align:left middle;"/>
        <TextArea id="tar_spcstat" taborder="8" class="text_essential" position="absolute 103 249 309 303"/>
        <TextArea id="tar_measfact" taborder="9" class="text_essential" position="absolute 103 329 309 387"/>
        <Edit id="output1" taborder="10" readonly="true" visible="false" position="absolute 155 5 185 24"/>
        <Edit id="output2" taborder="11" readonly="true" visible="false" position="absolute 190 5 220 24"/>
        <Edit id="output3" taborder="12" readonly="true" visible="false" position="absolute 225 5 255 24"/>
        <Combo id="cmb_spcstat" taborder="13" innerdataset="ds_init_cmb_spcstat" codecolumn="cd" datacolumn="nm" position="absolute 103 225 309 244" onitemchanged="cmb_spcstat_onitemchanged" style="itemheight:16;"/>
        <Combo id="cmb_measfact" taborder="14" innerdataset="ds_init_cmb_measfact" codecolumn="cd" datacolumn="nm" position="absolute 103 308 309 327" onitemchanged="cmb_measfact_onitemchanged"/>
        <Static id="caption14" text="취소사유" class="cell_1" position="absolute 0 55 100 78"/>
        <Combo id="cmb_cancelstat" taborder="15" innerdataset="ds_init_cmb_cancelstat" codecolumn="cd" datacolumn="nm" position="absolute 103 56 309 75"/>
        <Shape id="line14" class="line_6" position="absolute 0 400 310 406"/>
        <Button id="btn_cnfm" taborder="16" text="확인" class="btn4" position="absolute 195 405 251 427" onclick="btn_cnfm_onclick"/>
        <Button id="btn_cancel" taborder="17" text="취소" class="btn4" position="absolute 254 405 310 427" onclick="btn_cancel_onclick"/>
        <Button id="button1" taborder="18" text="SMS" class="btn1" enable="false" visible="false" position="absolute 0 405 56 427"/>
        <Button id="button2" taborder="19" text="MSG" class="btn1" enable="false" visible="false" position="absolute 59 405 115 427"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_cmb_spcstat" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING"/>
          <Column id="cd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_measfact" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING"/>
          <Column id="cd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_cancelstat" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING"/>
          <Column id="cd" type="STRING"/>
        </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="Data1" type="STRING" size="256"/>
          <Column id="Data2" type="STRING" size="256"/>
          <Column id="Data3" type="STRING" size="256"/>
          <Column id="Data4" type="STRING" size="256"/>
          <Column id="Data5" type="STRING" size="256"/>
          <Column id="Data6" type="STRING" size="256"/>
          <Column id="Data7" type="STRING" size="256"/>
          <Column id="Data8" type="STRING" size="256"/>
          <Column id="Data9" type="STRING" size="256"/>
          <Column id="Data10" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="spccd" type="STRING" size="256"/>
          <Column id="codeflag" type="STRING" size="256"/>
          <Column id="rtnid" type="STRING" size="256"/>
          <Column id="notipsn" type="STRING" size="256"/>
          <Column id="smsbcno" type="STRING" size="256"/>
          <Column id="smsuserid" type="STRING" size="256"/>
          <Column id="smsmsg" type="STRING" size="256"/>
          <Column id="sender" type="STRING" size="256"/>
          <Column id="smsgbn" type="STRING" size="256"/>
          <Column id="bcno" type="STRING" size="256"/>
          <Column id="cnclflag" type="STRING" size="256"/>
          <Column id="spcflag" type="STRING" size="256"/>
          <Column id="resncd" type="STRING" size="256"/>
          <Column id="spcflagdetl" type="STRING" size="256"/>
          <Column id="measflag" type="STRING" size="256"/>
          <Column id="measfact" type="STRING" size="256"/>
          <Column id="spcseq" type="STRING" size="256"/>
          <Column id="rsltstat" type="STRING" size="256"/>
          <Column id="measflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="Data1"/>
            <Col id="Data2"/>
            <Col id="Data3"/>
            <Col id="Data4"/>
            <Col id="Data5"/>
            <Col id="Data6"/>
            <Col id="Data7"/>
            <Col id="Data8"/>
            <Col id="Data9"/>
            <Col id="Data10"/>
            <Col id="pid"/>
            <Col id="spccd"/>
            <Col id="codeflag"/>
            <Col id="rtnid"/>
            <Col id="notipsn"/>
            <Col id="smsbcno"/>
            <Col id="smsuserid"/>
            <Col id="smsmsg"/>
            <Col id="sender"/>
            <Col id="smsgbn"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_0101" 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_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cnclflag" type="STRING" size="256"/>
          <Column id="bcno" type="STRING" size="256"/>
          <Column id="notipsn" type="STRING" size="256"/>
          <Column id="spcflag" type="STRING" size="256"/>
          <Column id="spcflagdetl" type="STRING" size="256"/>
          <Column id="measfact" type="STRING" size="256"/>
          <Column id="notidetstat" type="STRING" size="256"/>
          <Column id="spcresncd" type="STRING" size="256"/>
          <Column id="meafactcd" type="STRING" size="256"/>
          <Column id="temp" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cnclflag"/>
            <Col id="bcno"/>
            <Col id="notipsn"/>
            <Col id="spcflag"/>
            <Col id="spcflagdetl"/>
            <Col id="measfact"/>
            <Col id="notidetstat"/>
            <Col id="spcresncd"/>
            <Col id="meafactcd"/>
            <Col id="temp"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_badspclist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cnclflag" type="STRING" size="256" sumtext="취소구분"/>
          <Column id="patnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddept" type="STRING" size="256" sumtext="진료과"/>
          <Column id="wardroom" type="STRING" size="256" sumtext="병실"/>
          <Column id="notipsn" type="STRING" size="256" sumtext="피통보자"/>
          <Column id="notidt" type="STRING" size="256" sumtext="통보시간"/>
          <Column id="spcflag" type="STRING" size="256" sumtext="검체상태구분"/>
          <Column id="resncd" type="STRING" size="256" sumtext="검체상태구분"/>
          <Column id="spcflagdetl" type="STRING" size="256" sumtext="검체상태상세"/>
          <Column id="measflag" type="STRING" size="256" sumtext="조치사항"/>
          <Column id="measfact" type="STRING" size="256" sumtext="조치사항"/>
          <Column id="spcseq" type="STRING" size="256" sumtext="검체순번"/>
          <Column id="rsltstat" type="STRING" size="256" sumtext="결과상태"/>
          <Column id="spccd" type="STRING" size="256" sumtext="검체코드"/>
          <Column id="spcstat" type="STRING" size="256" sumtext="검체상태"/>
          <Column id="bc" type="STRING" size="256" sumtext="부적합등록여부"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="Dataset00" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cnclflag" type="STRING" size="256" sumtext="취소구분"/>
          <Column id="patnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과"/>
          <Column id="wardroom" type="STRING" size="256" sumtext="병실"/>
          <Column id="notipsn" type="STRING" size="256" sumtext="피통보자"/>
          <Column id="notidt" type="STRING" size="256" sumtext="통보시간"/>
          <Column id="spcflag" type="STRING" size="256" sumtext="검체상태구분"/>
          <Column id="resncd" type="STRING" size="256" sumtext="검체상태구분"/>
          <Column id="spcstatdetl" type="STRING" size="256" sumtext="검체상태상세"/>
          <Column id="measflag" type="STRING" size="256" sumtext="조치사항"/>
          <Column id="measfact" type="STRING" size="256" sumtext="조치사항"/>
          <Column id="Msg" type="STRING" size="256" sumtext="메세지"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="cmb_cancel" propid="value" datasetid="ds_badspclist" columnid="cnclflag"/>
      <BindItem id="item1" compid="cmb_cancelstat" propid="value" datasetid="ds_badspclist" columnid="spcflag"/>
      <BindItem id="item2" compid="ipt_bcno" propid="value" datasetid="ds_hidden" columnid="bcno"/>
      <BindItem id="item3" compid="opt_patnm" propid="value" datasetid="ds_badspclist" columnid="patnm"/>
      <BindItem id="item4" compid="opt_pid" propid="value" datasetid="ds_badspclist" columnid="pid"/>
      <BindItem id="item5" compid="opt_orddept" propid="value" datasetid="ds_badspclist" columnid="orddeptnm"/>
      <BindItem id="item6" compid="opt_wardroom" propid="value" datasetid="ds_badspclist" columnid="wardroom"/>
      <BindItem id="item7" compid="opt_notidt" propid="value" datasetid="ds_badspclist" columnid="notidt"/>
      <BindItem id="item8" compid="cmb_spcstat" propid="value" datasetid="ds_badspclist" columnid="resncd"/>
      <BindItem id="item9" compid="tar_spcstat" propid="value" datasetid="ds_badspclist" columnid="spcflagdetl"/>
      <BindItem id="item10" compid="cmb_measfact" propid="value" datasetid="ds_badspclist" columnid="measflag"/>
      <BindItem id="item11" compid="tar_measfact" propid="value" datasetid="ds_badspclist" columnid="measfact"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-09
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-09      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";

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

function SPLLJ90100_onload(obj:Form, e:LoadEventInfo)
{
	// Opener에서 받은 Param Pasing
	try{
		ds_hidden.copyData(arg_ds_hidden);
	}catch(e){}
	 

	
	fgetbadspc();
					
	// 부적합취소사유목록 초기정보조회 
	fGetBadSpcResn();
}

// 부적합 검체 조회
function fgetbadspc()
{	

	var sendbcno = utlf_transNullToEmpty(ds_hidden.getColumn(0, "bcno"));
	
	// 검체번호 있으면 바로 조회
	if( !utlf_isNull(sendbcno))
	{
		cmb_cancel.enable = true;
		if(sendbcno.substr(0,1)=="M")
		{
			ds_hidden.setColumn(0, "cnclflag", "0");
			cmb_cancel.enable = false;
		}
		
		//ds_send.setColumn(0, "Data1", sendbcno);
		dsf_createDsRow("ds_temp_search", [{col : "bcno", val : sendbcno}]);
		
		var oParam = {};
			oParam.id          = "TRLLJ90101";
			oParam.service     = "acptmngtapp.AcptMngt";
			oParam.method      = "reqGetBadSpc";
			oParam.inds        = "cond=ds_temp_search";
			oParam.outds       = "ds_badspclist=getbadspclist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLLJ90101";
		tranf_submit(oParam);
		//return true;
		if(ds_badspclist.rowcount <= 0)
		{
			sysf_messageBox("검체번호가 잘못 입력되었습니다. 검체내역을 조회 할 수", "E001"); 
			return;
		}
		ds_badspclist.setColumn(0, "notidt", utlf_getCurrentDate() + utlf_getCurrentTime());
	}
	
	
	if(ds_badspclist.getColumn(0, "bc") != "-")
	{
		var cnt = ds_init_cmb_measfact.rowcount;
		
		for(i=0; i < parseInt(cnt); i++)
		{
			if(ds_badspclist.getColumn(0, "measfact").indexOf(cmb_measfact.value) == 0)
			{
				ds_badspclist.setColumn(0, "measflag", cmb_measfact.value);
			}
		}
		
		if(ds_badspclist.getColumn(0, "cnclflag") == "1" || ds_badspclist.getColumn(0, "cnclflag") == "2")
		{
			if(ds_badspclist.getColumn(0, "cnclflag") == "1")  // 채혈취소 사유
			{
				ds_init_0101.filter("etc01 == '01'");
				cnt = ds_init_0101.rowcount;
			}
			else if(ds_badspclist.getColumn(0, "cnclflag") == "2") // 접수취소 사유
			{ 
				ds_init_0101.filter("etc01 == '02'");
				cnt = ds_init_0101.rowcount;
			} 

			for(i=0; i<parseInt(cnt); i++)
			{
				if(ds_badspclist.getColumn(0, "measfact").indexOf(cmb_measfact.value) == 0)
				{
					ds_badspclist.setColumn(0, "measflag", cmb_cancelstat.value);
				}
			}
		}					
	}
	
	if (sendbcno.length> 0 && (sendbcno.substr(0,1)=="G" || sendbcno.substr(0,1)=="M") ) 
	{
		ds_badspclist.setColumn(0, "cnclflag", "0");
	}
	else if(ds_badspclist.getColumn(0, "spcstat") == "2")
	{
		ds_badspclist.setColumn(0, "cnclflag", "1");
	} 
	else if(ds_badspclist.getColumn(0, "spcstat") == "3")
	{
		ds_badspclist.setColumn(0, "cnclflag", "2");
	}
	else if((ds_badspclist.getColumn(0, "spcstat") == "4") &&  (ds_badspclist.getColumn(0, "rsltstat") == "-"))
	{
		ds_badspclist.setColumn(0, "cnclflag", "2");
	}
	else
	{	
		ds_badspclist.setColumn(0, "cnclflag", "0");
	}
	
	if( !utlf_isNull(ds_badspclist.getColumn(0, "bc")))
	{
		if(ds_badspclist.getColumn(0, "bc") == "-")	// 부적합등록안됨
		{  
			btn_cnfm.enable = true;
			if( !utlf_isNull(ds_badspclist.getColumn(0, "rsltstat")))
			{
				if(ds_badspclist.getColumn(0, "rsltstat") != "-")
				{
					sysf_messageBox("검사결과가 등록되어있습니다. 접수,채혈취소 ", "E001");  // 할 수 없습니다. 
					ds_badspclist.setColumn(0, "cnclflag", "0");
					cmb_cancel.enable = false;
				}
			}	
		}
		else	 //부적합등록됨
		{
			sysf_messageBox("이미 부적합검체로 등록되어있습니다. 부적합검체 등록 ", "E001");  // 할 수 없습니다. 	
			btn_cnfm.enable = false;
			return;	 
		}
	}
}

// 부적합취소사유목록 초기정보조회 
function fGetBadSpcResn()
{
	dsf_createDsRow("ds_temp_search", [{col : "codeflag", val : "0101|"}]);
	
	var oParam = {};
		oParam.id          = "TRLZZ00101";
		oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
		oParam.method      = "reqGetInitCodeInfo";
		oParam.inds        = "cond=ds_temp_search";
		oParam.outds       = "ds_init_0101=0101";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLZZ00101";
	tranf_submit(oParam);

	ds_init_cmb_spcstat.copyData(ds_init_0101);
	ds_init_cmb_spcstat.filterstr = "etc01 == '06'";
	ds_init_cmb_measfact.copyData(ds_init_0101);
	ds_init_cmb_measfact.filterstr = "etc01 == '11'";
	ds_init_cmb_cancelstat.copyData(ds_init_0101);
	ds_init_cmb_cancelstat.filterstr = "etc01 == '01'";
	
	
}

function btn_cnfm_onclick(obj:Button,  e:ClickEventInfo)
{
	fInsBadSpc();
}

function btn_cancel_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

// 부적합 검체 등록
function fInsBadSpc()
{	
	if(ds_badspclist.getColumn(0, "bc") != "-")
	{
		sysf_messageBox("이미 부적합검체로 등록되어있습니다. 부적합검체 등록 ", "E001");  // 할 수 없습니다. 	
		return;
	}
	
	if(ds_badspclist.getColumn(0, "cnclflag") == "2") //접수취소 콤보 선택시
	{
		if(ds_badspclist.getColumn(0, "spcstat") == "4" || ds_badspclist.getColumn(0, "spcstat") == "3")  // 접수상태인데 
		{
			if(ds_badspclist.getColumn(0, "rsltstat") != "-")  // 결과 있으면 
			{
				sysf_messageBox("결과등록된 상태입니다. 접수취소 ", "E001");  // 할 수 없습니다. 
				return;	
			}	
		}
		else
		{
			sysf_messageBox("접수 상태가 아닙니다. 접수취소 ", "E001");  // 할 수 없습니다. 
			return;		
		}
		
		if( utlf_isNull(ds_badspclist.getColumn(0, "spcflag")))  // 접수취소 사유 없는 경우
		{
			sysf_messageBox("취소 사유를 넣어 주십시요. 진행", "E001"); 
			return;	
		}	
	}
	else if(ds_badspclist.getColumn(0, "cnclflag") == "1") // 채혈취소 콤보 선택시
	{
		if(ds_badspclist.getColumn(0, "spcstat") == "4")
		{
			sysf_messageBox("접수된 검체입니다. 채혈취소 ", "E001");  // 할 수 없습니다. 
			return;	
		}	
		if(utlf_isNull(ds_badspclist.getColumn(0, "spcflag")))  // 채혈취소 사유 없는 경우
		{
			sysf_messageBox("취소 사유를 넣어 주십시요. 진행", "E001"); 
			return;	
		}	
	}
	if(ds_badspclist.getColumn(0, "resncd") == "06000" || utlf_isNull(ds_badspclist.getColumn(0, "resncd")))
	{
		sysf_messageBox("부적격 사유를 선택하세요", "E"); 
		return;
	}
	
	if(ds_badspclist.getColumn(0, "measflag") == "11000" || utlf_isNull(ds_badspclist.getColumn(0, "measflag")))
	{
		sysf_messageBox("부적격 조치 사유를 선택하세요", "E"); 
		return;
	}
	if( utlf_isNull(ds_badspclist.getColumn(0, "resncd")) 
		|| utlf_isNull(ds_badspclist.getColumn(0, "spcflagdetl")) 
		|| utlf_isNull(ds_badspclist.getColumn(0, "measfact")))
	{
		sysf_messageBox("모든 입력을 해주십시오 진행", "E001"); 
		return;
	}
// 	ds_send.setColumn(0, "Data1", ds_hidden.getColumn(0, "bcno"));
// 	ds_send.setColumn(0, "Data2", ds_badspclist.getColumn(0, "cnclflag"));
// 	ds_send.setColumn(0, "Data3", "-");
// 	ds_send.setColumn(0, "Data4", ds_badspclist.getColumn(0, "spcflag"));
// 	ds_send.setColumn(0, "Data5", ds_badspclist.getColumn(0, "resncd"));
// 	ds_send.setColumn(0, "Data6", ds_badspclist.getColumn(0, "spcflagdetl"));
// 	ds_send.setColumn(0, "Data7", ds_badspclist.getColumn(0, "measflag"));
// 	ds_send.setColumn(0, "Data8", ds_badspclist.getColumn(0, "measfact"));
// 	ds_send.setColumn(0, "Data9", ds_badspclist.getColumn(0, "spcseq"));
// 	ds_send.setColumn(0, "Data10", ds_badspclist.getColumn(0, "rsltstat"));
// 	ds_send.setColumn(0, "pid", ds_badspclist.getColumn(0, "pid"));
// 	ds_send.setColumn(0, "spccd", ds_badspclist.getColumn(0, "spccd"));
// 	ds_send.setColumn(0, "rtnid", ds_badspclist.getColumn(0, "notipsn"));
// 	ds_send.setColumn(0, "notipsn", "-");

    ds_send.setColumn(0, "bcno", ds_hidden.getColumn(0, "bcno"));
	ds_send.setColumn(0, "cnclflag", ds_badspclist.getColumn(0, "cnclflag"));
	//ds_send.setColumn(0, "Data3", "-");
	ds_send.setColumn(0, "spcflag", ds_badspclist.getColumn(0, "spcflag"));
	ds_send.setColumn(0, "resncd", ds_badspclist.getColumn(0, "resncd"));
	ds_send.setColumn(0, "spcflagdetl", ds_badspclist.getColumn(0, "spcflagdetl"));
	ds_send.setColumn(0, "measflag", ds_badspclist.getColumn(0, "measflag"));
	ds_send.setColumn(0, "measfact", ds_badspclist.getColumn(0, "measfact"));
	ds_send.setColumn(0, "spcseq", ds_badspclist.getColumn(0, "spcseq"));
	ds_send.setColumn(0, "rsltstat", ds_badspclist.getColumn(0, "rsltstat"));
	ds_send.setColumn(0, "pid", ds_badspclist.getColumn(0, "pid"));
	ds_send.setColumn(0, "spccd", ds_badspclist.getColumn(0, "spccd"));
	ds_send.setColumn(0, "rtnid", ds_badspclist.getColumn(0, "notipsn"));
	ds_send.setColumn(0, "notipsn", "-");
	
	if( utlf_isNull(ds_badspclist.getColumn(0, "notipsn")))
	{
		ds_send.setColumn(0, "rtnid", "-");
	}
	
	var oParam = {};
		oParam.id          = "TXLLJ90101";
		oParam.service     = "acptmngtapp.AcptMngt";
		oParam.method      = "reqInsBadSpc";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_badspclist=getbadspclistref";
		oParam.async       = false;
		oParam.callback    = "cf_TXLLJ90101";
	tranf_submit(oParam);
	
	
}

function cf_TXLLJ90101(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    this.close();
}


function ipt_bcno_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		ds_hidden.setColumn(0, "bcno", (ipt_bcno.text).toUpperCase());
		
		if(ds_hidden.getColumn(0, "bcno").substr(0, 1) == "O" )
		{
		   alert("외래바코드 입니다. 검체취소시 주의요망!");	
		}
		fgetbadspc();
	}
}


function cmb_spcstat_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var nm = cmb_spcstat.text;
	ds_badspclist.setColumn(0,"spcflagdetl", nm);
	
}

function cmb_measfact_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var nm = cmb_measfact.text;
	ds_badspclist.setColumn(0,"measfact", nm);
}

function ipt_bcno_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		ds_hidden.setColumn(0, "bcno", (ipt_bcno.text).toUpperCase());
		
		if(ds_hidden.getColumn(0, "bcno").substr(0, 1) == "O" )
		{
		   alert("외래바코드 입니다. 검체취소시 주의요망!");	
		}
		fgetbadspc();
	}
}
]]></Script>
  </Form>
</FDL>