YNU_JEUS/app_home/himed/xpapps/emr/wardcarexp/xp/SPMNB00200_카덱스지시처방조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMNB00200" position="absolute 0 0 776 520" titletext="카덱스 지시처방 조회" oninit="SPMNB00200_oninit" onload="SPMNB00200_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 770 510" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="지시처방" position="absolute 10 34 215 50" id="cpt_zoomtitle" class="tit_2"/>
              <Shape position="absolute 5 50 765 56" linetype="horizontal" id="line1" class="line_10"/>
              <Edit readonly="false" position="absolute 67 5 152 26" align="align:right middle;" id="out_pid" style="align:right middle;" enable="false"/>
              <Static text="등록번호" position="absolute 5 5 65 26" align="align:center middle;" id="caption20" class="cell_1" style="align:center middle;"/>
              <Static text="환자명" position="absolute 155 5 215 26" align="align:center middle;" id="caption21" class="cell_1" style="align:center middle;"/>
              <Edit readonly="false" position="absolute 217 5 302 26" align="align:center middle;" id="out_hnnm" style="align:center middle;" enable="false"/>
              <Grid position="absolute 5 55 765 505" id="grd_remarklist" scrollbars="autovert" binddataset="ds_main_remarkinfo_remarklist" cellsizingtype="both" oncelldblclick="grp_biz_grd_remarklist_oncelldblclick">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="25" band="left"/>
                      <Column size="189"/>
                      <Column size="530"/>
                    </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:prcpdd" suppress="1" suppressalign="middle"/>
                      <Cell col="2" displaytype="text" edittype="readonly" text="bind:prcpnm" editautoselect="true"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 651 5 707 27" id="button1" class="btn1" text="조회" onclick="grp_biz_button1_onclick"/>
              <Button position="absolute 709 5 765 27" id="button2" class="btn1" text="닫기" onclick="grp_biz_button2_onclick"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_remarkinfo_remarklist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="prcpnm" type="STRING" size="256"/>
        </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="pid" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_target_paminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="patnm" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.out_pid" propid="value" datasetid="ds_target_paminfo" columnid="pid"/>
      <BindItem id="item1" compid="grp_biz.out_hnnm" propid="value" datasetid="ds_target_paminfo" columnid="patnm"/>
    </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";

/*SPMNB00200_oninit*/
function SPMNB00200_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);		
}





/*SPMNB00200_onload*/
function SPMNB00200_onload(obj:Form, e:LoadEventInfo)
{	try{
		ds_target_paminfo.copyData(arg_ds_target_paminfo);
	}catch(e){
	
	}
	
	fGetRemarkList();
}





/*fGetRemarkList*/
function fGetRemarkList(){
	ds_main_remarkinfo_remarklist.clearData();

	if ( !utlf_isNull(ds_target_paminfo.getColumn(0, "pid") ) ) {
		ds_send.clearData();
		dsf_makeValue(ds_send,"pid", "string", ds_target_paminfo.getColumn(0, "pid"));
		dsf_makeValue(ds_send,"indd", "string", ds_target_paminfo.getColumn(0, "indd"));
		dsf_makeValue(ds_send,"cretno", "string", ds_target_paminfo.getColumn(0, "cretno"));
		dsf_makeValue(ds_send,"ioflag", "string", ds_target_paminfo.getColumn(0, "ioflag"));
		
	dsf_setTypeFormat(ds_send, "cretno:INT");
		
	var oParam = {};
    oParam.id          = "TRMNB00209";
    oParam.service     = "wardcareapp.WardCardexMngt";
    oParam.method      = "reqGetRemarkList";
    oParam.inds        = "reqcond=ds_send";
    oParam.outds       = "ds_main_remarkinfo_remarklist=remarklist";
    oParam.async       = false;

	tranf_submit(oParam);

	} else {
		sysf_messageBox("선택된 환자가 없습니다.", "E");
	 }				
}





/*grp_biz_button1_onclick*/
function grp_biz_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetRemarkList();				
}





/*grp_biz_button2_onclick*/
function grp_biz_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function grp_biz_grd_remarklist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	if(e.col ==2){
		obj.showEditor(true);
	}
}
]]></Script>
  </Form>
</FDL>