YNU_JEUS/app_home/himed/xpapps/ast/infcmngtxp/xp/SMASI00700_발열환자조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMASI00700" position="absolute 0 0 1197 785" titletext="Untitle" oninit="SMASI00700_oninit" onload="SMASI00700_onload">
    <Layouts>
      <Layout>
        <Shape position="absolute 0 134 1194 140" linetype="vertical" id="line6" class="line_3" anchor="default"/>
        <Div position="absolute 1 25 1195 85" align="align:center top;" id="group6" class="div_SA" anchor="default">
          <Layouts>
            <Layout>
              <Shape position="absolute 1107 10 1113 53" linetype="vertical" id="line8" class="line_4" anchor="default"/>
              <Static text="체온 :" position="absolute 375 35 461 52" id="caption15" class="search_name" anchor="default"/>
              <Static text="횟수 :" position="absolute 780 10 846 27" id="caption16" class="search_name" anchor="default"/>
              <Static text="등록번호 :" position="absolute 15 35 101 52" id="caption21" class="search_name" anchor="default"/>
              <Static text="~" position="absolute 220 10 232 27" id="caption2" class="search_no_b" anchor="default"/>
              <Static text="병동 :" position="absolute 780 34 846 51" id="caption1" class="search_name" anchor="default"/>
              <Calendar position="absolute 108 11 218 30" id="ipt_fromdd" class="input_essential" anchor="default" autoselect="true"/>
              <Calendar position="absolute 232 11 342 30" id="ipt_todd" class="input_essential" anchor="default" autoselect="true"/>
              <Edit position="absolute 108 34 218 53" id="ipt_pid" class="input_default" anchor="default" autoselect="true" onkeydown="group6_ipt_pid_onkeydown"/>
              <Edit position="absolute 445 35 560 54" id="ipt_bdtp" class="input_default" anchor="default" autoselect="true"/>
              <Combo position="absolute 564 35 639 54" id="cmb_upndown" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">U</Col>
                      <Col id="datacolumn">이상</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">D</Col>
                      <Col id="datacolumn">이하</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Combo position="absolute 850 34 955 53" id="cmb_wardcd" class="combo_search" innerdataset="ds_init_warddeptlist_dept" datacolumn="depthngnm" codecolumn="deptcd" anchor="default"/>
              <Edit position="absolute 849 10 938 29" id="ipt_tims" class="input_search" anchor="default" autoselect="true" onkeydown="group6_ipt_tims_onkeydown"/>
              <Button position="absolute 1126 21 1182 43" id="btn_search" class="btn1" text="조회" anchor="default" onclick="group6_btn_search_onclick"/>
              <Static text="현재 재원중인 환자 :" position="absolute 375 10 523 27" id="importcaption1" class="search_name" anchor="default"/>
              <CheckBox position="absolute 525 10 750 25" id="chk_chk" anchor="default" text="재원중 환자(기간 선택으로 조회 안함)" truevalue="C" onclick="group6_chk_chk_onclick"/>
              <Static text="기간선택 :" position="absolute 15 9 104 26" id="cap_fromdd" class="search_name" visible="false" anchor="default"/>
              <Static text="기간선택 :" position="absolute 15 9 104 26" id="cap_todd" class="search_name" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape position="absolute 0 108 1194 114" linetype="horizontal" id="line1" class="line_10" anchor="default"/>
        <Button position="absolute 1054 87 1104 106" id="btn_excel" class="btn7" text="엑셀" anchor="default" onclick="btn_excel_onclick"/>
        <Button position="absolute 1107 87 1149 106" id="btn_spread" class="btn2" text="펼침" anchor="default" onclick="btn_spread_onclick"/>
        <Button position="absolute 1152 87 1194 106" id="btn_close" class="btn2" text="닫침" anchor="default" onclick="btn_close_onclick"/>
        <Grid position="absolute 0 113 1194 754" id="grd_feverpatreflist" binddataset="ds_main_feverpatrefinfo_feverpatreflist" anchor="default" oncelldblclick="grd_feverpatreflist_oncelldblclick" onrbuttonup="grd_feverpatreflist_onrbuttonup" onrbuttondown="grd_feverpatreflist_onrbuttondown" oncellclick="grd_feverpatreflist_oncellclick" treeusecheckbox="false" treeuseimage="false" cantreestatuschange="grd_feverpatreflist_cantreestatuschange" treeinitstatus="collapse,null">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="76"/>
                <Column size="80"/>
                <Column size="50"/>
                <Column size="83"/>
                <Column size="35"/>
                <Column size="50"/>
                <Column size="90"/>
                <Column size="0"/>
                <Column size="73"/>
                <Column size="93"/>
                <Column size="73"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="50"/>
                <Column size="200"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="등록번호"/>
                <Cell col="2" text="level"/>
                <Cell col="3" text="성명"/>
                <Cell col="4" text="기록일시"/>
                <Cell col="5" text="체온"/>
                <Cell col="6" text="발열시병실"/>
                <Cell col="7" text="성별"/>
                <Cell col="8" text="나이"/>
                <Cell col="9" text="진료과"/>
                <Cell col="10" text="주치의코드"/>
                <Cell col="11" text="주치의"/>
                <Cell col="12" text="병동"/>
                <Cell col="13" text="병실"/>
                <Cell col="14" text="입원일"/>
                <Cell col="15" text="퇴원일"/>
                <Cell col="16" text="재원기간"/>
                <Cell col="17" text="진단명"/>
                <Cell col="18" text="cretno"/>
                <Cell col="19" text="seqno"/>
                <Cell col="20" text="instcd"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow + 1"/>
                <Cell col="1" displaytype="tree" edittype="tree" text="bind:pid" treestartlevel="1" treelevel="bind:levl"/>
                <Cell col="2" text="bind:levl"/>
                <Cell col="3" text="bind:name"/>
                <Cell col="4" displaytype="expr:String(recdt).length == 8 || String(recdt).length == 14 ? 'date' : 'normal'" text="bind:recdt" expandshow="hide" calendardisplaynulltype="none"/>
                <Cell col="5" text="bind:bdtp"/>
                <Cell col="6" style="align:left top;padding:5 2 1 2;" text="bind:bdtpward" wordwrap="word"/>
                <Cell col="7" text="bind:sexflag"/>
                <Cell col="8" text="bind:age"/>
                <Cell col="9" text="bind:orddeptcd"/>
                <Cell col="10" text="bind:atdoct"/>
                <Cell col="11" text="bind:atdoctnm"/>
                <Cell col="12" text="bind:wardcd" enable="false"/>
                <Cell col="13" text="bind:roomcd"/>
                <Cell col="14" displaytype="expr:String(indd).length == 8 || String(indd).length == 14 ? 'date' : 'normal'" text="bind:indd" expandshow="hide" calendardisplaynulltype="none" enable="false"/>
                <Cell col="15" displaytype="expr:String(dschdd).length == 8 || String(dschdd).length == 14 ? 'date' : 'normal'" text="bind:dschdd" expandshow="hide" calendardisplaynulltype="none"/>
                <Cell col="16" text="bind:inhospterm"/>
                <Cell col="17" style="align:left top;padding:5 2 1 2;" text="bind:diagnm" wordwrap="word"/>
                <Cell col="18" text="bind:cretno"/>
                <Cell col="19" text="bind:seqno"/>
                <Cell col="20" text="bind:instcd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static text="발열환자" position="absolute 1 92 183 108" id="caption25" class="tit_2" anchor="default"/>
        <ActiveX position="absolute 975 49 1185 74" id="tfexcel" progid="{fe8d1001-6a9d-424d-ae2a-301493bb12da}" visible="false" anchor="default"/>
        <Button id="btn_print" taborder="1" text="출력" class="btn6" visible="false" position="absolute 5 758 61 780"/>
        <Button id="btn_init" taborder="2" text="초기화" class="btn4" position="absolute 1126 758 1194 780" onclick="btn_init_onclick"/>
        <Static id="caption6" text="발열환자조회" class="tit_1" position="absolute 0 0 145 25"/>
        <PopupMenu id="pMenu_menu" innerdataset="@ds_hidden_popupmenu_grid01_item" idcolumn="func" captioncolumn="name" levelcolumn="lev" position="absolute 89 793 224 836" style="buttonsize:-1;" onmenuclick="pMenu_menu_onmenuclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_feverpatrefinfo_feverpatreflist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="chk" type="STRING" size="256"/>
          <Column id="bdtp" type="STRING" size="256"/>
          <Column id="upndown" type="STRING" size="256"/>
          <Column id="tims" type="STRING" size="256"/>
          <Column id="wardcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="pid"/>
            <Col id="chk"/>
            <Col id="bdtp"/>
            <Col id="upndown"/>
            <Col id="tims"/>
            <Col id="wardcd"/>
          </Row>
        </Rows>
      </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_hidden_popupmenu_grid01_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="name" type="STRING" size="256"/>
          <Column id="func" type="STRING" size="256"/>
          <Column id="lev" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="name">통합기록조회</Col>
            <Col id="func">fSytsRecRefPopup</Col>
            <Col id="lev">0</Col>
          </Row>
          <Row>
            <Col id="name">병원감염보고서등록</Col>
            <Col id="func">fHospInfcReptPopup</Col>
            <Col id="lev">0</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_selecteddata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="selectedpid" type="STRING" size="256"/>
          <Column id="selectedindd" type="STRING" size="256"/>
          <Column id="selectedrgstdt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="selectedpid"/>
            <Col id="selectedindd"/>
            <Col id="selectedrgstdt"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_initdate" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="today" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="today"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_deptlist_dept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_warddeptlist_dept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group6.ipt_fromdd" propid="value" datasetid="ds_main_cond" columnid="fromdd"/>
      <BindItem id="item1" compid="group6.ipt_todd" propid="value" datasetid="ds_main_cond" columnid="todd"/>
      <BindItem id="item2" compid="group6.chk_chk" propid="value" datasetid="ds_main_cond" columnid="chk"/>
      <BindItem id="item3" compid="group6.ipt_tims" propid="value" datasetid="ds_main_cond" columnid="tims"/>
      <BindItem id="item4" compid="group6.ipt_pid" propid="value" datasetid="ds_main_cond" columnid="pid"/>
      <BindItem id="item5" compid="group6.ipt_bdtp" propid="value" datasetid="ds_main_cond" columnid="bdtp"/>
      <BindItem id="item6" compid="group6.cmb_upndown" propid="value" datasetid="ds_main_cond" columnid="upndown"/>
      <BindItem id="item7" compid="group6.cmb_wardcd" propid="value" datasetid="ds_main_cond" columnid="wardcd"/>
    </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";

var arErrorCode 	= new HashArray();

function SMASI00700_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	//폼 초기화
}

function SMASI00700_onload(obj:Form, e:LoadEventInfo)
{
	fInitialize();		
	ds_main_feverpatrefinfo_feverpatreflist.clearData();	
}

function fInitialize() {
	// 공통코드를 조회한다.	
	// 진료과	
	appf_getWardDeptList(sysf_getUserInfo("dutplceinstcd"), 'depthngnm', 'asc', (new Date()).getDateFormat("YYYYMMDD"), 'after', 'ds_init_deptlist_dept');
	
	//병동	
	appf_getWardDeptList(sysf_getUserInfo("dutplceinstcd"), 'deptcd', 'asc', (new Date()).getDateFormat("YYYYMMDD"), 'after', 'ds_init_warddeptlist_dept');
		
	frmf_addComboItem("group6.cmb_wardcd","","","above");

	var today = utlf_getCurrentDate();
	var idate = new Date();
	var peveDate = idate.getAddDate(-1, "M");
	ds_init_initdate.setColumn(0, "today", today);	
	dsf_makeValue(ds_send_cond, "trgtmancnt", 	"string", "I");
	dsf_makeValue(ds_send_cond, "fromdd", 		"string", peveDate.getDateFormat());
	dsf_makeValue(ds_send_cond, "todd", 		"string", today);
	ds_main_cond.setColumn(0, "fromdd", peveDate.getDateFormat());								
	ds_main_cond.setColumn(0, "todd", 	today);		
}
function btn_init_onclick(obj:Button,  e:ClickEventInfo)
{	
	ds_main_feverpatrefinfo_feverpatreflist.clearData();
}

function group6_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13){		
		group6_btn_search_onclick();
	}
}

function group6_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetFeverPatList();
}

/*===============================================================================
@desc	:  발열환자 조회 
===============================================================================*/				
function fGetFeverPatList(){
	if( (!utlf_isNull(ds_main_cond.getColumn(0, "bdtp" ))) && 
	   (utlf_isNull(ds_main_cond.getColumn(0, "upndown"))) ) {
		var rtn = sysf_messageBox("검색할 체온의 기준을", "C001");
		return;
	}	
	
	if( !(frmf_isRequiredControls("group6.ipt_fromdd","group6.ipt_todd")) ){
		return;
	}
	
	//조회일자제한(15일-서버부하를 줄이기 위함임)
	var reqTerm = utlf_getDateInterval(ds_main_cond.getColumn(0, "fromdd") , ds_main_cond.getColumn(0, "todd"));
	if( reqTerm > 31 ) {
		sysf_messageBox("최대조회기간을 초과하였습니다. 조회기간을 다시 ", "C001");
		return ;
	}
						
	dS_send_reqdata.copyData(ds_main_cond);	
	
	//openLoadingBar("발열환자정보 ") ;//처리중 화면을 오픈한다.    
	//submit("TRASI00701");
	var oParam = {};
		oParam.id          = "TRASI00701";
		oParam.service     = "infcmngtapp.HospInfcMngt";
		oParam.method      = "reqGetFeverPatRefList";
		oParam.inds        = "req=dS_send_reqdata";
		oParam.outds       = "ds_main_feverpatrefinfo_feverpatreflist=feverpatreflist";
		oParam.async       = false;		

	tranf_submit(oParam);
 
	//closeLoadingBar() ;//처리중 화면을 close한다.     	 
	//setTree(grd_feverpatreflist,2,1,true);
}

function group6_ipt_tims_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(utlf_isNull(ds_main_cond.getColumn(0, "bdtp")) || utlf_isNull(ds_main_cond.getColumn(0, "upndown"))){
		sysf_messageBox("검색할 체온을 먼저", "C001");
		return;
	}
}

function group6_chk_chk_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if (ds_main_cond.getColumn(0, "chk") == "C"){
		group6.ipt_fromdd.enable = false;
		group6.ipt_todd.enable = false;
	}else{
		group6.ipt_fromdd.enable = true;
		group6.ipt_todd.enable = true;
	}
}

function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{	
	if( ds_main_feverpatrefinfo_feverpatreflist.rowcount > 0 ){
		grdf_exportExcel(grd_feverpatreflist, "발열환자조회", "SheetName", false, "", "user", false);
	} else {
		sysf_messageBox("조회된 데이터가 ", "I004");
		return;
	}
}

function grd_feverpatreflist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var levlflag = ds_main_feverpatrefinfo_feverpatreflist.getColumn(ds_main_feverpatrefinfo_feverpatreflist.rowposition, "levl");
					
	if (levlflag == 1){
		sysf_messageBox("상단정보를 셋팅하거나 팝업창을 띄울때는 펼침을눌러서 하위 리스트를","C002");
		return;
	}

	if(e.row >= 0 && e.col >=0 && ds_main_feverpatrefinfo_feverpatreflist.rowcount > 0) {
		fReqOpPatPamInfo();
	}
}

function fReqOpPatPamInfo(){
	
	var tioflag = ds_main_feverpatrefinfo_feverpatreflist.getColumn(ds_main_feverpatrefinfo_feverpatreflist.rowposition, "ioflag");

	var ioflag="I";
	var pid 	= ds_main_feverpatrefinfo_feverpatreflist.getColumn(ds_main_feverpatrefinfo_feverpatreflist.rowposition, "pid");          
	var indd 	= ds_main_feverpatrefinfo_feverpatreflist.getColumn(ds_main_feverpatrefinfo_feverpatreflist.rowposition, "indd");
	var cretno 	= ds_main_feverpatrefinfo_feverpatreflist.getColumn(ds_main_feverpatrefinfo_feverpatreflist.rowposition, "cretno") ;
	var seqno 	= ds_main_feverpatrefinfo_feverpatreflist.getColumn(ds_main_feverpatrefinfo_feverpatreflist.rowposition, "seqno");
	var instcd 	= sysf_getUserInfo("dutplceinstcd");
	var srchdd 	= utlf_getCurrentDate();
	var param	= ioflag + "▦"  //입원환자
				 + pid + "▦"
				 + indd + "▦"
				 + cretno + "▦"
				 + instcd+ "▦"
				 + srchdd;

	frmf_setParameter("condparam", param);							
	appf_initPatientInfo(param);
}

/****************************************************************************************
 * Components		: PopupMenu
 * Components ID	: pMenu_atdoctmenu
 * Event			: onmenuclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 팝업메뉴 클릭시
 ****************************************************************************************/
function pMenu_menu_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{
	switch( e.id ){
		case "fSytsRecRefPopup" :
			fSytsRecRefPopup();
			break;
			
		case "fHospInfcReptPopup" :
			fHospInfcReptPopup();
			break;				
		default :
			break;
	}
}
function grd_feverpatreflist_onrbuttonup(obj:Grid, e:GridMouseEventInfo)
{
	if( e.row > -1 ){
		grdf_setSelectedCell(obj, e);		// 선택된 행 확실히 선택해줌
		pMenu_menu.trackPopup(e.screenX, e.screenY);
	}
}

function grd_feverpatreflist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	if( e.row > -1 ){
		grdf_setSelectedCell(obj, e);		// 선택된 행 확실히 선택해줌
	}
}

function grd_feverpatreflist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	var iRow = ds_main_feverpatrefinfo_feverpatreflist.rowposition;	
	ds_hidden_selecteddata.clearData();
	ds_hidden_selecteddata.addRow();	
	ds_hidden_selecteddata.setColumn(0, "selectedpid", 	ds_main_feverpatrefinfo_feverpatreflist.getColumn(iRow, "pid"));
	ds_hidden_selecteddata.setColumn(0, "selectedindd",	ds_main_feverpatrefinfo_feverpatreflist.getColumn(iRow, "indd"));			
	
	if(e.col == 1)
	{
		if(obj.userdata == 1) {
			obj.userdata = 0;
			return;
		}
	
		var row = obj.getTreeRow(e.row);
		if(obj.getTreeStatus(row) == 0)
			obj.setTreeStatus(row, true);
		else if(obj.getTreeStatus(row) == 1)
			obj.setTreeStatus(row, false);
		
		obj.userdata = 0;
	}
}

function fSytsRecRefPopup(){
	var sessionPID = appf_getPatientId();
	if(sessionPID != ds_main_feverpatrefinfo_feverpatreflist.getColumn(ds_main_feverpatrefinfo_feverpatreflist.rowposition, "pid")){
		fReqOpPatPamInfo();
	}
	frmf_setParameter("SMMRI00400_param_pid", sessionPID);
	//modal("SMMRI00400",1,10,10,"SMMRI00400", "", "/root/hidden/oprecinfo/info");
	frmf_modal("SMMRI00400", "SMMRI00400", null, null, 1, 10, 10, null, null, null, null, null, "M");
}

function fHospInfcReptPopup() {
	var sessionPID = appf_getPatientId();
	if(sessionPID != ds_main_feverpatrefinfo_feverpatreflist.getColumn(ds_main_feverpatrefinfo_feverpatreflist.rowposition, "pid")){
		fReqOpPatPamInfo();
	}

	frmf_setParameter("setVal9",  ds_main_feverpatrefinfo_feverpatreflist.getColumn(ds_main_feverpatrefinfo_feverpatreflist.rowposition, "recdt"));
	frmf_setParameter("setVal10", ds_main_feverpatrefinfo_feverpatreflist.getColumn(ds_main_feverpatrefinfo_feverpatreflist.rowposition, "bdtp"));		
	frmf_open("SMASI00100", "SMASI00100", null, null, 1, 10, 10, null, null, null, null, null, "M");	
}
function grd_feverpatreflist_cantreestatuschange(obj:Grid, e:GridTreeStatusEventInfo)
{
	obj.userdata = 1;
}

function btn_spread_onclick(obj:Button,  e:ClickEventInfo)
{
	grd_feverpatreflist.treeinitstatus = "expand,all";
}

function btn_close_onclick(obj:Button,  e:ClickEventInfo)
{
	grd_feverpatreflist.treeinitstatus = "collapse,null";
}
]]></Script>
  </Form>
</FDL>