YNU_JEUS/app_home/himed/xpapps/emr/spclcarexp/xp/SMMNS00800_진료대상자리스트.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMNS00800" position="absolute 0 0 1200 798" titletext="전문간호환자리스트" oninit="SMMNS00800_oninit" onload="SMMNS00800_onload" onclose="SMMNS00800_onclose" onkeydown="SMMNS00800_onkeydown" ontimer="SMMNS00800_ontimer">
    <Layouts>
      <Layout>
        <Tab id="Tab00" taborder="1" tabindex="0" scrollbars="autoboth" position="absolute 0 28 1194 792" canchange="Tab00_canchange">
          <Tabpages>
            <Tabpage id="tabpage1" text="외래" url="emr_spclcarexp::SMMNS00900_외래환자리스트.xfdl"/>
            <Tabpage id="tabpage2" text="입원" url="emr_spclcarexp::SMMNS01000_입원환자리스트.xfdl"/>
            <Tabpage id="tabpage3" text="응급" url="emr_spclcarexp::SMMNS01100_응급환자리스트.xfdl"/>
            <Tabpage id="tabpage4" text="수술" url="emr_spclcarexp::SMMNS01200_수술환자리스트.xfdl"/>
            <Tabpage id="tabpage5" text="환자검색" url="emr_spclcarexp::SMMNS01300_환자검색.xfdl"/>
            <Tabpage id="tabpage6" text="의뢰" url="emr_spclcarexp::SMMNS01400_의뢰환자리스트.xfdl"/>
          </Tabpages>
        </Tab>
        <Static text="전문간호환자리스트" position="absolute 0 0 146 25" id="caption6" class="tit_1"/>
        <Button position="absolute 1069 28 1129 47" id="btn_excel" class="btn7" text="Excel" onclick="btn_excel_onclick"/>
        <Button position="absolute 1130 28 1194 47" id="btn_setscrn" class="btn2" text="컬럼설정" onclick="btn_setscrn_onclick"/>
        <Button position="absolute 893 28 979 47" id="button1" class="btn2" text="통합기록조회" onclick="button1_onclick"/>
        <Button position="absolute 981 28 1067 47" id="button2" class="btn2" text="통합결과조회" onclick="button2_onclick"/>
        <CheckBox position="absolute 787 28 840 48" id="bool1" visible="false" text="OCS" truevalue="Y" falsevalue="N" onclick="bool1_onclick" tooltiptext="check하시면 처방화면만 열립니다."/>
        <CheckBox position="absolute 728 28 783 48" id="bool2" visible="false" onclick="bool2_onclick" text="EMR" falsevalue="N" truevalue="Y" tooltiptext="check하시면 진료기록화면만 열립니다."/>
        <Button position="absolute 841 28 892 47" id="button3" class="btn6" text="출력" onclick="button3_onclick"/>
        <Button position="absolute 595 28 718 47" id="btn_newresult" class="btn2" visible="false" text="통합결과조회(New)" onclick="btn_newresult_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="grdid" type="STRING" size="256"/>
          <Column id="scrnid" type="STRING" size="256"/>
          <Column id="caseid" type="STRING" size="256"/>
          <Column id="ordrecflag" type="STRING" size="256"/>
          <Column id="chngflag" type="STRING" size="256"/>
          <Column id="recflag" type="STRING" size="256"/>
          <Column id="recinfo" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="grdid"/>
            <Col id="scrnid"/>
            <Col id="caseid"/>
            <Col id="ordrecflag">N</Col>
            <Col id="chngflag"/>
            <Col id="recflag">N</Col>
            <Col id="recinfo"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_interface" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_ordtab" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_envinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_checkselpatexpdept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_checkselpatorddept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_source" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="consulyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_req_aftcert" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="userdeptcd" type="STRING" size="256" sumtext="진료과"/>
          <Column id="userkind" type="STRING" size="256" sumtext="사용자종류"/>
          <Column id="execkind" type="STRING" size="256" sumtext="진료대상자블러킹:patlist"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="사용자id"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_aftcert" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="aftcertcnt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="aftcertcnt">0</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_root" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cpflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cpflag">Y</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_checkselpatorddept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_checkselpatexpdept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_reopen" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="reopenflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_cond_outpatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_cond_inpatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_cond_erpatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_cond_oppatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_cond_srchpatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_cond_cnstpatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_reopen_condlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_chngcol" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chngcolflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="chngcolflag">N</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_barcdprntsetup" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prntsetupinfo" type="STRING" size="256" sumtext="코드"/>
          <Column id="macaddr" type="STRING" size="256" sumtext="macaddr"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <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                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";
include "emr_prcpmngtxp::SMMMO04100.xjs";
include "com_commodulexp::SSZFM00901.xjs";

var arErrorCode 	= new HashArray();

function SMMNS00800_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	//폼 초기화
	fInitializeDone_SMMO04100();	// onload 시점에 Defalut로 정해진 탭을 실행하기 전에 Default 탭을 셋팅하기 위해 여기서 실행함
}

function SMMNS00800_onload(obj:Form, e:LoadEventInfo)
{
	lf_InitWndTitle("진료대상자리스트");
}

function SMMNS00800_onclose(obj:Form, e:CloseEventInfo)
{
	fSetOrdTabInfo();
}

function SMMNS00800_onkeydown(obj:Form, e:KeyEventInfo)
{
	if(e.ctrlKey && (e.keycode >= 49 && e.keycode <= 54))
		Tab00.tabindex = e.keycode - 49;
}

function SMMNS00800_ontimer(obj:Form, e:TimerEventInfo)
{
	var mainObj 	 = frmf_getMainViewer();
    var curCpObj     = mainObj.frmf_findPopup("SMMMP00800"); //활성화된 CP Main 화면 object loading

	this.killTimer(0);	

	if(!utlf_isNull(curCpObj)){curCpObj.fCloseGPS();}               //활성화된 CP Main화면이 있는 경우 close
}

function SMMMO04100_setPid(pid) {
	this.ds_source.setColumn(0, "pid", pid);
}

function SMMMO04100_getPid() {
	return this.ds_source.getColumn(0, "pid");
}

function SMMMO04100_setDSMainCond(sColumnID, val) {
	this.ds_main_cond.setColumn(0, sColumnID, val);
}

function SMMMO04100_getDSMainCond(sColumnID) {
	return this.ds_main_cond.getColumn(0, sColumnID);
}

function SMMMO04100_setDSRoot(sColumnID, val) {
	this.ds_root.setColumn(0, sColumnID, val);
}

function SMMMO04100_getDSRoot(sColumnID) {
	return this.ds_root.getColumn(0, sColumnID);
}

function btn_newresult_onclick(obj:Button,  e:ClickEventInfo)
{
	var pid = ds_source.getColumn(0, "pid");
	if(utlf_isNull(pid)){
		sysf_messageBox("통합결과조회를 검색할 환자를", "C002");
		return;
	}
}

function bool2_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	ds_main_cond.setColumn(0, "ordrecflag", 'N');
}

function bool1_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	ds_main_cond.setColumn(0, "recflag", 'N');
}

function button3_onclick(obj:Button,  e:ClickEventInfo)
{
	fPrtPatList();
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var pid = ds_source.getColumn(0, "pid");
	if(utlf_isNull(pid)){
		sysf_messageBox("통합기록조회를 검색할 환자를", "C002");
		return;
	}
	
	var mainObj = frmf_getMainViewer();
	var wndobj = frmf_findPopup("SMMRI00400");
	if(!utlf_isNull(wndobj)){
		mainObj.frmf_setParameter("SMMRI00400_param_pid", pid);
		wndobj.fInitalize();
	}else{
		mainObj.frmf_setParameter("SMMRI00400_param_pid", pid);
		mainObj.frmf_open("SMMRI00400", "SMMRI00400", null, null, 2, null, null, null, null, null, null, null, "M");
	}
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	var pid = ds_source.getColumn(0, "pid");
	if(utlf_isNull(pid)){
		sysf_messageBox("통합결과조회를 검색할 환자를", "C002");
		return;
	}

	curExamRsltObj = frmf_findPopup("SMAER00800"); //활성화된 검사결과 화면 object loading
	if(!utlf_isNull(curExamRsltObj)){
		 curExamRsltObj.ds_singdata.setColumn(0, "srchpid", pid );
		 curExamRsltObj.group3.grp_sea.btn_srch.click();
	} else {
		var mainObj = frmf_getMainViewer();
		
		dsf_createDsRow("ds_temp_SMAER00800", [{col:"srchpid", type:"string", size:256, val:pid}]);
		
		var objArg = new Object();
		objArg.arg_ds_send_singdata = ds_temp_SMAER00800;
		mainObj.frmf_open("SMAER00800", "SMAER00800", objArg, null, null, null, null, null, null, null, null, null, "M");
	}
}

function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	Tab00.components[Tab00.tabindex].fSaveGridToExcel();
}

function btn_setscrn_onclick(obj:Button,  e:ClickEventInfo)
{
	fClkBtnSetCol();
}

function Tab00_canchange(obj:Tab, e:TabIndexChangeEventInfo)
{
	changeTab(e.postindex, true);
}
]]></Script>
  </Form>
</FDL>