YNU_JEUS/app_home/himed/xpapps/lis/rsltmngtxp/xp/SPLMR90200_미생물소견등록.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLMR90200" position="absolute 0 0 416 278" titletext="미생물소견등록" oninit="SPLMR90200_oninit" onload="SPLMR90200_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 415 275" id="group1">
          <Layouts>
            <Layout>
              <Static text="소견등록" position="absolute 0 10 79 26" id="caption2" class="tit_2"/>
              <Static text="특이사항" position="absolute 0 31 72 54" align="align:center middle;" id="caption3" class="cell_1"/>
              <Button position="absolute 359 250 415 272" id="button9" class="btn4" text="취소" onclick="group1_button9_onclick"/>
              <Shape position="absolute 0 26 415 32" linetype="horizontal" id="line2" class="line_1" style="strokepen:3 solid #33bbbbff;"/>
              <Edit position="absolute 90 2 145 21" id="input2" class="input_default" visible="false"/>
              <Static text="소견코드" position="absolute 0 31 72 54" id="caption4" class="cell_1"/>
              <Shape position="absolute 0 51 415 57" linetype="horizontal" id="line4" class="line_3"/>
              <Combo position="absolute 75 32 415 51" id="combo1" class="combo_default" innerdataset="@ds_LB0210" datacolumn="nm" codecolumn="cd" onitemchanged="group1_combo1_onitemchanged" index="-1"/>
              <Button position="absolute 301 250 357 272" id="btn_cfm" class="btn4" text="확인" onclick="group1_btn_cfm_onclick"/>
              <CheckBox position="absolute 299 10 351 25" id="checkbox1" visible="false" text="추가"/>
              <TextArea position="absolute 0 58 415 245" id="textarea2" wordwrap="char" ontextchanged="group1_textarea2_ontextchanged"/>
              <CheckBox position="absolute 350 10 411 25" id="checkbox2" visible="false" text="다음줄"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_combo1" 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_hidden_refflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="searchtext" type="STRING" size="256"/>
          <Column id="searchflag" type="STRING" size="256"/>
          <Column id="testlrgkind" type="STRING" size="256"/>
          <Column id="rsltstat" type="STRING" size="256"/>
          <Column id="bcno" type="STRING" size="256"/>
          <Column id="testcont" type="STRING" size="256"/>
          <Column id="testcontcd" type="STRING" size="256"/>
          <Column id="p_isedit" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="searchflag">1</Col>
            <Col id="testlrgkind">M</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="testcontcd" type="STRING" size="256"/>
          <Column id="testcont" type="STRING" size="256"/>
          <Column id="cmtrsltstat" type="STRING" size="256"/>
          <Column id="bcno" type="STRING" size="256"/>
          <Column id="sectcd" type="STRING" size="256"/>
          <Column id="tsectcd" type="STRING" size="256"/>
          <Column id="testcontcdnm" type="STRING" size="256"/>
          <Column id="p_isedit" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="add" type="STRING" size="256"/>
          <Column id="newline" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="add">1</Col>
            <Col id="newline">1</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_LB0210" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.textarea2" propid="value" datasetid="ds_cmt" columnid="testcont"/>
      <BindItem id="item1" compid="group1.combo1" propid="value" datasetid="ds_cmt" columnid="testcontcd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
 
include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LLZ001.xjs";

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

function SPLMR90200_onload(obj:Form, e:LoadEventInfo)
{
	var vIsedit = opener.frmf_getParameter("SMLMR00200_p_isedit");
	var vCmtpcd = opener.frmf_getParameter("SMLMR00200_testcontcd");
	var vCmtp = opener.frmf_getParameter("SMLMR00200_testcont");
	//var vCmtprstflag = opener.frmf_getParameter(ds_patinfo.getColumn(0, "cmtrsltstat"));
	var vBcno = opener.frmf_getParameter("SMLMR00200_bcno");
	var vSectcd = opener.frmf_getParameter("SMLMR00200_sectcd");
	var vTsectcd = opener.frmf_getParameter("SMLMR00200_tsectcd");
	
	ds_hidden_refflag.setColumn(0, "p_isedit", vIsedit);			
	ds_cmt.setColumn(0, "testcontcd", "00");
	ds_cmt.setColumn(0, "testcont", vCmtp);
	ds_cmt.setColumn(0, "bcno", vBcno);
	ds_cmt.setColumn(0, "sectcd", vSectcd);
	ds_cmt.setColumn(0, "tsectcd", vTsectcd);
	
	ds_hidden.setColumn(0, "add", "1");
	ds_hidden.setColumn(0, "newline", "1");
	//fBaseInfoRef("0210|");
	dsf_createDsRow("ds_temp_search", [{col: "codeflag", val: "0210|"}]);
	var oParam = {};
		oParam.id          = "TRLZZ00101";
		oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
		oParam.method      = "reqGetInitCodeInfo";
		oParam.inds        = "cond=ds_temp_search";
		oParam.outds       = "ds_LB0210=0210";
		oParam.async       = false;
	  //  oParam.callback    = "cf_TRLZZ00101";
	tranf_submit(oParam);
	
	trace("vTsectcd = " + vTsectcd);
	ds_LB0210.filterstr = "cd=='00' || (etc01 == 'M' && etc02=='" +vTsectcd+"')";
}

function group1_btn_cfm_onclick(obj:Button,  e:ClickEventInfo)
{
	fSelect_Click();
}

function group1_button9_onclick(obj:Button,  e:ClickEventInfo)
{
	opener.frmf_setParameter("SMLMR00200_yn", "N");
	this.close();
}

// 입력버튼 클릭
function fSelect_Click()
{	
	var vIsedit = ds_hidden_refflag.getColumn(0, "p_isedit");
	ds_cmt.setColumn(0, "p_isedit", vIsedit);
	var vCmtpcd = ds_cmt.getColumn(0, "testcontcd");
	var vCmtp = ds_cmt.getColumn(0, "testcont");
	opener.frmf_setParameter("p_isedit", vIsedit);
	opener.frmf_setParameter("testcont", vCmtp);
	opener.frmf_setParameter("testcontcd", vCmtpcd);
	opener.frmf_setParameter("SMLMR00200_yn", "Y");
	this.close();
}

function group1_combo1_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fCmtCombo();
}

function fCmtCombo()
{	
	var curCmptcd = ds_cmt.getColumn(0, "testcontcd");
	var vSectcd = ds_cmt.getColumn(0, "sectcd");
	var vTsectcd = ds_cmt.getColumn(0, "tsectcd");

	var newCmt = ds_LB0210.lookupExpr("cd=='" + curCmptcd +  "' && etc01=='" + vSectcd + "' && etc02=='" + vTsectcd + "'", "etc03");
	
	if(ds_hidden.getColumn(0, "add") == "1")
	{

		var crlf = ds_hidden.getColumn(0, "newline") == "1" ? "\n" : "";
		
		ds_cmt.setColumn(0, "testcont", utlf_transNullToEmpty(ds_cmt.getColumn(0, "testcont")) + crlf + newCmt);
	} 
	else
	{
		ds_cmt.setColumn(0, "testcont", newCmt);
	}
	
	fCMT_SetEditFlag();
		
}

function fCMT_SetEditFlag()
{
	ds_hidden_refflag.setColumn(0, "p_isedit", "true");
}

function group1_textarea2_ontextchanged(obj:TextArea,  e:TextChangedEventInfo)
{
	if(!utlf_isNull(ds_cmt.getColumn(0, "testcontcd"))) fCMT_SetEditFlag();
}
]]></Script>
  </Form>
</FDL>