YNU_JEUS/app_home/himed/xpapps/emr/opanstxp/xp/SMMNP21100_응급전용수술실이용환자대장.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMNP21100" position="absolute 0 0 1105 778" titletext="응급전용 환자대장" oninit="SMMNP21100_oninit" onload="SMMNP21100_onload">
    <Layouts>
      <Layout>
        <Div id="group2" taborder="0" class="div_SA" position="absolute 0 25 1099 64" anchor="left top right">
          <Layouts>
            <Layout>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 869 9 875 31" anchor="top right"/>
              <Static id="caption2" text="조회기간 :" class="search_name" position="absolute 15 12 86 29" anchor="default"/>
              <Calendar id="input_refFrDT" taborder="1" class="input_s_essential" position="absolute 88 9 188 30" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true" autoskip="true"/>
              <Static id="caption5" text="~" class="search_no_b" position="absolute 193 12 204 29" anchor="default"/>
              <Calendar id="input_refToDT" taborder="2" class="input_s_essential" position="absolute 209 9 309 30" anchor="default" dateformat="yyyy-MM-dd" autoselect="true"/>
              <Button id="btn_srch" taborder="4" text="조회" class="btn1" position="absolute 880 10 936 30" anchor="top right" onclick="group2_btn_srch_onclick" defaultbutton="false" escapebutton="false"/>
              <Static id="caption10" text="등록번호 :" class="search_name" position="absolute 329 12 404 29"/>
              <Edit id="ipt_pid" taborder="5" onkeydown="grp_srch2_ipt_pid_onkeydown" class="input_search" position="absolute 408 10 474 29"/>
              <Div id="divExamCond" taborder="6" style="background:transparent;" text="Div00" position="absolute 484 7 754 30">
                <Layouts>
                  <Layout>
                    <Static id="caption00" text="조회구분 :" class="search_name" position="absolute 8 4 83 21" anchor="default"/>
                    <Radio id="Radio00" taborder="1" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 89 5 270 21" anchor="default" onitemchanged="group2_divExamCond_Radio00_onitemchanged">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn" size="256"/>
                          <Column id="datacolumn" size="256"/>
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">XRAY</Col>
                            <Col id="datacolumn">응급 X-ray</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">CT</Col>
                            <Col id="datacolumn">응급 CT</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Radio>
                  </Layout>
                </Layouts>
              </Div>
            </Layout>
          </Layouts>
        </Div>
        <Shape id="line1" linetype="horizontal" class="line_3" position="absolute 0 755 1099 761" anchor="left right bottom"/>
        <Static id="caption6" text="응급전용 환자 대장" class="tit_1" position="absolute 0 0 151 25"/>
        <Button id="btn_report" taborder="6" text="출력" class="btn6" position="absolute 1035 35 1091 55" anchor="top right" onclick="btn_report_onclick"/>
        <Button id="btn_excel" taborder="7" text="엑셀저장" class="btn7" position="absolute 946 35 1026 55" anchor="top right" onclick="btn_excel_onclick"/>
        <Static id="caption1" text="[표]" position="absolute 1072 762 1097 776" anchor="right bottom"/>
        <Tab id="Tab00" taborder="8" tabindex="0" scrollbars="autoboth" position="absolute 0 66 1105 755" anchor="all" onchanged="Tab00_onchanged">
          <Tabpages>
            <Tabpage id="tabpage1" text=" 응급전용 수술실 이용 환자 대장 ">
              <Layouts>
                <Layout>
                  <Grid id="grd_eronly_oplist" class="datagrid2" taborder="1" binddataset="ds_main_eronly_oplist" autoenter="key" useinputpanel="false" cellsizingtype="col" cellsizebandtype="allband" position="absolute 0 4 1091 652" anchor="all" readonly="true" onheadclick="Tab00_tabpage1_grd_eronly_oplist_onheadclick">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="25" band="left"/>
                          <Column size="96" band="left"/>
                          <Column size="87" band="left"/>
                          <Column size="90" band="left"/>
                          <Column size="60" band="left"/>
                          <Column size="90" band="left"/>
                          <Column size="60" band="left"/>
                          <Column size="59" band="left"/>
                          <Column size="90" band="left"/>
                          <Column size="60" band="left"/>
                          <Column size="90" band="left"/>
                          <Column size="60" band="left"/>
                          <Column size="116" band="left"/>
                          <Column size="48" band="left"/>
                        </Columns>
                        <Rows>
                          <Row size="26" band="head"/>
                          <Row size="28" band="head"/>
                          <Row size="26"/>
                        </Rows>
                        <Band id="head">
                          <Cell/>
                          <Cell col="1" colspan="2" text="환자정보" taborder="undefined"/>
                          <Cell col="3" colspan="4" text="응급실정보" taborder="undefined"/>
                          <Cell col="7" rowspan="2" edittype="none" style="align:center;" text="수술실&#13;&#10;입실경로" wordwrap="none" taborder="undefined"/>
                          <Cell col="8" colspan="6" text="수술정보" taborder="undefined"/>
                          <Cell row="1"/>
                          <Cell row="1" col="1" text="이름"/>
                          <Cell row="1" col="2" text="등록번호"/>
                          <Cell row="1" col="3" text="내원일자"/>
                          <Cell row="1" col="4" text="내원시간"/>
                          <Cell row="1" col="5" text="퇴실일자"/>
                          <Cell row="1" col="6" text="퇴실시간"/>
                          <Cell row="1" col="8" text="시작일자"/>
                          <Cell row="1" col="9" text="시작시간"/>
                          <Cell row="1" col="10" text="종료일자"/>
                          <Cell row="1" col="11" text="종료시간"/>
                          <Cell row="1" col="12" text="수술의뢰진료과"/>
                          <Cell row="1" col="13" text="수술방"/>
                        </Band>
                        <Band id="body">
                          <Cell celltype="head" text="expr:currow + 1"/>
                          <Cell col="1" text="bind:hngnm"/>
                          <Cell col="2" displaytype="normal" edittype="normal" style="padding:0 0 0 2;" text="bind:pid" enable="false"/>
                          <Cell col="3" displaytype="normal" text="bind:chosdd"/>
                          <Cell col="4" displaytype="normal" text="bind:chostm"/>
                          <Cell col="5" displaytype="normal" text="bind:outrmdd"/>
                          <Cell col="6" text="bind:outrmtm"/>
                          <Cell col="7" text="bind:in_method"/>
                          <Cell col="8" displaytype="normal" text="bind:opstrdd"/>
                          <Cell col="9" text="bind:opstrtm"/>
                          <Cell col="10" displaytype="normal" text="bind:openddd"/>
                          <Cell col="11" text="bind:opendtm"/>
                          <Cell col="12" text="bind:opdeptnm"/>
                          <Cell col="13" text="bind:oproomnm"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
            <Tabpage id="tabpage2" text="  응급전용 X-ray 및 CT 이용 환자 대장  " style="anchor:default;margin:3 0 10 0;" layoutselecttype="inner,width">
              <Layouts>
                <Layout>
                  <Grid id="grd_eronly_examlist" class="datagrid2" taborder="0" binddataset="ds_main_eronly_examlist" autoenter="key" useinputpanel="false" cellsizingtype="col" cellsizebandtype="allband" position="absolute 0 4 1099 652" anchor="all" readonly="true" onheadclick="Tab00_tabpage2_grd_eronly_examlist_onheadclick">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="25"/>
                          <Column size="67"/>
                          <Column size="96"/>
                          <Column size="87"/>
                          <Column size="90"/>
                          <Column size="60"/>
                          <Column size="90"/>
                          <Column size="60"/>
                          <Column size="90"/>
                          <Column size="60"/>
                          <Column size="107"/>
                          <Column size="80"/>
                          <Column size="40"/>
                          <Column size="79"/>
                          <Column size="122"/>
                          <Column size="94"/>
                        </Columns>
                        <Rows>
                          <Row size="26" band="head"/>
                          <Row size="28" band="head"/>
                          <Row size="26"/>
                        </Rows>
                        <Band id="head">
                          <Cell taborder="undefined"/>
                          <Cell col="1" rowspan="2" text="촬영&#13;&#10;기기&#13;&#10;번호" taborder="undefined"/>
                          <Cell col="2" colspan="2" text="환자정보" taborder="undefined"/>
                          <Cell col="4" colspan="4" text="응급실정보" taborder="undefined"/>
                          <Cell col="8" colspan="4" text="촬영정보" taborder="undefined"/>
                          <Cell col="12" colspan="4" text="기타 정보" taborder="undefined"/>
                          <Cell row="1" taborder="undefined"/>
                          <Cell row="1" col="2" text="이름"/>
                          <Cell row="1" col="3" text="등록번호"/>
                          <Cell row="1" col="4" text="내원일자"/>
                          <Cell row="1" col="5" text="내원시간"/>
                          <Cell row="1" col="6" text="퇴실일자"/>
                          <Cell row="1" col="7" text="퇴실시간"/>
                          <Cell row="1" col="8" text="촬영일자"/>
                          <Cell row="1" col="9" text="촬영시간"/>
                          <Cell row="1" col="10" text="촬영의뢰진료과"/>
                          <Cell row="1" col="11" text="촬영자"/>
                          <Cell row="1" col="12" text="IO"/>
                          <Cell row="1" col="13" text="병실코드"/>
                          <Cell row="1" col="14" text="병동명"/>
                          <Cell row="1" col="15" style="align:center;" text="처방명"/>
                        </Band>
                        <Band id="body">
                          <Cell celltype="head" text="expr:currow + 1"/>
                          <Cell col="1" text="bind:deptrem"/>
                          <Cell col="2" text="bind:hngnm"/>
                          <Cell col="3" displaytype="normal" edittype="normal" style="padding:0 0 0 2;" text="bind:pid" enable="false"/>
                          <Cell col="4" displaytype="normal" text="bind:chosdd"/>
                          <Cell col="5" displaytype="normal" text="bind:chostm"/>
                          <Cell col="6" displaytype="normal" text="bind:outrmdd"/>
                          <Cell col="7" text="bind:outrmtm"/>
                          <Cell col="8" displaytype="normal" text="bind:executetodd"/>
                          <Cell col="9" text="bind:executetotm"/>
                          <Cell col="10" displaytype="normal" text="bind:orddeptnm"/>
                          <Cell col="11" text="bind:execrid1"/>
                          <Cell col="12" text="bind:ioflag"/>
                          <Cell col="13" text="bind:roomcd"/>
                          <Cell col="14" text="bind:wardnm"/>
                          <Cell col="15" style="align:left;" text="bind:prcpnm"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
          </Tabpages>
        </Tab>
        <CheckBox id="CheckBox00" taborder="9" text="예외 확인" position="absolute 156 3 308 21" truevalue="Y" value="false"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_eronly_oplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="chosdd" type="STRING" size="256"/>
          <Column id="chostm" type="STRING" size="256"/>
          <Column id="outrmdd" type="STRING" size="256"/>
          <Column id="outrmtm" type="STRING" size="256"/>
          <Column id="in_method" type="STRING" size="256"/>
          <Column id="opschedd" type="STRING" size="256"/>
          <Column id="opstrdd" type="STRING" size="256"/>
          <Column id="opstrtm" type="STRING" size="256"/>
          <Column id="openddd" type="STRING" size="256"/>
          <Column id="opendtm" type="STRING" size="256"/>
          <Column id="opdeptnm" type="STRING" size="256"/>
          <Column id="oproomcd" type="STRING" size="256"/>
          <Column id="oproomnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_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="excuroomtype" type="STRING" size="256"/>
          <Column id="leftJoin" type="STRING" size="256"/>
          <Column id="examlistSortType" type="STRING" size="256"/>
          <Column id="oplistSortType" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_eronly_examlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptrem" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="chosdd" type="STRING" size="256"/>
          <Column id="chostm" type="STRING" size="256"/>
          <Column id="outrmdd" type="STRING" size="256"/>
          <Column id="outrmtm" type="STRING" size="256"/>
          <Column id="executetodd" type="STRING" size="256"/>
          <Column id="executetotm" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="execrid1" type="STRING" size="256"/>
          <Column id="prcpnm" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="roomcd" type="STRING" size="256"/>
          <Column id="wardnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.input_refFrDT" propid="value" datasetid="ds_cond" columnid="fromdd"/>
      <BindItem id="item1" compid="group2.input_refToDT" propid="value" datasetid="ds_cond" columnid="todd"/>
      <BindItem id="item10" compid="group2.ipt_pid" propid="value" datasetid="ds_cond" columnid="pid"/>
      <BindItem id="item2" compid="group2.divExamCond.Radio00" propid="value" datasetid="ds_cond" columnid="excuroomtype"/>
      <BindItem id="item3" compid="CheckBox00" propid="value" datasetid="ds_cond" columnid="leftJoin"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	        :	김현석
 * Make Date 		:	2019-05-27
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2019-05-27	  
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

/******************************************************************
 * Argument          : 
 * Description       : 초기화
 ******************************************************************/
function SMMNP21100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMMNP21100_onload(obj:Form, e:LoadEventInfo)
{
	ds_main_eronly_oplist.clearData();
	var setDate = utlf_getCurrentDate();

	ds_cond.setColumn(0, "fromdd", setDate.substr(0, 6) + "01");
	ds_cond.setColumn(0, "todd", setDate);
	
	ds_cond.setColumn(0, "excuroomtype", "XRAY");
	
	
	ds_cond.setColumn(0, "leftJoin", "");
	
	//속도개선
	group2.divExamCond.visible= false;
			
//  	grdf_initGrid(Tab00.tabpage1.grd_eronly_oplist);
//  	grdf_initGrid(Tab00.tabpage2.grd_eronly_examlist);		
	//lf_InitCotrolSetting(this.components, "", "");
		
}

function lf_InitCotrolSetting(objComponent, Objparent, parentName)
{
	if ( ! utlf_isNull( objComponent ) )
	{
		if ( ! utlf_isNull( Objparent) )
		{				
			parentName += Objparent.name + ".";
		}
		
		for (var i = 0; i < objComponent.length; i++)
		{		
			switch ( objComponent[i] ) 
			{
				case "[object Grid]":
					grdf_initGrid ( eval(parentName + objComponent[i].name) );						
				break;
			}			
			lf_InitCotrolSetting(objComponent[i].components, objComponent[i], parentName);			
		}
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 조회 button event
 ******************************************************************/
function group2_btn_srch_onclick(obj:Button,  e:ClickEventInfo)
{

	switch (Tab00.tabindex)
	{
		case "0":
			var oParam = {};
				oParam.id          = "TRMNP20401";
				oParam.service     = "opanstapp.OpAnstPatMngt";
				oParam.method      = "reqGetOpRegListErOnly";
				oParam.inds        = "cond=ds_cond";
				oParam.outds       = "ds_main_eronly_oplist=oplist";
				oParam.async       = false;
				//oParam.callback    = "cf_TRMNP20401";

			tranf_submit(oParam);
			
			break;
			
		case "1":
		
			var oParam = {};
				oParam.id          = "TRMNP20402";
				oParam.service     = "examcurestatsapp.ImgMediSc";
				oParam.method      = "reqGetErOnlyExamList";
				oParam.inds        = "cond=ds_cond";
				oParam.outds       = "ds_main_eronly_examlist=examlist";
				oParam.async       = false;
			
			break;
	}
	tranf_submit(oParam);
}

/******************************************************************
 * Argument          : 
 * Description       : 엑셀저장 button event
 ******************************************************************/
function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	var fromdd = ds_cond.getColumn(0, "fromdd");
	var todd = ds_cond.getColumn(0, "todd");
		
	var title = Tab00.tabpages[Tab00.tabindex].text;		
	switch (Tab00.tabindex)
	{
		case 0:
			if (ds_main_eronly_oplist.rowcount > 0)
			{
				grdf_exportExcel( grd_eronly_oplist, title + "("+ fromdd +"-"+ todd +")", title , false, "", "user", false);
			}			
			break;
		
		case 1:
			if (ds_main_eronly_examlist.rowcount > 0)
			{
				grdf_exportExcel(Tab00.tabpage2.grd_eronly_examlist, title + "("+ fromdd +"-"+ todd +")", ds_cond.getColumn(0, "excuroomtype") , false, "", "user", false);
			}			
		break;
		
		default:
			return;
	}	
}

/******************************************************************
 * Argument          : 
 * Description       : 출력 button event
 ******************************************************************/
function btn_report_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_cond.updatecontrol = true;
	switch (Tab00.tabindex)
	{
		case 0:
			var objDOM = rptf_createDOM();
			rptf_setNodeListToDOM(objDOM, "/root/main/oplistEronly/oplist", ds_main_eronly_oplist);
			rptf_setNodeListToDOM(objDOM, "/root/cond", ds_cond);
			
			var objParam = new Object();
				objParam.xml_data_XML1 = objDOM.documentElement.source;          // 최상의노드 XML 스트링 추출
			
			var option = ""; 
			rptf_exeReportPreview30(["RPMNP21100"],[objParam], option);
			break;
			
		case 1:
			var objDOM = rptf_createDOM();
			rptf_setNodeListToDOM(objDOM, "/root/main/examlistEronly/examlist", ds_main_eronly_examlist);
			rptf_setNodeListToDOM(objDOM, "/root/cond", ds_cond);
			
			var objParam = new Object();
				objParam.xml_data_XML1 = objDOM.documentElement.source;          // 최상의노드 XML 스트링 추출
			
			var option = ""; 
			rptf_exeReportPreview30(["RPAES06000"],[objParam], option);
			break;
			
		default:
			break;
	}			
}

function Tab00_onchanged(obj:Tab, e:TabIndexChangeEventInfo)
{
	group2.divExamCond.visible= (Tab00.tabindex == 1 ? true : false);
}

function group2_divExamCond_Radio00_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	ds_main_eronly_examlist.clearData();
}

function Tab00_tabpage2_grd_eronly_examlist_onheadclick(obj:Grid, e:GridClickEventInfo)
{	
	var colName = obj.getCellProperty("Body", e.col, "text").replace("bind:","");

	var sortType = (ds_cond.getColumn(0, "examlistSortType") == "-"? "":"-");
	
	ds_cond.setColumn(0, "examlistSortType", sortType );
		
	ds_main_eronly_examlist.keystring = "S:" + sortType + colName; 
}

function Tab00_tabpage1_grd_eronly_oplist_onheadclick(obj:Grid, e:GridClickEventInfo)
{
	var colName = obj.getCellProperty("Body", e.col, "text").replace("bind:","");

	var sortType = (ds_cond.getColumn(0, "oplistSortType") == "-"? "":"-");
	
	ds_cond.setColumn(0, "oplistSortType", sortType );
		
	ds_main_eronly_oplist.keystring = "S:" + sortType + colName; 
}
]]></Script>
  </Form>
</FDL>