YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMB21700_처방검색.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMB21700" position="absolute 0 0 605 312" titletext="처방검색" oninit="SPMMB21700_oninit" onload="SPMMB21700_onload">
    <Layouts>
      <Layout>
        <Static text="처방검색" position="absolute 0 0 137 26" id="caption6" class="tit_1"/>
        <Div position="absolute 0 26 600 89" id="roundrect1" type="roundrectangle" class="div_SA"/>
        <Static text="검색조건" position="absolute 10 39 95 56" id="caption1" class="search_name"/>
        <Combo position="absolute 95 39 195 58" id="combo1" class="combo_search" codecolumn="value" datacolumn="label" innerdataset="@ds_srchflag"/>
        <Edit position="absolute 200 39 515 58" id="input1" class="input_search" onkeydown="input1_onkeydown"/>
        <Button position="absolute 535 49 591 71" id="btn_search" class="btn1" text="조회" onclick="btn_search_onclick"/>
        <Static text="기준일자" position="absolute 10 64 95 81" id="caption2" class="search_name"/>
        <Calendar position="absolute 95 64 195 83" id="input2" class="input_search" mask="yyyy-mm-dd"/>
        <Shape position="absolute 522 39 528 79" linetype="vertical" id="line1" class="line_4"/>
        <Grid position="absolute 0 98 600 305" id="grd_prcplist" binddataset="ds_prcpsrch_prcplist" oncelldblclick="grd_prcplist_oncelldblclick" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25"/>
                <Column size="130"/>
                <Column size="425"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="처방코드"/>
                <Cell col="2" text="처방명"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow + 1"/>
                <Cell col="1" style="align:left middle;" text="bind:prcpcd"/>
                <Cell col="2" style="align:left middle;" text="bind:prcpnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_prcpsrch_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpcd" type="STRING"/>
          <Column id="prcpnm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchflag" type="STRING" size="256"/>
          <Column id="prcpnm" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="cond1" type="STRING" size="256"/>
          <Column id="cond2" type="STRING" size="256"/>
          <Column id="cond3" type="STRING" size="256"/>
          <Column id="cond4" type="STRING" size="256"/>
          <Column id="cond5" type="STRING" size="256"/>
          <Column id="cond6" type="STRING" size="256"/>
          <Column id="cond7" type="STRING" size="256"/>
          <Column id="cond8" type="STRING" size="256"/>
          <Column id="cond9" type="STRING" size="256"/>
          <Column id="cond10" type="STRING" size="256"/>
          <Column id="cond11" type="STRING" size="256"/>
          <Column id="cond12" type="STRING" size="256"/>
          <Column id="cond13" type="STRING" size="256"/>
          <Column id="cond14" type="STRING" size="256"/>
          <Column id="cond15" type="STRING" size="256"/>
          <Column id="cond16" type="STRING" size="256"/>
          <Column id="cond17" type="STRING" size="256"/>
          <Column id="cond18" type="STRING" size="256"/>
          <Column id="cond19" type="STRING" size="256"/>
          <Column id="cond99" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchflag"/>
            <Col id="prcpnm"/>
            <Col id="prcpdd"/>
            <Col id="cond1"/>
            <Col id="cond2"/>
            <Col id="cond3"/>
            <Col id="cond4"/>
            <Col id="cond5"/>
            <Col id="cond6"/>
            <Col id="cond7"/>
            <Col id="cond8"/>
            <Col id="cond9"/>
            <Col id="cond10"/>
            <Col id="cond11"/>
            <Col id="cond12"/>
            <Col id="cond13"/>
            <Col id="cond14"/>
            <Col id="cond15"/>
            <Col id="cond16"/>
            <Col id="cond17"/>
            <Col id="cond18"/>
            <Col id="cond19"/>
            <Col id="cond99"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_srchflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">처방명</Col>
            <Col id="value">prcpnm</Col>
          </Row>
          <Row>
            <Col id="label">처방코드</Col>
            <Col id="value">prcpcd</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="input1" propid="value" datasetid="ds_send" columnid="prcpnm"/>
      <BindItem id="item1" compid="input2" propid="value" datasetid="ds_send" columnid="prcpdd"/>
      <BindItem id="item2" compid="combo1" propid="value" datasetid="ds_send" columnid="srchflag"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-10-07
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-10-07      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";

var arErrorCode = new HashArray();

function fInitialize_SPMMB21700(){
	
    var recive_prcpnm = opener.frmf_getParameter("SPMMB21700_recive_prcpnm");
    var recive_prcpdd = opener.frmf_getParameter("SPMMB21700_recive_prcpdd");
    var recive_srchflag = opener.frmf_getParameter("SPMMB21700_recive_srchflag");
	
	var srchflag = "prcpcd";
	var date = utlf_getCurrentDate();
	
	if(!utlf_isNull(recive_prcpnm)){
		ds_send.setColumn(0,"prcpnm",recive_prcpnm);		
		srchflag = recive_srchflag;
		date = recive_prcpdd;
    }	   
	ds_send.setColumn(0,"srchflag",srchflag);
	ds_send.setColumn(0,"prcpdd",date);
	ds_prcpsrch_prcplist.clearData();
	
	
	if(!utlf_isNull(recive_prcpnm)){
		fPrcpSearch();
	}
	
}

function fPrcpSearch(){	
	var prcpdd = ds_send.getColumn(0,"prcpdd");
	var prcpnm = ds_send.getColumn(0,"prcpnm");
    var srchflag = ds_send.getColumn(0,"srchflag");
    
	var isHangul = utlf_isHangul(prcpnm);
	var srchprcpnmlimit = 3;
    var srchprcpcdlimit = 2;
    var srchhnglimit    = 3;
    
	//한글일때는 1글자만 넣어도 검색가능        
    if ( utlf_isNull(prcpnm)) {                  
        sysf_messageBox ( "처방 검색어를", "C001" );
        return;
    } else if ( isHangul == "E" ){
         //영문,숫자일때는 4글자 넣어야 검색가능
	    if ( srchflag ==  "prcpcd") {
	        //by sonjy 20100405  처방검색시 제한 글자수 setting 
	        //if ( prcpnm.length < 2 ){
	        if ( prcpnm.length < parseInt(srchprcpcdlimit) ){                                       
	            //messageBox ( "2글자 이상", "C001" );
	            sysf_messageBox ( srchprcpcdlimit + "글자 이상", "C001" );
	            return;
	        }   
	    } else {
	        //if ( prcpnm.length < 3 ){
	        if ( prcpnm.length < parseInt(srchprcpnmlimit) ){
	            //messageBox ( "3글자 이상", "C001" );
	            sysf_messageBox ( srchprcpnmlimit + "글자 이상", "C001" );
	            return;
	        }   
	    }
    } else if ( isHangul == "H" ) {
        //by sonjy 20100405  처방검색시 제한 글자수 setting 
        //if ( prcpnm.length < 3 ){
        if ( prcpnm.length < parseInt(srchhnglimit) ){
            //messageBox ( "한글은 3글자 이상",  "C001" );
            sysf_messageBox ( "한글은 " + srchhnglimit + "글자 이상",  "C001" );
            return;
        }   
    }
	
	
	var containflag = false;
    if( srchflag !=  "prcpcd"){ 
        //prcpnm = prcpnm.substring(1, prcpnm.length);
        containflag = true;
    }
    
    prcpnm = prcpnm.getTrim();	
	
    if ( srchflag ==  "prcpcd") {
        lf_prcpSrchCom ( prcpnm, prcpdd, "", "TRMMO00100", "", "getPrcpCdOldSrchInfo", isHangul , containflag);
    } else if ( srchflag ==  "prcpnm") {
        lf_prcpSrchCom ( prcpnm, prcpdd, "", "TRMMO00100", "", "getPrcpNmSrchInfo", isHangul , containflag);
    } else {
        lf_prcpSrchCom ( prcpnm, prcpdd, "", "TRMMO00100", "", "getPrcpSrchInfo", isHangul , containflag);
    }
}

function fForwardPrcpinfo(){
	var currow = ds_prcpsrch_prcplist.rowposition;	
	var prcpnm = ds_prcpsrch_prcplist.getColumn(currow,"prcpnm");
	var prcpcd = ds_prcpsrch_prcplist.getColumn(currow,"prcpcd");
	
	opener.frmf_setParameter("SPMMB21700_prcpcd",prcpcd);
	opener.frmf_setParameter("SPMMB21700_prcpnm",prcpnm);
	
	this.close();
}


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

function SPMMB21700_onload(obj:Form, e:LoadEventInfo)
{
	fInitialize_SPMMB21700();
}

function input1_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	
	{
		input1.updateToDataset();
		fPrcpSearch();
	}
		
}

function btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	fPrcpSearch();
}

function grd_prcplist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fForwardPrcpinfo();			
}
]]></Script>
  </Form>
</FDL>