YNU_JEUS/app_home/himed/xpapps/emr/wardcarexp/xp/SMMNW20020_외상소생구역환자대장.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMNW20020" position="absolute 0 0 1195 760" titletext="외상소생구역 환자대장" oninit="SMMNW20020_oninit" onload="SMMNW20020_onload">
    <Layouts>
      <Layout>
        <Static text="외상소생구역 환자대장" position="absolute 0 0 163 20" id="cpt_title" class="tit_1"/>
        <Div position="absolute 0 20 1195 60" align="align:center top;" id="grp_sea" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Button position="absolute 1010 10 1066 32" id="btn_ref" class="btn1" taborder="7" text="조회" anchor="top right" onclick="grp_sea_btn_ref_onclick"/>
              <Static text="기 간 :" position="absolute 215 12 284 29" id="caption3" class="search_name" anchor="default"/>
              <Shape position="absolute 987 10 993 31" linetype="vertical" id="line2" class="line_4" anchor="top right"/>
              <Calendar position="absolute 279 11 374 30" id="ipt_fromdd" class="input_essential" taborder="2" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd" anchor="default"/>
              <Static text="부 서 :" position="absolute 10 12 77 29" id="caption29" class="search_name" anchor="default"/>
              <Combo position="absolute 80 11 205 30" id="cmb_deptcd" class="combo_essential" enable="false" taborder="1" innerdataset="@ds_init_deptlist" datacolumn="depthngnm" codecolumn="deptcd" anchor="default" canitemchange="grp_sea_cmb_deptcd_canitemchange"/>
              <Static text="등록번호 :" position="absolute 675 12 749 29" id="caption2" class="search_name" visible="false" anchor="default"/>
              <Edit position="absolute 753 11 823 30" id="ipt_pid" class="input_search" taborder="4" visible="false" autoselect="true" anchor="default" onkeyup="grp_sea_ipt_pid_onkeyup"/>
              <Button position="absolute 1126 10 1182 32" id="button2" class="btn7" taborder="8" text="엑셀" anchor="top right" onclick="grp_sea_button2_onclick"/>
              <Calendar position="absolute 389 11 484 30" id="ipt_todd" class="input_essential" taborder="2" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd" value="null" anchor="default"/>
              <Static text="~" position="absolute 377 12 389 27" align="align:center middle;" id="caption4" anchor="default"/>
              <Button position="absolute 1068 10 1124 32" id="button7" class="btn6" text="출력" anchor="top right" onclick="grp_sea_button7_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape position="absolute 0 64 1195 68" linetype="horizontal" id="line1" class="line_10" anchor="left top right"/>
        <Grid position="absolute 0 68 1195 760" id="grd_trmsinfo" class="datagrid2" binddataset="ds_main_trmslist" cellsizingtype="col" selecttype="multirow" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25" band="left"/>
                <Column size="70"/>
                <Column size="72"/>
                <Column size="30"/>
                <Column size="23"/>
                <Column size="55"/>
                <Column size="55"/>
                <Column size="45"/>
                <Column size="75"/>
                <Column size="114"/>
                <Column size="70"/>
                <Column size="55"/>
                <Column size="55"/>
                <Column size="70"/>
                <Column size="45"/>
                <Column size="70"/>
                <Column size="45"/>
                <Column size="34"/>
                <Column size="88"/>
                <Column size="49"/>
                <Column size="40"/>
                <Column size="45"/>
              </Columns>
              <Rows>
                <Row size="30" 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="KT&#13;&#10;AS" wordwrap="char"/>
                <Cell col="5" text="등록번호"/>
                <Cell col="6" text="성명"/>
                <Cell col="7" text="S/A"/>
                <Cell col="8" text="진단코드"/>
                <Cell col="9" text="진단명"/>
                <Cell col="10" text="진료과"/>
                <Cell col="11" text="담당교수"/>
                <Cell col="12" text="담당의"/>
                <Cell col="13" colspan="2" text="내원일시" taborder="undefined"/>
                <Cell col="15" colspan="2" text="퇴실일시" taborder="undefined"/>
                <Cell col="17" text="퇴실종류" wordwrap="both" autosizerow="limitmin"/>
                <Cell col="18" text="전출의료기관"/>
                <Cell col="19" colspan="2" text="입원병실" taborder="undefined"/>
                <Cell col="21" text="체류시간(분)" wordwrap="char"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow + 1"/>
                <Cell col="1" text="bind:basedd" mask="####-##-##" suppress="1" suppressalign="middle,over"/>
                <Cell col="2" text="bind:bednm" suppress="2" suppressalign="middle,over"/>
                <Cell col="3" text="bind:serflag" suppress="0"/>
                <Cell col="4" text="bind:ktas"/>
                <Cell col="5" text="bind:pid"/>
                <Cell col="6" text="bind:patnm"/>
                <Cell col="7" text="bind:sexage"/>
                <Cell col="8" displaytype="text" style="align:left top;padding:4 2 1 2;" text="bind:diagcd" wordwrap="char"/>
                <Cell col="9" displaytype="text" style="align:left top;padding:4 2 1 2;" text="bind:diagnm" wordwrap="char"/>
                <Cell col="10" displaytype="text" text="bind:orddeptnm" wordwrap="char"/>
                <Cell col="11" displaytype="text" text="bind:jatdoctnm" wordwrap="char"/>
                <Cell col="12" displaytype="text" text="bind:datdoctnm" wordwrap="char"/>
                <Cell col="13" text="bind:indd" mask="####-##-##"/>
                <Cell col="14" text="bind:intm" mask="##:##"/>
                <Cell col="15" text="bind:eroutdd" mask="expr:!utlf_isNull(eroutdd) ? '####-##-##' : ''"/>
                <Cell col="16" text="bind:erouttm" mask="expr:!utlf_isNull(erouttm) ? '##:##' : ''"/>
                <Cell col="17" text="bind:outrmnm"/>
                <Cell col="18" displaytype="text" text="bind:chnghospnm"/>
                <Cell col="19" displaytype="text" style="align:left top;padding:4 2 1 2;" text="bind:chngwardnm" wordwrap="char"/>
                <Cell col="20" displaytype="text" style="align:left top;padding:4 2 1 2;" text="bind:chngroomcd" wordwrap="char"/>
                <Cell col="21" displaytype="text" text="bind:durtime"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <CheckBox position="absolute 835 34 901 49" id="checkbox1" visible="false" text="완료제외" truevalue="Y" onclick="comn_onclick"/>
        <CheckBox position="absolute 907 34 978 49" id="checkbox2" visible="false" text="취소제외" truevalue="Y" onclick="comn_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_deptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING"/>
          <Column id="deptcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_trmslist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="basedd" type="STRING"/>
          <Column id="bednm" type="STRING"/>
          <Column id="serflag" type="STRING"/>
          <Column id="ktas" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="sexage" type="STRING"/>
          <Column id="diagcd" type="STRING"/>
          <Column id="diagnm" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="jatdoctnm" type="STRING"/>
          <Column id="datdoctnm" type="STRING"/>
          <Column id="indd" type="STRING"/>
          <Column id="intm" type="STRING"/>
          <Column id="eroutdd" type="STRING"/>
          <Column id="erouttm" type="STRING"/>
          <Column id="outrmnm" type="STRING"/>
          <Column id="chnghospnm" type="STRING"/>
          <Column id="chngwardnm" type="STRING"/>
          <Column id="chngroomcd" type="STRING"/>
          <Column id="durtime" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptcd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="acptflag" type="STRING" size="256"/>
          <Column id="exceptflag" type="STRING" size="256"/>
          <Column id="multicheck" type="STRING" size="256"/>
          <Column id="exceptflag2" type="STRING" size="256"/>
          <Column id="deptnm" type="STRING" size="256"/>
          <Column id="name" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="deptcd"/>
            <Col id="pid"/>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="acptflag"/>
            <Col id="exceptflag">Y</Col>
            <Col id="multicheck"/>
            <Col id="exceptflag2">Y</Col>
            <Col id="deptnm"/>
            <Col id="name"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.cmb_deptcd" propid="value" datasetid="ds_main_cond" columnid="deptcd"/>
      <BindItem id="item1" compid="grp_sea.ipt_fromdd" propid="value" datasetid="ds_main_cond" columnid="fromdd"/>
      <BindItem id="item2" compid="grp_sea.ipt_pid" propid="value" datasetid="ds_main_cond" columnid="pid"/>
      <BindItem id="item3" compid="grp_sea.ipt_todd" propid="value" datasetid="ds_main_cond" columnid="todd"/>
      <BindItem id="item4" compid="checkbox1" propid="value" datasetid="ds_main_cond" columnid="exceptflag"/>
      <BindItem id="item5" compid="checkbox2" propid="value" datasetid="ds_main_cond" columnid="exceptflag2"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs"

//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
//var arErrorCode = new HashArray();
		                        
//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: N/A
 * Description		: 조회
 ****************************************************************************************/
function fSearch() {
	
	ds_main_trmslist.clearData();
	
	var oParam = {};
		oParam.id          = "TRMNW20020";
		oParam.service     = "wardcareapp.TranMngt";
		oParam.method      = "reqGetTIPatInfoList";
		oParam.inds        = "req=ds_main_cond";
		oParam.outds       = "ds_main_trmslist=trmslist";
		oParam.async       = true;
		//oParam.callback    = "cf_TRMNW20020";

	tranf_submit(oParam);

}

//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Components ID	: SMMNW20020
 * Event			: oninit
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 초기화
 ****************************************************************************************/
function SMMNW20020_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

/****************************************************************************************
 * Components		: Form
 * Components ID	: SMMNW20020
 * Event			: onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 초기화
 ****************************************************************************************/
function SMMNW20020_onload(obj:Form, e:LoadEventInfo)
{
	grdf_setGridSort(grd_trmsinfo);
	grdf_setToolTipBind(grd_trmsinfo);
	
	var sWardcd = "3041601000"
														
	var instcd = sysf_getUserInfo("dutplceinstcd");
	var standard_yn = "orduseyn";
	var ord_deptflag = 'W';
	var sort_field = "depthngnm";
	var sort_method = "asc";
	var dt = utlf_getCurrentDate();
	
	dsf_createDsRow("ds_send_savedata", [{col:"comnrefflag", type:"STRING", size:256, val:""}
										, {col:"flag", type:"STRING", size:256, val:""}]);

	var oParam = {};
		oParam.id          = "TRMNW11001";
		oParam.service     = "wardorderapp.NursPrcpMngt";
		oParam.method      = "reqGetDeptListInfo";
		oParam.inds        = "req=ds_send_savedata";
		oParam.outds       = "ds_init_deptlist=deptlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNW11001";

	tranf_submit(oParam);
	
	frmf_addComboItem("grp_sea.cmb_deptcd" , "전 체", "", "above");

	ds_main_cond.setColumn(0, "fromdd", utlf_getCurrentDate());
	ds_main_cond.setColumn(0, "todd", utlf_getCurrentDate());
	ds_main_cond.setColumn(0, "deptcd", sWardcd);
	
	ds_main_cond.setColumn(0, "name", "외상소생구역 환자대장");
	
	fSearch() ;
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_sea.btn_ref
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 조회
 ****************************************************************************************/
function grp_sea_btn_ref_onclick(obj:Button,  e:ClickEventInfo)
{
	fSearch() ;
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_sea.cmb_deptcd
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 부서 변경 이벤트
 ****************************************************************************************/
function grp_sea_cmb_deptcd_canitemchange(obj:Combo, e:ItemChangeEventInfo)
{
	fSearch();
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_sea.ipt_pid
 * Event			: onkeyup
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 등록번호 입력(사용안함)
 ****************************************************************************************/
function grp_sea_ipt_pid_onkeyup(obj:Edit, e:KeyEventInfo)
{
	grp_sea.btn_ref.click();
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_sea.button2
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 엑셀 저장
 ****************************************************************************************/
function grp_sea_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_trmsinfo, "외상소생구역 환자대장", "SheetName", true);
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_sea.button7
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 출력
 ****************************************************************************************/
function grp_sea_button7_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_cond.setColumn(0, "deptnm", grp_sea.cmb_deptcd.text);

	var objDOM = rptf_createDOM();	// DOM 객체 설정
	rptf_setNodeListToDOM(objDOM, "/root/temp/cond", ds_main_cond ); 
	rptf_setNodeListToDOM(objDOM, "/root/temp/trmsinfo/trmslist", ds_main_trmslist );
	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;	// 최상의노드 XML 스트링 추출
	var option = "open=1;save=1;directprint=0;printdailog=0;print=1;zoom=0;";
	rptf_exeReportPreview30(["RPMNW20020"],[objParam], option);
}

/****************************************************************************************
 * Components		: CheckBox
 * Components ID	: grp_sea
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 체크박스 값 설정
 ****************************************************************************************/
function comn_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(obj.value != "Y"){
		var sName = "exceptflag";
		if( obj.name == "checkbox2" )  sName = "exceptflag2";
		
		ds_main_cond.setColumn(0, sName, "");
	}
	
	fSearch() ;
}
]]></Script>
  </Form>
</FDL>