YNU_JEUS/app_home/himed/xpapps/pam/pambaseinfomngtxp/xp/SMPMB03102_영수증가야할곳코드조회(처방).xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPMB03102" position="absolute 0 0 392 493" titletext="코드조회" onload="SMPMB03102_onload" oninit="SMPMB03102_oninit">
    <Layouts>
      <Layout>
        <Static id="caption57" class="tit_2" position="absolute 0 1 203 18" style="" text="코드조회"/>
        <Shape id="line18" class="line_10" linetype="horizontal" position="absolute 0 18 390 22" style="" anchor="default"/>
        <Button id="btn_pretrgtman" class="btn2" position="absolute 346 294 388 313" style="" text="삭제" onclick="btn_pretrgtman_onclick"/>
        <Button id="btn_nexttrgtman" class="btn2" position="absolute 302 294 344 313" style="" text="추가" onclick="btn_nexttrgtman_onclick"/>
        <Button id="button2" class="btn2" position="absolute 258 294 300 313" style="" text="적용" onclick="button2_onclick"/>
        <Static id="caption1" class="tit_2" position="absolute 0 297 203 314" style="" text="선택코드"/>
        <Shape id="line1" class="line_10" linetype="horizontal" position="absolute 0 314 390 318" style="" anchor="default"/>
        <Grid id="grd_init" binddataset="ds_init_initcode_codelist_code" class="datagrid2" position="absolute 0 62 390 282" style="" autofittype="col" autoenter="select" cellclickbound="cell">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <Column size="25"/>
                <Column size="100"/>
                <Column size="250"/>
              </Columns>
              <Rows>
                <Row size="25" band="head"/>
                <Row size="25"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1"/>
                <Cell col="2" text="코드"/>
                <Cell col="3" text="코드명"/>
                <Cell col="4" text="명칭"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow + 1"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:select" expr="expr:select == 'Y' ? 1 : 0"/>
                <Cell col="2" text="bind:cdid"/>
                <Cell col="3" style="align:left middle;" text="bind:cdnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="grd_select" binddataset="ds_main_codelist_code" class="datagrid2" position="absolute 0 318 390 488" style="" oncellclick="grd_select_oncellclick" autofittype="col" autoenter="select" cellclickbound="cell">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <Column size="100"/>
                <Column size="210"/>
                <Column size="40"/>
              </Columns>
              <Rows>
                <Row size="25" band="head"/>
                <Row size="25"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="코드"/>
                <Cell col="2" text="명칭"/>
                <Cell col="3" text="False"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow + 1" autosizerow="default"/>
                <Cell col="1" text="bind:cdid"/>
                <Cell col="2" text="bind:cdnm"/>
                <Cell col="3" displaytype="checkbox" edittype="checkbox" text="bind:select" expr="expr:select == 'Y' ? 1 : 0"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Combo innerdataset="ds_init_initcode_lrgcdlist_lrgcd" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="cbo_lrgcd" class="input_default" position="absolute 0 22 100 41" style="" onitemchanged="cbo_lrgcd_onitemchanged"/>
        <Combo innerdataset="ds_init_initcode_mdlcdlist_mdlcd" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="cbo_mdlcd" class="input_default" position="absolute 102 22 389 41" style="" onitemchanged="cbo_mdlcd_onitemchanged"/>
        <Button id="btn_search" class="btn2" position="absolute 347 42 389 61" style="" text="검색" onclick="btn_search_onclick"/>
        <Edit id="ipt_searchtext" class="input_default" position="absolute 0 42 345 61" style="" anchor="default" onkeyup="ipt_searchtext_onkeyup"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="lrgcd" type="STRING" size="256"/>
          <Column id="mdlcd" type="STRING" size="256"/>
          <Column id="searchtext" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="lrgcd"/>
            <Col id="mdlcd"/>
            <Col id="searchtext"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_initcode_lrgcdlist_lrgcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_initcode_mdlcdlist_mdlcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_initcode_codelist_code" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_init_initcode_codelist_code_oncolumnchanged">
        <ColumnInfo>
          <Column id="select" type="STRING" size="256" sumtext="코드id"/>
          <Column id="cdid" type="STRING" size="256" sumtext="코드id"/>
          <Column id="cdnm" type="STRING" size="256" sumtext="코드명"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_codelist_code" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_codelist_code_oncolumnchanged">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="select" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="cbo_lrgcd" propid="value" datasetid="ds_send" columnid="lrgcd"/>
      <BindItem id="item1" compid="cbo_mdlcd" propid="value" datasetid="ds_send" columnid="mdlcd"/>
      <BindItem id="item2" compid="ipt_searchtext" propid="value" datasetid="ds_send" columnid="searchtext"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs";
var arErrorCode = new HashArray();
function SMPMB03102_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPMB03102_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_init);
	grdf_initGrid(grd_select);
	
	var openerParam = opener.frmf_getParameter ( "SMPMB03102_lrgcd" );
	
	if(openerParam == "spcm") 
	{
		ds_init_initcode_lrgcdlist_lrgcd.clearData();
		dsf_makeValue(ds_init_initcode_lrgcdlist_lrgcd, "cdid", "string","S",0);
		dsf_makeValue(ds_init_initcode_lrgcdlist_lrgcd, "cdnm", "string","검체",0);
		dsf_makeValue(ds_init_initcode_lrgcdlist_lrgcd, "cdid", "string","M",1);
		dsf_makeValue(ds_init_initcode_lrgcdlist_lrgcd, "cdnm", "string","용법",1);
	} 
	
	cbo_lrgcd.index = 0;
	frmf_inputEnterKey("cbo_lrgcd", "onitemchanged", new ItemChangeEventInfo ); 
}

function cbo_lrgcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	ds_init_initcode_mdlcdlist_mdlcd.clearData();
	var oParam = {};
		oParam.id          = "TRPMB03102";
		oParam.service     = "pambaseinfomngtapp.Togo";
		oParam.method      = "reqGetMdlCodeList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_init_initcode_mdlcdlist_mdlcd=mdlcd";
		oParam.async       = false;
		oParam.callback    = "cf_TRPMB03102";

	tranf_submit(oParam);
	
	if(arErrorCode.pop("TRPMB03102") > -1)
	{
		cbo_mdlcd.index = 0;
		frmf_inputEnterKey("cbo_mdlcd", "onitemchanged", new ItemChangeEventInfo ); 
	}
}

function cf_TRPMB03102(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

function cbo_mdlcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	ds_init_initcode_codelist_code.clearData();
	var oParam = {};
		oParam.id          = "TRPMB03103";
		oParam.service     = "pambaseinfomngtapp.Togo";
		oParam.method      = "reqGetSmlCodeList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_init_initcode_codelist_code=code";
		oParam.async       = false;
		oParam.callback    = "cf_TRPMB03103";

	tranf_submit(oParam);
}

function btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_init_initcode_codelist_code.clearData();
	var oParam = {};
		oParam.id          = "TRPMB03103";
		oParam.service     = "pambaseinfomngtapp.Togo";
		oParam.method      = "reqGetSmlCodeList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_init_initcode_codelist_code=code";
		oParam.async       = false;
		oParam.callback    = "cf_TRPMB03103";

	tranf_submit(oParam);
}

function cf_TRPMB03103(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    else
    {
		ds_init_initcode_codelist_code.updatecontrol = false;
		ds_init_initcode_codelist_code.addColumn("select", "string");
		ds_init_initcode_codelist_code.updatecontrol = true;
    }
}

function ds_init_initcode_codelist_code_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "select")
	{
		obj.setColumn(e.row, "select", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
	}
}

function ds_main_codelist_code_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "select")
	{
		obj.setColumn(e.row, "select", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
	}
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	var selectCode = "";
					
	for( var i = 0;   i < ds_main_codelist_code.rowcount; i++) 
	{
		if(!utlf_isNull(selectCode))
		{
			selectCode = selectCode + ",";
		}
		
		if (ds_main_codelist_code.getColumn(i, "select") == "Y") 
		{
			selectCode = selectCode + "!" + ds_main_codelist_code.getColumn(i, "cdid");
		} 
		else 
		{
			selectCode = selectCode + ds_main_codelist_code.getColumn(i, "cdid");
		}
	}

	opener.frmf_setParameter("SMPMB03101_selectCode", selectCode);
	this.close();
}

function btn_nexttrgtman_onclick(obj:Button,  e:ClickEventInfo)
{
	var nodeList = ds_main_codelist_code;
	var srcnt = nodeList.rowcount;
					
	for( var i = 0; i < ds_init_initcode_codelist_code.rowcount; i++) 
	{
		if(ds_init_initcode_codelist_code.getColumn(i, "select") == "Y")
		{
			dsf_makeValue(ds_main_codelist_code, "cdid","string", ds_init_initcode_codelist_code.getColumn(i, "cdid"), srcnt);
			dsf_makeValue(ds_main_codelist_code, "cdnm","string", ds_init_initcode_codelist_code.getColumn(i, "cdnm"), srcnt);
			srcnt++;
		}
	}
}

function btn_pretrgtman_onclick(obj:Button,  e:ClickEventInfo)
{
	var row = ds_main_codelist_code.rowposition;
	
	ds_main_codelist_code.deleteRow(row);
}
]]></Script>
  </Form>
</FDL>