YNU_JEUS/app_home/himed/xpapps/lis/diagtestbaseinfomngtxp/xp/SMLLF10400_통합용기코드관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLLF10400" position="absolute 0 0 1193 743" titletext="통합용기코드관리" oninit="SMLLF10400_oninit" onload="SMLLF10400_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 16 1191 743" id="group3" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout width="1196" height="727">
              <Shape position="absolute 0 71 1190 77" linetype="horizontal" id="line1" class="line_1" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
              <Static text="용기코드상세내역" position="absolute 1 54 132 70" id="caption2" class="tit_2" anchor="default"/>
              <Grid position="absolute 0 76 1190 722" id="grd_tube" binddataset="ds_grd_tube" autofittype="col" anchor="all" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="21"/>
                      <Column size="90"/>
                      <Column size="0"/>
                      <Column size="60"/>
                      <Column size="120"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="50"/>
                      <Column size="50"/>
                    </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="단위"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head"/>
                      <Cell col="1" displaytype="date" edittype="date" text="bind:tubefromdd" mask="yyyy-MM-dd"/>
                      <Cell col="2" displaytype="date" edittype="date" text="bind:tubetodd" mask="yyyy-MM-dd"/>
                      <Cell col="3" displaytype="text" edittype="text" text="bind:tubecd"/>
                      <Cell col="4" displaytype="text" edittype="text" text="bind:tubenm"/>
                      <Cell col="5" displaytype="text" edittype="text" text="bind:tubescrnnm"/>
                      <Cell col="6" displaytype="text" edittype="text" text="bind:tubeabbrnm"/>
                      <Cell col="7" displaytype="text" edittype="text" text="bind:tubeprntnm"/>
                      <Cell col="8" displaytype="text" edittype="text" text="bind:tubelblnm"/>
                      <Cell col="9" displaytype="text" edittype="text" text="bind:tubevol"/>
                      <Cell col="10" displaytype="text" edittype="text" text="bind:tubeunit"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Div position="absolute 1 10 1191 45" id="group1" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Shape position="absolute 1105 7 1111 29" linetype="vertical" id="line11" class="line_4" anchor="top right"/>
                    <Static text="조회구분 :" position="absolute 15 9 105 26" id="caption1" class="search_name" anchor="default"/>
                    <Shape position="absolute 270 6 276 28" linetype="vertical" id="line14" class="line_4" anchor="default"/>
                    <Static text="검색구분 :" position="absolute 737 9 827 26" id="caption4" class="search_name" anchor="top right"/>
                    <Button position="absolute 1123 7 1179 29" id="btn_ref" class="btn1" text="검색" onclick="group3_group1_btn_ref_onclick" anchor="top right"/>
                    <Button position="absolute 288 7 344 29" id="btn_search" class="btn1" text="조회" onclick="group3_group1_btn_search_onclick" anchor="default"/>
                    <Edit position="absolute 983 8 1093 27" id="ipt_text" class="input_search" anchor="top right" onkeyup="group3_group1_ipt_text_onkeyup"/>
                    <Combo position="absolute 830 8 980 27" id="cmb_searchgbn" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn" value="1" text="용기코드" index="0" anchor="top right">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn"/>
                          <Column id="datacolumn"/>
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">1</Col>
                            <Col id="datacolumn">용기코드</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">2</Col>
                            <Col id="datacolumn">용기명</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Combo>
                    <Combo position="absolute 108 8 258 27" id="cmb_refgbn" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn" value="1" text="사용코드" index="0" anchor="default">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn"/>
                          <Column id="datacolumn"/>
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">1</Col>
                            <Col id="datacolumn">사용코드</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">2</Col>
                            <Col id="datacolumn">전체코드</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Combo>
                  </Layout>
                </Layouts>
              </Div>
              <Button position="absolute 1137 49 1190 68" id="btn_addrow" class="btn2" text="행추가" onclick="group3_btn_addrow_onclick" anchor="top right"/>
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_save" taborder="1" text="저장" class="btn4" position="absolute 1065 3 1121 25" onclick="btn_save_onclick" anchor="top right"/>
        <Button id="btn_reset" taborder="2" text="초기화" class="btn4" position="absolute 1124 3 1192 25" onclick="btn_reset_onclick" anchor="top right"/>
        <Static id="caption6" text="통합용기코드관리" class="tit_1" position="absolute 0 0 155 25"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_tube" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="tubefromdd" type="STRING"/>
          <Column id="tubetodd" type="STRING"/>
          <Column id="tubecd" type="STRING"/>
          <Column id="tubenm" type="STRING"/>
          <Column id="tubescrnnm" type="STRING"/>
          <Column id="tubeabbrnm" type="STRING"/>
          <Column id="tubeprntnm" type="STRING"/>
          <Column id="tubelblnm" type="STRING"/>
          <Column id="tubevol" type="STRING"/>
          <Column id="tubeunit" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="refgbn" type="STRING" size="0"/>
          <Column id="searchgbn" type="STRING" size="0"/>
          <Column id="searchnm" type="STRING" size="0"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptflag" type="STRING" size="0"/>
          <Column id="instcd" type="STRING" size="0"/>
          <Column id="refgbn" type="STRING" size="0"/>
          <Column id="userdeptflagcd" type="STRING" size="0"/>
          <Column id="searchgbn" type="STRING" size="0"/>
          <Column id="searchnm" type="STRING" size="0"/>
          <Column id="text" type="STRING" size="0"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_lb0000" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING"/>
          <Column id="cd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grddata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false"/>
      <Dataset id="ds_grddata2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_spckind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING"/>
          <Column id="cd" type="STRING"/>
        </ColumnInfo>
        <Rows>
          <Row/>
          <Row/>
          <Row/>
          <Row/>
          <Row/>
          <Row/>
          <Row/>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.group1.cmb_refgbn" propid="value" datasetid="ds_hidden" columnid="refgbn"/>
      <BindItem id="item1" compid="group3.group1.cmb_searchgbn" propid="value" datasetid="ds_hidden" columnid="searchgbn"/>
      <BindItem id="item2" compid="group3.group1.ipt_text" propid="value" datasetid="ds_hidden" columnid="searchnm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	        :	SMLLF10400_통합용기코드관리.xfdl
 * Make Date 		:	2015-12-16
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-09      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LLZ001.xjs";

//=======================================================================================

function cf_TRLLF10401(strSvcID, nErrorCode, strErrorMag){	
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
}
function cf_TRLLF10402(strSvcID, nErrorCode, strErrorMag){	
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
}
function cf_TRLLF10402(strSvcID, nErrorCode, strErrorMag){	
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
}
function cf_TRLLF00401(strSvcID, nErrorCode, strErrorMag){	
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
}

function cbf_TRLZZ00101(strSvcID, nErrorCode, strErrorMag){	
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
}

function SMLLF10400_oninit(obj:Form, e:InitEventInfo)
{
	//폼 초기화 함수
	frmf_initForm(obj);						
}

function SMLLF10400_onload(obj:Form, e:LoadEventInfo)
{
	grdf_setRowTypeIcon(group3.grd_tube, 0);  	  	  							

	group3.group1.cmb_refgbn.value = "1";
	group3.group1.cmb_searchgbn.value = "1";
	
	// 초기정보 조회
	//0001 : 병동조회, 0000 : 사용자부서코드조회, 1004 : 아침채혈 및 BT, MR 등 아침채혈화면에서 조회
	 var sInDsName = dsf_createDsRow("ds_temp_search"
								 , [{col: "codeflag", val: "0000|"}]);
	// 서브밋호출
	var oParam = {};
		oParam.id          = "TRLZZ00101";
		oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
		oParam.method      = "reqGetInitCodeInfo";
		oParam.inds        = "cond="+sInDsName;
		oParam.outds       = "ds_init_lb0000=0000";
		oParam.async       = false;
		oParam.callback    = "cbf_TRLZZ00101";

	tranf_submit(oParam);		                             	
}

function fGetTubeList()
{
 	ds_send.setColumn(0,"refgbn", ds_hidden.getColumn(0,"refgbn"));
 	ds_send.setColumn(0,"deptflag", ds_init_lb0000.getColumn(0,"nm")); 		

	var oParam = {};
		oParam.id          = "TRLLF10401";
		oParam.service     = "diagtestbaseinfomngtapp.GeneralTestBaseInfoMngt";
		oParam.method      = "reqGetUnityTubeList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_grd_tube=getUnityTubeList";
		oParam.async       = false;
		oParam.callback    = "cf_TRLLF10401";

	tranf_submit(oParam);
    lf_SetTubeTodd(); 	
	
}
// 종료된 용기 정보 다른색으로 보여주기
function lf_SetTubeTodd()
{	
	var tDay = utlf_getCurrentDate();
    grdf_setRowStyle( group3.grd_tube , "0" ,tDay,"tubetodd","small") // row의 색상을 변경한다.				
}

function group3_group1_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
   lf_GetTubeList();
}

function lf_GetTubeSrch()
{	
	group3.group1.ipt_text.updateToDataset();
 	ds_send.setColumn(0,"searchgbn", ds_hidden.getColumn(0,"searchgbn"));
 	ds_send.setColumn(0,"text",      ds_hidden.getColumn(0, "searchnm")); 	
 	ds_send.setColumn(0,"deptflag",  ds_init_lb0000.getColumn(0,"nm")); 		

	var oParam = {};
		oParam.id          = "TRLLF10402";
		oParam.service     = "diagtestbaseinfomngtapp.GeneralTestBaseInfoMngt";
		oParam.method      = "reqGetUnityTubeListRef";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_grd_tube=getUnityTubeListRef";
		oParam.async       = false;
		oParam.callback    = "cf_TRLLF10402";

	tranf_submit(oParam);
	lf_SetTubeTodd(); 	 		
}

function lf_GetTubeList()
{
 	ds_send.setColumn(0,"refgbn", ds_hidden.getColumn(0,"refgbn"));
 	ds_send.setColumn(0,"deptflag", ds_init_lb0000.getColumn(0,"nm")); 		

	var oParam = {};
		oParam.id          = "TRLLF00401";
		oParam.service     = "diagtestbaseinfomngtapp.GeneralTestBaseInfoMngt";
		oParam.method      = "reqGetUnityTubeList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_grd_tube=getUnityTubeList";
		oParam.async       = false;
		oParam.callback    = "cf_TRLLF00401";

	tranf_submit(oParam);

	lf_SetTubeTodd(); 	 		
}
function group3_group1_btn_ref_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_GetTubeSrch();
}

function lf_InsRowAdd()
{
	var l_current = ds_grd_tube.addRow();
	var today = utlf_getCurrentDate();
	
 	ds_grd_tube.setColumn(l_current,"tubefromdd", today);
 	ds_grd_tube.setColumn(l_current,"tubetodd", "99991231"); 	
 	ds_grd_tube.setColumn(l_current,"tubeabbrnm", "-");
 	ds_grd_tube.setColumn(l_current,"tubeprntnm", "-"); 	
 	ds_grd_tube.setColumn(l_current,"tubelblnm","-"); 	

}
	
function group3_btn_addrow_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_InsRowAdd();	
}

function lf_NullCheck()
{
	var msg = "";
	var nullyn = "true";
	
	for(i=0; i<ds_grd_tube.rowcount; i++ ){
        var rowstatus = ds_grd_tube.getRowType(i);
		if(( rowstatus == 2) || ( rowstatus == 4))
		{						
			if(utlf_isNull(ds_grd_tube.getColumn(i,"tubecd")))
			{
				msg = "[용기코드] 는 " ;
				sysf_messageBox(msg, "I003", "");
				return "false";
			}
			if(utlf_isNull(ds_grd_tube.getColumn(i,"tubefromdd")))
			{			
				msg = "[용기시용시작일] 은 " ;
				sysf_messageBox(msg, "I003", "");
				return "false";
			}
			if(utlf_isNull(ds_grd_tube.getColumn(i,"tubetodd")))
			{							
				msg = "[용기시용종료일] 은 " ;
				sysf_messageBox(msg, "I003", "");
				return "false";
			}
			if(utlf_isNull(ds_grd_tube.getColumn(i,"tubenm")))
			{
				msg = "[용기명] 은 " ;
				sysf_messageBox(msg, "I003", "");
				return "false";
			}
			if(utlf_isNull(ds_grd_tube.getColumn(i,"tubescrnnm")))
			{
				msg = "[용기화면명] 은 " ;
				sysf_messageBox(msg, "I003", "");
				return "false";
			}
			return nullyn;
		}
	}
}

function lf_SetTubeInfo()
{
	ds_send.setColumn(0,"deptflag", ds_init_lb0000.getColumn(0, "nm"));  //		
    var oDsUpdate = grdf_getGridUpdateData(group3.grd_tube);
    
	grdf_setStatusColumn(oDsUpdate,"status");
	ds_grddata.clear();
	ds_grddata.copyData(oDsUpdate, true);

	var oParam = {};
		oParam.id          = "TXLLF00401";
		oParam.service     = "diagtestbaseinfomngtapp.GeneralTestBaseInfoMngt";
		oParam.method      = "reqExeUnitySaveTubeInfo";
		oParam.inds        = "tubedt=ds_grddata flist=ds_send";
		oParam.async       = false;
		//oParam.callback    = "cf_TXLLF00401";
	tranf_submit(oParam);

	lf_GetTubeList();
}		

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	if(lf_NullCheck()=="true")
	{
		lf_SetTubeInfo();
	}	
}

function group3_group1_ipt_text_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		lf_GetTubeSrch();
	}
}
function btn_reset_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetInit();
}

function fSetInit()
{
	//model.removeNodeset("/root/main/tubelist");
	ds_grd_tube.clearData();
}]]></Script>
  </Form>
</FDL>