YNU_JEUS/app_home/himed/xpapps/ast/examcurexp/xp/SMAEA04000_환자별진행현황조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAEA04000" position="absolute 0 0 1199 760" titletext="검사별 실시현황 조회" oninit="SMAEA04000_oninit" onload="SMAEA04000_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="환자별진행현황조회" class="tit_1" position="absolute 0 0 262 23"/>
        <Div id="grp_sea" taborder="1" class="div_SA" position="absolute 0 24 1194 59" anchor="left top right">
          <Layouts>
            <Layout>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1117 7 1123 29" anchor="top right"/>
              <Button id="btn_sea" taborder="1" text="조회" class="btn1" position="absolute 1129 7 1185 29" anchor="top right" onclick="grp_sea_btn_sea_onclick"/>
              <Edit id="ipt_pid" taborder="2" class="input_search" position="absolute 100 8 170 27" onkeydown="grp_sea_ipt_pid_onkeydown"/>
              <Static id="caption8" text="등록번호 :" class="search_name" position="absolute 10 10 105 27"/>
              <Edit id="opt_patnm" taborder="3" readonly="true" position="absolute 196 8 285 27" enable="false"/>
              <Button id="button61" taborder="4" class="icon_search" position="absolute 174 10 190 26" onclick="grp_sea_button61_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape id="line2" class="line_10" position="absolute 0 83 1195 89" anchor="left top right"/>
        <Static id="caption10" text="환자별진행현황" class="tit_2" position="absolute 0 67 134 89"/>
        <Button id="btn_excel" taborder="2" text="엑셀저장" class="btn7" position="absolute 1115 63 1195 82" anchor="top right" onclick="btn_excel_onclick"/>
        <Grid id="grd_mainordlist" taborder="3" binddataset="ds_main_execprescond_execprescondlist" useinputpanel="false" position="absolute 0 88 1195 757" autosizingtype="col" anchor="all" autofittype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="20"/>
                <Column size="90"/>
                <Column size="260"/>
                <Column size="115"/>
                <Column size="115"/>
                <Column size="115"/>
                <Column size="115"/>
                <Column size="115"/>
                <Column size="115"/>
                <Column size="115"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="27"/>
              </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="PACS완료시간"/>
                <Cell col="9" text="판독완료시간"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" style="align:left middle;" text="bind:prcpcd"/>
                <Cell col="2" style="align:left middle;" text="bind:prcpnm" wordwrap="word"/>
                <Cell col="3" displaytype="date" text="bind:prcpdt" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="nulltext"/>
                <Cell col="4" displaytype="date" text="bind:rsrvdt" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="nulltext"/>
                <Cell col="5" displaytype="date" text="bind:acptdt" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="nulltext"/>
                <Cell col="6" displaytype="date" text="bind:drugdt" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="nulltext"/>
                <Cell col="7" displaytype="date" text="bind:excuexecfromdt" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="nulltext"/>
                <Cell col="8" displaytype="date" text="bind:excuexectodt" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="nulltext"/>
                <Cell col="9" displaytype="date" text="bind:cnfmdt" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="nulltext"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </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="srchpid" type="STRING" size="256"/>
          <Column id="basesuppdeptcd" type="STRING" size="256"/>
          <Column id="patnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_execprescond_execprescondlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpcd" type="STRING" size="256" sumtext="검사코드"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="검사명"/>
          <Column id="prcpdt" type="STRING" size="256" sumtext="처방시간"/>
          <Column id="rsrvdt" type="STRING" size="256" sumtext="예약시간"/>
          <Column id="acptdt" type="STRING" size="256" sumtext="접수시간"/>
          <Column id="drugdt" type="STRING" size="256" sumtext="핵종투여시간"/>
          <Column id="excuexecfromdt" type="STRING" size="256" sumtext="실시완료시간"/>
          <Column id="excuexectodt" type="STRING" size="256" sumtext="PACS완료시간"/>
          <Column id="cnfmdt" type="STRING" size="256" sumtext="판독완료시간"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.opt_patnm" propid="value" datasetid="ds_send" columnid="patnm"/>
      <BindItem id="item1" compid="grp_sea.ipt_pid" propid="value" datasetid="ds_send" columnid="srchpid"/>
    </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";

var vSuppdeptcd ;
function SMAEA04000_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMAEA04000_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_mainordlist);
	
	lf_aezfSetSuppDeptcd();
	vSuppdeptcd = frmf_getPrestDeptCd();
	
	ds_send.setColumn(0, "basesuppdeptcd", vSuppdeptcd);
	
	var srchpid = ds_send.getColumn(0, "srchpid");
	
	if (!utlf_isNull(srchpid))
	{
		var oParam = {};
			oParam.id          = "TRAEA04001";
			oParam.service     = "examcureacptexecapp.NuclInpt";
			oParam.method      = "reqGetExecPresCondList";
			oParam.inds        = "reqparam=ds_send";
			oParam.outds       = "ds_main_execprescond_execprescondlist=execprescondlist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRAEA04001";

		tranf_submit(oParam);
	}
}


function grp_sea_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		
		grp_sea_btn_sea_onclick();
	}
}

function grp_sea_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	var srchpid = ds_send.getColumn(0, "srchpid");

	if (utlf_isNull(srchpid))
	{
		sysf_messageBox("등록번호는.","I003");
		return "0";
	}
	
	var oParam = {};
		oParam.id          = "TRAEA04001";
		oParam.service     = "examcureacptexecapp.NuclInpt";
		oParam.method      = "reqGetExecPresCondList";
		oParam.inds        = "reqparam=ds_send";
		oParam.outds       = "ds_main_execprescond_execprescondlist=execprescondlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAEA04001";

	tranf_submit(oParam);
}

function grp_sea_button61_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SPPMC02500", "SPPMC02500", "", "", "", "", "", "", "", "", "", "", "M");
	
	ds_send.setColumn(0, "patnm", ds_patinfolist.getColumn(0, "hngnm"));
	ds_send.setColumn(0, "srchpid", ds_patinfolist.getColumn(0, "pid"));
}

function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	if(ds_main_execprescond_execprescondlist.rowcount > 0)
	{
		grdf_exportExcel(grd_mainordlist, "", "", false, "", "user", false);
	}
}
]]></Script>
  </Form>
</FDL>