YNU_JEUS/app_home/himed/xpapps/lis/rsltmngtxp/xp/SPLMR90700_배양검사결과입력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLMR90700" position="absolute 0 0 506 615" titletext="배양검사 결과입력" oninit="SPLMR90700_oninit" onload="SPLMR90700_onload">
    <Layouts>
      <Layout>
        <Static id="caption2" text="배양검사 결과입력" class="tit_2" position="absolute 1 4 133 21"/>
        <Button id="button9" taborder="1" text="취소" class="btn4" position="absolute 445 588 501 610" onclick="button9_onclick"/>
        <Shape id="line2" linetype="horizontal" class="line_10" position="absolute 0 23 500 29"/>
        <Button id="btn_cfm" taborder="2" text="확인" class="btn4" position="absolute 389 588 445 610" onclick="btn_cfm_onclick"/>
        <Button id="button1" taborder="3" text="Clear" class="btn4" position="absolute 321 588 389 610" onclick="button1_onclick"/>
        <Static id="caption5" text="결과예문" class="tit_2" position="absolute 1 40 76 56"/>
        <Grid id="datagrid1" taborder="4" binddataset="ds_main_Gram_RsltCode" useinputpanel="false" position="absolute 1 60 501 390" autosizingtype="none" autofittype="col" selecttype="cell" oncellclick="datagrid1_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="99"/>
                <Column size="99"/>
                <Column size="99"/>
                <Column size="99"/>
                <Column size="99"/>
              </Columns>
              <Rows>
                <Row size="32"/>
              </Rows>
              <Band id="body">
                <Cell style="background:#eeffffff;background2:#eeffffff;" text="bind:cd1"/>
                <Cell col="1" style="background:#eeffffff;background2:#eeffffff;" text="bind:cd2"/>
                <Cell col="2" style="background:#eeffffff;background2:#eeffffff;" text="bind:cd3"/>
                <Cell col="3" style="background:#eeffffff;background2:#eeffffff;" text="bind:cd4"/>
                <Cell col="4" style="background:#eeffffff;background2:#eeffffff;" text="bind:cd5"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption1" text="검사결과" class="tit_2" position="absolute 4 399 76 415"/>
        <ActiveX id="object2" position="absolute 2 420 503 565" progid="{CC980D81-CB5E-46A3-94F8-6925747F95E4}" useautobitmapcache="1" taborder="5" visible="false"/>
        <TextArea id="object1" taborder="6" position="absolute 1 418 503 569" oneditclick="object1_oneditclick" onkeyup="object1_onkeyup" onsetfocus="object1_onsetfocus"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_Gram_RsltCode" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd1" type="STRING"/>
          <Column id="cd2" type="STRING"/>
          <Column id="cd3" type="STRING"/>
          <Column id="cd4" type="STRING"/>
          <Column id="cd5" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_LB0109" 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_cultrueParm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="testcd" type="STRING" size="256"/>
          <Column id="bufParm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="object1" propid="value" datasetid="ds_hidden_cultrueParm" columnid="bufParm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2017-05-22
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2017-05-22      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LLZ001.xjs";

var _ContentObject;
var _ContentPos;

function SPLMR90700_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
	grdf_initGrid(datagrid1);
}

function SPLMR90700_onload(obj:Form, e:LoadEventInfo)
{
	ds_hidden_cultrueParm.copyData(opener.ds_hidden_cultureParm);
	var sInDsName = dsf_createDsRow("ds_temp_search", [{col: "codeflag", val: "0109|"}]);
	
	var oParam = {};
		oParam.id          = "TRLZZ00101";
		oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
		oParam.method      = "reqGetInitCodeInfo";
		oParam.inds        = "cond=ds_temp_search";
		oParam.outds       = "ds_LB0109=0109";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLZZ00101";
	tranf_submit(oParam);
	fRsltCodeSet();
}

function fRsltCodeSet()
{
	var testcd1 =  opener.frmf_getParameter("testcd");	
	ds_LB0109.filterstr ="etc01 =='" + testcd1 + "' && etc03 =='N' && etc04 == 'Y'";
	var n = ds_LB0109.rowcount;
	
	var gridRow = 0;
	var seq =0;
 	ds_main_Gram_RsltCode.addRow();
	ds_main_Gram_RsltCode.rowposition = -1;

	for(i = 1; i <= n; i++)
	{			
		var cd = ds_LB0109.getColumn(i-1, "cd");
		
		var nm = ds_LB0109.getColumn(i-1, "nm");
	
		seq++;
		
		ds_main_Gram_RsltCode.setColumn(0, "cd"+seq, cd);
		
		if(i%5 == 0 && i !=n)
		{
			seq = 0;
			gridRow++;
			ds_main_Gram_RsltCode.addRow();	
					
		}
	}
}

//clear
function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	object1.value = "";
}

//확인
function btn_cfm_onclick(obj:Button,  e:ClickEventInfo)
{
	fInput();
}

//취소
function button9_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function fInput()
{
	ds_hidden_cultrueParm.setColumn(0, "bufParm", object1.value);	
	opener.ds_hidden_cultureParm.setColumn(0, "bufParm", ds_hidden_cultrueParm.getColumn(0, "bufParm"));
	this.close();
}


function datagrid1_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	fRsltCodeClick();	
}

function fRsltCodeClick()
{
	//var testcd1  = model.getvalue("/root/hidden/cultureParm/testcd");
	var testcd1 = ds_hidden_cultrueParm.getColumn(0, "testcd");
	var row = datagrid1.currentrow;
	var col = datagrid1.currentcol;

	var code = ds_main_Gram_RsltCode.getColumn(row, col);
	
	ds_LB0109.filterstr = "etc01 == '" + testcd1 + "' && cd == '" + code + "'";

	var nm = ds_LB0109.getColumn(0, "nm");
	var sExmpCntsD = nm;
	var txtSelPos = _ContentPos;
	
	_ContentObject = object1;
	var curText = utlf_transNullToEmpty(_ContentObject.text);
	var curTextBefore = curText.substr(0, txtSelPos);
	var curTextAfter = curText.substr(txtSelPos, curText.length);
	var orgBfCaretText = curText.substr(0, _ContentPos)+sExmpCntsD;
	
	_ContentObject.value = curTextAfter + orgBfCaretText;

}
function object1_oneditclick(obj:TextArea,  e:EditClickEventInfo)
{
		_ContentObject = obj;
	_ContentPos = obj.getCaretPos();
}

function object1_onkeyup(obj:TextArea, e:KeyEventInfo)
{
		_ContentObject = obj;
	_ContentPos = obj.getCaretPos();
}

function object1_onsetfocus(obj:TextArea, e:SetFocusEventInfo)
{
		_ContentObject = obj;
	_ContentPos = obj.getCaretPos();
}
]]></Script>
  </Form>
</FDL>