YNU_JEUS/app_home/himed/xpapps/ast/examcurexp/xp/SMAEA03400_미예약자 조회(통합예약).xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAEA03400" position="absolute 0 0 1200 789" titletext="미예약자조회" oninit="SMAEA03400_oninit" onload="SMAEA03400_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="미예약자조회" class="tit_1" position="absolute 0 0 155 24"/>
        <Div id="grp_sea" taborder="1" class="div_SA" position="absolute 0 24 1195 84">
          <Layouts>
            <Layout>
              <Static id="caption2" text="처방일자 :" class="search_name" position="absolute 10 11 104 28"/>
              <Calendar id="ipt_date1" taborder="3" autoselect="true" autoskip="true" class="input_default" position="absolute 94 10 197 29"/>
              <Calendar id="ipt_date2" taborder="4" autoselect="true" class="input_default" position="absolute 222 10 325 29"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1108 10 1114 52" anchor="top right"/>
              <Static id="caption1" text="~" position="absolute 206 11 223 30"/>
              <Button id="btn_sea" taborder="5" text="조회" class="btn1" position="absolute 1125 21 1181 43" anchor="top right" onclick="grp_sea_btn_sea_onclick"/>
              <Edit id="ipt_pid" taborder="6" class="input_search" position="absolute 433 8 513 27" autoselect="true" onkeyup="grp_sea_ipt_pid_onkeyup"/>
              <Edit id="opt_patnm" taborder="7" readonly="true" position="absolute 535 8 640 27" autoselect="true"/>
              <Button id="button61" taborder="8" class="icon_search" position="absolute 517 9 533 25" onclick="grp_sea_button61_onclick"/>
              <Static id="caption3" text="등록번호" class="search_name" position="absolute 348 10 434 27"/>
              <Combo id="cmb_deptcd" taborder="9" innerdataset="@ds_init_cmb_info_suppdept" codecolumn="suppdeptcd" datacolumn="depthngnm" position="absolute 745 10 895 29" type="filterlike"/>
              <Static id="caption15" text="지원부서 :" class="search_name" position="absolute 663 11 741 28"/>
              <Radio id="radio1" taborder="10" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 94 35 285 53" style="font:Dotum,9,bold;">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn"/>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">Y</Col>
                      <Col id="datacolumn">수납</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">N</Col>
                      <Col id="datacolumn">미수납</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Static id="caption5" text="수납여부 :" class="search_name" position="absolute 10 36 96 53"/>
              <Static id="caption4" text="입원/외래" class="search_name" position="absolute 348 34 426 51"/>
              <Radio id="radio2" taborder="11" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 435 33 570 51" style="font:Dotum,9,bold;">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">Y</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">N</Col>
                      <Col id="datacolumn">외래만</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="datagrid1" taborder="2" binddataset="ds_main_booklist_detail" useinputpanel="false" position="absolute 0 116 1195 761" autoenter="select" cellsizingtype="col" anchor="all" oncelldblclick="datagrid1_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="31"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="90"/>
                <Column size="90"/>
                <Column size="45"/>
                <Column size="45"/>
                <Column size="80"/>
                <Column size="55"/>
                <Column size="80"/>
                <Column size="360"/>
                <Column size="100"/>
                <Column size="80"/>
                <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="이동전화"/>
                <Cell col="5" text="입/외"/>
                <Cell col="6" text="병실"/>
                <Cell col="7" text="처방일자"/>
                <Cell col="8" text="수납"/>
                <Cell col="9" text="처방코드"/>
                <Cell col="10" text="처방명"/>
                <Cell col="11" text="처방과"/>
                <Cell col="12" text="처방의"/>
                <Cell col="13" text="caption3"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" style="align:left middle;padding:0 0 0 2;" text="bind:pid"/>
                <Cell col="2" style="align:left middle;padding:0 0 0 2;" text="bind:hngnm"/>
                <Cell col="3" style="align:left middle;padding:0 0 0 2;" text="bind:hometel"/>
                <Cell col="4" style="align:left middle;padding:0 0 0 2;" text="bind:mpphontel"/>
                <Cell col="5" style="align:left middle;padding:0 0 0 2;" text="bind:prcpgenrflag"/>
                <Cell col="6" style="align:left middle;padding:0 0 0 2;" text="bind:roomcd"/>
                <Cell col="7" displaytype="date" style="align:left middle;padding:0 0 0 2;" text="bind:prcpdd" calendardisplaynulltype="nulltext"/>
                <Cell col="8" style="align:left middle;padding:0 0 0 2;" text="bind:rcptyn"/>
                <Cell col="9" style="align:left middle;padding:0 0 0 2;" text="bind:prcpcd"/>
                <Cell col="10" style="align:left middle;padding:0 0 0 2;" text="bind:prcpnm"/>
                <Cell col="11" style="align:left middle;padding:0 0 0 2;" text="bind:orddepthngnm"/>
                <Cell col="12" style="align:left middle;padding:0 0 0 2;" text="bind:rgstrid"/>
                <Cell col="13" text="bind:gigan"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption10" text="미예약자 현황" class="tit_2" position="absolute 0 95 130 116"/>
        <Shape id="line3" class="line_10" position="absolute 0 111 1195 117" anchor="left top right"/>
        <Button id="button12" taborder="3" text="엑셀저장" class="btn7" position="absolute 1115 92 1195 111" anchor="top right" onclick="button12_onclick"/>
        <Button id="button89" taborder="4" text="출력" class="btn6" position="absolute 0 762 56 784" anchor="left bottom" onclick="button89_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send_data" 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="deptcd" type="STRING" size="256"/>
          <Column id="fromDate" type="STRING" size="256"/>
          <Column id="toDate" type="STRING" size="256"/>
          <Column id="basesuppdeptcd" type="STRING" size="256"/>
          <Column id="rcpt" type="STRING" size="256"/>
          <Column id="inptflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="deptcd"/>
            <Col id="fromDate"/>
            <Col id="toDate"/>
            <Col id="basesuppdeptcd"/>
            <Col id="rcpt"/>
            <Col id="inptflag">A</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_source" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="hngnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_booklist_detail" 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="hometel" type="STRING" size="256" sumtext="집전화"/>
          <Column id="mpphontel" type="STRING" size="256" sumtext="이동전화"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="처방일"/>
          <Column id="rcptyn" type="STRING" size="256" sumtext="수납여부"/>
          <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방병"/>
          <Column id="orddepthngnm" type="STRING" size="256" sumtext="처방과"/>
          <Column id="rgstrid" type="STRING" size="256" sumtext="처방의사"/>
          <Column id="gigan" type="STRING" size="256" sumtext="조회기간"/>
          <Column id="prcpgenrflag" type="STRING" size="256" sumtext="입원외래"/>
          <Column id="roomcd" type="STRING" size="256" sumtext="병실"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_info_suppdept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_baseinfo_initinptflag_A660" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_globalinstance" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instance1" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.ipt_date1" propid="value" datasetid="ds_send_data" columnid="fromDate"/>
      <BindItem id="item1" compid="grp_sea.ipt_date2" propid="value" datasetid="ds_send_data" columnid="toDate"/>
      <BindItem id="item2" compid="grp_sea.ipt_pid" propid="value" datasetid="ds_send_data" columnid="pid"/>
      <BindItem id="item3" compid="grp_sea.opt_patnm" propid="value" datasetid="ds_hidden_source" columnid="hngnm"/>
      <BindItem id="item4" compid="grp_sea.cmb_deptcd" propid="value" datasetid="ds_send_data" columnid="suppdeptcd"/>
      <BindItem id="item5" compid="grp_sea.radio1" propid="value" datasetid="ds_send_data" columnid="rcpt"/>
      <BindItem id="item6" compid="grp_sea.radio2" propid="value" datasetid="ds_send_data" columnid="inptflag"/>
    </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 "ast_examcurexp::AEZ0001.xjs";
include "ast_examcurexp::combolist.xjs";
function SMAEA03400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMAEA03400_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(datagrid1);
	
	lf_aezfSetSuppDeptcd();
	ds_send_globalinstance.setColumn(0, "instance1", frmf_getParameter("AST_DEPTCD"));
	
	if(utlf_isNull(ds_init_cmb_info_suppdept.lookup("suppdeptcd",  ds_send_globalinstance.getColumn("instance1"))))
	{
		ds_send_data.setColumn(0, "basesuppdeptcd", "");
	}
	else
	{
		ds_send_data.setColumn(0, "basesuppdeptcd", ds_send_globalinstance.getColumn("instance1"));
	}

	//2010.09.29 통합예약 미예약자 조회시 입원조회여부 체크 - 박재영
	var arrParam = [{dsNm: "ds_init_baseinfo_initinptflag_A660", cdGrpId: "A660"}]
    lf_getAstCodeList(arrParam);		//astGetComboList( new Array("A660"), new Array("/root/init/baseinfo/initinptflag") );
	
	//submit("TRAAA00001", false);
	
	ds_init_baseinfo_initinptflag_A660.deleteRow(0);
	ds_send_data.setColumn(0, "inptflag", ds_init_baseinfo_initinptflag_A660.getColumn(0, "cdid"));

	//검사실코드 갖고오기
	dsf_setFixVal(ds_send_data, "rbasecdflag:R,ebasecdflag:E,initflag:1");
	var oParam = {};
		oParam.id          = "TRAEA01301";
		oParam.service     = "examcureacptexecapp.ExamCureAcpt";
		oParam.method      = "reqGetInitExamCureRoomGrpCodeList";
		oParam.inds        = "reqparam=ds_send_data";
		oParam.outds       = "ds_=initexcuroomgrp "
							+"ds_=initexcuroomgrp2 "
							+"ds_=initexcuroom "
							+"ds_=initexecrid "
							+"ds_=initexecrid "
							+"ds_=initexecrid "
							+"ds_=initexecrid "
							+"ds_=initexcuward "
							+"ds_init_cmb_info_suppdept=suppdept "
							+"ds_=initsystgrd "
							+"ds_=initsystmdl "
							+"ds_=initsystchief";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAEA01301";

	tranf_submit(oParam);

	grp_sea.ipt_date1.value = utlf_getCurrentDate().toDate().getAddDate(-1,"D").getDateFormat("YYYYMMDD");
	grp_sea.ipt_date2.value = utlf_getCurrentDate().toDate().getAddDate(-1,"D").getDateFormat("YYYYMMDD");
	
	ds_main_booklist_detail.clearData();
}

function grp_sea_ipt_pid_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		grp_sea.btn_sea.click();
	}
}

function grp_sea_button61_onclick(obj:Button,  e:ClickEventInfo)
{
	// 환자조회	
	var objArg = new Object();
		objArg.arg_ds_send = ds_send_data;
	frmf_modal("SPPMC02500", "SPPMC02500", objArg, "", "", "", "", "", "", "", "", "", "M");
	
	ds_hidden_source.setColumn(0, "hngnm", ds_patinfolist.getColumn(0, "hngnm"));
	ds_send_data.setColumn(0, "pid", ds_patinfolist.getColumn(0, "pid"));
}

function grp_sea_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	if (utlf_isNull(ds_send_data.getColumn(0, "pid")))
	{
		ds_hidden_source.setColumn(0, "hngnm", "");
	}
	readfunc();
}

function readfunc()
{					// 해당 조건에 대한 검사내역을 조회한다.
	if (utlf_isNull(ds_send_data.getColumn(0, "fromDate")))
	{
		sysf_messageBox("처방 시작일자는 필수 입력 또는 선택 항목", "E008");
		grp_sea.ipt_date1.setFocus();
		return;
	}
	if (utlf_isNull(ds_send_data.getColumn(0, "toDate")))
	{
		sysf_messageBox("처방 종료일자는 필수 입력 또는 선택 항목", "E008");
		grp_sea.ipt_date2.setFocus();
		return;
	}
	if (isDate(String(ds_send_data.getColumn(0, "fromDate"))) == false)
	{
		sysf_messageBox("처방 시작일자의 날짜 형식이 잘못 입력되어 처리", "E001");
		grp_sea.ipt_date1.setFocus();
		return;
	}
	if (isDate(String(ds_send_data.getColumn(0, "toDate"))) == false)
	{
		sysf_messageBox("처방 종료일자의 날짜 형식이 잘못 입력되어 처리", "E001");
		grp_sea.ipt_date2.setFocus();
		return;
	}
	if (ds_send_data.getColumn(0, "fromDate") > ds_send_data.getColumn(0, "toDate"))
	{
		sysf_messageBox("처방 시작일자가 종료일자 보다 커서 처리", "E001");
		grp_sea.ipt_date2.setFocus();
		return;
	}
	if (utlf_isNull(ds_send_data.getColumn(0, "pid")))
	{
		var date = ds_send_data.getColumn(0, "fromDate").toDate().getAddDate(-1,"M").getDateFormat("YYYYMMDD");
		if (ds_send_data.getColumn(0, "fromDate") < date)
		{
			sysf_messageBox("처방 조회기간은 최대 한달 기간만 조회가 가능합니다.", "E999", "");
			grp_sea.ipt_date1.setFocus();
			return;
		}
	}

	ds_main_booklist_detail.clearData();
	
	ds_send_data.updateColID("fromDate", "fromdate");
	ds_send_data.updateColID("toDate", "todate");
	var oParam = {};
		oParam.id          = "TRAEA03401";
		oParam.service     = "examcurersrvapp.RsrvRef";
		oParam.method      = "reqGetUnRsrvPresCond";
		oParam.inds        = "req=ds_send_data";
		oParam.outds       = "ds_main_booklist_detail=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAEA03401";

	tranf_submit(oParam);
	
	ds_send_data.updateColID("fromdate", "fromDate");
	ds_send_data.updateColID("todate", "toDate");
	
	if (utlf_isNull(ds_main_booklist_detail.getColumn(0, "pid")))
	{
		ds_main_booklist_detail.clearData();
	}
}

function isDate(str) 
{					// 날짜 형식에 대한 적합여부 체크
	if (utlf_isNull(str)) return true;             		// 빈건 체크안함
	if (trim(str) == "") return true;             // 빈건 체크안함
	if (isNaN(parseInt(str))) return false; // 숫자가 아니면 false
	if (str.length != 8) return false;      // 8자리(yyyymmdd)가 아니면 false
	
	var yy = new Number(str.substring(0, 4));
	var mm = new Number(str.substring(4, 6)) - 1;
	var dd = new Number(str.substring(6, 8));
	var date = new Date(yy, mm, dd);
	
	if (yy != date.getFullYear() || mm != date.getMonth() || dd != date.getDate()) 
	{
		return false;  // 존재하지 않는 날짜
	}

	return true;  // 존재하는 날짜
}

function trim(data)
{				// 문자에 대한 TRIM 작업
	return data.replace(/(^\s*)|(\s*$)/g, "");
}

function datagrid1_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var main = frmf_getMainViewer();
	var scrnID = main.frmf_getScreenID();
	var pid = ds_main_booklist_detail.getColumn(ds_main_booklist_detail.rowposition, "pid");

	//검사예약화면에서 테스트가 필요
	//화면 title 가져오는 방식 수정함
	if(!utlf_isNull(scrnID))
	{
		if(scrnID == "SMPEA00100")
		{
			main.ds_send_data.setColumn(0, "pid", pid);
			sysf_setGlobalVariable("menuparam", "T");
			
			main.frmf_openForm("SMPEA00100", "", "");
		}
		else
		{
			frmf_openForm("SMPEA00100", "", "");
		}
	}
}

function button12_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(datagrid1, "excel", "Sheet1", "true", "", "");
}

function button89_onclick(obj:Button,  e:ClickEventInfo)
{
	var objDOM = rptf_createDOM();
		rptf_setNodeListToDOM(objDOM, "/root/main/booklist/detail", ds_main_booklist_detail);
	var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source; 
	var option = null; 
	rptf_exeReportPreview30(["RPAEA03400"],[objParam], option);
}
]]></Script>
  </Form>
</FDL>