YNU_JEUS/app_home/himed/xpapps/emr/ercarexp/xp/SMMNE04101_진단변경환자.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMNE04101" position="absolute 0 0 1223 783" titletext="응급진료정보 진단변경내역" oninit="SMMNE04101_oninit" onload="SMMNE04101_onload" ontimer="SMMNE04101_ontimer">
    <Layouts>
      <Layout>
        <Div id="group6" taborder="0" position="absolute 0 25 1194 65" class="div_SA">
          <Layouts>
            <Layout>
              <Calendar id="input1" taborder="2" class="input_s_essential" position="absolute 69 9 164 30" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true" autoskip="true"/>
              <Static id="caption16" text="~" position="absolute 168 14 176 27" anchor="default"/>
              <Calendar id="input2" taborder="3" class="input_s_essential" position="absolute 180 9 275 30" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true"/>
              <Button id="button2" taborder="6" text="조회" class="btn1" position="absolute 1048 10 1104 32" anchor="top right" onclick="group6_button2_onclick"/>
              <Button id="button8" taborder="8" text="엑셀저장" class="btn7" position="absolute 1108 10 1188 32" anchor="top right" onclick="group6_button8_onclick"/>
              <Shape id="line5" linetype="vertical" class="line_4" position="absolute 1038 10 1044 32" anchor="top right"/>
              <Static id="Static00" text="일자" position="absolute 9 9 60 29" class="search_name"/>
              <Edit id="Edit00" taborder="9" position="absolute 472 11 572 31"/>
              <Static id="Static01" class="search_name" position="absolute 389 13 464 33" text="등록번호"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape id="line6" linetype="horizontal" class="line_1" position="absolute 0 93 1194 99" anchor="left top right"/>
        <Grid id="grd_datagrid3" taborder="1" binddataset="ds_main_list" useinputpanel="false" position="absolute 0 99 1194 769" autofittype="none" anchor="all" oncelldblclick="grd_datagrid3_oncelldblclick" cellsizingtype="both">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="116"/>
                <Column size="75"/>
                <Column size="57"/>
                <Column size="67"/>
                <Column size="60"/>
                <Column size="78"/>
                <Column size="75"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="122"/>
                <Column size="321"/>
                <Column size="354"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="진단입력(수정)일"/>
                <Cell col="1" text="내원일자"/>
                <Cell col="2" text="내원시간"/>
                <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"/>
                <Cell col="10" text="구분"/>
                <Cell col="11" text="변경전 진단"/>
                <Cell col="12" text="변경후 진단"/>
              </Band>
              <Band id="body">
                <Cell displaytype="expr:expr:utlf_isNull(modifieddd) ? '' : 'date'" text="bind:modifieddd"/>
                <Cell col="1" text="bind:eragindt" mask="####-##-##"/>
                <Cell col="2" displaytype="normal" style="align:center middle;" text="bind:eragintm" mask="##:##"/>
                <Cell col="3" text="bind:eragidno"/>
                <Cell col="4" text="bind:patnm"/>
                <Cell col="5" displaytype="expr:utlf_isNull(eroutdt) ? '' : 'date'" text="bind:eroutdt"/>
                <Cell col="6" displaytype="expr:utlf_isNull(eragoudd) ? '' : 'date'" text="bind:eragoudd"/>
                <Cell col="7" text="bind:cretno"/>
                <Cell col="8" text="bind:indd"/>
                <Cell col="9" text="bind:ordtype"/>
                <Cell col="10" text="bind:gbn"/>
                <Cell col="11" style="align:left;" text="bind:b_diagtermcds"/>
                <Cell col="12" style="align:left;" text="bind:diagtermcds"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption18" text="전송완료 환자중 진단변경 이력이 존재하는 내역" class="tit_2" position="absolute 0 78 388 96"/>
        <Static id="caption6" text="응급진료정보 진단변경내역(퇴원분석 기준)" class="tit_1" position="absolute 0 0 300 25"/>
        <Shape id="line00" class="line_10" position="absolute 0 94 1194 100" anchor="left top right"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="b_diagtermcds" type="STRING"/>
          <Column id="diagtermcds" type="STRING"/>
          <Column id="eragindt" type="STRING"/>
          <Column id="eragintm" type="STRING"/>
          <Column id="eragidno" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="grdrage" type="STRING"/>
          <Column id="eragcmmt" type="STRING"/>
          <Column id="eragupdt" type="STRING"/>
          <Column id="eroutdt" type="STRING"/>
          <Column id="eragoudd" type="STRING"/>
          <Column id="cretno" type="STRING"/>
          <Column id="indd" type="STRING"/>
          <Column id="ordtype" type="STRING"/>
          <Column id="modifieddd" type="STRING"/>
          <Column id="ptmiotdt" type="STRING"/>
          <Column id="ptmidcdt" type="STRING"/>
          <Column id="gbn" type="STRING" size="256"/>
        </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="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="srchflag" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="srchkind" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchflag">A</Col>
            <Col id="srchkind">2</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_trsmitem" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdid">Y</Col>
            <Col id="cdnm">전송완료</Col>
          </Row>
          <Row>
            <Col id="cdid">E</Col>
            <Col id="cdnm">전송에러</Col>
          </Row>
          <Row>
            <Col id="cdid">N</Col>
            <Col id="cdnm">전송대기</Col>
          </Row>
          <Row>
            <Col id="cdid">F</Col>
            <Col id="cdnm">전송대기</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_trsmlistinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_ptmistat" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">전송오류</Col>
            <Col id="value">E</Col>
          </Row>
          <Row>
            <Col id="label">삭제</Col>
            <Col id="value">K</Col>
          </Row>
          <Row>
            <Col id="label">실시간전송</Col>
            <Col id="value">H</Col>
          </Row>
          <Row>
            <Col id="label">퇴실전송</Col>
            <Col id="value">G</Col>
          </Row>
          <Row>
            <Col id="label">재검토필요</Col>
            <Col id="value">B</Col>
          </Row>
          <Row>
            <Col id="label">재검토필요</Col>
            <Col id="value">Y</Col>
          </Row>
          <Row>
            <Col id="label">퇴원전송</Col>
            <Col id="value">S</Col>
          </Row>
          <Row>
            <Col id="label">재검토필요</Col>
            <Col id="value">N</Col>
          </Row>
          <Row>
            <Col id="label">재검토필요</Col>
            <Col id="value">Z</Col>
          </Row>
          <Row>
            <Col id="label">기타</Col>
            <Col id="value">AA</Col>
          </Row>
          <Row>
            <Col id="label"/>
            <Col id="value"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item1" compid="group6.input1" propid="value" datasetid="ds_main_cond" columnid="fromdd"/>
      <BindItem id="item2" compid="group6.input2" propid="value" datasetid="ds_main_cond" columnid="todd"/>
      <BindItem id="item0" compid="group6.Edit00" propid="value" datasetid="ds_main_cond" columnid="pid"/>
    </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";
include "emr_carecomxp::CareCom.xjs";
include "emr_prcpmngtxp::MMO001.xjs";

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

function SMMNE04101_onload(obj:Form, e:LoadEventInfo)
{
	grdf_setGridSort(grd_datagrid3);
	var sTodt = getDateAddc(utlf_getCurrentDate(), -1);
	var sFrdt = getDateAddc(utlf_getCurrentDate(), -1);
	ds_main_cond.setColumn(0, "fromdd", sFrdt);
	ds_main_cond.setColumn(0, "todd"    , sTodt);
	
}


/******************************************************************
 * Argument          : 
 * Description       : 조회 button event
 ******************************************************************/
function group6_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_send.clear();
	ds_main_list.clearData();
	
	var oParam = {};
		oParam.id          = "reqGetErPatDiagHist_01";
		oParam.service     = "ercareapp.ERPatMngt";
		oParam.method      = "reqGetErPatDiagHist";
		oParam.inds        = "req=ds_main_cond";
		oParam.outds       = "ds_main_list=diaglist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNE04101";

	tranf_submit(oParam);
}



function group6_button8_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_main_list.rowcount > 0 ){
		grdf_exportExcel(grd_datagrid3, "진단변경내역", "진단변경내역", false, "", "user", false);
	} else {
		sysf_messageBox("조회된 데이터가 ", "I004");
	}
}
]]></Script>
  </Form>
</FDL>