YNU_JEUS/app_home/himed/xpapps/lis/plgyrefmngtxp/xp/SMLPP02100_전송취소내역.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLPP02100" position="absolute 0 0 1256 805" titletext="최종진단 취소내역" oninit="SMLPP02100_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="최종진단 취소내역" class="tit_1" position="absolute 0 3 151 28"/>
        <Button id="btn_excel" taborder="1" text="EXCEL저장" onlbuttonup="btn_excel_onlbuttonup" class="btn7" position="absolute 1155 74 1256 94" anchor="top right"/>
        <Div id="div_grp" taborder="2" style="align:center top;" class="div_SA" position="absolute 0 30 1256 72" anchor="left top right">
          <Layouts>
            <Layout>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1108 7 1108 29" anchor="default"/>
              <Edit id="edt_seaval" taborder="11" class="input_search" position="absolute 519 10 617 30" onkeydown="div_grp_edt_seaval_onkeydown" inputtype="number" maxlength="9" anchor="default"/>
              <Static id="caption3" text="등록번호" class="search_name" position="absolute 443 10 511 30" anchor="default"/>
              <Static id="caption5" text="~" class="search_no_b" position="absolute 817 10 833 30" style="align:center;" anchor="default"/>
              <Button id="btn_sea" taborder="12" text="조회" onlbuttonup="btn_sea_onlbuttonup" class="btn1" position="absolute 1190 10 1246 30" anchor="top right"/>
              <Calendar id="cal_cnclfromdd" taborder="13" class="input_s_essential" position="absolute 717 10 817 30" mask="####-##-##" dateformat="yyyy-MM-dd" value="null" onchanged="div_grp_cal_cnclfromdd_onchanged" anchor="default"/>
              <Calendar id="cal_cncltodd" taborder="14" class="input_s_essential" position="absolute 833 10 933 30" mask="####-##-##" dateformat="yyyy-MM-dd" onchanged="div_grp_cal_cncltodd_onchanged" anchor="default"/>
              <Combo id="cmb_ptnocd" taborder="15" position="absolute 84 10 240 30" innerdataset="@ds_cond_ptnocode" codecolumn="ptnocd" datacolumn="ptnonm" anchor="default"/>
              <Edit id="edt_fromptno" taborder="16" class="text_center" position="absolute 273 10 323 30" maxlength="6" inputtype="number" anchor="default"/>
              <Static id="caption1" text="병리번호" class="search_name" position="absolute 8 10 76 30" anchor="default"/>
              <Edit id="edt_fromyear" taborder="17" class="text_center" position="absolute 243 10 270 30" inputtype="number" maxlength="2" anchor="default"/>
              <Static id="cap_refdd" text="취소일자" class="search_name" position="absolute 641 10 709 30" anchor="default"/>
              <Static id="caption2" text="~" class="search_no_b" position="absolute 323 10 339 30" style="align:center;" anchor="default"/>
              <Edit id="edt_toptno" taborder="18" class="text_center" position="absolute 369 10 419 30" inputtype="number" maxlength="6" anchor="default"/>
              <Edit id="edt_toyear" taborder="19" class="text_center" position="absolute 339 10 366 30" inputtype="number" maxlength="2" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption4" text="취소 목록" class="tit_2" position="absolute 0 76 114 96"/>
        <Grid id="grd_ptnolist" taborder="3" useinputpanel="false" position="absolute 0 96 1256 805" anchor="all" binddataset="ds_grid_grd_ptnolist" autoupdatetype="none" autosizingtype="none" autofittype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="30"/>
                <Column size="100"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="70"/>
                <Column size="0"/>
                <Column size="80"/>
                <Column size="586"/>
              </Columns>
              <Rows>
                <Row size="26" band="head"/>
                <Row size="20"/>
              </Rows>
              <Band id="head">
                <Cell text="기관코드"/>
                <Cell col="1" text="병리번호"/>
                <Cell col="2" text="No."/>
                <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="취소자ID"/>
                <Cell col="10" text="취소자"/>
                <Cell col="11" text="취소사유"/>
              </Band>
              <Band id="body">
                <Cell/>
                <Cell col="1"/>
                <Cell col="2" expr="expr:currow+1"/>
                <Cell col="3" class="text_center" text="bind:dispptno"/>
                <Cell col="4" displaytype="text" class="text_center" text="bind:pid"/>
                <Cell col="5" class="text_center" text="bind:patnm"/>
                <Cell col="6" class="text_center" text="bind:sexage"/>
                <Cell col="7" class="text_center" text="bind:cncldd" mask="expr:cncldd==null?'':'####-##-##'"/>
                <Cell col="8" class="text_center" text="bind:cncltm" mask="expr:cncltm==null?'':'##:##:##'"/>
                <Cell col="9"/>
                <Cell col="10" class="text_center" text="bind:cnclnm"/>
                <Cell col="11" style="align:left;" class="text_center" text="bind:cnclresnnm"/>
                <Cell col="12"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <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_cond_ptnocode" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="ptnocd" type="STRING" size="256"/>
          <Column id="ptnonm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grid_grd_ptnolist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <column id="instcd" type="STRING" size="256"/>
          <column id="ptno" type="STRING" size="256"/>
          <column id="dispptno" type="STRING" size="256"/>
          <column id="pid" type="STRING" size="256"/>
          <column id="patnm" type="STRING" size="256"/>
          <column id="sexage" type="STRING" size="256"/>
          <column id="cncldd" type="STRING" size="256"/>
          <column id="cncltm" type="STRING" size="256"/>
          <column id="cnclid" type="STRING" size="256"/>
          <column id="cnclnm" type="STRING" size="256"/>
          <column id="cnclresnnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	KU2.0
 * Job Name 		:	
 * File Name 		:	SMLPP02100_전송취소내역.xfdl
 * Creator 	    :	
 * Make Date 		:	2016-11-16
 *                                                                                        
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	Modify Description                                     
 *--------------------------------------------------------------------------------------- 
 * 2016-11-16        DBS       Converting Program(TF->XP)
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/


//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LLZ001.xjs";
include "lis_commonxp::LZZ001.xjs";

var instcd = "";
var SMLPP02100_pid = "";
//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components	    : 
 * Components ID  : model1
 * Event 		    : lf_setInit
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: 초기화 함수
 ****************************************************************************************/
function lf_exeInitialize()
{
	var sCurDate = "";
//	var menuparam = getScreenMenuParameter();	
	ds_grid_grd_ptnolist.clearData();
	instcd = sysf_getUserInfo("dutplceinstcd");
	dsf_createDsRow("ds_temp_search", [{col: "instcd", val:instcd }]);
	// 서브밋호출
	var oParam = {};
		oParam.id          = "TRLPZ00102";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetSystemDateTimeInformation";
		oParam.inds        = "refData=ds_temp_search";
		oParam.outds       = "ds_data_sysdtinfo=sysdtinfo";
		oParam.async       = false;
		oParam.callback    = "cbf_SMLPP02100";
	tranf_submit(oParam);
	
}

/****************************************************************************************
 * Components	    : 
 * Components ID  : btn_search
 * Event 		    : onlbuttonup
 * Argument		: 01.btnflag : 
 *				: 02. : 
 * Description	: 접수목록 조회 처리 함수
 ****************************************************************************************/
 function lf_getCnclList()
 {	
	var sPtNoCd = div_grp.cmb_ptnocd.value;
    // 조회시 병리번호 From(000000) ~ To(999999) 체크/셋팅
	gf_getPtNoSetting(div_grp.cal_cnclfromdd.value
                    , div_grp.cal_cncltodd.value
                    , div_grp.cmb_ptnocd
                    , div_grp.edt_fromyear
                    , div_grp.edt_fromptno
                    , div_grp.edt_toyear
                    , div_grp.edt_toptno);

	dsf_createDsRow("ds_temp_search" , [{col: "instcd"    , val:instcd }
									 ,  {col: "pid"       , val:div_grp.edt_seaval.value }
									 ,  {col: "cnclfromdd", val:div_grp.cal_cnclfromdd.value }
									 ,  {col: "cncltodd"  , val:div_grp.cal_cncltodd.value }
									 ,  {col: "ptnocode"  , val:sPtNoCd.replace("-", "") }
									 ,  {col: "fromyear"  , val:div_grp.edt_fromyear.value }
									 ,  {col: "fromptno"  , val:div_grp.edt_fromptno.value }
									 ,  {col: "toyear"    , val:div_grp.edt_toyear.value }
									 ,  {col: "toptno"    , val:div_grp.edt_toptno.value }]);
	// 서브밋호출
	var oParam = {};
		oParam.id          = "TRLPP02101";
		oParam.service     = "plgyrefmngtapp.TestRsltRef";
		oParam.method      = "reqGetReadCnclList";
		oParam.inds        = "refData=ds_temp_search";
		oParam.outds       = "ds_grid_grd_ptnolist=refrslt";
		oParam.async       = false;
		oParam.callback    = "cbf_SMLPP02100";
	tranf_submit(oParam);
}

// 그리드 자료 Excel로 저장 처리 function
function lf_exeSaveToExcel()
{
    if(ds_grid_grd_ptnolist.rowcount>0)
    {
        grdf_exportExcel(grd_ptnolist, lf_lisGetTitle(this), "see", false, "", "none", false);
	} 
	else
	{
		sysf_messageBox("저장할 내용이","I004","");
	}
}

// 검색값을 입력하고 Enter키를 누를 경우 처리
function lf_exeInputKey()
{
	lf_getCnclList();
}

// callback 함수
function cbf_SMLPP02100(strSvcID, nErrorCode, strErrorMag)
{	
	if(nErrorCode != 0)
	{
		sysf_messageBox("ID: "+ strSvcID + "  Error: " + strErrorMag, "E009", "");
	}
	else
	{
		switch(strSvcID)
		{
			case "TRLPZ00102":
					var refflagcd = "0";
					dsf_createDsRow("ds_temp_search", [{col: "instcd",    val:instcd }
												      ,{col: "refflagcd", val:refflagcd }]);
					// 서브밋호출
					var oParam = {};
						oParam.id          = "TRLPZ00109";
						oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
						oParam.method      = "reqGetPtNoCdList";
						oParam.inds        = "refdata=ds_temp_search";
						oParam.outds       = "ds_cond_ptnocode=rsltlist";
						oParam.async       = false;
						oParam.callback    = "cbf_SMLPP02100";
					tranf_submit(oParam);
				break;
			case "TRLPZ00109":
					var sCurDate = ds_data_sysdtinfo.getColumn(0, "sysdd");
					// 초기값 설정
					div_grp.cal_cnclfromdd.value = ds_data_sysdtinfo.getColumn(0, "sysdd");	// 취소일자(From)
					div_grp.cal_cncltodd.value  = ds_data_sysdtinfo.getColumn(0, "sysdd");	// 취소일자(To)
					div_grp.edt_seaval.value = "";	// 검색값
					div_grp.cmb_ptnocd.value   = "";
					div_grp.edt_fromyear.value = sCurDate.substr(2,2);
					div_grp.edt_toyear.value = sCurDate.substr(2,2);
					div_grp.edt_fromptno.value = "";
					div_grp.edt_toptno.value = "";
					div_grp.cmb_ptnocd.value = "-";
					
					// 메뉴에서 화면이 선택되었을 경우 처리
					if(parent.name =="SMLPP02100")
					{
						// Continue
						div_grp.edt_seaval.value = 	opener.frmf_getParameter("SMLPP02100_pid");
					// 검사결과등록, 결과조회 화면에서 호출할 경우 처리
					}
					else if(parent.name == "childframe")
					{
						lf_getCnclList();	
					}
					else
					{
						// Continue
					}
					grdf_setGridSort(grd_ptnolist);
				break;
			case "TRLPP02101":
				break;
			default:
				break;
		}
	}
}

//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components	    : 
 * Components ID  : model1
 * Event 		    : oninit
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: Form 초기화
 ****************************************************************************************/
function SMLPP02100_onload(obj:Form, e:InitEventInfo)
{
	//폼 초기화 함수
	frmf_initForm(obj);

	lf_exeInitialize();
}
/****************************************************************************************
 * Components	    : 
 * Components ID  : btn_excel
 * Event 		    : onlbuttonup
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: Excel 저장 버튼
 ****************************************************************************************/
function btn_excel_onlbuttonup(obj:Button, e:MouseEventInfo)
{
	lf_exeSaveToExcel();					
}

/****************************************************************************************
 * Components	    : 
 * Components ID  : edt_seaval
 * Event 		    : 
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: 등록번호 Enter key 이벤트
 ****************************************************************************************/
function div_grp_edt_seaval_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode==13)
	{
		lf_exeInputKey();
	}
}

/****************************************************************************************
 * Components	    : 
 * Components ID  : btn_sea
 * Event 		    : onlbuttonup
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: 조회 버튼
 ****************************************************************************************/
function btn_sea_onlbuttonup(obj:Button, e:MouseEventInfo)
{
	lf_getCnclList();				
}

/****************************************************************************************
 * Components	    : 
 * Components ID  : cal_cnclfromdd
 * Event 		    : 
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: Not Convert : xforms-value-changed
 ****************************************************************************************/
function div_grp_cal_cnclfromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
    gf_checkFromToDate("FROM", div_grp.cal_cnclfromdd, div_grp.cal_cncltodd, div_grp.edt_fromyear);
}

/****************************************************************************************
 * Components	    : 
 * Components ID  : cal_cncltodd
 * Event 		    : 
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: Not Convert : xforms-value-changed
 ****************************************************************************************/
function div_grp_cal_cncltodd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
    gf_checkFromToDate("TO", div_grp.cal_cnclfromdd, div_grp.cal_cncltodd, div_grp.edt_toyear);
}]]></Script>
  </Form>
</FDL>