YNU_JEUS/app_home/himed/xpapps/ast/pharmacyxp/xp/SPADB61200_용법조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPADB61200" position="absolute 0 0 776 563" titletext="용법조회" oninit="SPADB61200_oninit" onload="SPADB61200_onload">
    <Layouts>
      <Layout>
        <Button id="btn_cfm" taborder="1" text="확인" class="btn4" position="absolute 661 536 717 558" onclick="btn_cfm_onclick" visible="false"/>
        <Button id="btn_cls" taborder="2" text="닫기" class="btn4" position="absolute 720 536 776 558" onclick="btn_cls_onclick"/>
        <Div id="group2" taborder="3" position="absolute 0 0 775 40" class="div_SA2">
          <Layouts>
            <Layout>
              <Static id="caption2" text="용법구분 :" class="search_name" position="absolute 15 12 101 29" anchor="default"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 696 8 702 30" anchor="default"/>
              <Static id="caption3" text="용법코드 :" class="search_name" position="absolute 214 12 300 29" anchor="default"/>
              <Button id="btn_sea" taborder="6" text="조회" class="btn1" position="absolute 705 8 761 30" onclick="group2_btn_sea_onclick" anchor="default"/>
              <Combo id="cmb_srchmthdflag" taborder="7" innerdataset="@ds_A0017" codecolumn="cdid" datacolumn="cdnm" class="combo_search" position="absolute 92 10 192 29" onitemchanged="group2_cmb_srchmthdflag_onitemchanged" anchor="default"/>
              <Edit id="ipt_srchmthdcd" taborder="8" class="input_search" position="absolute 293 10 424 29" onkeydown="group2_ipt_srchmthdcd_onkeydown" anchor="default"/>
              <Static id="caption4" text="기본용법 :" class="search_name" position="absolute 435 12 521 29" anchor="default"/>
              <Static id="caption5" text="횟수 :" class="search_name" position="absolute 560 12 630 29" anchor="default"/>
              <Combo id="combo1" taborder="9" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 612 10 662 29" onitemchanged="group2_combo1_onitemchanged" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">-</Col>
                      <Col id="datacolumn">-</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">1</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">2</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">3</Col>
                      <Col id="datacolumn">3</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">4</Col>
                      <Col id="datacolumn">4</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">5</Col>
                      <Col id="datacolumn">5회이상</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <CheckBox id="checkbox2" taborder="10" class="checkbox_search" position="absolute 516 9 546 29" truevalue="Y" onclick="group2_checkbox2_onclick" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_mthdlist" taborder="4" binddataset="ds_grd_mthdlist" useinputpanel="false" position="absolute 0 69 775 531" autofittype="col" oncelldblclick="grd_mthdlist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="80"/>
                <Column size="133"/>
                <Column size="333"/>
                <Column size="83"/>
                <Column size="49"/>
                <Column size="59"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="용법코드"/>
                <Cell col="1" text="약어명"/>
                <Cell col="2" text="용법명"/>
                <Cell col="3" text="기본용법여부"/>
                <Cell col="4" text="횟수"/>
                <Cell col="5" text="횟수패턴"/>
              </Band>
              <Band id="body">
                <Cell style="align:left;padding:0 3 0 3;" text="bind:mthdcd"/>
                <Cell col="1" style="align:left;padding:0 3 0 3;" text="bind:abbrnm"/>
                <Cell col="2" style="align:left;padding:0 3 0 3;" text="bind:mthdcnts"/>
                <Cell col="3" displaytype="checkbox" text="bind:basemthdyn" expr="expr:(basemthdyn==&quot;Y&quot;||basemthdyn==1)?1:0"/>
                <Cell col="4" text="bind:basecnt"/>
                <Cell col="5" text="bind:cntpatt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line1" class="line_1" position="absolute 0 65 775 71"/>
        <Static id="caption1" text="용법조회" class="tit_2" position="absolute 0 48 95 70"/>
        <Shape id="line00" class="line_1" position="absolute 0 63 775 69"/>
        <Shape id="line02" class="line_1" position="absolute 0 64 775 70"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_A0017" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING"/>
          <Column id="cdid" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_mthdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="mthdcd" type="STRING"/>
          <Column id="abbrnm" type="STRING"/>
          <Column id="mthdcnts" type="STRING"/>
          <Column id="basemthdyn" type="STRING"/>
          <Column id="basecnt" type="STRING"/>
          <Column id="cntpatt" type="STRING"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchmthdkind" type="STRING" size="256"/>
          <Column id="srchmthdcd" type="STRING" size="256"/>
          <Column id="srchbasemthdyn" type="STRING" size="256"/>
          <Column id="srchbasecnt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchmthdkind">N</Col>
            <Col id="srchmthdcd"/>
            <Col id="srchbasemthdyn"/>
            <Col id="srchbasecnt">-</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_rec" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.cmb_srchmthdflag" propid="value" datasetid="ds_send" columnid="srchmthdkind"/>
      <BindItem id="item1" compid="group2.ipt_srchmthdcd" propid="value" datasetid="ds_send" columnid="srchmthdcd"/>
      <BindItem id="item3" compid="group2.combo1" propid="value" datasetid="ds_send" columnid="srchbasecnt"/>
    </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                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
/******************************************************************
 * Argument          : 
 * Description       : include
 ******************************************************************/
 include "com_commonxp::comm_main.xjs"
 
/******************************************************************
 * Argument          : 
 * Description       : 초기화
 ******************************************************************/ 
function SPADB61200_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPADB61200_onload(obj:Form, e:LoadEventInfo)
{
	//용법구분 코드조회
	appf_getCodeList( [{dsNm: "ds_A0017", cdGrpId: "A0017"}], true );
	
	// 오프너에서 전달받은 정보
	dsf_copyDs(ds_hidden_rec, arg_ds_hidden_rec, "replace");
	
	//(s) 약종류에 따라 용법구분 default 지정되도록 parameter 처리 (2009.05.26 JJE)
	var mainObj = frmf_getMainViewer();
	var SMADB00800Obj = mainObj.frmf_findPopup("SMADB00800");
	
	var prcpclscd = opener.frmf_getParameter("SPADB61200_prcpclscd");
	var mthdKind = "";
	var prcptims = "-";
	
	if( !utlf_isNull(prcpclscd) ){
		if( prcpclscd == "A2" ){
			mthdKind = "N";
			group2.combo1.enable = true;
		} else if( prcpclscd == "A4" ){
			//비율은 내복약만 쓴다.
			mthdKind = "Y";
			group2.combo1.enable  = false;
		} else if( prcpclscd == "A6" ){
			mthdKind = "I";	//비율은 내복약만 쓴다.
			prcptims = "1";		//주사는 횟수가 무조건 1이다.
			group2.combo1.enable  = false;
		}
		ds_send.setColumn(0, "srchmthdkind", mthdKind);
		
		//경구약이 아닌경우에는 회수는 필요없다.
		if( prcpclscd != "A2" ){
			ds_send.setColumn(0, "srchbasecnt", "-");
		} else {
			ds_send.setColumn(0, "srchbasecnt", prcptims);
		}
	}
	
	var oParam = {};
		oParam.id          = "TRADB61201";
		oParam.service     = "pharmacybaseapp.MthdCode";
		oParam.method      = "reqGetMthdList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_grd_mthdlist=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRADB61201";

	tranf_submit(oParam);
}

/******************************************************************
 * Argument          : 
 * Description       : 조회Button Event
 ******************************************************************/ 
function group2_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	var oParam = {};
		oParam.id          = "TRADB61201";
		oParam.service     = "pharmacybaseapp.MthdCode";
		oParam.method      = "reqGetMthdList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_grd_mthdlist=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRADB61201";

	tranf_submit(oParam);
}

/******************************************************************
 * Argument          : 
 * Description       : 용법구번 변경 시 Event
 ******************************************************************/ 
function group2_cmb_srchmthdflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	//(s) 용법 변경시 횟수 지정하도록 변경 (2009.05.16 JJE)
	var mthdKind = ds_send.getColumn(0, "srchmthdkind");
	var prcptims = "-";
	
	if ( mthdKind == "N" ) {
		group2.combo1.enable = true;
	}
	else if ( mthdKind == "Y" ) {
		//비율은 내복약만 쓴다.
		group2.combo1.enable = false;
	}
	else if ( mthdKind == "I" ) {
		prcptims = "1";		//주사는 횟수가 무조건 1이다.
		group2.combo1.enable = false;
	}
	
	if ( mthdKind != "N" ) {	//경구약이 아닌경우에는 회수는 필요없다.
		ds_send.setColumn(0, "srchbasecnt", "-");
	} else {
		ds_send.setColumn(0, "srchbasecnt", prcptims);
	}
	//(e)
	
	ds_send.setColumn(0, "srchmthdcd","");
	group2_btn_sea_onclick();
//	ds_send.setColumn(0, "srchmthdcd","");		
}

/******************************************************************
 * Argument          : 
 * Description       : 용법구분 변경 시 Event
 ******************************************************************/ 
function group2_ipt_srchmthdcd_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if( e.keycode == 13 ){
		//setInputNodeCurText();
		obj.updateToDataset();
		group2_btn_sea_onclick();
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 횟수 변경 시 Event
 ******************************************************************/ 
function group2_combo1_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	group2_btn_sea_onclick();
	ds_send.setColumn(0, "srchmthdcd", "");
}

/******************************************************************
 * Argument          : 
 * Description       : 기본용법 변경 시 Event
 ******************************************************************/ 
function group2_checkbox2_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	var getYN = group2.checkbox2.value;
	if( getYN == "Y" ){
		ds_send.setColumn(0, "srchbasemthdyn", getYN);
	} else {
		ds_send.setColumn(0, "srchbasemthdyn", "");
	}
	group2_btn_sea_onclick();
	ds_send.setColumn(0, "srchmthdcd", "");
}

/******************************************************************
 * Argument          : 
 * Description       : 용법조회 List Event
 ******************************************************************/ 
function grd_mthdlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var receivemthd = ds_hidden_rec.getColumn(0, "receivemthd");
	var receivedrugcd = ds_hidden_rec.getColumn(0, "receivedrugcd");

	if( utlf_isNull(receivemthd) ) receivemthd = "ds_hidden";
	if( utlf_isNull(receivedrugcd) ) receivedrugcd = "mthdcd";
	
	if ( this.getOwnerFrame().form.frmf_checkOpener() ) {
		var getMthdcd = ds_grd_mthdlist.getColumn(ds_grd_mthdlist.rowposition,"mthdcd");
		dsf_makeValue(this.getOwnerFrame().form.opener.objects[receivemthd], receivedrugcd, "string", getMthdcd);
		this.getOwnerFrame().form.close();
	} else {
		sysf_messageBox("상위화면이 변경되어 데이터를 전달할 수 없습니다.","E");
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 확인 Button Event
 ******************************************************************/ 

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