YNU_JEUS/app_home/himed/xpapps/emr/opanstxp/xp/SPMNP04300_분류대체.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMNP04300" position="absolute 0 0 493 137" titletext="환자기초정보조회" oninit="SPMNP04300_oninit" onload="SPMNP04300_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 485 105" id="group3" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="대상분류" position="absolute 5 4 100 22" id="caption1" class="tit_2" anchor="default"/>
              <Combo position="absolute 80 25 160 44" id="combo1" innerdataset="@ds_main_orglists_lrglist" datacolumn="lrgnm" codecolumn="lrgcd" anchor="default" style="itemheight:20;" onitemchanged="group3_combo1_onitemchanged"/>
              <Combo position="absolute 240 25 320 44" id="combo2" innerdataset="@ds_main_orglists_mdllist" datacolumn="mdlnm" codecolumn="mdlcd" anchor="default" onitemchanged="group3_combo2_onitemchanged" index="-1"/>
              <Combo position="absolute 405 25 485 44" id="combo3" innerdataset="@ds_main_orglists_smllist" datacolumn="smlnm" codecolumn="smlcd" anchor="default"/>
              <Static text="대체분류" position="absolute 5 54 100 72" id="caption2" class="tit_2" anchor="default"/>
              <Combo position="absolute 80 75 160 94" id="combo4" innerdataset="@ds_main_translists_lrglist" datacolumn="lrgnm" codecolumn="lrgcd" anchor="default" style="itemheight:20;" onitemchanged="group3_combo4_onitemchanged"/>
              <Combo position="absolute 240 75 320 94" id="combo5" innerdataset="@ds_main_translists_mdllist" datacolumn="mdlnm" codecolumn="mdlcd" anchor="default" onitemchanged="group3_combo5_onitemchanged"/>
              <Combo position="absolute 405 75 485 94" id="combo6" innerdataset="@ds_main_translists_smllist" datacolumn="smlnm" codecolumn="smlcd" anchor="default"/>
              <Static text="대분류 :" position="absolute 5 25 85 42" id="caplrg" class="search_name" anchor="default"/>
              <Static text="중분류 :" position="absolute 165 25 245 42" id="caption3" class="search_name" anchor="default"/>
              <Static text="소분류 :" position="absolute 330 25 410 42" id="caption4" class="search_name" anchor="default"/>
              <Static text="대분류 :" position="absolute 5 75 85 92" id="caption5" class="search_name" anchor="default"/>
              <Static text="중분류 :" position="absolute 165 75 245 92" id="caption6" class="search_name" anchor="default"/>
              <Static text="소분류 :" position="absolute 330 75 410 92" id="caption7" class="search_name" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 105 487 132" id="group1" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 372 5 428 27" id="btn_confirm" class="btn4" taborder="8" text="대체" anchor="default" onclick="group1_btn_confirm_onclick"/>
              <Button position="absolute 431 5 487 27" id="btn_cancel" class="btn4" taborder="9" text="취소" anchor="default" onclick="group1_btn_cancel_onclick"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptflag" type="STRING" size="256"/>
          <Column id="orglrgcd" type="STRING" size="256"/>
          <Column id="orgmdlcd" type="STRING" size="256"/>
          <Column id="orgsmlcd" type="STRING" size="256"/>
          <Column id="translrgcd" type="STRING" size="256"/>
          <Column id="transmdlcd" type="STRING" size="256"/>
          <Column id="transsmlcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_orglists_lrglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_translists_lrglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_orglists_mdllist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_orglists_smllist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_translists_mdllist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_translists_smllist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_savedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.combo1" propid="value" datasetid="ds_main_cond" columnid="orglrgcd"/>
      <BindItem id="item1" compid="group3.combo2" propid="value" datasetid="ds_main_cond" columnid="orgmdlcd"/>
      <BindItem id="item2" compid="group3.combo3" propid="value" datasetid="ds_main_cond" columnid="orgsmlcd"/>
      <BindItem id="item3" compid="group3.combo4" propid="value" datasetid="ds_main_cond" columnid="translrgcd"/>
      <BindItem id="item4" compid="group3.combo5" propid="value" datasetid="ds_main_cond" columnid="transmdlcd"/>
      <BindItem id="item5" compid="group3.combo6" propid="value" datasetid="ds_main_cond" columnid="transsmlcd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-10-12
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-10-12      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

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

function SPMNP04300_onload(obj:Form, e:LoadEventInfo)
{
	ds_main_cond.setColumn(0, "deptflag", opener.frmf_getParameter("deptflag"));
	ds_send_reqdata.clearData();
	dsf_makeValue(ds_send_reqdata, "tabflag", "string", "CCR");
	//submit("TRMNP04408", false);
	var oParam = {};
		oParam.id          = "TRMNP04408";
		oParam.service     = "opanstapp.OpAnstStocMngt";
		oParam.method      = "reqGetGubnLrg";
		oParam.inds        = "reqdata=ds_send_reqdata";
		oParam.outds       = "ds_main_orglists_lrglist=lrglist";
		oParam.async       = false;

	tranf_submit(oParam);
	
	//submit("TRMNP04305");
	var oParam = {};
		oParam.id          = "TRMNP04305";
		oParam.service     = "opanstapp.OpAnstStocMngt";
		oParam.method      = "reqGetGubnLrg";
		oParam.inds        = "reqdata=ds_send_reqdata";
		oParam.outds       = "ds_main_translists_lrglist=lrglist";
		oParam.async       = false;		

	tranf_submit(oParam);
}

function group3_combo1_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{	
	ds_send_reqdata.clearData();
	ds_main_orglists_mdllist.clearData();	
	ds_main_orglists_smllist.clearData();
	dsf_makeValue(ds_send_reqdata, "tabflag", "string", "CCR");
	dsf_makeValue(ds_send_reqdata, "lrgcd", "string", ds_main_cond.getColumn(0, "orglrgcd"));		
	//submit("TRMNP04409");
	var oParam = {};
		oParam.id          = "TRMNP04409";
		oParam.service     = "opanstapp.OpAnstStocMngt";
		oParam.method      = "reqGetGubnMdl";
		oParam.inds        = "reqdata=ds_send_reqdata";
		oParam.outds       = "ds_main_orglists_mdllist=mdllist";
		oParam.async       = false;		
	tranf_submit(oParam);
	dsf_setDefaultVal(ds_main_orglists_mdllist, "mdlcd:");	
	if(utlf_isNull(ds_main_cond.getColumn(0, "orgmdlcd"))){
		group3.combo2.value = "";
	}
}

function group3_combo2_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	ds_send_reqdata.clearData();	
	ds_main_orglists_smllist.clearData();
	dsf_makeValue(ds_send_reqdata, "tabflag", "string", "CCR");
	dsf_makeValue(ds_send_reqdata, "lrgcd", "string", ds_main_cond.getColumn(0, "orglrgcd"));		
	dsf_makeValue(ds_send_reqdata, "mdlcd", "string", ds_main_cond.getColumn(0, "orgmdlcd"));		
		
	var oParam = {};
		oParam.id          = "TRMNP04410";
		oParam.service     = "opanstapp.OpAnstStocMngt";
		oParam.method      = "reqGetGubnSml";
		oParam.inds        = "reqdata=ds_send_reqdata";
		oParam.outds       = "ds_main_orglists_smllist=smllist";
		oParam.async       = false;		

	tranf_submit(oParam);
	dsf_setDefaultVal(ds_main_orglists_smllist, "smlcd:");	
	if(utlf_isNull(ds_main_cond.getColumn(0, "orgsmlcd"))){
		group3.combo3.value = "";
	}
}

function group3_combo4_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{	
	ds_send_reqdata.clearData();	
	ds_main_translists_mdllist.clearData();		
	ds_main_translists_smllist.clearData();	
	dsf_makeValue(ds_send_reqdata, "tabflag", "string", "CCR");
	dsf_makeValue(ds_send_reqdata, "lrgcd", "string", ds_main_cond.getColumn(0, "translrgcd"));
	
	var oParam = {};
		oParam.id          = "TRMNP04306";
		oParam.service     = "opanstapp.OpAnstStocMngt";
		oParam.method      = "reqGetGubnMdl";
		oParam.inds        = "reqdata=ds_send_reqdata";
		oParam.outds       = "ds_main_translists_mdllist=mdllist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNP04306";

	tranf_submit(oParam);
	dsf_setDefaultVal(ds_main_translists_mdllist, "mdlcd:");	
	if(utlf_isNull(ds_main_cond.getColumn(0, "transmdlcd"))){
		group3.combo5.value = "";
	}
}

function group3_combo5_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	ds_send_reqdata.clearData();
	ds_main_translists_smllist.clearData();
	dsf_makeValue(ds_send_reqdata, "tabflag", "string", "CCR");
	dsf_makeValue(ds_send_reqdata, "lrgcd", "string", ds_main_cond.getColumn(0, "translrgcd"));		
	dsf_makeValue(ds_send_reqdata, "mdlcd", "string", ds_main_cond.getColumn(0, "transmdlcd"));		
	//submit("TRMNP04307");	
	var oParam = {};
		oParam.id          = "TRMNP04307";
		oParam.service     = "opanstapp.OpAnstStocMngt";
		oParam.method      = "reqGetGubnSml";
		oParam.inds        = "reqdata=ds_send_reqdata";
		oParam.outds       = "ds_main_translists_smllist=smllist";
		oParam.async       = false;		
	tranf_submit(oParam);
	dsf_setDefaultVal(ds_main_translists_smllist, "smlcd:");	
	if(utlf_isNull(ds_main_cond.getColumn(0, "transsmlcd"))){
		group3.combo6.value = "";
	}
}

function group1_btn_confirm_onclick(obj:Button,  e:ClickEventInfo)
{	
	ds_send_savedata.clearData();		
	ds_send_savedata.copyData(ds_main_cond);
	if( utlf_isNull(ds_main_cond.getColumn(0, "orglrgcd")) || utlf_isNull(ds_main_cond.getColumn(0, "translrgcd")) ){
		alert("대분류를 선택하지 않았습니다.!");
		return;	
	}
	
	var oParam = {};
		oParam.id          = "TXMNP04307";
		oParam.service     = "opanstapp.OpAnstStocMngt";
		oParam.method      = "reqSetGubnTras";
		oParam.inds        = "savedata=ds_send_savedata";
		oParam.outds       = "";
		oParam.async       = false;
		oParam.callback    = "cf_TXMNP04307";

	tranf_submit(oParam);
}

function cf_TXMNP04307(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    alert("물품 분류가 대체되었습니다.!");
}

function group1_btn_cancel_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}
]]></Script>
  </Form>
</FDL>