YNU_JEUS/app_home/himed/xpapps/lis/refprintmngtxp/xp/SPLNP90800_골수이식환자관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLNP90800" position="absolute 0 0 1180 781" titletext="Manual작업대장" oninit="SPLNP90800_oninit" onload="SPLNP90800_onload">
    <Layouts>
      <Layout>
        <Button id="btn_save" taborder="1" text="저 장" class="btn4" position="absolute 973 28 1041 50" onclick="btn_save_onclick" anchor="top right"/>
        <Button id="btn_init" taborder="2" text="초기화" class="btn4" position="absolute 1109 28 1177 50" onclick="btn_init_onclick" anchor="top right"/>
        <Button id="button3" taborder="3" text="삭 제" class="btn4" position="absolute 1042 28 1110 50" onclick="button3_onclick" anchor="top right"/>
        <Static id="caption6" text="골수이식환자관리" class="tit_1" position="absolute 0 0 136 25" anchor="left top"/>
        <Div id="group2" taborder="4" position="absolute 0 56 1180 96" anchor="left top right" class="div_SA2">
          <Layouts>
            <Layout>
              <Static id="caption3" text="등록번호 :" class="search_name" position="absolute 930 10 1016 27" anchor="top right"/>
              <Edit id="ipt_search" taborder="1" class="input_button" position="absolute 1030 10 1161 29" onkeyup="group2_ipt_search_onkeyup" anchor="top right" oneditclick="group2_ipt_search_oneditclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_excel" taborder="5" text="엑셀" class="btn7" visible="false" position="absolute 1013 99 1066 118" anchor="top right"/>
        <Grid id="grd_bonetrlist" taborder="6" binddataset="ds_grd_bonetrlist" useinputpanel="false" position="absolute 0 125 1180 780" oncloseup="grd_bonetrlist_oncloseup" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="23"/>
                <Column size="22"/>
                <Column size="60"/>
                <Column size="80"/>
                <Column size="70"/>
                <Column size="90"/>
                <Column size="80"/>
                <Column size="72"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="80"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1"/>
                <Cell col="2" text="번호"/>
                <Cell col="3" text="차트번호"/>
                <Cell col="4" text="이름"/>
                <Cell col="5" text="보관함"/>
                <Cell col="6" text="공여자ID"/>
                <Cell col="7" text="공여자명"/>
                <Cell col="8" text="이식일"/>
                <Cell col="9" text="Informative결과"/>
                <Cell col="10" text="◀ 결과입력시간"/>
                <Cell col="11" text="Chimerism결과"/>
                <Cell col="12" text="◀ 결과입력시간"/>
                <Cell col="13" text="결과번호"/>
                <Cell col="14" text="결과입력시간"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                <Cell col="2" displaytype="normal" edittype="none" text="bind:bmtrnsseqno"/>
                <Cell col="3" displaytype="text" edittype="text" style="align:center;" text="bind:pid"/>
                <Cell col="4" displaytype="text" edittype="text" style="align:center;" text="bind:patnm"/>
                <Cell col="5" displaytype="text" edittype="text" style="align:center;" text="bind:keeppos"/>
                <Cell col="6" displaytype="text" edittype="text" style="align:center;" text="bind:dnorpid"/>
                <Cell col="7" displaytype="text" edittype="text" style="align:center;" text="bind:dnornm"/>
                <Cell col="8" displaytype="text" edittype="date" style="align:center middle;" text="bind:trnsdt" mask="expr:utlf_isNull(trnsdt) || trnsdt == '-' ? '' : '####-##-##'"/>
                <Cell col="9" displaytype="combo" edittype="combo" text="bind:prerslt" combodataset="ds_init_prerslt" combocodecol="value" combodatacol="label"/>
                <Cell col="10" displaytype="text" edittype="date" text="bind:prersltdt" mask="expr:utlf_isNull(prersltdt) || prersltdt == '-' ? '': '####-##-##'"/>
                <Cell col="11" displaytype="combo" edittype="combo" text="bind:postrslt" combodataset="ds_init_postrslt" combocodecol="lable" combodatacol="value"/>
                <Cell col="12" displaytype="text" edittype="date" text="bind:postrsltdt" mask="expr:utlf_isNull(postrsltdt) || postrsltdt == '-' ? '': '####-##-##'"/>
                <Cell col="13" displaytype="text" edittype="text" text="bind:rsltno"/>
                <Cell col="14" displaytype="text" edittype="text" text="bind:rgstdt" enable="false"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="button1" taborder="7" text="행추가" class="btn2" position="absolute 1070 99 1123 118" onclick="button1_onclick" anchor="top right"/>
        <Button id="button2" taborder="8" text="행삭제" class="btn2" position="absolute 1125 99 1178 118" onclick="button2_onclick" anchor="top right"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_bonetrlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING"/>
          <Column id="bmtrnsseqno" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="keeppos" type="STRING"/>
          <Column id="dnorpid" type="STRING"/>
          <Column id="dnornm" type="STRING"/>
          <Column id="trnsdt" type="STRING"/>
          <Column id="prerslt" type="STRING"/>
          <Column id="prersltdt" type="STRING"/>
          <Column id="postrslt" type="STRING"/>
          <Column id="postrsltdt" type="STRING"/>
          <Column id="rsltno" type="STRING"/>
          <Column id="rgstdt" type="STRING"/>
        </ColumnInfo>
        <Rows/>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="workgbn" type="STRING" size="256"/>
          <Column id="workcmd" type="STRING" size="256"/>
          <Column id="colfromdd" type="STRING" size="256"/>
          <Column id="coltodd" type="STRING" size="256"/>
          <Column id="bmtrnsseqno" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="bonetrlist" type="STRING" size="256"/>
          <Column id="uibonetrlist" type="STRING" size="256"/>
          <Column id="bcolgbn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_prerslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">DIS 80</Col>
            <Col id="value">DIS 80</Col>
          </Row>
          <Row>
            <Col id="label">DIS 111</Col>
            <Col id="value">DIS 111</Col>
          </Row>
          <Row>
            <Col id="label">ApoB</Col>
            <Col id="value">ApoB</Col>
          </Row>
          <Row>
            <Col id="label">Non informative</Col>
            <Col id="value">Non informative</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_postrslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="lable" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="lable">Complete</Col>
            <Col id="value">Complete</Col>
          </Row>
          <Row>
            <Col id="lable">Mixed</Col>
            <Col id="value">Mixed</Col>
          </Row>
          <Row>
            <Col id="lable">Only host band</Col>
            <Col id="value">Only host band</Col>
          </Row>
          <Row>
            <Col id="lable">판독불가</Col>
            <Col id="value">판독불가</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_uibonetrlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";

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

function SPLNP90800_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_bonetrlist);
	grdf_setRowTypeIcon(grd_bonetrlist, 0);
	fnSetInit();
}	

//초기화
function fnSetInit()
{				
	ds_grd_bonetrlist.clearData();
	group2.ipt_search.setFocus();
}

//조회 
function fGetBoneTranfList()
{
	ds_grd_bonetrlist.clearData();
	ds_send.setColumn(0, "pid", group2.ipt_search.value);
	
	var oParam = {};
    oParam.id          = "TRLNP90801";
    oParam.service     = "refprintmngtapp.GeneralRefPrintMngt";
    oParam.method      = "reqGetboneTransList";
    oParam.inds        = "cond=ds_send";
    oParam.outds       = "ds_grd_bonetrlist=bonetrlist";
    oParam.async       = false;
    //oParam.callback    = "cf_TRLNP90801";

	tranf_submit(oParam);
}	

//행추가
function fSetAddRow() 
{
	var addRw;
	if(ds_grd_bonetrlist.rowcount < 0)
	{
		addRw = ds_grd_bonetrlist.addRow();
	}
	else
	{
		addRw = ds_grd_bonetrlist.insertRow(0);
	}

	var arrPostion = new Array();
	arrPostion[0] = addRw;
	
	grdf_setStatus(grd_bonetrlist, "I", arrPostion);
}				

//행삭제
function fInsRowdel()
{		
	var arrPostion = new Array();
	arrPostion[0] = ds_grd_bonetrlist.rowposition;
	if(ds_grd_bonetrlist.getRowType(arrPostion)==Dataset.ROWTYPE_INSERT)
	{
		ds_grd_bonetrlist.deleteRow(arrPostion);
	}
	else
	{
		grdf_setStatus(grd_bonetrlist, "D", arrPostion);
	}
}

//저장
function fsavelist()
{
	var comment = "" ;
	for(i = 0; i <= grd_bonetrlist.rowcount - 1; i++)
	{	
		var rowStatus = ds_grd_bonetrlist.getRowType(i);
		
		if(rowStatus == 1 || 2)
		{
			if(utlf_isNull(ds_grd_bonetrlist.getColumn(i, "pid")))
			{
				comment = comment + "등록번호";
			}
			if(utlf_isNull(ds_grd_bonetrlist.getColumn(i, "patnm")))
			{
				comment = comment + "환자명 ";
			}
			if(utlf_isNull(ds_grd_bonetrlist.getColumn(i, "keeppos")))
			{
				ds_grd_bonetrlist.setColumn(i, "keeppos", "-");
			}
			if(utlf_isNull(ds_grd_bonetrlist.getColumn(i, "dnornm")))
			{
				ds_grd_bonetrlist.setColumn(i, "dnornm", "-");
			}								
			if( !utlf_isNull(comment))
			{
				alert ( comment + " 를 입력하여주세요 ");
				return;
			}							
		}
	}
	grdf_setStatusColumn(ds_grd_bonetrlist, "status");
	dsf_copyDs(ds_send_uibonetrlist, grdf_getGridUpdateData(grd_bonetrlist), "replace");
	
	var oParam = {};
    oParam.id          = "TXLNP90801";
    oParam.service     = "refprintmngtapp.GeneralRefPrintMngt";
    oParam.method      = "reqSetboneList";
    oParam.inds        = "cond=ds_send_uibonetrlist";
    oParam.async       = false;
    //oParam.callback    = "cf_TXLNP90801";

	tranf_submit(oParam);
	fnSetInit(); //초기화
}

//삭제
function fdelitem()
{
	ds_grd_bonetrlist.enableevent = false;
	ds_grd_bonetrlist.updatecontrol = false;

	for(var i = 0; i <= grd_bonetrlist.rowcount; i++)
	{
		var chk = ds_grd_bonetrlist.getColumn(i, "chk");
		if(ds_grd_bonetrlist.getColumn(i, "chk") == 1)
		{
			ds_grd_bonetrlist.setRowType(i, 8);
		}
	}
	ds_grd_bonetrlist.updatecontrol = true;
	ds_grd_bonetrlist.enableevent = true;
	grdf_setStatusColumn(ds_grd_bonetrlist, "status");
	
	ds_send_uibonetrlist.copyData(grdf_getGridUpdateData(grd_bonetrlist,"all"),true);
	
	var oParam = {};
    oParam.id          = "TXLNP90702";
    oParam.service     = "refprintmngtapp.GeneralRefPrintMngt";
    oParam.method      = "reqDelboneList";
    oParam.inds        = "cond=ds_send_uibonetrlist";
    oParam.async       = false;
    //oParam.callback    = "cf_TXLNP90702";

	tranf_submit(oParam);
	fnSetInit(); //초기화
}

//등록번호 검색
function group2_ipt_search_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		if(utlf_isNull(group2.ipt_search.text))
		{
			alert("등록번호를 입력해 주세요. ");
			return;
			fnSetInit();
		}
		fGetBoneTranfList();
		group2.ipt_search.setFocus();
	}
}

//초기화
function btn_init_onclick(obj:Button,  e:ClickEventInfo)
{
	fnSetInit();
}

//행추가
function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetAddRow();
}

//그리드값 변경시
function grd_bonetrlist_oncloseup(obj:Grid, e:GridEditEventInfo)
{
	var tDay = utlf_getCurrentDate();
// 	if(obj.currentcol == 9)
// 	{	
// 		ds_grd_bonetrlist.setColumn(0, "prersltdt", tDay);
// 	}
// 	
// 	if(obj.currentcol == 11)
// 	{	
// 		ds_grd_bonetrlist.setColumn(0, "postrsltdt", tDay);
// 	}
}

//행삭제
function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	fInsRowdel();
}

//저장
function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	fsavelist();
}

//삭제
function button3_onclick(obj:Button,  e:ClickEventInfo)
{
	fdelitem();
}
]]></Script>
  </Form>
</FDL>