YNU_JEUS/app_home/himed/xpapps/lis/colgverixp/xp/SPLVF00400_기능설정.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLVF00400" position="absolute 0 0 414 301" titletext="Untitle" onload="SPLVF00400_onload" oninit="SPLVF00400_oninit">
    <Layouts>
      <Layout>
        <Static id="caption7" text="종합검증/판독 담당의" class="cell_1" position="absolute 5 47 185 71" positiontype="position"/>
        <Edit id="output1" taborder="1" readonly="true" position="absolute 188 49 406 69" style="align:left middle;" positiontype="position"/>
        <Static id="caption1" text="의사 면허 번호" class="cell_1" position="absolute 5 72 185 96" positiontype="position"/>
        <Edit id="output2" taborder="2" readonly="true" position="absolute 188 74 406 94" style="align:left middle;" positiontype="position"/>
        <Static id="caption2" text="진단검사의학 전문의 번호" class="cell_1" position="absolute 5 97 185 121" positiontype="position"/>
        <Edit id="input2" taborder="3" class="input_default" position="absolute 188 99 406 119" style="align:left middle;" imemode="hangul" positiontype="position"/>
        <Static id="caption4" text="보고서작성 환자수" class="cell_1" position="absolute 5 146 185 170" positiontype="position"/>
        <Combo id="combo1" taborder="4" position="absolute 188 148 406 168" positiontype="position" codecolumn="value" datacolumn="label" innerdataset="@ds_main_patcnt" index="-1"/>
        <Static id="caption6" text="검증방법 Setting" class="cell_1" position="absolute 5 171 409 195" positiontype="position"/>
        <Edit id="input5" taborder="5" position="absolute 188 173 293 193" imemode="hangul" positiontype="position"/>
        <CheckBox id="checkbox1" taborder="6" text="Calibration Verification" truevalue="Y" position="absolute 7 198 163 218" columncount="2" positiontype="position" falsevalue="N"/>
        <CheckBox id="checkbox1chd1" taborder="7" text="Delta Check Verification" truevalue="Y" position="absolute 7 223 163 243" columncount="2" falsevalue="N"/>
        <CheckBox id="checkbox1chd3" taborder="8" text="Repeat / Recheck" truevalue="Y" position="absolute 7 248 163 268" columncount="2" falsevalue="N"/>
        <CheckBox id="checkbox1chd0" taborder="9" text="Internal Quality Control" truevalue="Y" position="absolute 194 198 410 218" columncount="2" falsevalue="N"/>
        <CheckBox id="checkbox1chd2" taborder="10" text="Panic/Alert Value Verification" truevalue="Y" position="absolute 194 223 410 243" columncount="2" falsevalue="N"/>
        <CheckBox id="checkbox1chd4" taborder="11" text="Others :" truevalue="Y" position="absolute 194 248 258 268" columncount="2" falsevalue="N"/>
        <Edit id="input4" taborder="12" class="input_default" position="absolute 263 248 406 268" imemode="hangul" positiontype="position"/>
        <Button id="btn_save" taborder="13" text="저장" class="btn4" position="absolute 296 277 352 297" anchor="right bottom" positiontype="position" onclick="btn_save_onclick"/>
        <Button id="btn_can" taborder="15" text="닫기" class="btn4" position="absolute 354 277 410 297" anchor="right bottom" onclick="btn_can_onclick"/>
        <Static id="caption5" text="전문의별 기능설정" class="tit_2" position="absolute 6 11 140 29"/>
        <Static id="caption3" text="입원후 경과일" class="cell_1" position="absolute 4 122 185 145"/>
        <Edit id="input3" taborder="16" position="absolute 188 123 406 142"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="userid" type="STRING" size="256" sumtext="사용자아이디"/>
          <Column id="usernm" type="STRING" size="256" sumtext="판독담당의"/>
          <Column id="licnsno" type="STRING" size="256" sumtext="전문의번호"/>
          <Column id="certno" type="STRING" size="256" sumtext="인증번호"/>
          <Column id="baseinterm" type="STRING" size="256" sumtext="기준입원기간"/>
          <Column id="maxreadpatcnt" type="STRING" size="256" sumtext="최대판독환자수"/>
          <Column id="verimthd" type="STRING" size="256" sumtext="검증방법"/>
          <Column id="verimthdother" type="STRING" size="256" sumtext="검증방법other"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_patcnt" 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">선택</Col>
            <Col id="value">0</Col>
          </Row>
          <Row>
            <Col id="value">1</Col>
            <Col id="label">1</Col>
          </Row>
          <Row>
            <Col id="value">2</Col>
            <Col id="label">2</Col>
          </Row>
          <Row>
            <Col id="value">3</Col>
            <Col id="label">3</Col>
          </Row>
          <Row>
            <Col id="value">4</Col>
            <Col id="label">4</Col>
          </Row>
          <Row>
            <Col id="value">5</Col>
            <Col id="label">5</Col>
          </Row>
          <Row>
            <Col id="value">6</Col>
            <Col id="label">6</Col>
          </Row>
          <Row>
            <Col id="value">7</Col>
            <Col id="label">7</Col>
          </Row>
          <Row>
            <Col id="value">8</Col>
            <Col id="label">8</Col>
          </Row>
          <Row>
            <Col id="value">9</Col>
            <Col id="label">9</Col>
          </Row>
          <Row>
            <Col id="value">10</Col>
            <Col id="label">10</Col>
          </Row>
          <Row>
            <Col id="value">11</Col>
            <Col id="label">11</Col>
          </Row>
          <Row>
            <Col id="value">12</Col>
            <Col id="label">12</Col>
          </Row>
          <Row>
            <Col id="value">13</Col>
            <Col id="label">13</Col>
          </Row>
          <Row>
            <Col id="value">14</Col>
            <Col id="label">14</Col>
          </Row>
          <Row>
            <Col id="value">15</Col>
            <Col id="label">15</Col>
          </Row>
          <Row>
            <Col id="value">16</Col>
            <Col id="label">16</Col>
          </Row>
          <Row>
            <Col id="value">17</Col>
            <Col id="label">17</Col>
          </Row>
          <Row>
            <Col id="value">18</Col>
            <Col id="label">18</Col>
          </Row>
          <Row>
            <Col id="value">19</Col>
            <Col id="label">19</Col>
          </Row>
          <Row>
            <Col id="value">20</Col>
            <Col id="label">20</Col>
          </Row>
        </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="userid" type="STRING" size="256"/>
          <Column id="medispclno" type="STRING" size="256"/>
          <Column id="certno" type="STRING" size="256"/>
          <Column id="baseinterm" type="STRING" size="256"/>
          <Column id="maxreqdpatcnt" type="STRING" size="256"/>
          <Column id="verimthd" type="STRING" size="256"/>
          <Column id="verimthdother" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="output1" propid="value" datasetid="ds_main" columnid="usernm"/>
      <BindItem id="item1" compid="input2" propid="value" datasetid="ds_main" columnid="certno"/>
      <BindItem id="item2" compid="input5" propid="value" datasetid="ds_main" columnid="userid"/>
      <BindItem id="item3" compid="output2" propid="value" datasetid="ds_main" columnid="licnsno"/>
      <BindItem id="item4" compid="input4" propid="value" datasetid="ds_main" columnid="verimthdother"/>
      <BindItem id="item5" compid="combo1" propid="value" datasetid="ds_main" columnid="maxreadpatcnt"/>
      <BindItem id="item6" compid="input3" propid="value" datasetid="ds_main" columnid="baseinterm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-09
 * 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 SPLVF00400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPLVF00400_onload(obj:Form, e:LoadEventInfo)
{
	lf_setinit();	
}

function lf_setinit()
{
	//var sInDsName = dsf_createDsRow("ds_temp_search", [{col: "userid", val:sysf_getUserId()}]);
	ds_send.setColumn(0, "userid", sysf_getUserId());

	var oParam = {};
		oParam.id          = "TRLVF00401";
		oParam.service     = "verificationbasemngtapp.CmtCdMngt";
		oParam.method      = "reqGetUserInfo";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_main=getUserInfo";
		oParam.async       = false;
	tranf_submit(oParam);
// 	 
 	fwritemthd();
 	fotherview();	
 	lf_readmthd();
}

//체크박스 읽어와서 셋팅
function fwritemthd()
{
	if(utlf_isNull(ds_main.getColumn(0, "verimthd")))
	{
		var code = ds_main.getColumn(0, "verimthd");
		var newcode = "";
		
		for(i = 0; i < 6; i++)
		{
			if(code.charAt(i)=='Y')
			{
				newcode = newcode + ""+(i+1)+" ";
			}					
		}				
		ds_main.setColumn(0, "verimthd", newcode);
	}	
}

function fotherview()
{
	var code = ds_main.getColumn(0, "verimthd");
	
	code = code.substr(5,6);
	trace("code= " + code);
	if(code != -1)
	{
		input4.visible = true;						
	}
	else{
		input4.visible = false;	
	}
	
}	
function lf_readmthd()
{
	 var chk = ds_main.getColumn(0,"verimthd");
	 checkbox1.value = utlf_transNullToEmpty(chk).substr(0,1);
	 checkbox1chd0.value= utlf_transNullToEmpty(chk).substr(1,1);
	 checkbox1chd1.value= utlf_transNullToEmpty(chk).substr(2,1);
	 checkbox1chd2.value= utlf_transNullToEmpty(chk).substr(3,1);
	 checkbox1chd3.value= utlf_transNullToEmpty(chk).substr(4,1);
 	 checkbox1chd4.value= utlf_transNullToEmpty(chk).substr(5,1);
}

	
//저장
function fExeCmtList()
{
	var verimthd = checkbox1.value + checkbox1chd0.value + checkbox1chd1.value+ checkbox1chd2.value+ checkbox1chd3.value + checkbox1chd4.value;
	trace("verimthd = " +verimthd);
    ds_main.setColumn(0, "verimthd", verimthd);
    
	  var oParam = {};
		oParam.id          = "TRLVF00401";
		oParam.service     = "verificationbasemngtapp.CmtCdMngt";
		oParam.method      = "reqSetUserMediSpcl";
		oParam.inds        = "cond=ds_main";
		oParam.async       = false;
		oParam.callback    = "cf_TRLVF00401";
	tranf_submit(oParam);        
}

//콜백함수
function cf_TRLVF00401(strSvcID, nErrorCode, strErrorMag){
	if(strSvcID == "TXLVF00401" && nErrorCode==0){
		lf_setinit();
		sysf_messageBox("","I001","");
	}
}			



// 닫기버튼
function Button00_onclick(obj:Button,  e:ClickEventInfo)
{
	close("return value");
}

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

function btn_can_onclick(obj:Button,  e:ClickEventInfo)
{
	close("return value");
}
]]></Script>
  </Form>
</FDL>