YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO14100_중복처방체크.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO14100" position="absolute 0 0 902 490" titletext="중복처방리스트" oninit="SPMMO14100_oninit" onload="SPMMO14100_onload">
    <Layouts>
      <Layout>
        <Button position="absolute 738 470 818 490" id="button1" class="btn4" text="계속저장" onclick="button1_onclick"/>
        <Static text="중복처방리스트" position="absolute 0 0 171 20" id="caption1" class="tit_2"/>
        <Static text="* 중복처방이 있습니다. 저장하시겠습니까 ?" position="absolute 481 470 732 490" id="caption2" style="color:red;"/>
        <Grid position="absolute 0 20 902 465" id="grd_prcperrlist" binddataset="ds_result_duplprcplist">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="250"/>
                <Column size="250"/>
                <Column size="110"/>
                <Column size="80"/>
                <Column size="120"/>
                <Column size="75"/>
              </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 displaytype="normal" edittype="none" text="bind:prcpnm" suppress="1" suppressalign="middle,over"/>
                <Cell col="1" style="align:left middle;" text="bind:duplprcpnm"/>
                <Cell col="2" text="bind:orddeptnm"/>
                <Cell col="3" text="bind:orddrnm"/>
                <Cell col="4" text="bind:rgstdt" mask="####-##-## ##:##:##"/>
                <Cell col="5" text="bind:rgstrnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button position="absolute 822 470 902 490" id="button2" class="btn3" text="처방취소" onclick="button2_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_result_duplprcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpnm" type="STRING" size="256"/>
          <Column id="duplprcpnm" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="orddrnm" type="STRING" size="256"/>
          <Column id="rgstdt" type="STRING" size="256"/>
          <Column id="rgstrnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-12-10
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-12-10      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";


function SPMMO14100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
	
	try {
		ds_result_duplprcplist.copyData(arg_ds_result_duplprcplist);
	} catch(e) {}
}

function SPMMO14100_onload(obj:Form, e:LoadEventInfo)
{
	grdf_setToolTipBind(grd_prcperrlist);
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	opener.frmf_setParameter ( "SPMMO14100_rtn1", "Y" );
	close();
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	opener.frmf_setParameter ( "SPMMO14100_rtn1", "N" );				
	close();
}
]]></Script>
  </Form>
</FDL>