YNU_JEUS/app_home/himed/xpapps/emr/medirecxp/xp/SMMMR08300_입원기간조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMMR08300" position="absolute 0 0 300 300" titletext="환자 입원이력" onload="SMMMR08300_onload" oninit="SMMMR08300_oninit">
    <Layouts>
      <Layout>
        <Shape position="absolute 0 12 275 18" linetype="vertical" id="line1" class="line_1"/>
        <Static text="환자 입원이력" position="absolute 0 0 190 15" align="align:center middle;" id="caption14" class="tit_2"/>
        <Button position="absolute 221 266 277 288" id="btn_exit" class="btn4" text="종료" onclick="btn_exit_onclick"/>
        <Grid position="absolute 5 25 275 260" id="grd_inptinfo" binddataset="ds_main_inptinfo" oncellclick="grd_inptinfo_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25"/>
                <Column size="63"/>
                <Column size="80"/>
                <Column size="80"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell displaytype="checkbox" edittype="checkbox"/>
                <Cell col="1" text="수진형태"/>
                <Cell col="2" text="입원일"/>
                <Cell col="3" text="퇴원일"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:chkyn" expr="expr:(chkyn == &quot;Y&quot; || chkyn == '1') ? 1 : 0"/>
                <Cell col="1" style="align:center middle;" text="bind:ordkind"/>
                <Cell col="2" style="align:center middle;" text="bind:indd"/>
                <Cell col="3" style="align:center middle;" text="bind:dschdd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button position="absolute 160 265 216 287" id="button1" class="btn4" text="확인" onclick="button1_onclick"/>
        <CheckBox id="bool1" taborder="1" position="absolute 9 32 22 45" onchanged="bool1_onchanged" falsevalue="N" truevalue="Y"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_inptinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chkyn" type="STRING"/>
          <Column id="ordkind" type="STRING"/>
          <Column id="indd" type="STRING"/>
          <Column id="dschdd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_savedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chkyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="bool1" propid="value" datasetid="ds_temp" columnid="chkyn"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-10-15
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-10-15      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMOCommon.xjs";
include "emr_prcpmngtxp::MMO001.xjs";


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

function SMMMR08300_onload(obj:Form, e:LoadEventInfo)
{
	fInitialize();
}
// 화면 초기화
function fInitialize(){
	var pid=opener.frmf_getParameter("SMMMR08300_pid");
	if(utlf_isNull(pid)){
		sysf_messageBox("환자 번호가 존재하지", "E007");
		close();
	}
	else{
		dsf_makeValue(ds_send_reqdata,"pid","string", pid);
		var oParam = {};
			oParam.id       = "TRMMR02919";
			oParam.service  = "medirecapp.ExtnMediRec";
			oParam.method   = "reqGetInptTerm";
			oParam.inds     = "req=ds_send_reqdata";
			oParam.outds    = "ds_main_inptinfo=item";
			oParam.async    = false;

		tranf_submit(oParam);
	}
	opener.frmf_clearParameter("SMMMR08300_param");
}

function btn_exit_onclick(obj:Button,  e:ClickEventInfo)
{
	close();	
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows=ds_main_inptinfo.rowcount;

	var param="";
	for(var i=0; i<rows; i++){
		var chkyn=ds_main_inptinfo.getColumn(i,"chkyn");
		if(chkyn=="Y"){
			param +=ds_main_inptinfo.getColumn(i,"indd");
			param +=",";
		}

	}

	opener.frmf_setParameter("SMMMR08300_param", param);
	close();
}



function bool1_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
{
	if(bool1.value =="Y"){
		for(var i = 0; i < grd_inptinfo.rowcount; i++){
			ds_main_inptinfo.setColumn(i , "chkyn", "Y");
		}
	}else{
		for(var i = 0; i < grd_inptinfo.rowcount; i++){
			ds_main_inptinfo.setColumn(i , "chkyn", "N");
		}
	}
}



function grd_inptinfo_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	if(ds_main_inptinfo.getColumn(ds_main_inptinfo.rowposition,"chkyn") ==1 && e.col ==0){
		ds_main_inptinfo.setColumn(ds_main_inptinfo.rowposition , "chkyn", "Y");
	}
	
	if(ds_main_inptinfo.getColumn(ds_main_inptinfo.rowposition,"chkyn") ==0 && e.col ==0){
		ds_main_inptinfo.setColumn(ds_main_inptinfo.rowposition , "chkyn", "N");
	}
}
]]></Script>
  </Form>
</FDL>