YNU_JEUS/app_home/himed/xpapps/pam/patinfomngtxp/xp/SMPMC04500_지정의사별환자현황.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPMC04500" position="absolute 0 0 1196 800" titletext="지정의사별재원환자조회" onload="SMPMC04500_onload" oninit="SMPMC04500_oninit">
    <Layouts>
      <Layout>
        <Grid id="grd_inpatlist" taborder="4" binddataset="ds_main_grdInPatList" useinputpanel="false" position="absolute 0 94 1195 767" anchor="all" autoenter="select" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <Column size="100"/>
                <Column size="101"/>
                <Column size="102"/>
                <Column size="152"/>
                <Column size="150"/>
                <Column size="100"/>
                <Column size="60"/>
              </Columns>
              <Rows>
                <Row size="23" band="head"/>
                <Row size="23"/>
              </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="병동"/>
                <Cell col="6" text="병실"/>
                <Cell col="7" text="성별"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow + 1"/>
                <Cell col="1" text="bind:pid"/>
                <Cell col="2" text="bind:hngnm"/>
                <Cell col="3" displaytype="date" text="bind:indd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                <Cell col="4" text="bind:orddeptcd"/>
                <Cell col="5" text="bind:wardcd"/>
                <Cell col="6" text="bind:roomcd"/>
                <Cell col="7" text="bind:sex"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Div id="group2" taborder="1" class="div_SA" position="absolute 0 25 1195 65" anchor="left top right">
          <Layouts>
            <Layout>
              <Static id="caption1" text="검색조건 :" class="search_name" position="absolute 15 12 101 29" anchor="default"/>
              <Shape id="line2" linetype="vertical" class="line_4" position="absolute 1108 10 1111 32" style="border: solid #ffe4bb #ffe4bb;" anchor="top right"/>
              <Static id="caption17" text="조회일자 :" class="search_name" position="absolute 394 13 482 30" anchor="default"/>
              <Combo id="cmb_orddeptcd" taborder="1" innerdataset="ds_hidden_init_orddeptcd" codecolumn="cd" datacolumn="nm" class="combo_search" position="absolute 110 10 220 29" columncount="-1" rowcount="-1" anchor="default" onitemchanged="group2_cmb_orddeptcd_onitemchanged"/>
              <Combo id="cmb_orddrid" taborder="2" innerdataset="@ds_hidden_init_orddrid" codecolumn="cd" datacolumn="nmspecyn" class="combo_search" position="absolute 230 10 340 29" columncount="-1" rowcount="-1" anchor="default"/>
              <Calendar id="ipt_date" taborder="3" dateformat="yyyy-MM-dd" class="input_search" position="absolute 479 10 585 29" mask="yyyy-mm-dd" anchor="default" autoselect="true"/>
              <Button id="btn_search" taborder="4" text="조회" class="btn1" position="absolute 1123 10 1179 32" anchor="top right" onclick="group2_btn_search_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption6" text="지정의사별재원환자조회" class="tit_1" position="absolute 0 0 180 25"/>
        <Static id="caption2" text="특정일 재원환자 리스트" class="tit_2" position="absolute 0 73 289 90" style="align:left middle;font:Dotum,9,bold;"/>
        <Shape id="line1" class="line_10" position="absolute 0 90 1195 94" anchor="left top right"/>
        <Button id="btn_excsave" taborder="2" text="엑셀저장" class="btn7" position="absolute 1115 67 1195 89" anchor="top right" onclick="btn_excsave_onclick"/>
        <Button id="btn_print" taborder="3" text="출력" class="btn6" position="absolute 1064 67 1114 89" anchor="top right" onclick="btn_print_onclick"/>
        <Div id="grp_report" taborder="5" position="absolute 1020 68 1065 88"/>
        <Shape id="line32" class="line_6" position="absolute 0 768 1195 771" anchor="left right bottom"/>
        <Button id="btn_clear" taborder="6" text="초기화" class="btn4" position="absolute 1127 773 1195 795" anchor="right bottom" onclick="btn_clear_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="search_deptcd" type="STRING" size="256"/>
          <Column id="search_drid" type="STRING" size="256"/>
          <Column id="search_date" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="search_deptcd"/>
            <Col id="search_drid"/>
            <Col id="search_date"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_grdInPatList" 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="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="wardcd" type="STRING" size="256" sumtext="병동코드"/>
          <Column id="roomcd" type="STRING" size="256" sumtext="병실코드"/>
          <Column id="sex" type="STRING" size="256" sumtext="성별"/>
          <Column id="medispclid" type="STRING" size="256" sumtext="전문의ID"/>
          <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
          <Column id="todd" type="STRING" size="256" sumtext="종료일자"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_init_orddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_init_orddrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_print" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptnm" type="STRING" size="256"/>
          <Column id="drnm" type="STRING" size="256"/>
          <Column id="date" type="STRING" size="256"/>
          <Column id="logo" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="deptnm"/>
            <Col id="drnm"/>
            <Col id="date"/>
            <Col id="logo"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.cmb_orddeptcd" propid="value" datasetid="ds_send" columnid="search_deptcd"/>
      <BindItem id="item1" compid="group2.cmb_orddrid" propid="value" datasetid="ds_send" columnid="search_drid"/>
      <BindItem id="item2" compid="group2.ipt_date" propid="value" datasetid="ds_send" columnid="search_date"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs"
include "com_basiccodexp::ZBC001.xjs"

var arErrorCode = new HashArray();
function SMPMC04500_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPMC04500_onload(obj:Form, e:LoadEventInfo) 
{
	grdf_initGrid(grd_inpatlist); 

	ds_send.setColumn(0, "search_date",utlf_getCurrentDate());

	var oParam = {};
		oParam.id          = "TRPMI00106";
		oParam.service     = "pamcomnapp.PamComn";
		oParam.method      = "reqGetComCD";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_=disccd "
							+"ds_=insukind "
							+"ds_=suppkind "
							+"ds_=suppkindhist "
							+"ds_hidden_init_orddeptcd=orddeptcd "
							+"ds_hidden_init_orddrid=orddrid "
							+"ds_=wardcd "
							+"ds_=roomcd "
							+"ds_=bedcd "
							+"ds_=roomgrdecd "
							+"ds_=roomgrdelist "
							+"ds_=roomtypecd "
							+"ds_=flag "
							+"ds_=proccd "
							+"ds_=centcd "
							+"ds_=hospgrde "
							+"ds_=naticd "
							+"ds_=erorddrid "
							+"ds_=insucd "
							+"ds_=uncocd";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPMI00106";

	tranf_submit(oParam);
	
	// 레포트 미리보기 생성 - 미리보기창 안보이게 하기 위해서 생성
	//makeReportPreview(0, 50, 1194, 600, "grp_report");
}

function group2_cmb_orddeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var sDeptCd = obj.value;

	ds_hidden_init_orddrid.filterstr = "dp == '"+sDeptCd+"'";
	group2.cmb_orddrid.setFocus();
}

function group2_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	// 지정의사별 재원환자현황 조회
	var sDeptCd = ds_send.getColumn(0, "search_deptcd");
	var sDrId = ds_send.getColumn(0, "search_drid");
	var sDate = ds_send.getColumn(0, "search_date");
	
	// 진료과 입력 체크
	if (utlf_isNull(sDeptCd))
	{
		sysf_messageBox("진료과를", "C002");
		return;
	}
	
	// 지정의사 입력 체크
	if (utlf_isNull(sDrId))
	{
		sysf_messageBox("의사를", "C002");
		return;
	}
	
	// 조회일자 입력 체크
	if (utlf_isNull(sDate))
	{
		sysf_messageBox("조회일자를", "C001");
		return;
	}
	
	// 조회일자에 대한 지정의사별 재원환자 리스트 조회
	var oParam = {};
		oParam.id          = "TRPMC04501";
		oParam.service     = "patinfomngtapp.SpecDr";
		oParam.method      = "reqGetInPatListBySpecDr";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_grdInPatList=grdinpatlist";
		oParam.async       = false;
		oParam.callback    = "cf_TRPMC04501";

	tranf_submit(oParam);

	if(arErrorCode.pop("TRPMC04501") > -1)
	{
		var iCount = ds_main_grdInPatList.rowcount;
		
		if (iCount == 0) 
		{
			sysf_messageBox("조회된 결과가", "I004");
		}
	}
}

function cf_TRPMC04501(sSvcId, nErrorCode, sErrorMsg) 
{
	arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
}

function btn_print_onclick(obj:Button,  e:ClickEventInfo)
{
	var sDeptCd = ds_send.getColumn(0, "search_deptcd");	// 진료과
	var sDrId = ds_send.getColumn(0, "search_drid");		// 전문의
	var sDate = ds_send.getColumn(0, "search_date");		// 조회일자
	
	ds_main_print.setColumn(0, "deptnm", ds_hidden_init_orddeptcd.lookup("cd", sDeptCd, "nm"));
	ds_main_print.setColumn(0, "drnm", ds_hidden_init_orddrid.lookup("cd", sDrId, "nm"));
	ds_main_print.setColumn(0, "date", sDate);
	ds_main_print.setColumn(0, "logo", rptf_getLogoImageURL());
	
	// 레포트 출력
	var objDOM = rptf_createDOM();
		rptf_setNodeListToDOM(objDOM, "/root/main/print", ds_main_print);
		rptf_setNodeListToDOM(objDOM, "/root/main/grdInPatList", ds_main_grdInPatList);
	var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source; 
	var option = "open=0;save=1;directprint=1;print=1;zoom=0;printdialog=0;";  
	rptf_exeReportPreview30(["RPPMC04500"],[objParam], option, "");
}

function btn_clear_onclick(obj:Button,  e:ClickEventInfo)
{
	fInitialize();		
}

function fInitialize()
{
	ds_main_grdInPatList.clearData();
	ds_send.clearData();
	ds_send.addRow();
	ds_send.setColumn(0, "search_date", utlf_getCurrentDate());

	ds_hidden_init_orddeptcd.filterstr = "";
	ds_hidden_init_orddrid.filterstr = "";
}	

function btn_excsave_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_inpatlist, utlf_getCurrentDate(), "SheetName", "true", "", "");
}
]]></Script>
  </Form>
</FDL>