YNU_JEUS/app_home/himed/xpapps/lis/plgyacptmngtxp/xp/SPLPJ02400_전체검체조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLPJ02400" position="absolute 0 0 1008 714" titletext="전체검체조회" onload="SPLPJ02400_onload">
    <Layouts>
      <Layout>
        <Grid id="grd_spclist5" taborder="2" useinputpanel="false" position="absolute 801 22 1006 682" autofittype="col" oncelldblclick="grd_spclist5_oncelldblclick" class="CSS::lis.css" onsetfocus="grd_spclist5_onsetfocus">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="188"/>
              </Columns>
              <Rows>
                <Row size="22" band="head"/>
                <Row size="22"/>
              </Rows>
              <Band id="head">
                <Cell text="instcd"/>
                <Cell col="1" text="testcd"/>
                <Cell col="2" text="spccd"/>
                <Cell col="3" text="검체명 예문"/>
              </Band>
              <Band id="body">
                <Cell text="bind:instcd"/>
                <Cell col="1" text="bind:testcd"/>
                <Cell col="2" text="bind:spccd"/>
                <Cell col="3" style="align:left middle;" text="bind:spcnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="grd_spclist4" taborder="3" useinputpanel="false" position="absolute 601 22 791 682" autofittype="col" oncelldblclick="grd_spclist4_oncelldblclick" class="CSS::lis.css" onsetfocus="grd_spclist4_onsetfocus">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="188"/>
              </Columns>
              <Rows>
                <Row size="22" band="head"/>
                <Row size="22"/>
              </Rows>
              <Band id="head">
                <Cell text="instcd"/>
                <Cell col="1" text="testcd"/>
                <Cell col="2" text="spccd"/>
                <Cell col="3" text="검체명 예문"/>
              </Band>
              <Band id="body">
                <Cell text="bind:instcd"/>
                <Cell col="1" text="bind:testcd"/>
                <Cell col="2" text="bind:spccd"/>
                <Cell col="3" style="align:left middle;" text="bind:spcnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="grd_spclist3" taborder="4" useinputpanel="false" position="absolute 401 22 591 682" autofittype="col" oncelldblclick="grd_spclist3_oncelldblclick" class="CSS::lis.css" onsetfocus="grd_spclist3_onsetfocus">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="188"/>
              </Columns>
              <Rows>
                <Row size="22" band="head"/>
                <Row size="22"/>
              </Rows>
              <Band id="head">
                <Cell text="instcd"/>
                <Cell col="1" text="testcd"/>
                <Cell col="2" text="spccd"/>
                <Cell col="3" text="검체명 예문"/>
              </Band>
              <Band id="body">
                <Cell text="bind:instcd"/>
                <Cell col="1" text="bind:testcd"/>
                <Cell col="2" text="bind:spccd"/>
                <Cell col="3" style="align:left middle;" text="bind:spcnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="grd_spclist2" taborder="5" useinputpanel="false" position="absolute 201 22 391 682" autofittype="col" oncelldblclick="grd_spclist2_oncelldblclick" class="CSS::lis.css" onsetfocus="grd_spclist2_onsetfocus">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="188"/>
              </Columns>
              <Rows>
                <Row size="22" band="head"/>
                <Row size="22"/>
              </Rows>
              <Band id="head">
                <Cell text="instcd"/>
                <Cell col="1" text="testcd"/>
                <Cell col="2" text="spccd"/>
                <Cell col="3" text="검체명 예문"/>
              </Band>
              <Band id="body">
                <Cell text="bind:instcd"/>
                <Cell col="1" text="bind:testcd"/>
                <Cell col="2" text="bind:spccd"/>
                <Cell col="3" style="align:left middle;" text="bind:spcnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption1" text="검체예문" class="tit_2" position="absolute 201 2 350 22"/>
        <Static id="caption3" text="검체예문" class="tit_2" position="absolute 401 2 550 22"/>
        <Static id="caption4" text="검체예문" class="tit_2" position="absolute 601 2 750 22"/>
        <Static id="caption5" text="검체예문" class="tit_2" position="absolute 801 2 950 22"/>
        <Grid id="grd_spclist1" taborder="9" useinputpanel="false" autofittype="col" position="absolute 2 22 191 682" oncelldblclick="grd_spclist1_oncelldblclick" class="CSS::lis.css" onsetfocus="grd_spclist1_onsetfocus">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="188"/>
              </Columns>
              <Rows>
                <Row size="22" band="head"/>
                <Row size="22"/>
              </Rows>
              <Band id="head">
                <Cell text="instcd"/>
                <Cell col="1" text="testcd"/>
                <Cell col="2" text="spccd"/>
                <Cell col="3" text="검체명 예문"/>
              </Band>
              <Band id="body">
                <Cell text="bind:instcd"/>
                <Cell col="1" text="bind:testcd"/>
                <Cell col="2" text="bind:spccd"/>
                <Cell col="3" style="align:left middle;" text="bind:spcnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption2" text="검체예문" class="tit_2" position="absolute 2 2 150 22"/>
        <Button id="btn_close" taborder="10" text="닫기" class="btn2" visible="true" position="absolute 962 692 1006 712" onclick="btn_close_onclick"/>
      </Layout>
    </Layouts>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * File Name 		:	SPLPJ02400_전체검체조회.xfdl
 * Creator 	    :	
 * Make Date 		:	
 *                                                                                        
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	Modify Description                                     
 *--------------------------------------------------------------------------------------- 
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/


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


//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
 /**********************************************************************************
 * Name			: fExeInitialize
 * Description	: 초기화 Function
 * Argument		: null
 * return Type	: null
 * Author		: Autumn
**********************************************************************************/
function fExeInitialize()
{
	dsf_createDs("ds_rslt_spcexmplist");	//조회검체리스트
	dsf_createDs("ds_rslt_spcexmplist1");
	dsf_createDs("ds_rslt_spcexmplist2");
	dsf_createDs("ds_rslt_spcexmplist3");
	dsf_createDs("ds_rslt_spcexmplist4");
	dsf_createDs("ds_rslt_spcexmplist5");

	var sInDsName = dsf_createDsRow("ds_temp_search", [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}
													,  {col: "testcd", val: testcd							 }]);									
	tranf_submit({
		 id: "TRLPJ02401"
	   , service: "plgyacptmngtapp.SpecimenAccept"
	   , method: "reqGetAllSpcList"
	   , inds : "refData="+sInDsName
	   , outds: "ds_rslt_spcexmplist=reflist"
	   , callback: "cbf_SPLPJ02400"
	   , async: false
	});
	
	dsf_copyColInfo(ds_rslt_spcexmplist1, ds_rslt_spcexmplist);
	dsf_copyColInfo(ds_rslt_spcexmplist2, ds_rslt_spcexmplist);
	dsf_copyColInfo(ds_rslt_spcexmplist3, ds_rslt_spcexmplist);
	dsf_copyColInfo(ds_rslt_spcexmplist4, ds_rslt_spcexmplist);
	dsf_copyColInfo(ds_rslt_spcexmplist5, ds_rslt_spcexmplist);

	for(var i=0; i<ds_rslt_spcexmplist.rowcount; i++){
		if(i<29*1){
			ds_rslt_spcexmplist1.copyRow(ds_rslt_spcexmplist1.addRow(), ds_rslt_spcexmplist, i);
		} else if(i<29*2){
			ds_rslt_spcexmplist2.copyRow(ds_rslt_spcexmplist2.addRow(), ds_rslt_spcexmplist, i);
		} else if(i<29*3){ 
			ds_rslt_spcexmplist3.copyRow(ds_rslt_spcexmplist3.addRow(), ds_rslt_spcexmplist, i);
		} else if(i<29*4){
			ds_rslt_spcexmplist4.copyRow(ds_rslt_spcexmplist4.addRow(), ds_rslt_spcexmplist, i);
		} else {
			ds_rslt_spcexmplist5.copyRow(ds_rslt_spcexmplist5.addRow(), ds_rslt_spcexmplist, i);
		}
	}
	
	grd_spclist1.binddataset = ds_rslt_spcexmplist1;
	grd_spclist2.binddataset = ds_rslt_spcexmplist2;
	grd_spclist3.binddataset = ds_rslt_spcexmplist3;
	grd_spclist4.binddataset = ds_rslt_spcexmplist4;
	grd_spclist5.binddataset = ds_rslt_spcexmplist5;
}


 /**********************************************************************************
 * Name			: cbf_SPLPJ02400
 * Description	: 전체검체조회 콜백함수.
 * Argument		: string:strSvcID, string:nErrorCode, string:strErrorMag
 * return Type	: Null
 * Author		: Autumn
**********************************************************************************/
function cbf_SPLPJ02400(strSvcID, nErrorCode, strErrorMag)
{
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");	
}
function fExeSpcChoi(objDs, pRowNo)
{
	//----------------
	if (pRowNo < 0)
	{
		sysf_messageBox("검체를 선택하여 주십시오! 검체는 ", "I003");
		return false;
	}
	
	//---------------------------------------------------------------------------------------------
	sysf_trace(objDs.getColumn(pRowNo,"spccd"));
	
	trace("pRowNo="+pRowNo);
	opener.frmf_setParameter("SPLPJ02400_spccd", objDs.getColumn(pRowNo,"spccd"));
	opener.frmf_setParameter("SPLPJ02400_spcnm", objDs.getColumn(pRowNo,"spcnm"));
	this.close();
}
				
function fExeGridChoi(pNo) {
					
	
	switch (pNo) {
		case 1 :
			ds_rslt_spcexmplist2.rowposition = -1;
			ds_rslt_spcexmplist3.rowposition = -1;
			ds_rslt_spcexmplist4.rowposition = -1;
			ds_rslt_spcexmplist5.rowposition = -1;
			
			break;
			
		case 2 :
			ds_rslt_spcexmplist1.rowposition = -1;
			ds_rslt_spcexmplist3.rowposition = -1;
			ds_rslt_spcexmplist4.rowposition = -1;
			ds_rslt_spcexmplist5.rowposition = -1;	
			break;
			
		case 3 :
			ds_rslt_spcexmplist1.rowposition = -1;
			ds_rslt_spcexmplist2.rowposition = -1;
			ds_rslt_spcexmplist4.rowposition = -1;
			ds_rslt_spcexmplist5.rowposition = -1;
			break;
			
		case 4 :
			ds_rslt_spcexmplist1.rowposition = -1;
			ds_rslt_spcexmplist2.rowposition = -1;
			ds_rslt_spcexmplist3.rowposition = -1;
			ds_rslt_spcexmplist5.rowposition = -1;
			break;
			
		case 5 :
			ds_rslt_spcexmplist1.rowposition = -1;
			ds_rslt_spcexmplist2.rowposition = -1;
			ds_rslt_spcexmplist3.rowposition = -1;
			ds_rslt_spcexmplist4.rowposition = -1;
			break;
	}
	
}

//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components	    : 
 * Components ID  	: SPMPJ02400
 * Event 		    : onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면로드
 ****************************************************************************************/
function SPLPJ02400_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);
	fExeInitialize();
}

/****************************************************************************************
 * Components	    : 
 * Components ID  	: Button00
 * Event 		    : onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면닫기
 ****************************************************************************************/
function Button00_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

/****************************************************************************************
 * Components	    : 
 * Components ID  	: btn_close
 * Event 		    : onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면닫기
 ****************************************************************************************/
function btn_close_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

/****************************************************************************************
 * Components	    : 
 * Components ID  	: grd_spclist1
 * Event 		    : oncelldblclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 검체선택
 ****************************************************************************************/
function grd_spclist1_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fExeSpcChoi(ds_rslt_spcexmplist1, e.row);	
}
/****************************************************************************************
 * Components	    : 
 * Components ID  	: grd_spclist2
 * Event 		    : oncelldblclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 검체선택
 ****************************************************************************************/
function grd_spclist2_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fExeSpcChoi(ds_rslt_spcexmplist2, e.row);	
}
/****************************************************************************************
 * Components	    : 
 * Components ID  	: grd_spclist3
 * Event 		    : oncelldblclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 검체선택
 ****************************************************************************************/
function grd_spclist3_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fExeSpcChoi(ds_rslt_spcexmplist3, e.row);	
}
/****************************************************************************************
 * Components	    : 
 * Components ID  	: grd_spclist4
 * Event 		    : oncelldblclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 검체선택
 ****************************************************************************************/
function grd_spclist4_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fExeSpcChoi(ds_rslt_spcexmplist4, e.row);	
}
/****************************************************************************************
 * Components	    : 
 * Components ID  	: grd_spclist5
 * Event 		    : oncelldblclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 검체선택
 ****************************************************************************************/
function grd_spclist5_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fExeSpcChoi(ds_rslt_spcexmplist5, e.row);	
}

function grd_spclist1_onsetfocus(obj:Grid, e:SetFocusEventInfo)
{
	fExeGridChoi(1);
}

function grd_spclist2_onsetfocus(obj:Grid, e:SetFocusEventInfo)
{
	fExeGridChoi(2);
}

function grd_spclist3_onsetfocus(obj:Grid, e:SetFocusEventInfo)
{
	fExeGridChoi(3);
}

function grd_spclist4_onsetfocus(obj:Grid, e:SetFocusEventInfo)
{
	fExeGridChoi(4);
}

function grd_spclist5_onsetfocus(obj:Grid, e:SetFocusEventInfo)
{
	fExeGridChoi(5);
}
]]></Script>
  </Form>
</FDL>