YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO50500_재원환자조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.4">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO50500" position="absolute 0 0 1010 732" titletext="재원환자조회" oninit="SPMMO50500_oninit" onload="SPMMO50500_onload">
    <Layouts>
      <Layout>
        <Static text="재원환자조회" position="absolute 0 0 160 25" align="align:center middle;" id="caption9" class="tit_1"/>
        <Div id="Div00" taborder="1" position="absolute 0 25 1010 65" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Static text="구분 :" position="absolute 11 10 106 30" align="align:center middle;" id="caption4" class="search_name"/>
              <Radio position="absolute 70 10 300 30" id="radio1" columncount="4" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="Div00_radio1_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">T</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">I</Col>
                      <Col id="datacolumn">병동</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">E</Col>
                      <Col id="datacolumn">응급</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">D</Col>
                      <Col id="datacolumn">DSC</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Static text="진 료 과 :" position="absolute 309 10 395 30" align="align:center middle;" id="caption1" class="search_name"/>
              <Combo position="absolute 393 10 540 30" id="cmb_orddept" innerdataset="@ds_orddept" datacolumn="depthngnm" codecolumn="deptcd" onitemchanged="Div00_cmb_orddept_onitemchanged"/>
              <Static text="전 문 의 :" position="absolute 553 10 648 30" align="align:center middle;" id="caption5" class="search_name"/>
              <Combo position="absolute 640 10 725 30" id="cmb_orddrid" class="combo_default" innerdataset="ds_orddrid" datacolumn="usernm" codecolumn="userid" onitemchanged="Div00_cmb_orddrid_onitemchanged"/>
              <Button position="absolute 870 10 926 30" id="btn_print" class="btn6" text="출력" onclick="Div00_btn_print_onclick" anchor="top right"/>
              <Button position="absolute 940 10 996 30" id="btn_req" class="btn1" text="조회" onclick="Div00_btn_req_onclick" anchor="top right"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="datagrid1" taborder="2" binddataset="ds_patlist" useinputpanel="false" position="absolute 0 72 1010 732" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="20"/>
                <Column size="40"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="100"/>
                <Column size="50"/>
                <Column size="110"/>
                <Column size="75"/>
                <Column size="75"/>
                <Column size="271"/>
                <Column size="110"/>
              </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="성명"/>
                <Cell col="5" text="S/A"/>
                <Cell col="6" text="진료과"/>
                <Cell col="7" text="전문의"/>
                <Cell col="8" text="담당의"/>
                <Cell col="9" text="진단명"/>
                <Cell col="10" text="내원일시"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow + 1"/>
                <Cell col="1" displaytype="combo" edittype="combo" text="bind:ordtype" combodataset="ds_ordtype" combocodecol="value" combodatacol="label"/>
                <Cell col="2" text="bind:roomcd"/>
                <Cell col="3" text="bind:pid"/>
                <Cell col="4" text="bind:hngnm"/>
                <Cell col="5" text="bind:sa"/>
                <Cell col="6" text="bind:orddeptnm"/>
                <Cell col="7" text="bind:orddrnm"/>
                <Cell col="8" text="bind:atdoctnm"/>
                <Cell col="9" style="align:left middle;" text="bind:diagnm"/>
                <Cell col="10" text="bind:indt" mask="####-##-## ##:##"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_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_orddrid" 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_patlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="ordtype" type="STRING"/>
          <Column id="roomcd" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="sa" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="orddrnm" type="STRING"/>
          <Column id="atdoctnm" type="STRING"/>
          <Column id="diagnm" type="STRING"/>
          <Column id="indt" type="STRING"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchdd" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="ordgubun" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="orddrnm" type="STRING" size="256"/>
          <Column id="ordgubunnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="ordgubun">T</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_ordtype" 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">I</Col>
          </Row>
          <Row>
            <Col id="label">응급</Col>
            <Col id="value">E</Col>
          </Row>
          <Row>
            <Col id="label">DSC</Col>
            <Col id="value">D</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="Div00.radio1" propid="value" datasetid="ds_cond" columnid="ordgubun"/>
      <BindItem id="item1" compid="Div00.cmb_orddept" propid="value" datasetid="ds_cond" columnid="orddeptcd"/>
      <BindItem id="item2" compid="Div00.cmb_orddrid" propid="value" datasetid="ds_cond" columnid="orddrid"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-08-28
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-08-28      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
 
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";

function SPMMO50500_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
	grdf_initGrid(datagrid1);
}

function SPMMO50500_onload(obj:Form, e:LoadEventInfo)
{
	grdf_setToolTipBind(datagrid1);
	
	ds_cond.setColumn(0, "srchdd"   ,  utlf_getCurrentDate()); //종료일자는 현재일자
	
	setDeptCodeList(sysf_getUserInfo("dutplcecd"));
	setUserList(Div00.cmb_orddept.value);
	
	Div00.btn_req.onclick.fireEvent(Div00.btn_req, new ClickEventInfo);
}

function Div00_radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	Div00.btn_req.onclick.fireEvent(Div00.btn_req, new ClickEventInfo);
}

function Div00_cmb_orddept_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	if(obj.value != "-") {
		setUserList(obj.value);
		Div00.btn_req.onclick.fireEvent(Div00.btn_req, new ClickEventInfo);
	}
}

function Div00_cmb_orddrid_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	Div00.btn_req.onclick.fireEvent(Div00.btn_req, new ClickEventInfo);
}

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

function Div00_btn_req_onclick(obj:Button,  e:ClickEventInfo)
{
	fReqGetPatList();
}

function setDeptCodeList(sDeptcd){
	lf_mmbfGetDeptCodeComboList(ds_orddept, "A");	 //부서코드 콤보	
	frmf_addComboItem("Div00.cmb_orddept");     //부서콤보 Item '전체'추가	
	Div00.cmb_orddept.value = sDeptcd;	//진료과
}

function setUserList(sOrddeptcd){
	if(sOrddeptcd != "-") {
		lf_mmbfGetUserComboList(ds_orddrid,  sOrddeptcd, "0330", "", "M", "", "", "P");		
	}
	
	frmf_addComboItem("Div00.cmb_orddrid");  //의사콤보 전체항목 추가		
	Div00.cmb_orddrid.value = "-";	
}

function fReqGetPatList() {	
	var oParam = {};
		oParam.id      = "TRMMO50501";
		oParam.service = "prcpmngtapp.EtcPrcpMngt";
		oParam.method  = "reqGetSearchPatlist";
		oParam.inds    = "req=" + "ds_cond";
		oParam.outds   = "ds_patlist=patlist";
		oParam.async   = true;

	tranf_submit(oParam);
}

/**
 * @desc   : 재원환자 리스트 출력
 * @
 * @param  :
 * @return : 
 * @author : 엄영만
 * @---------------------------------------------------
 */
function fPrtPatList() {
	if(utlf_isNull(ds_cond.getColumnInfo("orddeptnm"))) ds_cond.addColumn("orddeptnm", "string");
	if(utlf_isNull(ds_cond.getColumnInfo("orddrnm"))) ds_cond.addColumn("orddrnm", "string");
	if(utlf_isNull(ds_cond.getColumnInfo("ordgubunnm"))) ds_cond.addColumn("ordgubunnm", "string");
	ds_cond.setColumn(0, "orddeptnm", Div00.cmb_orddept.text);
	ds_cond.setColumn(0, "orddrnm", Div00.cmb_orddrid.text);
	ds_cond.setColumn(0, "ordgubunnm", Div00.radio1.text);
    
    var objDOM = rptf_createDOM();												// DOM 객체 설정	
	rptf_setNodeListToDOM(objDOM, "/root/main/patinfo/patlist", ds_patlist);	// 데이터셋 1	
	rptf_setNodeListToDOM(objDOM, "/root/main/cond", ds_cond);					// 데이터셋 2	
	//sysf_trace(objDOM.documentElement.source);	// XML 내용출력
	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;								// 최상의노드 XML 스트링 추출
	var option = "open=1;save=1;directprint=0;print=1;zoom=0;callback=cbf_rpt_onFinishPrintXML";
	rptf_exeReportPreview30(["RPMMO50500"],[objParam], option);
}]]></Script>
  </Form>
</FDL>