YNU_JEUS/app_home/himed/xpapps/ast/pharmacyconsultxp/xp/SPADC62500_제형선택.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPADC62500" position="absolute 0 0 573 352" titletext="제형선택" oninit="SPADC62500_oninit" onload="SPADC62500_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 -3 572 332" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 515 6 571 28" id="button3" class="btn4" visible="true" text="저장" onclick="grp_biz_button3_onclick" anchor="default"/>
              <Static text="제형선택" position="absolute 0 12 111 28" id="caption1" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 28 571 32" linetype="horizontal" id="line1" class="line_1" anchor="default"/>
              <Shape id="line00" class="line_1" position="absolute 0 29 571 33" anchor="default"/>
              <Shape id="line02" class="line_1" position="absolute 0 30 571 34" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Tab position="absolute 0 30 571 321" id="switch1" class="sw_no_border">
          <Tabpages>
            <Tabpage text="     Plan     " id="case1" style="anchor:default;margin:0 0 0 0;">
              <Layouts>
                <Layout>
                  <TextArea id="textarea1" taborder="0" position="absolute 0 0 571 267" wordwrap="word"/>
                </Layout>
              </Layouts>
            </Tabpage>
            <Tabpage text="     기타     " id="case2" style="anchor:default;margin:0 0 0 0;">
              <Layouts>
                <Layout>
                  <TextArea position="absolute 0 0 571 263" id="textarea2" wordwrap="word"/>
                </Layout>
              </Layouts>
            </Tabpage>
          </Tabpages>
        </Tab>
        <Button id="btn_cfm" taborder="1" text="확인" class="btn4" visible="false" position="absolute 316 323 372 345"/>
        <Button id="btn_cls" taborder="2" text="닫기" class="btn4" position="absolute 515 324 571 346" onclick="btn_cls_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_planinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cmt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_etcinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cmt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_srchgrupid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_execdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item1" compid="switch1.case2.textarea2" propid="value" datasetid="ds_main_etcinfo" columnid="cmt"/>
      <BindItem id="item0" compid="switch1.case1.textarea1" propid="value" datasetid="ds_main_planinfo" columnid="cmt"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "ast_pharmacybasexp::pharmacycombolist.xjs";

var arErrorCode = new HashArray();
/******************************************************************
 * Argument          : 
 * Description       : 초기화
 ******************************************************************/

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

function SPADC62500_onload(obj:Form, e:LoadEventInfo)
{
	pharmacyGetCodeList([{dsNm: "ds_temp_srchgrupid", cdGrpId: "PN01", sorField: ""}], false , false, "");

	for( var i = 0; i < ds_temp_srchgrupid.rowcount; i++ ){
		if( ds_temp_srchgrupid.getColumn(i, "cdid") == "001" ){
			ds_main_planinfo.copyRow(0, ds_temp_srchgrupid, i);	// 제형선택 - Plan
		} else {
			ds_main_etcinfo.copyRow(0, ds_temp_srchgrupid, i);	// 제형선택 - Etc
		}
	}
	
// 	if (model.getValue("/root/temp/srchgrupid/initgrupid/PN01[cdid='001']") =="") {
// 	}
// 	if (model.getValue("/root/main/drugforminfo/planinfo/cdnm") =="") {
// 	}
}

/******************************************************************
 * Argument          : 
 * Description       : 닫기 Button Event
 ******************************************************************/
function grp_biz_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	if( switch1.tabindex == 0 ){
		var cdid = ds_main_planinfo.getColumn(0, "cdid");
		var cdnm = ds_main_planinfo.getColumn(0, "cdnm");
		var cmt = ds_main_planinfo.getColumn(0, "cmt");
	} else if( switch1.tabindex == 1 ){
		var cdid = ds_main_etcinfo.getColumn(0, "cdid");
		var cdnm = ds_main_etcinfo.getColumn(0, "cdnm");
		var cmt = ds_main_etcinfo.getColumn(0, "cmt");
	}
	
	var cdgrupid = "PN01";		//Group ID
	var useyn	= "Y";			//사용여부
	
	dsf_createDsRow("ds_send_execdata",
				 [{col:"m", type:"string", size:256, val:"u"}
				 ,{col:"useyn", type:"string", size:256, val:useyn}
				 ,{col:"cdid", type:"string", size:256, val:cdid}
				 ,{col:"cdnm", type:"string", size:256, val:cdnm}
				 ,{col:"cmt", type:"string", size:10000, val:cmt}
				 ,{col:"cdgrupid", type:"string", size:256, val:cdgrupid}], true);
	
	var oParam = {};
		oParam.id          = "TXADB04011";
		oParam.service     = "pharmacybaseapp.ComCode";
		oParam.method      = "reqExeBaseCodeList";
		oParam.inds        = "codelist=ds_send_execdata";
		oParam.outds       = "ds_hidden=item";
		oParam.async       = false;
		oParam.callback    = "cf_TXADB04011";

	tranf_submit(oParam);
	
	if( arErrorCode.pop("TXADB04011") > -1 ){
		sysf_messageBox("정상적으로 저장되었습니다.", "I");
	}
}

function cf_TXADB04011(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
/******************************************************************
 * Argument          : 
 * Description       : 닫기 Button Event
 ******************************************************************/
function btn_cls_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}
]]></Script>
  </Form>
</FDL>