YNU_JEUS/app_home/himed/xpapps/crm/dataminingxp/xp/SPCDT00700_처방코드및처방명검색.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPCDT00700" position="absolute 0 0 523 365" titletext="처방코드 및 처방명 검색" oninit="SPCDT00700_oninit" onload="SPCDT00700_onload">
    <Layouts>
      <Layout>
        <Div id="group2" taborder="0" class="div_SA2" position="absolute 0 0 517 40">
          <Layouts>
            <Layout>
              <Static id="caption2" text="검색조건 :" class="search_name" position="absolute 15 11 101 28"/>
              <Combo id="combo1" taborder="1" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 101 9 211 28" index="0" value="prcpnm" text="처방영문명">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">prcpnm</Col>
                      <Col id="datacolumn">처방영문명</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">prcphngnm</Col>
                      <Col id="datacolumn">처방한글명</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">prcpcd</Col>
                      <Col id="datacolumn">처방코드</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Edit id="input3" taborder="2" class="input_search" position="absolute 214 9 364 28" autoselect="true" onkeyup="group2_input3_onkeyup"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 426 8 432 30"/>
              <Button id="btn_search" taborder="3" text="조회" class="btn1" position="absolute 445 8 501 30" onclick="group2_btn_search_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption9" text="처방코드 및 처방명 검색" class="tit_2" position="absolute 0 55 180 77"/>
        <Shape id="line12" class="line_10" position="absolute 0 71 517 77"/>
        <Grid id="grd_prcplist" class="text_left" taborder="1" binddataset="ds_main_list_prcplist" useinputpanel="false" position="absolute 0 76 517 331" autoenter="select" cellsizingtype="col" selecttype="multirow" oncelldblclick="grd_prcplist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="31"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="200"/>
                <Column size="200"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="처방코드"/>
                <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" style="align:left middle;padding:0 0 0 3;" text="bind:prcpcd"/>
                <Cell col="2" style="align:left middle;padding:0 0 0 3;" text="bind:oldordcd"/>
                <Cell col="3" style="align:left middle;padding:0 0 0 3;" text="bind:prcpnm"/>
                <Cell col="4" style="align:left middle;padding:0 0 0 3;" text="bind:prcphngnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_cnfm" taborder="2" text="확인" class="btn4" position="absolute 402 335 458 357" onclick="btn_cnfm_onclick"/>
        <Button id="btn_cncl" taborder="3" text="취소" class="btn4" position="absolute 461 335 517 357" onclick="btn_cncl_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send_search" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="searchcondition" type="STRING" size="256"/>
          <Column id="searchterm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="searchcondition"/>
            <Col id="searchterm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_list_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="searchcondition" type="STRING" size="256"/>
          <Column id="searchterm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="searchcondition"/>
            <Col id="searchterm"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.input3" propid="value" datasetid="ds_send_search" columnid="searchterm"/>
      <BindItem id="item1" compid="group2.combo1" propid="value" datasetid="ds_send_search" columnid="searchcondition"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
function SPCDT00700_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPCDT00700_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_prcplist);
	group2.combo1.index = 0;
	fCheckAuth();
}

function fCheckAuth() 
{
	if (!frmf_checkAuth("r")) 
	{
		group2.btn_search.enable = false;
	}
}

function group2_input3_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		group2.btn_search.click();
	}	
}

function group2_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	var searchterm 			= ds_send_search.getColumn(0, "searchterm");
	var searchcondition 	= ds_send_search.getColumn(0, "searchcondition");
	ds_send.setColumn(0, "searchterm", "%"+searchterm+"%");
	ds_send.setColumn(0, "searchcondition", searchcondition);
	
	if (searchcondition == "prcpnm") 
	{
		if (String(searchterm).length < 5) 
		{
			sysf_messageBox("영문검색의 조건은 5글자 이상 ","C001");
		}
		else 
		{
			var oParam = {};
				oParam.id          = "TRCDT00701";
				oParam.service     = "dtmnmngtapp.DtmnTrgt";
				oParam.method      = "reqGetPrcpCodeList";
				oParam.inds        = "req=ds_send";
				oParam.outds       = "ds_main_list_prcplist=prcplist";
				oParam.async       = false;
				//oParam.callback    = "cf_TRCDT00701";

			tranf_submit(oParam);
			
			ds_main_list_prcplist.updateColID("ordnm", "prcpnm");
			ds_main_list_prcplist.updateColID("ordhngnm", "prcphngnm")
			ds_main_list_prcplist.updateColID("calcscorcd", "prcpcd");
		}
	}
	else if (searchcondition == "prcphngnm" ) 
	{
		if (String(searchterm).length < 2) 
		{
			sysf_messageBox("한글검색의 조건은 2글자 이상 ","C001");
		}
		else 
		{
			var oParam = {};
				oParam.id          = "TRCDT00701";
				oParam.service     = "dtmnmngtapp.DtmnTrgt";
				oParam.method      = "reqGetPrcpCodeList";
				oParam.inds        = "req=ds_send";
				oParam.outds       = "ds_main_list_prcplist=prcplist";
				oParam.async       = false;
				//oParam.callback    = "cf_TRCDT00701";

			tranf_submit(oParam);
			
			ds_main_list_prcplist.updateColID("ordnm", "prcpnm");
			ds_main_list_prcplist.updateColID("prcphngnm", "ordhngnm");
			ds_main_list_prcplist.updateColID("prcpcd", "calcscorcd");
		}
	}
	else if (searchcondition == "prcpcd" ) 
	{
		if (String(searchterm).length < 2) 
		{
			sysf_messageBox("처방코드검색의 조건은 2글자 이상 ","C001");
		}
		else 
		{
			var oParam = {};
				oParam.id          = "TRCDT00701";
				oParam.service     = "dtmnmngtapp.DtmnTrgt";
				oParam.method      = "reqGetPrcpCodeList";
				oParam.inds        = "req=ds_send";
				oParam.outds       = "ds_main_list_prcplist=prcplist";
				oParam.async       = false;
				//oParam.callback    = "cf_TRCDT00701";

			tranf_submit(oParam);
			
			ds_main_list_prcplist.updateColID("ordnm", "prcpnm");
			ds_main_list_prcplist.updateColID("prcphngnm", "ordhngnm");
			ds_main_list_prcplist.updateColID("prcpcd", "calcscorcd");
		}
	}
}

function grd_prcplist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var one = opener.frmf_getParameter("one");
	if(one == "one")
	{
		fGetPrcpInfo();
	}
	else
	{
		fGetPrcpList();
	}
}

function fGetPrcpList() 
{
	var receive_prcplist_path = opener.frmf_getParameter("receive_prcplist_path");
	var receiveref = eval("opener."+receive_prcplist_path);
	var count = 0;
	var essnchk = "N";

	if (ds_main_list_prcplist.rowposition < 0 || grdf_getSelectedRows(grd_prcplist).length < 1)
	{
		sysf_messageBox("처방을","C002");
	}
	else 
	{
		var rows = grdf_getSelectedRows(grd_prcplist);
		for (var i = 0; i < rows.length; i++) 
		{
			var sRow = rows[i];
			var prcpcd = ds_main_list_prcplist.getColumn(sRow, "prcpcd");
			var prcpnm = ds_main_list_prcplist.getColumn(sRow, "prcpnm");

			receiveref.addRow();
			receiveref.setColumn(receiveref.rowposition, "status", "I");
			receiveref.setColumn(receiveref.rowposition, "prcpcd", prcpcd);
			receiveref.setColumn(receiveref.rowposition, "prcpnm", prcpnm);
		}
		this.close();	
	}
}

function fGetPrcpInfo() 
{
	var row = ds_main_list_prcplist.rowposition;
	var prcpnm = ds_main_list_prcplist.getColumn(row, "prcpnm");
	var prcpcd = ds_main_list_prcplist.getColumn(row, "prcpcd");
		
	if (ds_main_list_prcplist.rowposition >= 0)
	{
		var objParam = new Object();	// frmf_getParameter로 노드 받아와서 데이터셋에 입력하는 방식을 오브젝트형식으로 변경함.
			objParam.prcpnm				 = prcpnm;
			objParam.prcpcd			 	 = prcpcd;
		this.close(objParam);	
	}
	else 
	{
		sysf_messageBox("조회하신 후 목록을 ","C002");
		grd_prcplist.setFocus();
	}
}		

function btn_cnfm_onclick(obj:Button,  e:ClickEventInfo)
{
	var one = opener.frmf_getParameter("one");
	if(one == "one")
	{
		fGetPrcpInfo();
	}
	else
	{
		fGetPrcpList();
	}
}

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