YNU_JEUS/app_home/himed/xpapps/ast/pharmacyconsultxp/xp/SPADC62400_NutritionLab.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPADC62400" position="absolute 0 0 498 331" titletext="Nutrition Lab" oninit="SPADC62400_oninit" onload="SPADC62400_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 496 306" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="Nutrition Lab" position="absolute 0 7 110 27" id="caption1" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 23 495 32" linetype="horizontal" id="line1" class="line_1" anchor="default"/>
              <TextArea position="absolute 5 205 495 300" id="textarea4" anchor="default" wordwrap="word"/>
              <CheckBox position="absolute 5 35 160 55" id="checkbox1" anchor="default" text="체중 주 1회" truevalue="1" onclick="CheckBox_onclick"/>
              <CheckBox position="absolute 5 60 271 80" id="checkbox2" anchor="default" text="Eyetone BS g 6hr(for 3days)" truevalue="2" onclick="CheckBox_onclick"/>
              <CheckBox position="absolute 5 180 279 200" id="checkbox4" anchor="default" text="lsolator Culture 주 1회" truevalue="10" onclick="CheckBox_onclick"/>
              <CheckBox position="absolute 5 85 238 105" id="checkbox3" anchor="default" text="주 2회(첫 2주동안), 주 1회(계속)" truevalue="3" onclick="CheckBox_onclick"/>
              <cp_checkboxList id="checkbox5" titletext="CheckBox List" taborder="1" text="cp_checkboxList00" scrollbars="none" position="absolute 23 102 496 181" style="background:transparent; " col="1" row="1" cellspacing="2" vcellspacing="0" itemWidth="100" itemHeight="20" overflow="visible" anchor="default"/>
              <Shape id="line00" class="line_1" position="absolute 0 22 495 31"/>
              <Shape id="line02" class="line_1" position="absolute 0 21 495 30"/>
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_cfm" taborder="1" text="확인" class="btn4" position="absolute 380 304 436 326" onclick="btn_cfm_onclick"/>
        <Button id="btn_cls" taborder="2" text="닫기" class="btn4" position="absolute 439 304 495 326" onclick="btn_cls_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_chk5" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdid">4</Col>
            <Col id="cdnm">CBC</Col>
          </Row>
          <Row>
            <Col id="cdid">5</Col>
            <Col id="cdnm">FBS, BUN/Scr, OT/PT/Alk-P.cpk</Col>
          </Row>
          <Row>
            <Col id="cdid">6</Col>
            <Col id="cdnm">Na/K/Cl, Ca/P/Mg</Col>
          </Row>
          <Row>
            <Col id="cdid">7</Col>
            <Col id="cdnm">Pr/Alb, TRF, RBP, Prealbumine</Col>
          </Row>
          <Row>
            <Col id="cdid">8</Col>
            <Col id="cdnm">Chol/TG</Col>
          </Row>
          <Row>
            <Col id="cdid">9</Col>
            <Col id="cdnm">24hr Urine Urea &amp; Cr</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk1" type="STRING" size="256"/>
          <Column id="chk2" type="STRING" size="256"/>
          <Column id="chk3" type="STRING" size="256"/>
          <Column id="chk4" type="STRING" size="256"/>
          <Column id="chk5" type="STRING" size="256"/>
          <Column id="chk6" type="STRING" size="256"/>
          <Column id="chk7" type="STRING" size="256"/>
          <Column id="text1" type="STRING" size="256"/>
          <Column id="radio1" type="STRING" size="256"/>
          <Column id="returnstr" type="STRING" size="256"/>
          <Column id="text2" type="STRING" size="256"/>
          <Column id="chk5label" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="chk1"/>
            <Col id="chk2"/>
            <Col id="chk3"/>
            <Col id="chk4"/>
            <Col id="chk5"/>
            <Col id="chk6"/>
            <Col id="chk7"/>
            <Col id="text1"/>
            <Col id="radio1"/>
            <Col id="returnstr"/>
            <Col id="text2"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_checkvalue" 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 id="value"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_receiveref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="path" type="STRING" size="256"/>
          <Column id="path2" type="STRING" size="256"/>
          <Column id="nutritionlab" type="STRING" size="256"/>
          <Column id="nutritionlabchk" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="path"/>
            <Col id="path2"/>
            <Col id="nutritionlab"/>
            <Col id="nutritionlabchk"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_tmep_oncolumnchanged">
        <ColumnInfo>
          <Column id="chk5data" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.checkbox1" propid="value" datasetid="ds_init" columnid="chk1"/>
      <BindItem id="item1" compid="grp_biz.checkbox2" propid="value" datasetid="ds_init" columnid="chk2"/>
      <BindItem id="item2" compid="grp_biz.checkbox3" propid="value" datasetid="ds_init" columnid="chk3"/>
      <BindItem id="item3" compid="grp_biz.checkbox4" propid="value" datasetid="ds_init" columnid="chk4"/>
      <BindItem id="item4" compid="grp_biz.textarea4" propid="value" datasetid="ds_init" columnid="returnstr"/>
    </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 SPADC62400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPADC62400_onload(obj:Form, e:LoadEventInfo)
{
	try{
		ds_hidden_receiveref.copyData(arg_ds_hidden_receiveref);
	}catch(e){

	}
	
	ds_init.setColumn(0, "returnstr",  ds_hidden_receiveref.getColumn(0, "nutritionlab"));
	var nutritionlabData5 = "" ; 
	var nutritionlabData = "";
	if( !utlf_isNull(ds_hidden_receiveref.getColumn(0, "nutritionlabchk")) ){
		nutritionlabData = ds_hidden_receiveref.getColumn(0, "nutritionlabchk").split(",");
	}

	for( var i = 0; i < nutritionlabData.length; ++i ) {
		if( nutritionlabData[i] == "1" ) ds_init.setColumn(0, "chk1", nutritionlabData[i]); 
		if( nutritionlabData[i] == "2" ) ds_init.setColumn(0, "chk2", nutritionlabData[i]); 
		if( nutritionlabData[i] == "3" ) ds_init.setColumn(0, "chk3", nutritionlabData[i]); 
		if( nutritionlabData[i] == "10" ) ds_init.setColumn(0, "chk4", nutritionlabData[i]); 
		if( nutritionlabData[i] >= "4" && nutritionlabData[i] <= "9" ) {
			if( utlf_isNull(nutritionlabData5) )  nutritionlabData5 += nutritionlabData[i];
			else nutritionlabData5 += "," + nutritionlabData[i];
		}
	}
	
	if( !utlf_isNull(nutritionlabData5) )  ds_init.setColumn(0, "chk5", nutritionlabData5);
	
	//checkbox5
	var sProp1="col=2,row=3,cellspacing=5,vcellspacing=0,itemWidth=-1,itemHeight=27,overflow=''";
	grp_biz.checkbox5.setInitComp(sProp1, ds_main_chk5, "cdid", "cdnm", "fn_setCheckBox5");
	
	fn_getCheckBox5();
}

/******************************************************************
 * Argument          : 
 * Description       : checkbox5 bind set
 ******************************************************************/
function fn_setCheckBox5(obj){
	var getChkcd = getChkcd = String(grp_biz.checkbox5.getData()).replace(",", " ");
	ds_init.setColumn(0, "chk5", getChkcd);
	
	if(!utlf_isNull(getChkcd)){
		grp_biz.checkbox3.value = "3";
	}else{
		grp_biz.checkbox3.value = "";
	}
	makeReturnStr();
}

/******************************************************************
 * Argument          : 
 * Description       : checkbox5 DBget
 ********************************************ale**********************/
function fn_getCheckBox5(){
	if( !utlf_isNull(ds_init.getColumn(0, "chk5")) ) {
		chk5List = ds_init.getColumn(0, "chk5").split(",");
		grp_biz.checkbox5.setData(chk5List);
	}
}

/******************************************************************
 * Argument          : 
 * Description       : checkbox Event
 ******************************************************************/
function CheckBox_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	makeReturnStr();
}

/******************************************************************
 * Argument          : 
 * Description       : checkbox Event
 ******************************************************************/
function ds_tmep_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	makeReturnStr();
}

/******************************************************************
 * Argument          : 
 * Description       : checkbox5 data 변경 시 Event
 ******************************************************************/
function makeReturnStr(){
	ds_init.setColumn(0, "returnstr", "");
	var cnt = "1";
	var returnstr = "";
	
	if( ds_init.getColumn(0, "chk1") == "1" ){
		if(!utlf_isNull(returnstr)){
			cnt++;
			returnstr += "\n";
		}
		
		returnstr += cnt+") ";
		returnstr = returnstr + grp_biz.checkbox1.text;
	}
	
	if( ds_init.getColumn(0, "chk2") == "2" ){
		if(!utlf_isNull(returnstr)) {
			cnt++;
			returnstr += "\n";
		}
		returnstr += cnt+") ";
		returnstr = returnstr + grp_biz.checkbox2.text;
	}
	
	if( ds_init.getColumn(0, "chk3") == "3" ){
		if(!utlf_isNull(ds_init.getColumn(0, "chk5"))){
			if(!utlf_isNull(returnstr)) {
				cnt++;
				returnstr += "\n";
			}
			returnstr += cnt+") ";
			returnstr = returnstr + grp_biz.checkbox3.text + "\n";
			returnstr += String(grp_biz.checkbox5.getLableData());
		}
	}
	
	if( ds_init.getColumn(0, "chk4") == "10" ){
		if(!utlf_isNull(returnstr)) {
			cnt++;
			returnstr += "\n";
		}
		returnstr += cnt+") ";
		returnstr = returnstr + grp_biz.checkbox4.text;
	}
	
	//fn_setCheckBox5();
	ds_init.setColumn(0, "returnstr", returnstr);

	//2010-01-14 기존 Check된 내용을 그대로 check.
	var nutritionlabchk="";
	if( !utlf_isNull(ds_init.getColumn(0, "chk1")) ) nutritionlabchk += ds_init.getColumn(0, "chk1")  + ",";
	if( !utlf_isNull(ds_init.getColumn(0, "chk2")) ) nutritionlabchk += ds_init.getColumn(0, "chk2")  + ",";
	if( !utlf_isNull(ds_init.getColumn(0, "chk3")) ) nutritionlabchk += ds_init.getColumn(0, "chk3")  + ",";
	if( !utlf_isNull(ds_init.getColumn(0, "chk4")) ) nutritionlabchk += ds_init.getColumn(0, "chk4")  + ",";
	if( !utlf_isNull(ds_init.getColumn(0, "chk5")) ) nutritionlabchk += ds_init.getColumn(0, "chk5");
	ds_hidden_receiveref.setColumn(0, "nutritionlabchk", nutritionlabchk);
}

/******************************************************************
 * Argument          : 
 * Description       : 확인 Button Event
 ******************************************************************/
function btn_cfm_onclick(obj:Button,  e:ClickEventInfo)
{
	if ( frmf_checkOpener() ) {
		var receiveref 	= ds_hidden_receiveref.getColumn(0, "path");
		var col	= ds_hidden_receiveref.getColumn(0, "column");
		var col2	= ds_hidden_receiveref.getColumn(0, "column2");
		
		opener.objects[receiveref].setColumn(0, col, grp_biz.textarea4.value);
		opener.objects[receiveref].setColumn(0, col2, ds_hidden_receiveref.getColumn(0, "nutritionlabchk"));
		this.close();
	} else {
		alert("상위화면이 변경되어 데이터를 전달할 수 없습니다.");
	}	
}

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




]]></Script>
  </Form>
</FDL>