YNU_JEUS/app_home/himed/xpapps/ast/pharmacyconsultxp/xp/SPADC62800_한국형알고리즘V20.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPADC62800" position="absolute 0 0 650 840" titletext="한국형 알고리즘 V20" oninit="SPADC62800_oninit" onload="SPADC62800_onload">
    <Layouts>
      <Layout>
        <Shape id="roundrect2" type="roundrectangle" position="absolute 0 776 650 806"/>
        <Static id="caption8" text="Certain : &gt;= 12" position="absolute 483 784 568 798"/>
        <Static id="caption9" class="color_2" position="absolute 465 783 480 798"/>
        <Static id="caption6" text="Probable : 6~11" position="absolute 363 784 454 798"/>
        <Static id="caption7" class="color_2" position="absolute 345 783 360 798"/>
        <Static id="caption4" text="Possible : 2~5" position="absolute 243 784 327 798"/>
        <Static id="caption5" class="color_2" position="absolute 225 783 240 798"/>
        <Static id="caption51" text="Unlikely : &lt;= 1" position="absolute 123 784 204 798"/>
        <Static id="caption49" class="color_2" position="absolute 105 783 120 798"/>
        <Static id="caption47" text="범     례" class="cell_2" position="absolute 15 781 85 801"/>
        <Static id="caption2" text="Total Score" class="tit_2" position="absolute 0 755 97 772"/>
        <Edit id="input3" taborder="3" readonly="true" position="absolute 100 752 195 773"/>
        <Static id="caption3" text="인과관계" class="tit_2" position="absolute 255 755 330 772"/>
        <Combo id="combo5" taborder="4" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_default" enable="false" position="absolute 330 752 650 773">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">1</Col>
                <Col id="datacolumn">Certain</Col>
              </Row>
              <Row>
                <Col id="codecolumn">2</Col>
                <Col id="datacolumn">probable</Col>
              </Row>
              <Row>
                <Col id="codecolumn">3</Col>
                <Col id="datacolumn">possible</Col>
              </Row>
              <Row>
                <Col id="codecolumn">4</Col>
                <Col id="datacolumn">unlikely</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Grid id="grd_koralgo" taborder="5" binddataset="ds_main_koalgolist" useinputpanel="false" position="absolute 0 24 650 746" autofittype="col" oncellclick="grd_koralgo_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="111"/>
                <Column size="182"/>
                <Column size="300"/>
                <Column size="28"/>
                <Column size="27"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1"/>
                <Cell col="2"/>
                <Cell col="3"/>
                <Cell col="4"/>
              </Band>
              <Band id="body">
                <Cell style="align:left middle;" text="bind:cmt" wordwrap="word" suppress="1" suppressalign="middle,over"/>
                <Cell col="1" style="align:left middle;" text="bind:req" wordwrap="word" editlimitbymask="none" suppress="2" suppressalign="middle,over"/>
                <Cell col="2" style="align:left middle;" text="bind:ans"/>
                <Cell col="3" text="bind:scor"/>
                <Cell col="4" displaytype="checkbox" edittype="checkbox" text="bind:chk" expr="expr : (chk==&quot;Y&quot;||chk==1)?1:0"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line1" class="line_1" position="absolute 0 18 650 24"/>
        <Static id="caption1" text="한국형 알고리즘 V2.0" class="tit_2" position="absolute 0 3 210 20"/>
        <Button id="btn_cfm" taborder="6" text="확인" class="btn4" position="absolute 534 811 590 833" onclick="btn_cfm_onclick"/>
        <Button id="btn_cls" taborder="7" text="닫기" class="btn4" position="absolute 593 811 649 833" onclick="btn_cls_onclick"/>
        <Shape id="line00" class="line_1" position="absolute 0 19 650 25"/>
        <Shape id="line02" class="line_1" position="absolute 0 20 650 26"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_koalgolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_main_koalgolist_oncolumnchanged">
        <ColumnInfo>
          <Column id="cmt" type="STRING"/>
          <Column id="req" type="STRING"/>
          <Column id="ans" type="STRING"/>
          <Column id="scor" type="STRING"/>
          <Column id="chk" type="STRING"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cmt">시작적 선후관계</Col>
            <Col id="req">약물 투여와 유해사례 발현의 선후관계에 관한 정보가 있는가?</Col>
            <Col id="ans">시간적 선후관계 합당</Col>
            <Col id="scor">+3</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">시작적 선후관계</Col>
            <Col id="req">약물 투여와 유해사례 발현의 선후관계에 관한 정보가 있는가?</Col>
            <Col id="ans">선후관계 모순</Col>
            <Col id="scor">-3</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">시작적 선후관계</Col>
            <Col id="req">약물 투여와 유해사례 발현의 선후관계에 관한 정보가 있는가?</Col>
            <Col id="ans">정보없음</Col>
            <Col id="scor">0</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">감량 또는 중단</Col>
            <Col id="req">감량 또는 중단에 대한 정보가 있는가?</Col>
            <Col id="ans">감량 또는 중단 후 임상적 호전이 관찰됨</Col>
            <Col id="scor">+3</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">감량 또는 중단</Col>
            <Col id="req">감량 또는 중단에 대한 정보가 있는가?</Col>
            <Col id="ans">감량 또는 중단과 무관한 임상경과를 보임</Col>
            <Col id="scor">-2</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">감량 또는 중단</Col>
            <Col id="req">감량 또는 중단에 대한 정보가 있는가?</Col>
            <Col id="ans">감량 또는 중단을 시행하지 않음</Col>
            <Col id="scor">0</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">감량 또는 중단</Col>
            <Col id="req">감량 또는 중단에 대한 정보가 있는가?</Col>
            <Col id="ans">정보없음</Col>
            <Col id="scor">0</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">유해사례의 과거력</Col>
            <Col id="req">이전에 동일한 또는 유사한 약물로 유해사례를 경험한 적이 있는가?</Col>
            <Col id="ans">예</Col>
            <Col id="scor">+1</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">유해사례의 과거력</Col>
            <Col id="req">이전에 동일한 또는 유사한 약물로 유해사례를 경험한 적이 있는가?</Col>
            <Col id="ans">아니오</Col>
            <Col id="scor">-1</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">유해사례의 과거력</Col>
            <Col id="req">이전에 동일한 또는 유사한 약물로 유해사례를 경험한 적이 있는가?</Col>
            <Col id="ans">정보없음</Col>
            <Col id="scor">0</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">병용약물</Col>
            <Col id="req">병용약물에 대한 정보가 있는가?</Col>
            <Col id="ans">병용약물로 유해사례를 설명할 수 없는 경우</Col>
            <Col id="scor">+2</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">병용약물</Col>
            <Col id="req">병용약물에 대한 정보가 있는가?</Col>
            <Col id="ans">병용약물 단독으로 설명할 수 있는 경우</Col>
            <Col id="scor">-3</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">병용약물</Col>
            <Col id="req">병용약물에 대한 정보가 있는가?</Col>
            <Col id="ans">의심약물과 상호작용으로 설명되는 경우</Col>
            <Col id="scor">+2</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">병용약물</Col>
            <Col id="req">병용약물에 대한 정보가 있는가?</Col>
            <Col id="ans">병용약물에 대한 설명이 없는 경우</Col>
            <Col id="scor">0</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">병용약물</Col>
            <Col id="req">병용약물에 대한 정보가 있는가?</Col>
            <Col id="ans">정보없음</Col>
            <Col id="scor">0</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">비약물요인</Col>
            <Col id="req">비약물요인에 대한 정보가 있는가?</Col>
            <Col id="ans">비약물요인으로 유해사례가 설명되지 않음</Col>
            <Col id="scor">+1</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">비약물요인</Col>
            <Col id="req">비약물요인에 대한 정보가 있는가?</Col>
            <Col id="ans">비약물요인으로 유해사례가 설명됨</Col>
            <Col id="scor">-1</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">비약물요인</Col>
            <Col id="req">비약물요인에 대한 정보가 있는가?</Col>
            <Col id="ans">정보없음</Col>
            <Col id="scor">0</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">약물에 대해 알려진 정보</Col>
            <Col id="req"/>
            <Col id="ans">허가사항(label, insert 등)에 반영되어 있음</Col>
            <Col id="scor">+3</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">약물에 대해 알려진 정보</Col>
            <Col id="req"/>
            <Col id="ans">허가사항에 반영되어 있지 않으나 증례보고가 있었음</Col>
            <Col id="scor">+2</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">약물에 대해 알려진 정보</Col>
            <Col id="req"/>
            <Col id="ans">알려진바 없음</Col>
            <Col id="scor">0</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">재투약</Col>
            <Col id="req">약물 재투여에 관한 정보가 있는가?</Col>
            <Col id="ans">재투약으로 동일한 유해사례가 발생함</Col>
            <Col id="scor">+3</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">재투약</Col>
            <Col id="req">약물 재투여에 관한 정보가 있는가?</Col>
            <Col id="ans">재투약으로 동일한 유해사례가 발생하지 않음</Col>
            <Col id="scor">-2</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">재투약</Col>
            <Col id="req">약물 재투여에 관한 정보가 있는가?</Col>
            <Col id="ans">재투약하지 않음</Col>
            <Col id="scor">0</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">재투약</Col>
            <Col id="req">약물 재투여에 관한 정보가 있는가?</Col>
            <Col id="ans">정보없음</Col>
            <Col id="scor">0</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">특이적인 검사</Col>
            <Col id="req">약물검사, 약물농도 검사와 같은 특이적인 검사를 시행하였는가?</Col>
            <Col id="ans">양성</Col>
            <Col id="scor">+3</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">특이적인 검사</Col>
            <Col id="req">약물검사, 약물농도 검사와 같은 특이적인 검사를 시행하였는가?</Col>
            <Col id="ans">음성</Col>
            <Col id="scor">-1</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">특이적인 검사</Col>
            <Col id="req">약물검사, 약물농도 검사와 같은 특이적인 검사를 시행하였는가?</Col>
            <Col id="ans">결과를 알 수 없음</Col>
            <Col id="scor">0</Col>
            <Col id="chk"/>
          </Row>
          <Row>
            <Col id="cmt">특이적인 검사</Col>
            <Col id="req">약물검사, 약물농도 검사와 같은 특이적인 검사를 시행하였는가?</Col>
            <Col id="ans">정보없음</Col>
            <Col id="scor">0</Col>
            <Col id="chk"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_data" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="totscr" type="STRING" size="256"/>
          <Column id="casrslt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_popdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="casrslt" type="STRING" size="256"/>
          <Column id="totscr" type="STRING" size="256"/>
          <Column id="koralgo" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_koalgolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="input3" propid="value" datasetid="ds_send_data" columnid="totscr"/>
      <BindItem id="item1" compid="combo5" propid="value" datasetid="ds_send_data" columnid="casrslt"/>
    </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";

/******************************************************************
 * Argument          : 
 * Description       : 초기화
 ******************************************************************/
function SPADC62800_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPADC62800_onload(obj:Form, e:LoadEventInfo)
{
	try{
		dsf_copyDs(ds_popdata,arg_ds_popdata);
	}catch(e){}
	
	var iscr = ds_popdata.getColumn(0, "koralgo");
	var comArray = iscr.split("^");
	
	if( comArray.length > 0 ){
		for( var i = 1; i < comArray.length; i++) {
			if( !utlf_isNull(comArray[i])) {
				ds_main_koalgolist.setColumn(comArray[i]-1, "chk", "Y");
			}
		}
	}

	fSetCalc();
	
	ds_hidden_koalgolist.copyData(ds_main_koalgolist);
}

/******************************************************************
 * Argument          : 
 * Description       : fSetCalc()
 ******************************************************************/
function fSetCalc(){
	var iTotScor = 0;
						
	for( var iRowNo = 0 ; iRowNo <= ds_main_koalgolist.rowcount; iRowNo++ ) {
		if( ds_main_koalgolist.getColumn(iRowNo, "chk") == "Y" ) {
			iTotScor += Number(ds_main_koalgolist.getColumn(iRowNo, "scor"));
		}
	}
	
	ds_send_data.setColumn(0, "totscr", iTotScor);
	
	if(iTotScor >= 12) {
		ds_send_data.setColumn(0, "casrslt", "1");
	} else if(6 <= iTotScor && iTotScor<= 11) {
		ds_send_data.setColumn(0, "casrslt", "2");
	} else if(2 <= iTotScor && iTotScor<= 5) {
		ds_send_data.setColumn(0, "casrslt", "3");
	} else {
		ds_send_data.setColumn(0, "casrslt", "4");
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 
 ******************************************************************/
function grd_koralgo_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	var iRowNo = ds_main_koalgolist.rowposition;
	var cCol = grd_koralgo.currentcol;

	if(0 <= iRowNo && iRowNo <= 2) {
		if( cCol == grd_koralgo.getBindCellIndex("body","chk") ){
			if( ds_main_koalgolist.getColumn(iRowNo, "chk") == "Y" ){
				for( var i = 0; i <= 2; i++ ){
					if( i != iRowNo ){
						ds_main_koalgolist.setColumn(i, "chk", "N");
					}
				}
			} else {
				return;
			}
		}
	} else if(3 <= iRowNo && iRowNo <= 6) {
		if( cCol == grd_koralgo.getBindCellIndex("body","chk") ){
			if( ds_main_koalgolist.getColumn(iRowNo, "chk") == "Y" ){
				for( var i = 3; i <= 6; i++ ){
					if( i != iRowNo ){
						ds_main_koalgolist.setColumn(i, "chk", "N");
					}
				}
			} else {
				return;
			}
		}
	} else if(7 <= iRowNo && iRowNo <= 9) {
		if( cCol == grd_koralgo.getBindCellIndex("body","chk") ){
			if( ds_main_koalgolist.getColumn(iRowNo, "chk") == "Y" ){
				for( var i = 7; i <= 9; i++ ){
					if( i != iRowNo ){
						ds_main_koalgolist.setColumn(i, "chk", "N");
					}
				}
			} else {
				return;
			}
		}
	} else if(10 <= iRowNo && iRowNo <= 14) {
		if( cCol == grd_koralgo.getBindCellIndex("body","chk") ){
			if( ds_main_koalgolist.getColumn(iRowNo, "chk") == "Y" ){
				for( var i = 10; i <= 14; i++ ){
					if( i != iRowNo ){
						ds_main_koalgolist.setColumn(i, "chk", "N");
					}
				}
			} else {
				return;
			}
		}
	} else if(15 <= iRowNo && iRowNo <= 17) {
		if( cCol == grd_koralgo.getBindCellIndex("body","chk") ){
			if( ds_main_koalgolist.getColumn(iRowNo, "chk") == "Y" ){
				for( var i = 15; i <= 17; i++ ){
					if( i != iRowNo ){
						ds_main_koalgolist.setColumn(i, "chk", "N");
					}
				}
			} else {
				return;
			}
		}
	} else if(18 <= iRowNo && iRowNo <= 20) {
		if( cCol == grd_koralgo.getBindCellIndex("body","chk") ){
			if( ds_main_koalgolist.getColumn(iRowNo, "chk") == "Y" ){
				for( var i = 18; i <= 20; i++ ){
					if( i != iRowNo ){
						ds_main_koalgolist.setColumn(i, "chk", "N");
					}
				}
			} else {
				return;
			}
		}
	} else if(21 <= iRowNo && iRowNo <= 24) {
		if( cCol == grd_koralgo.getBindCellIndex("body","chk") ){
			if( ds_main_koalgolist.getColumn(iRowNo, "chk") == "Y" ){
				for( var i = 21; i <= 24; i++ ){
					if( i != iRowNo ){
						ds_main_koalgolist.setColumn(i, "chk", "N");
					}
				}
			} else {
				return;
			}
		}
	} else {
		if( cCol == grd_koralgo.getBindCellIndex("body","chk") ){
			if( ds_main_koalgolist.getColumn(iRowNo, "chk") == "Y" ){
				for( var i = 25; i <= 28; i++ ){
					if( i != iRowNo ){
						ds_main_koalgolist.setColumn(i, "chk", "N");
					}
				}
			} else {
				return;
			}
		}
	}
	ds_main_koalgolist.setColumn(iRowNo, "chk", "Y");
	
	fSetCalc();
}

/******************************************************************
 * Argument          : 
 * Description       : 확인 button event
 ******************************************************************/
function btn_cfm_onclick(obj:Button,  e:ClickEventInfo)
{
	var skorAlgo = "v20";
	var sTemp = "";
	
	for( var iRowNo = 0 ; iRowNo <= 7 ; iRowNo++) {
		if(iRowNo == 0) {
			sTemp = "";
			for( var iNo = 0 ; iNo <= 2 ; iNo++) {
				if( ds_main_koalgolist.getColumn(iNo, "chk") == "Y") {
					sTemp = iNo+1;
				}
			}
			skorAlgo += "^" + sTemp;
		} else if(iRowNo == 1) {
			sTemp = "";
			for( var iNo = 3 ; iNo <= 6 ; iNo++ ) {
				if( ds_main_koalgolist.getColumn(iNo, "chk") == "Y") {
					sTemp = iNo+1;
				}
			}
			skorAlgo += "^" + sTemp;
		} else if(iRowNo == 2) {
			sTemp = "";
			for(var iNo = 7 ; iNo <= 9 ; iNo++) {
				if( ds_main_koalgolist.getColumn(iNo, "chk") == "Y") {
					sTemp = iNo+1;
				}
			}
			skorAlgo += "^" + sTemp;
		} else if(iRowNo == 3) {
			sTemp = "";
			for(var iNo = 10 ; iNo <= 14 ; iNo++) {
				if( ds_main_koalgolist.getColumn(iNo, "chk") == "Y") {
					sTemp = iNo+1;
				}
			}
			skorAlgo += "^" + sTemp;
		} else if(iRowNo == 4) {
			for(var iNo = 15 ; iNo <= 17 ; iNo++) {
				if( ds_main_koalgolist.getColumn(iNo, "chk") == "Y") {
					sTemp = iNo+1;
				}
			}
			skorAlgo += "^" + sTemp;
		} else if(iRowNo == 5) {
			sTemp = "";
			for(var iNo = 18 ; iNo <=20 ; iNo++) {
				if( ds_main_koalgolist.getColumn(iNo, "chk") == "Y") {
					sTemp = iNo+1;
				}
			}
			skorAlgo += "^" + sTemp;
		} else if(iRowNo == 7) {
			sTemp = "";
			for(var iNo = 21 ; iNo <= 24 ; iNo++) {
				if( ds_main_koalgolist.getColumn(iNo, "chk") == "Y") {
					sTemp = iNo+1;
				}
			}
			skorAlgo += "^" + sTemp;
		} else {
			sTemp = "";
			for(var iNo = 25 ; iNo <= 28 ; iNo++) {
				if( ds_main_koalgolist.getColumn(iNo, "chk") == "Y") {
					sTemp = iNo+1;
				}
			}
			skorAlgo += "^" + sTemp;
		}
	}

	opener.ds_hidden.setColumn(0, "koralgo", skorAlgo);
	opener.ds_hidden.setColumn(0, "totscr", ds_send_data.getColumn(0, "totscr"));
	this.close();
}

/******************************************************************
 * Argument          : 
 * Description       : 
 ******************************************************************/
function btn_cls_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function ds_main_koalgolist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid=="chk") {
		obj.setColumn(e.row,e.columnid,(e.newvalue=="Y"||e.newvalue==1)?"Y":"N");
	}
}
]]></Script>
  </Form>
</FDL>