YNU_JEUS/app_home/himed/xpapps/lis/rsltmngtxp/xp/SPLRR91800_기생충검사의뢰서등록.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLRR91800" position="absolute 0 0 611 612" titletext="기생충검사의뢰서" onload="SPLRR91800_onload">
    <Layouts>
      <Layout>
        <Div id="group3" taborder="30" position="absolute -15 576 604 605">
          <Layouts>
            <Layout>
              <Button id="btn_close" taborder="5" text="닫기" onclick="group3_btn_close_onclick" class="btn4" position="absolute 558 1 614 21" anchor="default"/>
              <Button id="btn_save" taborder="6" text="확인" class="btn4" position="absolute 499 1 555 21" anchor="default" onclick="group3_btn_save_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption21" text="기생충 항체 검사의뢰서" class="tit_1" position="absolute 12 11 216 36"/>
        <Static id="cpt_pid" text="Chief Complaint(주증상)" class="cell_1" position="absolute 13 42 160 66"/>
        <Static id="cpt_pid00" text="Onset(발병시기)" class="cell_1" position="absolute 13 67 160 91"/>
        <Static id="cpt_pid01" text="PMHx(과거력)" class="cell_1" position="absolute 13 92 160 116"/>
        <Edit id="input1" taborder="31" position="absolute 165 45 604 65"/>
        <Edit id="input2" taborder="32" position="absolute 165 69 604 89"/>
        <Edit id="input3" taborder="33" position="absolute 165 93 604 113"/>
        <Static id="cpt_pid02" text="PHx(가족력)" class="cell_1" position="absolute 13 117 159 141"/>
        <CheckBox id="chk_PHx1" taborder="35" text="DM(당뇨)" position="absolute 256 119 332 139" columncount="1" truevalue="DM(당뇨)"/>
        <CheckBox id="chk_PHx0" taborder="36" text="Tb(결핵)" position="absolute 168 119 244 139" columncount="1" truevalue="Tb(결핵)"/>
        <CheckBox id="chk_PHx2" taborder="37" text="HT(고혈압)" position="absolute 344 119 433 139" columncount="1" truevalue="HT(고혈압)"/>
        <Static id="cpt_pid03" text="Habit(식습관)" class="cell_1" position="absolute 13 142 159 166"/>
        <CheckBox id="chk_Habit0" taborder="38" text="육회" position="absolute 168 143 224 163" columncount="1" truevalue="육회"/>
        <CheckBox id="chk_Habit1" taborder="39" text="생선회" position="absolute 223 143 279 163" columncount="1" truevalue="생선회"/>
        <CheckBox id="chk_Habit2" taborder="40" text="민물게장" position="absolute 290 143 360 163" columncount="1" truevalue="민물게장"/>
        <CheckBox id="chk_Habit4" taborder="42" text="개구리" position="absolute 408 143 464 163" columncount="1" truevalue="개구리"/>
        <CheckBox id="chk_Habit5" taborder="43" text="간천엽" position="absolute 474 143 530 163" columncount="1" truevalue="간천엽"/>
        <CheckBox id="chk_Habit3" taborder="44" text="뱀" position="absolute 366 143 422 163" columncount="1" truevalue="뱀"/>
        <Static id="cpt_pid04" text="동물사육여부" class="cell_1" position="absolute 13 166 159 190"/>
        <Static id="cpt_pid05" text="S.R(신경학적 반응)" class="cell_1" position="absolute 13 190 159 214"/>
        <CheckBox id="chk_Animal0" taborder="45" text="개" position="absolute 168 166 224 186" columncount="1" truevalue="개"/>
        <CheckBox id="chk_Animal1" taborder="46" text="고양이" position="absolute 223 166 279 186" columncount="1" truevalue="고양이"/>
        <CheckBox id="chk_Animal2" taborder="47" text="기타" position="absolute 290 166 360 186" columncount="1" truevalue="기타"/>
        <CheckBox id="chk_SR0" taborder="48" text="Seizure(간질)" position="absolute 168 191 277 211" columncount="1" truevalue="Seizure(간질)"/>
        <CheckBox id="chk_SR1" taborder="49" text="Headache(두통)" position="absolute 290 191 416 211" columncount="1" truevalue="Headache(두통)"/>
        <CheckBox id="chk_SR2" taborder="50" text="Nuchal rigidity(목덜미 경추)" position="absolute 419 191 604 211" columncount="1" truevalue="Nuchal rigidity(목덜미 경추)"/>
        <Static id="cpt_pid06" text="P/E(이학적 소견)" class="cell_1" position="absolute 13 213 159 313"/>
        <CheckBox id="chk_PE0" taborder="51" text="Blurred vision(시아흐림)" position="absolute 168 214 338 234" columncount="1" truevalue="Blurred vision(시아흐림)"/>
        <CheckBox id="chk_PE1" taborder="52" text="N(오심)" position="absolute 359 214 442 234" columncount="1" truevalue="N(오심)"/>
        <CheckBox id="chk_PE2" taborder="53" text="D(설사)" position="absolute 168 232 243 252" columncount="1" truevalue="D(설사)"/>
        <CheckBox id="chk_PE3" taborder="54" text="C(변비)" position="absolute 359 232 436 252" columncount="1" truevalue="C(변비)"/>
        <CheckBox id="chk_PE4" taborder="55" text="기타" position="absolute 168 250 224 270" columncount="1" truevalue="기타"/>
        <CheckBox id="chk_PE5" taborder="56" text="Subcutaneous nodules(피하결절)" position="absolute 359 250 581 270" columncount="1" truevalue="Subcutaneous nodules(피하결절)"/>
        <CheckBox id="chk_PE6" taborder="57" text="부위" position="absolute 168 268 224 288" columncount="1" truevalue="부위"/>
        <CheckBox id="chk_PE7" taborder="58" text="Hemoptysis(객혈)" position="absolute 359 268 493 288" columncount="1" truevalue="Hemoptysis(객혈)"/>
        <CheckBox id="chk_PE8" taborder="59" text="Hepatomegaly(간비대)" position="absolute 168 286 325 306" columncount="1" truevalue="Hepatomegaly(간비대)"/>
        <CheckBox id="chk_PE9" taborder="60" text="Proglotted discharge(편절분비물)" position="absolute 359 286 569 306" columncount="1" truevalue="Proglotted discharge(편절분비물)"/>
        <Static id="cpt_pid07" text="CBC(혈액학소견)" class="cell_1" position="absolute 13 313 159 337"/>
        <Static id="cpt_10spc" text="WBC-HB-Pit" position="absolute 175 315 248 335"/>
        <Edit id="input4" taborder="61" class="input_default" position="absolute 252 315 296 335"/>
        <Edit id="input5" taborder="62" class="input_default" position="absolute 300 315 344 335"/>
        <Edit id="input6" taborder="63" class="input_default" position="absolute 348 315 392 335"/>
        <Static id="cpt_10spc00" text="Eosinophil              %" position="absolute 415 315 583 335"/>
        <Edit id="input7" taborder="64" class="input_default" position="absolute 460 315 504 335"/>
        <Static id="cpt_pid08" text="LET(간기능 검사 소견)" class="cell_1" position="absolute 13 337 159 361"/>
        <Edit id="input8" taborder="65" position="absolute 165 339 604 359"/>
        <Static id="cpt_pid10" text="Stool(분변검사 소견)" class="cell_1" position="absolute 13 362 159 386"/>
        <Edit id="input9" taborder="66" position="absolute 165 364 604 384"/>
        <Static id="cpt_pid09" text="Chest PA(흉부X선 소견)" class="cell_1" position="absolute 13 387 159 411"/>
        <Edit id="input10" taborder="67" position="absolute 165 388 604 408"/>
        <Static id="cpt_pid11" text="Chest PA(흉부X선 소견)" class="cell_1" position="absolute 13 411 159 435"/>
        <Edit id="input11" taborder="68" position="absolute 165 413 604 433"/>
        <Static id="cpt_pid12" text="Brain CT or MRI" class="cell_1" position="absolute 13 411 159 435"/>
        <Static id="caption00" text="기타 참고사항" class="tit_2" position="absolute 12 440 216 460"/>
        <TextArea id="textarea1" taborder="69" oneditclick="group1_textarea1_oneditclick" position="absolute 12 458 604 568" scrollbars="autovert"/>
        <Shape id="line" position="absolute 18 566 544 578" class="line_2" type="line"/>
        <Shape id="line00" class="line_3" position="absolute 13 430 604 442"/>
        <Shape id="line01" class="line_3" position="absolute 13 405 604 417"/>
        <Shape id="line02" class="line_3" position="absolute 13 381 604 393"/>
        <Shape id="line03" class="line_3" position="absolute 13 356 604 368"/>
        <Shape id="line04" class="line_3" position="absolute 14 332 605 344"/>
        <Shape id="line05" class="line_3" position="absolute 13 307 604 319"/>
        <Shape id="line06" class="line_3" position="absolute 13 207 604 219"/>
        <Shape id="line07" class="line_3" position="absolute 13 110 604 122"/>
        <Shape id="line08" class="line_3" position="absolute 13 135 604 147"/>
        <Shape id="line09" class="line_3" position="absolute 13 160 604 172"/>
        <Shape id="line10" class="line_3" position="absolute 13 85 604 97"/>
        <Shape id="line11" class="line_3" position="absolute 13 62 604 74"/>
        <Shape id="line12" class="line_1" position="absolute 13 36 604 40" style="border:2 solid cadetblue ;"/>
        <Shape id="line13" class="line_3" position="absolute 13 185 604 197"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_reqfrminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="prcpcd" type="STRING" size="256"/>
          <Column id="prcpnm" type="STRING" size="256"/>
          <Column id="opnm" type="STRING" size="256"/>
          <Column id="spccd" type="STRING" size="256"/>
          <Column id="spcnm" type="STRING" size="256"/>
          <Column id="reqno" type="STRING" size="256"/>
          <Column id="reqhistno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="prcpcd"/>
            <Col id="prcpnm"/>
            <Col id="opnm"/>
            <Col id="spccd"/>
            <Col id="spcnm"/>
            <Col id="reqno"/>
            <Col id="reqhistno"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_rtnvalinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="reqno" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_reqfrminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="reqcnts" type="STRING" size="256"/>
          <Column id="inptitem01" type="STRING" size="256"/>
          <Column id="inptitem02" type="STRING" size="256"/>
          <Column id="inptitem03" type="STRING" size="256"/>
          <Column id="inptitem04" type="STRING" size="256"/>
          <Column id="etc" type="STRING" size="256"/>
          <Column id="claim" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="reqcnts">일반적인 난소 나이 평가를 위해</Col>
            <Col id="inptitem01">있다</Col>
            <Col id="inptitem02"/>
            <Col id="inptitem03"/>
            <Col id="inptitem04"/>
            <Col id="etc"/>
            <Col id="claim"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-27
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-27      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";


var objDomParser;
var objDOM;
var oFlag;
function cbf_SPLRR91800(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function fExeClinicSave(){

	fmakeData();
	
   // 검체 추가정보 설정
	rptf_setValueToDOM(objDOM, "/reqfrminfo/choispc/choispclist/choi", "true");
	rptf_setValueToDOM(objDOM, "/reqfrminfo/choispc/choispclist/spcseqno", "001");
	rptf_setValueToDOM(objDOM, "/reqfrminfo/choispc/choispclist/spccd", ds_hidden_reqfrminfo.getColumn(0,"spccd"));
	rptf_setValueToDOM(objDOM, "/reqfrminfo/choispc/choispclist/spccd2", ds_hidden_reqfrminfo.getColumn(0,"spccd"));

	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;				
	
	// 검체 추가정보 설정
	ds_send.clear();
	dsf_makeValue(ds_send,"pid",    "string",     ds_hidden_reqfrminfo.getColumn(0,"pid"));
	dsf_makeValue(ds_send,"reqno",  "string",   ds_hidden_reqfrminfo.getColumn(0,"reqno")); 
	dsf_makeValue(ds_send,"reqcnts", "string",  objParam.xml_data_XML1.replace("<![CDATA[","").replace("]]]]><![CDATA[>",""));
	dsf_makeValue(ds_send,"instcd",  "string",  sysf_getUserInfo("dutplceinstcd"));


	//------------------------
	var oParam = {};
		oParam.id          = "TXLRR90201";
		oParam.service     = "diagtestapplib.LisCommon";
		oParam.method      = "reqExeReqFrmInfo";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_rtnvalinfo=reflist";
		oParam.transaction = true;
		oParam.async       = false;
		oParam.callback    = "cf_TXLRR90201";

	tranf_submit(oParam);
	if (arErrorCode.pop("TXLRR90201") < 0) {
		sysf_messageBox("의뢰지 저장을", "E009");
		return false;
	}

	//------------------
	// 의뢰지번호 Return
	opener.ds_hidden_reqfrminfo.setColumn(0,"reqno", ds_rtnvalinfo.getColumn(0,"reqno"));

	//------------
	close();
}
function cf_TXLRR90201(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
function fExeInitialize() {

// 처방등록 화면에서 호출되지 않는 경우는 "저장" 기능을 비 활성화 처리
		if (ds_hidden_reqfrminfo.getColumn(0,"scrnno") == "10") {
			group3.btn_save.visible = true;
		} else {
			group3.btn_save.visible = false;
		}

		// 의뢰지번호가 존재할 경우 의뢰지내용을 조회
		if(utlf_isNull(ds_hidden_reqfrminfo.getColumn(0,"reqcnts"))) { //내용이 없다
		if (ds_hidden_reqfrminfo.getColumn(0,"reqno") != "0") { //의뢰지번호 존재시
			dsf_makeValue(ds_send,"instcd", "string",sysf_getUserInfo("dutplceinstcd"));
			dsf_makeValue(ds_send,"pid",  "string",   ds_hidden_reqfrminfo.getColumn(0,"pid")); 
			dsf_makeValue(ds_send,"reqno", "string", ds_hidden_reqfrminfo.getColumn(0,"reqno")); 
			var oParam = {};
				oParam.id          = "TRLRR90201";
				oParam.service     = "diagtestapplib.LisCommon";
				oParam.method      = "reqGetReqFrmInfo";
				oParam.inds        = "refData=ds_send";
				oParam.outds       = "ds_reqfrminfo=refrslt";
				oParam.async       = false;
				oParam.callback    = "cbf_SPLRR92400";

			tranf_submit(oParam);
			
		} else { //의뢰지 번호 없어.!
			objDomParser = new DomParser;
			objDOM = objDomParser.parseFromString("<reqfrminfo></reqfrminfo>");
			
			rptf_setValueToDOM(objDOM, "/reqfrminfo/inptitem01", "");
			rptf_setValueToDOM(objDOM, "/reqfrminfo/inptitem02", "");
			rptf_setValueToDOM(objDOM, "/reqfrminfo/inptitem03", "");
			rptf_setValueToDOM(objDOM, "/reqfrminfo/reqcnts", "");
			ds_hidden_reqfrminfo.setColumn(0,"reqno", "0");
		}
	} else { //내용이 있다(ex> 특수에서 의뢰서 띄울때 처럼)
		
		var nRow = ds_reqfrminfo.addRow();
		ds_reqfrminfo.setColumn(nRow, "reqcnts", ds_hidden_reqfrminfo.getColumn(0, "reqcnts"));
		fsetData();
	}		
}

function fsetData(){

	objDomParser = new DomParser;
	objDOM = objDomParser.parseFromString(ds_reqfrminfo.getColumn(0, "reqcnts"));
	
	input1.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para1");
	input2.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para2");
	input3.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para3");
	input4.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para30");
	input5.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para31");
	input6.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para32");
	input7.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para33");
	input8.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para34");
	input9.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para35");
	input10.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para36");
	input11.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para37");
	textarea1.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para38");
	
	var chk_value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para4").split(",");
	for(var i = 0; i < chk_value.length; i++){
		switch (chk_value[i]){
			case chk_PHx0.text : {
				chk_PHx0.value = chk_value[i];
				break;
			}
			case chk_PHx1.text : {
				chk_PHx1.value = chk_value[i];
				break;
			}
			case chk_PHx2.text : {
				chk_PHx2.value = chk_value[i];
				break;
			}			
		}
	}
	var chk_value1 = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para7").split(",");
	for(var i = 0; i < chk_value1.length; i++){
		switch (chk_value1[i]){
			case chk_Habit0.text : {
				chk_Habit0.value = chk_value1[i];
				break;
			}
			case chk_Habit1.text : {
				chk_Habit1.value = chk_value1[i];
				break;
			}
			case chk_Habit2.text : {
				chk_Habit2.value = chk_value1[i];
				break;
			}		
			case chk_Habit3.text : {
				chk_Habit3.value = chk_value1[i];
				break;
			}
			case chk_Habit4.text : {
				chk_Habit4.value = chk_value1[i];
				break;
			}
			case chk_Habit5.text : {
				chk_Habit5.value = chk_value1[i];
				break;
			}	
		}
	}
	var chk_value2 = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para13").split(",");
	for(var i = 0; i < chk_value2.length; i++){
		switch (chk_value2[i]){
			case chk_Animal0.text : {
				chk_Animal0.value = chk_value2[i];
				break;
			}
			case chk_Animal1.text : {
				chk_Animal1.value = chk_value2[i];
				break;
			}
			case chk_Animal2.text : {
				chk_Animal2.value = chk_value2[i];
				break;
			}			
		}
	}
	var chk_value3 = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para16").split(",");
	for(var i = 0; i < chk_value3.length; i++){
		switch (chk_value3[i]){
			case chk_SR0.text : {
				chk_SR0.value = chk_value3[i];
				break;
			}
			case chk_SR1.text : {
				chk_SR1.value = chk_value3[i];
				break;
			}
			case chk_SR2.text : {
				chk_SR2.value = chk_value3[i];
				break;
			}			
		}
	}
	var chk_value4 = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/para19").split(",");
	for(var i = 0; i < chk_value4.length; i++){
		switch (chk_value4[i]){
			case chk_PE0.text : {
				chk_PE0.value = chk_value4[i];
				break;
			}
			case chk_PE1.text : {
				chk_PE1.value = chk_value4[i];
				break;
			}
			case chk_PE2.text : {
				chk_PE2.value = chk_value4[i];
				break;
			}		
			case chk_PE3.text : {
				chk_PE3.value = chk_value4[i];
				break;
			}
			case chk_PE4.text : {
				chk_PE4.value = chk_value4[i];
				break;
			}
			case chk_PE5.text : {
				chk_PE5.value = chk_value4[i];
				break;
			}
			case chk_PE6.text : {
				chk_PE6.value = chk_value4[i];
				break;
			}		
			case chk_PE7.text : {
				chk_PE7.value = chk_value4[i];
				break;
			}
			case chk_PE8.text : {
				chk_PE8.value = chk_value4[i];
				break;
			}
			case chk_PE9.text : {
				chk_PE9.value = chk_value4[i];
				break;
			}	
		}
	}
}
function fmakeData()
{
	objDomParser = new DomParser;
	objDOM = objDomParser.parseFromString("<reqfrminfo></reqfrminfo>");
			
	 rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para1",utlf_transNullToEmpty(input1.value));
	 rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para2",utlf_transNullToEmpty(input2.value));
	 rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para3",utlf_transNullToEmpty(input3.value));
	 rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para30",utlf_transNullToEmpty(input4.value ));
	 rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para31",utlf_transNullToEmpty(input5.value));
	 rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para32",utlf_transNullToEmpty(input6.value));
	 rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para33",utlf_transNullToEmpty(input7.value));
	 rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para34",utlf_transNullToEmpty(input8.value));
	 rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para35",utlf_transNullToEmpty(input9.value));
	 rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para36",utlf_transNullToEmpty(input10.value));
	 rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para37",utlf_transNullToEmpty(input11.value));
	 rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para38",utlf_transNullToEmpty(textarea1.value));
	 
	 rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para4", "");
	 var chk_value0 = new Array();
	 chk_value0[0] = chk_PHx0;
	 chk_value0[1] = chk_PHx1;
	 chk_value0[2] = chk_PHx2;

	for(i = 0; i < 3; i++){
		switch (chk_value0[i].value){
			case chk_PHx0.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para4",chk_PHx0.text );
				break;
			}
			case chk_PHx1.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para4",chk_PHx1.text );
				break;
			}
			case chk_PHx2.text :{
				fmakeInptitemPara("/reqfrminfo/inptitem01/para4",chk_PHx2.text );
				break;
			}
		
		}
	}
	
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para7", "");
	 var chk_value1 = new Array();
	 chk_value1[0] = chk_Habit0;
	 chk_value1[1] = chk_Habit1;
	 chk_value1[2] = chk_Habit2;
	 chk_value1[3] = chk_Habit3;
	 chk_value1[4] = chk_Habit4;
	 chk_value1[5] = chk_Habit5;
	for(i = 0; i < 6; i++){
		switch (chk_value1[i].value){
			case chk_Habit0.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para7",chk_Habit0.text );
				break;
			}
			case chk_Habit1.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para7",chk_Habit1.text );
				break;
			}
			case chk_Habit2.text :{
				fmakeInptitemPara("/reqfrminfo/inptitem01/para7",chk_Habit2.text );
				break;
			}
			case chk_Habit3.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para7",chk_Habit3.text );
				break;
			}
			case chk_Habit4.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para7",chk_Habit4.text );
				break;
			}
			case chk_Habit5.text :{
				fmakeInptitemPara("/reqfrminfo/inptitem01/para7",chk_Habit5.text );
				break;
			}
		}
	}
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para13", "");
	 var chk_value2 = new Array();
	 chk_value2[0] = chk_Animal0;
	 chk_value2[1] = chk_Animal1;
	 chk_value2[2] = chk_Animal2;

	for(i = 0; i < 3; i++){
		switch (chk_value2[i].value){
			case chk_Animal0.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para13",chk_Animal0.text );
				break;
			}
			case chk_Animal1.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para13",chk_Animal1.text );
				break;
			}
			case chk_Animal2.text :{
				fmakeInptitemPara("/reqfrminfo/inptitem01/para13",chk_Animal2.text );
				break;
			}
		
		}
	}
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para16", "");
	 var chk_value3 = new Array();
	 chk_value3[0] = chk_SR0;
	 chk_value3[1] = chk_SR1;
	 chk_value3[2] = chk_SR2;
	 	
	for(i = 0; i < 3; i++){
		switch (chk_value3[i].value){
			case chk_SR0.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para16",chk_SR0.text );
				break;
			}
			case chk_SR1.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para16",chk_SR1.text );
				break;
			}
			case chk_SR2.text :{
				fmakeInptitemPara("/reqfrminfo/inptitem01/para16",chk_SR2.text );
				break;
			}
		
		}
	}
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/para19", "");
	 var chk_value4 = new Array();
	 chk_value4[0] = chk_PE0;
	 chk_value4[1] = chk_PE1;
	 chk_value4[2] = chk_PE2;
	 chk_value4[3] = chk_PE3;
	 chk_value4[4] = chk_PE4;
	 chk_value4[5] = chk_PE5;
	 chk_value4[6] = chk_PE6;
	 chk_value4[7] = chk_PE7;
	
	for(i = 0; i < 8; i++){
		switch (chk_value4[i].value){
			case chk_PE0.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para19",chk_PE0.text );
				break;
			}
			case chk_PE1.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para19",chk_PE1.text );
				break;
			}
			case chk_PE2.text :{
				fmakeInptitemPara("/reqfrminfo/inptitem01/para19",chk_PE2.text );
				break;
			}
			case chk_PE3.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para19",chk_PE3.text );
				break;
			}
			case chk_PE4.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para19",chk_PE4.text );
				break;
			}
			case chk_PE5.text :{
				fmakeInptitemPara("/reqfrminfo/inptitem01/para19",chk_PE5.text );
				break;
			}
			case chk_PE6.text : {
				fmakeInptitemPara("/reqfrminfo/inptitem01/para19",chk_PE6.text );
				break;
			}
			case chk_PE7.text :{
				fmakeInptitemPara("/reqfrminfo/inptitem01/para19",chk_PE7.text );
				break;
			}
		}
	}
}
function fmakeInptitemPara(strObj,Str){
	if(utlf_isNull(rptf_getValueFromDOM(strObj, Str))){
		rptf_setValueToDOM(objDOM,strObj, Str);
	}else{
		rptf_setValueToDOM(objDOM,strObj, rptf_getValueFromDOM(objDOM,strObj + "," + Str));
	}
}


function fsetClose(){
	
	this.close();
}

function SPLRR91800_onload(obj:Form, e:LoadEventInfo){
	frmf_initForm(obj);
	ds_hidden_reqfrminfo.copyData(arg_ds_hidden_reqfrminfo);
	
	//의뢰지초기 셋팅
	fExeInitialize();
}

function btn_exit_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function group3_btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeClinicSave();
}
]]></Script>
  </Form>
</FDL>