YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SMMMO16900_PCA리스트.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMMO16900" position="absolute 0 0 1175 730" titletext="PCA 환자리스트" onload="SMMMO16900_onload">
    <Layouts>
      <Layout>
        <Button position="absolute 840 45 885 65" id="btn_patsrch" enable="false" text="" onclick="btn_patsrch_onclick"/>
        <Button position="absolute 550 47 595 67" id="btn_reqpatnm" enable="false" text="" onclick="btn_reqpatnm_onclick"/>
        <Div position="absolute 0 16 1175 76" id="roundrect1" class="div_SA" anchor="left top right"/>
        <Calendar position="absolute 232 24 330 43" id="input11" class="input_s_essential" taborder="1" autoselect="true"/>
        <Static text="수 술 일 :" position="absolute 147 25 223 42" id="caption11" class="search_name"/>
        <Static text="집 도 과 :" position="absolute 366 24 442 41" id="caption12" class="search_name"/>
        <Shape position="absolute 0 97 1175 103" linetype="horizontal" id="line6" class="line_10"/>
        <Static text="PCA 환자 리스트" position="absolute 0 81 126 97" align="align:center middle;" id="caption2" class="tit_2"/>
        <Static text="명" position="absolute 97 23 127 43" align="align:center middle;" id="caption1"/>
        <Static text="총" position="absolute 5 23 55 40" id="caption7" class="search_name"/>
        <Static position="absolute 56 23 92 43" align="align:center middle;" id="caption3"/>
        <Shape position="absolute 1097 23 1103 67" linetype="vertical" id="line3" anchor="top right"/>
        <Static text="병    동" position="absolute 147 49 227 66" id="caption10" class="search_name"/>
        <Static text="집 도 의 :" position="absolute 651 25 727 42" id="caption4" class="search_name"/>
        <Edit position="absolute 451 48 549 67" id="ipt_pid" class="input_search" taborder="6" autoselect="true" onkeydown="ipt_pid_onkeydown"/>
        <Static text="환 자 명" position="absolute 651 50 727 67" id="caption5" class="search_name"/>
        <Static text="등록번호 :" position="absolute 366 49 442 66" id="caption6" class="search_name"/>
        <Edit position="absolute 737 48 835 67" id="input1" class="input_search" taborder="7" autoselect="true" onkeydown="input1_onkeydown"/>
        <Button position="absolute 1111 35 1167 57" id="btn_req" class="btn1" taborder="8" text="조회" anchor="top right" onclick="btn_req_onclick"/>
        <Button position="absolute 555 50 571 66" id="btn_prcpclsnm" class="icon_search" text="" onclick="btn_prcpclsnm_onclick"/>
        <Combo position="absolute 451 24 620 43" id="cmb_orddept" class="combo" taborder="2" innerdataset="@ds_init_orddept" datacolumn="depthngnm" codecolumn="deptcd"/>
        <Grid position="absolute 0 102 1175 730" id="grd_pcapatlist" taborder="9" binddataset="ds_main_pcapatinfo_pcapatlist" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25" band="left"/>
                <Column size="63"/>
                <Column size="77"/>
                <Column size="87"/>
                <Column size="63"/>
                <Column size="120"/>
                <Column size="90"/>
                <Column size="287"/>
                <Column size="343"/>
                <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="등록번호"/>
                <Cell col="3" text="환자명"/>
                <Cell col="4" text="S/A"/>
                <Cell col="5" text="집도과"/>
                <Cell col="6" text="집도의"/>
                <Cell col="7" text="진단명"/>
                <Cell col="8" text="수술명"/>
                <Cell col="9" text="instcd"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow + 1"/>
                <Cell col="1" text="bind:roomcd" enable="false"/>
                <Cell col="2" text="bind:pid"/>
                <Cell col="3" text="bind:hngnm"/>
                <Cell col="4" text="bind:sa"/>
                <Cell col="5" text="bind:perfdeptcd" enable="false"/>
                <Cell col="6" text="bind:perfdrnm"/>
                <Cell col="7" text="bind:diagnm"/>
                <Cell col="8" text="bind:opnm"/>
                <Cell col="9" text="bind:instcd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Combo position="absolute 737 25 835 44" id="cmb_orddrid" taborder="3" innerdataset="@ds_init_userlist" datacolumn="usernm" codecolumn="userid"/>
        <Combo position="absolute 232 48 330 67" id="cmb_wardcd" taborder="5" innerdataset="@ds_init_orddept2" datacolumn="depthngnm" codecolumn="deptcd"/>
        <Combo position="absolute 946 25 1044 44" id="cmb_anstdrid" taborder="4" innerdataset="@ds_init_userlist2" datacolumn="usernm" codecolumn="userid"/>
        <Static text="마 취 의" position="absolute 860 25 936 42" id="caption8" class="search_name"/>
        <Static text="PCA 환자 리스트" position="absolute 0 0 135 16" id="caption9" class="tit_1"/>
        <Button position="absolute 1125 78 1175 97" id="button1" class="btn7" text="엑셀" anchor="top right" onclick="button1_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_orddept" 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_pcapatinfo_pcapatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="roomcd" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="sa" type="STRING"/>
          <Column id="perfdeptcd" type="STRING"/>
          <Column id="perfdrnm" type="STRING"/>
          <Column id="diagnm" type="STRING"/>
          <Column id="opnm" type="STRING"/>
          <Column id="instcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_userlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="usernm" type="STRING"/>
          <Column id="userid" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_orddept2" 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_init_userlist2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="usernm" type="STRING"/>
          <Column id="userid" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_hardcdno" 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" oncolumnchanged="ds_main_cond_oncolumnchanged">
        <ColumnInfo>
          <Column id="opcnfmdd" type="STRING" size="256"/>
          <Column id="perfdeptcd" type="STRING" size="256"/>
          <Column id="perfdrid" type="STRING" size="256"/>
          <Column id="wardcd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="anstdrid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="opcnfmdd"/>
            <Col id="perfdeptcd"/>
            <Col id="perfdrid"/>
            <Col id="wardcd"/>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="anstdrid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_totcnt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="totcnt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="totcnt"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="input11" propid="value" datasetid="ds_main_cond" columnid="opcnfmdd"/>
      <BindItem id="item1" compid="caption3" propid="text" datasetid="ds_main_totcnt" columnid="totcnt"/>
      <BindItem id="item2" compid="ipt_pid" propid="value" datasetid="ds_main_cond" columnid="pid"/>
      <BindItem id="item3" compid="input1" propid="value" datasetid="ds_main_cond" columnid="hngnm"/>
      <BindItem id="item4" compid="cmb_orddept" propid="value" datasetid="ds_main_cond" columnid="perfdeptcd"/>
      <BindItem id="item5" compid="cmb_orddrid" propid="value" datasetid="ds_main_cond" columnid="perfdrid"/>
      <BindItem id="item6" compid="cmb_wardcd" propid="value" datasetid="ds_main_cond" columnid="wardcd"/>
      <BindItem id="item7" compid="cmb_anstdrid" propid="value" datasetid="ds_main_cond" columnid="anstdrid"/>
    </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_prcpmngtxp::MMO001.xjs";
//include "emr_prcpmngtxp::SMMMO04100.xjs";

//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var arErrorCode = new HashArray();


//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: 01.grdObj
 *					  02.title
 * Description		: 엑셀저장
 ****************************************************************************************/
function fsaveGridToExcel(grdObj, title){
	grdf_exportExcel(grdObj, title, title);
	//	grdObj.saveExcel(fileName, title, true, true, "", "", true);
}	

/****************************************************************************************
 * Argument			: N/A
 * Description		: 환자 조회
 ****************************************************************************************/
function fPCAPatList() {
	ds_main_pcapatinfo_pcapatlist.clearData();
	var oParam = {};
		oParam.id          = "TRMMO16901";
		oParam.service     = "prcpmngtapp.EtcPrcpMngt";
		oParam.method      = "reqGetPCAPatList";
		oParam.inds        = "req=ds_main_cond";
		oParam.outds       = "ds_main_pcapatinfo_pcapatlist=pcapatlist";
		oParam.async       = false;

	tranf_submit(oParam);
}	

/****************************************************************************************
 * Argument			: 01.s_val
 *					  02.flag
 * Description		: 환자 등록번호를 통한 환자 이름 가져오기
 ****************************************************************************************/
function fPatSrch(s_val, flag){

    var nPid = "";
    var nHngnm = "";
    
    if(flag == "1"){                          
		nPid = s_val;
	}
	if(flag == "2"){
		nHngnm = s_val;
	}
    dsf_createDsRow("ds_tmp", [{col:"srchcond", type:"STRING", size:256, val:flag}
                            , {col:"autoflag", type:"STRING", size:256, val:"Y"}
                            , {col:"pid", type:"STRING", size:256, val:nPid}
                            , {col:"hngnm", type:"STRING", size:256, val:nHngnm}
                            , {col:"rrgstno1", type:"STRING", size:256, val:""}
                            , {col:"rrgstno2", type:"STRING", size:256, val:""}
                            , {col:"acptdd", type:"STRING", size:256, val:""}
                            ]);
                                
                                
    if( this.objects["ds_patinfolist"] != null ) ds_patinfolist.clearData();
    
    var objArg = new Object();
	objArg.arg_ds_send = ds_tmp;
    frmf_modal("SPPMC02500", "SPPMC02500", objArg, false, 1, 10, 10, null, null, null, null, null, "M");
}

//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Components ID	: SMMMO16900
 * Event			: onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 초기화
 ****************************************************************************************/
function SMMMO16900_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);
	
	grdf_setToolTipBind(grd_pcapatlist);
	grdf_setGridSort(grd_pcapatlist)
	
	lf_reqHardCodeInfo(ds_init_hardcdno, 18);			                                      			//마취통증의학과 부서코드 조회      
	var anstdeptcd = ds_init_hardcdno.getColumn(0, "hardcd");
	
	
	lf_mmbfGetDeptCodeComboList(ds_init_orddept, "D");              	            		//부서콤보 조회
	frmf_addComboItem("cmb_orddept");                          								//부서콤보 Item '전체'추가
		
	lf_mmbfGetDeptCodeComboList(ds_init_orddept2, "W");				 					//병동코드 콤보
	frmf_addComboItem("cmb_wardcd");		      											//병동콤보 전체항목 추가
	
	lf_mmbfGetUserComboList(ds_init_userlist , sysf_getUserInfo("dutplcecd"), "0330");  	//의사콤보 조회
	//frmf_addComboItem("cmb_orddrid");                       								//의사콤보 Item '전체'추가
	
	lf_mmbfGetUserComboList(ds_init_userlist2, anstdeptcd, "0330");               		//마취통증의학과 의사콤보 조회
	frmf_addComboItem("cmb_anstdrid");                       								//의사콤보 Item '전체'추가
	
	
	ds_main_cond.setColumn(0, "opcnfmdd", utlf_getCurrentDate());
	ds_main_cond.setColumn(0, "perfdeptcd", "-");
	ds_main_cond.setColumn(0, "perfdrid", "-");
	ds_main_cond.setColumn(0, "anstdrid", "-");
	ds_main_cond.setColumn(0, "wardcd", "-");
	
}

/****************************************************************************************
 * Components		: Edit
 * Components ID	: ipt_pid
 * Event			: onkeydown
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 환자 조회
 ****************************************************************************************/
function ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if( e.keycode == 13 ){
		obj.updateToDataset();
		btn_reqpatnm.click();
	}
}

/****************************************************************************************
 * Components		: Edit
 * Components ID	: input1
 * Event			: onkeydown
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 환자 조회
 ****************************************************************************************/
function input1_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if( e.keycode == 13 ){
		obj.updateToDataset();
		btn_patsrch.click();
	}
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: btn_req
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: PCA 리스트조회
 ****************************************************************************************/
function btn_req_onclick(obj:Button,  e:ClickEventInfo)
{
	fPCAPatList();
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: btn_prcpclsnm
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 환자 조회
 ****************************************************************************************/
function btn_prcpclsnm_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SPPMC02500", "SPPMC02500", null, null, null, null, null, null, null, null, null, null, "M");
					
	var sPid = ds_patinfolist.getColumn(0, "pid");
	var sHngnm = ds_patinfolist.getColumn(0, "hngnm");
	ds_main_cond.setColumn(0, "pid", sPid);
	ds_main_cond.setColumn(0, "hngnm", sHngnm);
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: btn_reqpatnm
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 환자 조회
 ****************************************************************************************/
function btn_reqpatnm_onclick(obj:Button,  e:ClickEventInfo)
{
	var pid = ds_main_cond.getColumn(0, "pid");
	var hngnm = ds_main_cond.getColumn(0, "hngnm");
	if((utlf_isNull(pid))&&(!utlf_isNull(hngnm))){
		fPatSrch(hngnm, "2");
	} else if((!utlf_isNull(pid))&&(utlf_isNull(hngnm))){
		fPatSrch(pid, "1");
	} else {
		frmf_modal("SPPMC02500", "SPPMC02500", null, null, null, null, null, null, null, null, null, null, "M");
	}
	
	ds_main_cond.setColumn(0, "pid", ds_patinfolist.getColumn(0, "pid"));
	ds_main_cond.setColumn(0, "hngnm", ds_patinfolist.getColumn(0, "hngnm"));
}

/****************************************************************************************
 * Components		: Dataset
 * Components ID	: ds_main_cond
 * Event			: oncolumnchanged
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: -
 ****************************************************************************************/
function ds_main_cond_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if( e.columnid == "perfdeptcd" ){
		ds_init_userlist.clearData();
		lf_mmbfGetUserComboList(ds_init_userlist, cmb_orddept.value, "0330");               		//집도의 조회
		//frmf_addComboItem("cmb_orddrid"); 

		var deptcd = ds_main_cond.getColumn(0, "perfdeptcd");
		if (deptcd == "-") {
			frmf_addComboItem("cmb_orddrid");
			ds_main_cond.setColumn(0, "perfdrid", "-");
		} else {
			frmf_addComboItem("cmb_orddrid");
			ds_main_cond.setColumn(0, "perfdrid", "-");
		}
	}
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: btn_patsrch
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 환자 조회
 ****************************************************************************************/
function btn_patsrch_onclick(obj:Button,  e:ClickEventInfo)
{
	var pid = ds_main_cond.getColumn(0, "pid");
	var hngnm = ds_main_cond.getColumn(0, "hngnm");
	if((utlf_isNull(pid))&&(!utlf_isNull(hngnm))){
		fPatSrch(hngnm, "2");
	} else if((!utlf_isNull(pid))&&(utlf_isNull(hngnm))){
		fPatSrch(pid, "1");
	} else {
		frmf_modal("SPPMC02500", "SPPMC02500", null, null, null, null, null, null, null, null, null, null, "M");
	}
	
	ds_main_cond.setColumn(0, "pid", ds_patinfolist.getColumn(0, "pid"));
	ds_main_cond.setColumn(0, "hngnm", ds_patinfolist.getColumn(0, "hngnm"));
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: button1
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 엑셀저장
 ****************************************************************************************/
function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var title = "PCA 환자 리스트";
	fsaveGridToExcel(grd_pcapatlist, title);
}
]]></Script>
  </Form>
</FDL>