YNU_JEUS/app_home/himed/xpapps/lis/plgyrefmngtxp/xp/SMLPP01530_지연사유조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLPP01530" position="absolute 0 0 1119 776" titletext="지연사유 환자목록조회" oninit="SMLPP01530_oninit" onload="SMLPP01530_onload">
    <Layouts>
      <Layout>
        <Grid id="grd_refinfolist" class="datagrid2" taborder="3" binddataset="ds_grd_refinfolist" useinputpanel="false" position="absolute 0 138 1116 773" autofittype="col" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="20"/>
                <Column size="100"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="70"/>
                <Column size="150"/>
                <Column size="483"/>
                <Column size="130"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="기관코드"/>
                <Cell col="1" text="ptno"/>
                <Cell col="2"/>
                <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="지연사유"/>
              </Band>
              <Band id="body">
                <Cell text="bind:instcd"/>
                <Cell col="1" text="bind:ptno"/>
                <Cell col="2" text="expr:currow + 1"/>
                <Cell col="3" class="text_left" text="bind:dispptno"/>
                <Cell col="4" class="text_center" text="bind:pid"/>
                <Cell col="5" class="text_left" text="bind:patnm"/>
                <Cell col="6" class="text_center" text="bind:sexage"/>
                <Cell col="7" class="text_left" text="bind:extrpartcnts"/>
                <Cell col="8" class="text_left" text="bind:diagcnts"/>
                <Cell col="9" text="bind:memocnts"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption4" text="지연사유 환자목록" class="tit_2" position="absolute 5 118 190 131"/>
        <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 0 134 1116 140" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
        <Div id="group2" taborder="4" position="absolute 1 63 1116 103" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Combo id="cbo_delaytime" taborder="0" innerdataset="@ds_resncdlist" codecolumn="resncd" datacolumn="resncnts" position="absolute 484 9 721 28" anchor="default"/>
              <Static id="caption3" text="지연사유 :" class="search_name" position="absolute 390 11 468 27" anchor="default"/>
              <Calendar id="ipt_cncltodd" taborder="1" class="input_s_essential" position="absolute 223 10 323 29" mask="yyyy-mm-dd" anchor="default"/>
              <Static id="caption5" text="~" class="search_no_b" position="absolute 208 12 220 29" anchor="default"/>
              <Calendar id="ipt_cnclfromdd" taborder="2" class="input_s_essential" position="absolute 104 10 204 29" mask="yyyy-mm-dd" anchor="default"/>
              <Static id="caption2" text="조회일자 :" class="search_name" position="absolute 15 11 89 27" anchor="default"/>
              <Static id="caption1" text="등록번호 :" class="search_name" position="absolute 804 11 882 28" anchor="top right"/>
              <Edit id="ipt_pid" taborder="3" position="absolute 896 10 996 29" anchor="top right"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1008 9 1014 31" anchor="top right"/>
              <Button id="btn_sea" taborder="4" text="조회" class="btn1" position="absolute 1021 9 1077 31" anchor="top right" onclick="group2_btn_sea_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Button id="button13" taborder="10" text="EXCEL저장" class="btn7" position="absolute 5 35 97 57" onclick="button13_onclick"/>
        <Shape id="line10" linetype="vertical" class="line_6" position="absolute 0 62 1194 68"/>
        <Static id="caption6" text="지연사유 환자조회" class="tit_1" position="absolute 0 0 153 25"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_refinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING"/>
          <Column id="ptno" type="STRING"/>
          <Column id="dispptno" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="sexage" type="STRING"/>
          <Column id="extrpartcnts" type="STRING"/>
          <Column id="diagcnts" type="STRING"/>
          <Column id="memocnts" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cbo_delaytime" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="resncnts" type="STRING"/>
          <Column id="resncd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_data_sysdtinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sysdd" type="STRING" size="256"/>
          <Column id="systm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_resncdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING" size="256" sumtext="선택"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="baseflagcd" type="STRING" size="256" sumtext="구분코드"/>
          <Column id="resncd" type="STRING" size="256" sumtext="사유코드"/>
          <Column id="resncnts" type="STRING" size="256" sumtext="사유내용"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="acptfromdd" type="STRING" size="256"/>
          <Column id="acpttodd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="delayresn" type="STRING" size="256"/>
          <Column id="resncd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_delayresn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.ipt_cnclfromdd" propid="value" datasetid="ds_hidden" columnid="acptfromdd"/>
      <BindItem id="item1" compid="group2.ipt_cncltodd" propid="value" datasetid="ds_hidden" columnid="acpttodd"/>
      <BindItem id="item2" compid="group2.ipt_pid" propid="value" datasetid="ds_hidden" columnid="pid"/>
    </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";

function SMLPP01530_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMLPP01530_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_refinfolist);
	fExeInitialize();
}

function fExeInitialize()
{	
	//--------------------------
	// 시스템일자 조회
	dsf_createDsRow( "ds_send", [{col : "instcd", val : sysf_getUserInfo("dutplceinstcd")}]);
	
	var oParam = {};
		oParam.id          = "TRLPZ00102";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetSystemDateTimeInformation";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_data_sysdtinfo=sysdtinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPZ00102";
	tranf_submit(oParam);
	
	//--------------------------
	// 지연사유 조회
	dsf_createDsRow("ds_send", [{col : "instcd",     val : sysf_getUserInfo("dutplceinstcd")}
	                           ,{col : "baseflagcd", val : '31'}]);
	                           
	var oParam = {};
		oParam.id          = "TRLPZ00103";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetReasonCodeList";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_resncdlist=refrslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPZ00103";
	tranf_submit(oParam);

	//model.copyNode("/root/init/delayresn", "/root/init/resncd");
	//dsf_copyDs(ds_init.setColumn(0, "delayresn", ds_resncdlist));
	//dsf_copyDs(ds_init_delayresn, ds_resncdlist);
	
	
	//------------
	// 초기값 설정
	ds_hidden.setColumn(0, "acptfromdd", ds_data_sysdtinfo.getColumn(0, "sysdd"));			// 정도일자(From)
	ds_hidden.setColumn(0, "acpttodd", ds_data_sysdtinfo.getColumn(0, "sysdd"));			// 정도일자(To)

}

//감사판독 소요시간 조회 처리 함수 
function fGetRefInfoList()
{	
	//--------------------------------
	//model.removeNodeset("/root/send");
	//model.removeNodeset("/root/main/refinfo/refinfolist");
	
	//----------------------------------------------------------------------
// 	model.makeValue("/root/send/instcd",     getUserInfo("dutplceinstcd"));
// 	model.makeValue("/root/send/reffromdd",  model.getValue("/root/hidden/acptfromdd"));					
// 	model.makeValue("/root/send/reftodd",    model.getValue("/root/hidden/acpttodd"));	
// 	model.makeValue("/root/send/pid",        model.getValue("/root/hidden/pid"));	
// 	model.makeValue("/root/send/resncd",     model.getValue("/root/init/delayresn"));
	dsf_createDsRow( "ds_send", [{ col : "instcd",    val : sysf_getUserInfo("dutplceinstcd")}
	                            ,{ col : "reffromdd", val : ds_hidden.getColumn(0, "acptfromdd")}
	                            ,{ col : "reftodd",   val : ds_hidden.getColumn(0, "acpttodd")}
	                            ,{ col : "pid",       val : ds_hidden.getColumn(0, "pid")}
	                            ,{ col : "resncd",    val : group2.cbo_delaytime.value}]);
	                        
	//alert(model.getValue("/root/send/instcd"));
	//alert(ds_resncdlist.getColumn(0, "resncd"));
	
	//if(model.getValue("/root/init/delayresn") == "") 
	if (utlf_isNull(ds_init.getColumn(0, "delayresn")))
	{

		//cbo_delaytime.refresh();
	}
	//-------------------
	//submit("TRLPP01503");
	var oParam = {};
		oParam.id          = "TRLPP01503";
		oParam.service     = "plgyrefmngtapp.AcptSpecRef";
		oParam.method      = "reqGetreasonList";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_grd_refinfolist=reflist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPP01503";
	tranf_submit(oParam);
}

//조회
function group2_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetRefInfoList();	
}

function button13_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_refinfolist, "관심증례목록");
}
]]></Script>
  </Form>
</FDL>