YNU_JEUS/app_home/himed/xpapps/lis/rsltmngtxp/xp/SPLRR91000_산전검사의뢰서등록(핵의학).xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLRR91000" position="absolute 0 0 560 618" titletext="산전검사 의뢰서 등록" onload="SPLRR91000_onload">
    <Layouts>
      <Layout>
        <Static id="Static03" position="absolute 7 471 552 525" class="sta_DA_box"/>
        <Static id="Static02" position="absolute 7 262 552 415" class="sta_DA_box"/>
        <Static id="Static01" position="absolute 8 184 550 238" class="sta_DA_box"/>
        <Static id="Static00" position="absolute 9 106 550 158" class="sta_DA_box"/>
        <Button id="btn_prt" taborder="2" text="출력" class="btn6" position="absolute 12 583 68 603" onclick="btn_prt_onclick"/>
        <Button id="btn_save" taborder="3" text="확인" class="btn4" position="absolute 444 583 500 603" onclick="btn_save_onclick"/>
        <Combo id="cmb_title" taborder="5" position="absolute 185 27 365 47" innerdataset="@ds_init_lb0127" datacolumn="nm" codecolumn="cd"/>
        <Static id="caption1" text="♣ 임신초기 검진항목                                         ♣ Code : OBDM" position="absolute 12 57 447 77"/>
        <Static id="caption4" text="등록번호" class="cell_1" position="absolute 12 107 82 131" style="align:center middle;"/>
        <Edit id="edt_pid" taborder="6" class="input_essential" position="absolute 85 109 185 129"/>
        <Shape id="line1" class="line_1" position="absolute 12 102 532 102"/>
        <Static id="caption5" text="성 명" class="cell_1" position="absolute 188 107 238 131" style="align:center middle;"/>
        <Edit id="edt_patnm" taborder="7" class="input_essential" position="absolute 241 109 341 129"/>
        <Static id="caption6" text="주민번호" class="cell_1" position="absolute 344 107 409 131" style="align:center middle;"/>
        <Edit id="edt_rrgstno" taborder="8" class="input_essential" position="absolute 412 109 538 129"/>
        <Static id="caption7" text="주소" class="cell_1" position="absolute 12 132 82 156" style="align:center middle;"/>
        <Edit id="edt_juso" taborder="9" class="input_essential" position="absolute 85 134 357 154"/>
        <Static id="caption8" text="전화번호" class="cell_1" position="absolute 360 132 430 156" style="align:center middle;"/>
        <Edit id="edt_tel" taborder="10" class="input_essential" position="absolute 433 134 538 154"/>
        <Static id="caption9" text="환자정보" class="tit_2" position="absolute 12 87 85 107"/>
        <Shape id="line2" class="line_1" position="absolute 12 177 532 177"/>
        <Static id="caption10" text="진료정보" class="tit_2" position="absolute 12 166 85 186"/>
        <Shape id="line5" class="line_3" position="absolute 12 155 532 155"/>
        <Static id="caption11" text="진료일" class="cell_1" position="absolute 12 186 82 210" style="align:center middle;"/>
        <Static id="caption12" text="의뢰일" class="cell_1" position="absolute 188 186 238 210" style="align:center middle;"/>
        <Static id="caption13" text="진료구분" class="cell_1" position="absolute 344 186 411 210" style="align:center middle;"/>
        <Calendar id="cal_usdt" taborder="11" class="input_s_essential" position="absolute 85 188 185 208" dateformat="yyyy-MM-dd" value="null"/>
        <Calendar id="cal_reqdt" taborder="12" class="input_s_essential" position="absolute 242 188 342 208" dateformat="yyyy-MM-dd" value="null"/>
        <Radio id="rdo_inout" taborder="13" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 414 188 534 208">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" size="256"/>
              <Column id="datacolumn" size="256"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">입원</Col>
                <Col id="datacolumn">입원</Col>
              </Row>
              <Row>
                <Col id="codecolumn">외래</Col>
                <Col id="datacolumn">외래</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Static id="caption14" text="의뢰병원" class="cell_1" position="absolute 12 211 82 235" style="align:center middle;"/>
        <Static id="caption15" text="진료과" class="cell_1" position="absolute 214 211 284 235" style="align:center middle;"/>
        <Edit id="edt_dept" taborder="14" class="input_essential" position="absolute 287 213 381 233"/>
        <Edit id="edt_reqHosp" taborder="15" position="absolute 85 213 211 233"/>
        <Static id="caption16" text="진료의" class="cell_1" position="absolute 384 211 454 235" style="align:center middle;"/>
        <Edit id="edt_dr" taborder="16" position="absolute 457 213 538 233"/>
        <Shape id="line3" class="line_3" position="absolute 12 230 532 230"/>
        <Static id="caption17" text="산모정보" class="tit_2" position="absolute 12 245 85 265"/>
        <Shape id="line4" class="line_1" position="absolute 12 252 532 252"/>
        <Static id="caption18" text="검체종류" class="cell_1" position="absolute 12 265 85 289" style="align:center middle;"/>
        <Radio id="rdo_spccd" taborder="17" columncount="7" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 89 267 413 287">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" size="256"/>
              <Column id="datacolumn" size="256"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">혈액</Col>
                <Col id="datacolumn">혈액</Col>
              </Row>
              <Row>
                <Col id="codecolumn">혈청</Col>
                <Col id="datacolumn">혈청</Col>
              </Row>
              <Row>
                <Col id="codecolumn">혈장</Col>
                <Col id="datacolumn">혈장</Col>
              </Row>
              <Row>
                <Col id="codecolumn">요</Col>
                <Col id="datacolumn">요</Col>
              </Row>
              <Row>
                <Col id="codecolumn">체액</Col>
                <Col id="datacolumn">체액</Col>
              </Row>
              <Row>
                <Col id="codecolumn">여지</Col>
                <Col id="datacolumn">여지</Col>
              </Row>
              <Row>
                <Col id="codecolumn">축뇨</Col>
                <Col id="datacolumn">축뇨</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Edit id="edt_BPD_NT1" taborder="18" class="input_essential" position="absolute 221 317 265 337"/>
        <Static id="caption19" text="NT" class="cell_1" position="absolute 183 315 218 339" style="align:center middle;"/>
        <Static id="caption20" text="체중" class="cell_1" position="absolute 415 265 470 289" style="align:center middle;"/>
        <Static id="caption21" text="최종월경일" class="cell_1" position="absolute 12 290 85 314" style="align:center middle;"/>
        <Static id="caption22" text="BPD" class="cell_1" position="absolute 98 315 133 339" style="align:center middle;"/>
        <Edit id="edt_weight" taborder="19" class="input_essential" position="absolute 473 267 515 287"/>
        <Edit id="edt_BPD1" taborder="20" position="absolute 136 317 180 337"/>
        <Static id="caption23" text="Kg" position="absolute 518 267 538 287"/>
        <Calendar id="edt_lastMenses" taborder="21" class="input_s_essential" position="absolute 88 292 188 312" dateformat="yyyy-MM-dd" value="null"/>
        <Static id="caption24" text="태아수" class="cell_1" position="absolute 12 315 55 339" style="align:center middle;" wordwrap="none"/>
        <Combo id="cmb_cm" taborder="22" class="combo_search" position="absolute 58 317 95 337" codecolumn="codecolumn" datacolumn="datacolumn" index="0" value="1" text="1">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" size="256"/>
              <Column id="datacolumn" size="256"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">1</Col>
                <Col id="datacolumn">1</Col>
              </Row>
              <Row>
                <Col id="codecolumn">2</Col>
                <Col id="datacolumn">2</Col>
              </Row>
              <Row>
                <Col id="codecolumn">3</Col>
                <Col id="datacolumn">3</Col>
              </Row>
              <Row>
                <Col id="codecolumn">4</Col>
                <Col id="datacolumn">4</Col>
              </Row>
              <Row>
                <Col id="codecolumn">5</Col>
                <Col id="datacolumn">5</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Static id="caption25" text="임신주수(LMP)" class="cell_1" position="absolute 296 290 387 314" style="align:center middle;" wordwrap="none"/>
        <Edit id="edt_LMP" taborder="23" class="input_essential" position="absolute 390 292 422 312"/>
        <Static id="caption26" text="주" position="absolute 425 292 445 312"/>
        <Edit id="edt_LMP_DD" taborder="24" class="input_essential" position="absolute 448 292 480 312"/>
        <Static id="caption27" text="일(By LMP)" position="absolute 483 292 550 312"/>
        <Static id="caption28" text="임신주수(BPD)" class="cell_1" position="absolute 296 315 387 339" style="align:center middle;" wordwrap="none"/>
        <Edit id="edt_BPD3" taborder="25" class="input_essential" position="absolute 390 317 422 337"/>
        <Static id="caption29" text="주" position="absolute 425 317 445 337"/>
        <Edit id="edt_BPD_DD3" taborder="26" class="input_essential" position="absolute 448 317 480 337"/>
        <Static id="caption30" text="일(첫째)" position="absolute 483 317 539 337"/>
        <Shape id="line6" class="line_3" position="absolute 12 346 532 346"/>
        <Radio id="rdo_down" taborder="27" columncount="0" rowcount="2" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 74 474 117 523" index="0" value="NO">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" size="256"/>
              <Column id="datacolumn" size="256"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">NO</Col>
                <Col id="datacolumn">NO</Col>
              </Row>
              <Row>
                <Col id="codecolumn">YES</Col>
                <Col id="datacolumn">YES</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Shape id="line7" class="line_1" position="absolute 12 468 532 468"/>
        <Static id="caption31" text="과거력" class="tit_2" position="absolute 12 454 109 474"/>
        <Static id="caption32" text="Previous" class="cell_1" position="absolute 12 474 72 498" style="align:center middle;"/>
        <Static id="caption33" text="Previous" class="cell_1" position="absolute 121 474 181 498" style="align:center middle;"/>
        <Radio id="rdo_ntd" taborder="28" columncount="0" rowcount="2" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 183 474 226 523" index="0" value="NO">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" size="256"/>
              <Column id="datacolumn" size="256"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">NO</Col>
                <Col id="datacolumn">NO</Col>
              </Row>
              <Row>
                <Col id="codecolumn">YES</Col>
                <Col id="datacolumn">YES</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Static id="caption34" text="Down" class="cell_1" position="absolute 12 499 72 523" style="align:center middle;"/>
        <Static id="caption35" text="NTD" class="cell_1" position="absolute 121 499 181 523" style="align:center middle;"/>
        <Static id="caption36" text="IDDM" class="cell_1" position="absolute 230 474 270 524" style="align:center middle;" wordwrap="none"/>
        <Radio id="rdo_iddm" taborder="29" columncount="0" rowcount="2" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 273 474 316 523" index="0" value="NO">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" size="256"/>
              <Column id="datacolumn" size="256"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">NO</Col>
                <Col id="datacolumn">NO</Col>
              </Row>
              <Row>
                <Col id="codecolumn">YES</Col>
                <Col id="datacolumn">YES</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Static id="caption37" text="선천성" class="cell_1" position="absolute 320 474 380 498" style="align:center middle;"/>
        <Static id="caption38" text="이상" class="cell_1" position="absolute 320 499 380 523" style="align:center middle;"/>
        <Radio id="rdo_apriority" taborder="30" columncount="0" rowcount="2" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 383 474 426 523" index="0" value="NO">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" size="256"/>
              <Column id="datacolumn" size="256"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">NO</Col>
                <Col id="datacolumn">NO</Col>
              </Row>
              <Row>
                <Col id="codecolumn">YES</Col>
                <Col id="datacolumn">YES</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Static id="caption39" text="염색체" class="cell_1" position="absolute 430 474 490 498" style="align:center middle;"/>
        <Static id="caption40" text="이상" class="cell_1" position="absolute 430 499 490 523" style="align:center middle;"/>
        <Radio id="rdo_chromosome" taborder="31" columncount="0" rowcount="2" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 493 474 536 523" index="0" value="NO">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" size="256"/>
              <Column id="datacolumn" size="256"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">NO</Col>
                <Col id="datacolumn">NO</Col>
              </Row>
              <Row>
                <Col id="codecolumn">YES</Col>
                <Col id="datacolumn">YES</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Shape id="line9" class="line_3" position="absolute 12 521 532 521"/>
        <Static id="caption41" text="♣ 판독에 결정적 영향을 주므로 Nuchal Transluency을" position="absolute 12 533 319 553"/>
        <Static id="caption43" text="꼭" position="absolute 319 533 334 553"/>
        <Static id="caption44" text="적어주시기 바랍니다." position="absolute 334 533 454 553"/>
        <Static id="caption42" text="♣ 판독에 결정적 영향을 주므로 초음파에 의한 제태령을" position="absolute 12 553 322 573"/>
        <Static id="caption45" text="꼭" position="absolute 322 553 337 573"/>
        <Static id="caption46" text="적어주시기 바랍니다." position="absolute 337 553 457 573"/>
        <Static id="caption2" text="mm" position="absolute 268 317 293 337"/>
        <Static id="caption47" text="일" position="absolute 483 342 539 362"/>
        <Edit id="edt_USG1" taborder="32" position="absolute 390 342 422 362"/>
        <Edit id="edt_USG_DD1" taborder="33" position="absolute 448 342 480 362"/>
        <Static id="caption48" text="임신주수(USG)" class="cell_1" position="absolute 296 340 387 364" style="align:center middle;" wordwrap="none"/>
        <Static id="caption49" text="주" position="absolute 425 342 445 362"/>
        <Shape id="line10" class="line_3" position="absolute 99 371 530 371"/>
        <Shape id="line11" class="line_3" position="absolute 99 396 530 396"/>
        <Edit id="edt_BPD_DD4" taborder="34" position="absolute 448 367 480 387"/>
        <Static id="caption50" text="일(둘째)" position="absolute 483 367 539 387"/>
        <Static id="caption51" text="임신주수(BPD)" class="cell_1" position="absolute 296 365 387 389" style="align:center middle;" wordwrap="none"/>
        <Static id="caption52" text="주" position="absolute 425 367 445 387"/>
        <Edit id="edt_BPD4" taborder="35" position="absolute 390 367 422 387"/>
        <Shape id="line12" class="line_3" position="absolute 99 421 530 421"/>
        <Edit id="edt_USG_DD2" taborder="36" position="absolute 448 392 480 412"/>
        <Static id="caption53" text="일" position="absolute 483 392 539 412"/>
        <Static id="caption54" text="임신주수(USG)" class="cell_1" position="absolute 296 390 387 414" style="align:center middle;" wordwrap="none"/>
        <Static id="caption55" text="주" position="absolute 425 392 445 412"/>
        <Edit id="edt_USG2" taborder="37" position="absolute 390 392 422 412"/>
        <Edit id="edt_CRL_NT1" taborder="38" position="absolute 221 342 265 362"/>
        <Static id="caption59" text="mm" position="absolute 268 342 293 362"/>
        <Static id="caption60" text="CRL" class="cell_1" position="absolute 98 340 133 364" style="align:center middle;"/>
        <Edit id="edt_CRL1" taborder="39" position="absolute 136 342 180 362"/>
        <Static id="caption61" text="NT" class="cell_1" position="absolute 183 340 218 364" style="align:center middle;"/>
        <Static id="caption62" text="BPD" class="cell_1" position="absolute 98 365 133 389" style="align:center middle;"/>
        <Static id="caption63" text="NT" class="cell_1" position="absolute 183 365 218 389" style="align:center middle;"/>
        <Edit id="edt_BPD_NT2" taborder="40" position="absolute 221 367 265 387"/>
        <Edit id="edt_BPD2" taborder="41" position="absolute 136 367 180 387"/>
        <Static id="caption64" text="mm" position="absolute 268 367 293 387"/>
        <Static id="caption65" text="CRL" class="cell_1" position="absolute 98 390 133 414" style="align:center middle;"/>
        <Static id="caption66" text="NT" class="cell_1" position="absolute 183 390 218 414" style="align:center middle;"/>
        <Static id="caption67" text="mm" position="absolute 268 392 293 412"/>
        <Edit id="edt_CRL_NT2" taborder="42" position="absolute 221 392 265 412"/>
        <Edit id="edt_CRL2" taborder="43" position="absolute 136 392 180 412"/>
        <Static id="caption56" text="초음파시행일" class="tit_2" position="absolute 12 424 109 444" wordwrap="none"/>
        <Calendar id="edt_ultrasonicDD" taborder="44" class="input_s_essential" position="absolute 112 424 212 444" dateformat="yyyy-MM-dd" value="null"/>
        <Shape id="line13" class="line_3" position="absolute 12 450 532 450"/>
        <Static id="caption00" text="산부인과 검사 의뢰서" position="absolute 175 7 380 27" style="font:돋움,14,bold;"/>
        <Button id="btn_close" taborder="45" text="닫기" class="btn4" position="absolute 502 583 558 603" onclick="btn_close_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_lb0127" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING"/>
          <Column id="nm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="rgstno" type="STRING"/>
          <Column id="address" type="STRING"/>
          <Column id="telno" type="STRING"/>
          <Column id="sex" type="STRING"/>
          <Column id="age" type="STRING"/>
          <Column id="brthdd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_reqfrminfo" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="reqno" type="STRING"/>
          <Column id="instcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_reqfrmtbl" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="reqcnts" type="STRING"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item3" compid="edt_juso" propid="value" datasetid="ds_patinfo" columnid="address"/>
      <BindItem id="item2" compid="edt_pid" propid="value" datasetid="ds_patinfo" columnid="pid"/>
      <BindItem id="item0" compid="edt_patnm" propid="value" datasetid="ds_patinfo" columnid="patnm"/>
      <BindItem id="item1" compid="edt_rrgstno" propid="value" datasetid="ds_patinfo" columnid="rgstno"/>
      <BindItem id="item5" compid="edt_tel" propid="value" datasetid="ds_patinfo" columnid="telno"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-28
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-28      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";

var objDomParser;
var objDOM;
var oFlag;
var arErrorCode = new HashArray();
//콜백함수
function cbf_SPLRR91000(strSvcID, nErrorCode, strErrorMag){	
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");	
}

function fExeInitialize(){
	// 산부인과 검사 의뢰 목록 조회
		dsf_createDsRow("ds_send"
	                    , [{col: "codeflag", val: "0127|"}]);	//0127= 의뢰서 서식이 산전검사의뢰서 선택되어진 항목							
						
	var oParam = {};
		oParam.id          = "TRLZZ00101";
		oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
		oParam.method      = "reqGetInitCodeInfo";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_init_lb0127=0127";
		oParam.async       = false;
		oParam.callback    = "cbf_SPLRR91000";

	tranf_submit(oParam);								

	 
	// 처방등록 화면에서 호출되지 않는 경우는 "저장" 기능을 비 활성화 처리
	if(ds_hidden_reqfrminfo.getColumn(0, "scrnno") == "10"){
		btn_save.visible = true;
		btn_prt.visible = false;
		
		edt_dr.value = sysf_getUserName();
		edt_reqHosp.value = sysf_getUserInfo("dutplceinstnm");
		edt_dept.value = sysf_getUserInfo("dutplcenm");
		var ininfo = appf_getPatientInfo("ininfo");
		if(ininfo.indexOf("입원일") == -1){
			rdo_inout.index = 1;
		}else{
			rdo_inout.index = 0;
		}
		
		ds_send.clear();
		dsf_makeValue(ds_send,"pid","string", appf_getPatientInfo("pid"));
		var oParam = {};
			oParam.id          = "TRLRR91001";
			oParam.service     = "rsltmngtapp.RsltMngt";
			oParam.method      = "reqGetPIdInfo";
			oParam.inds        = "cond=ds_send";
			oParam.outds       = "ds_patinfo=patinfo";
			oParam.async       = false;
			oParam.callback    = "cbf_SPLRR91000";

		tranf_submit(oParam);
		
		ds_send.clear();
		
	}else{
		btn_save.visible = false;
		btn_prt.visible = true;
	}
	
	// 의뢰지번호가 존재할 경우 의뢰지내용을 조회
	if(utlf_isNull(ds_hidden_reqfrminfo.getColumn(0, "reqcnts"))){ //의뢰지 내용이 존재하지 않을때
		if(ds_hidden_reqfrminfo.getColumn(0, "reqno") != "0"){ //의뢰지 번호 존재할때
			
			//의뢰지 번호로 의뢰지 내용 조회 
			ds_send.clear();
			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_reqfrmtbl=refrslt";
				oParam.async       = false;
				oParam.callback    = "cbf_SPLRR91000";

			tranf_submit(oParam);
							
			 
			 lf_setData();
		}else{ //의뢰지 번호 존재하지 않을때

			objDomParser = new DomParser;
			objDOM = objDomParser.parseFromString("<reqfrminfo></reqfrminfo>");
			
			rptf_setValueToDOM(objDOM, "/reqfrminfo/inptitem01", "");
			rptf_setValueToDOM(objDOM, "/reqfrminfo/reqno", "0");
		}
	}else{ //의뢰지 내용이 존재 할때 
		var nRow = ds_reqfrmtbl.addRow();
		ds_reqfrmtbl.setColumn(nRow, "reqcnts", ds_hidden_reqfrminfo.getColumn(ds_hidden_reqfrminfo.rowposition, "reqcnts"));
		lf_setData();
	}
}

function lf_setData(){
	// "<></>"의 내용을 dom으로 변환
	objDomParser = new DomParser;
	objDOM = objDomParser.parseFromString(ds_reqfrmtbl.getColumn(ds_reqfrmtbl.rowposition, "reqcnts"));
	
	edt_pid.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/pid");
	edt_patnm.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/patnm");
	edt_rrgstno.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/rgstno");
	edt_juso.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/address");
	edt_tel.value = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/telno");
	
	cal_usdt.value = utlf_getCurrentDate();
	cal_reqdt.value = utlf_getCurrentDate();
	
	cmb_title.text = rptf_getValueFromDOM(objDOM,"/reqfrminfo/inptitem01/titlenm");
	
}

function fExeClinicSave(){
	if(utlf_isNull(edt_pid.value)){
		sysf_messageBox("환자등록번호를 입력하세요.", "E999", "");
		edt_pid.setFocus();
		return false;
	}
	if(utlf_isNull(edt_patnm.value)){
		sysf_messageBox("환자성명을 입력하세요.", "E999", "");
		edt_patnm.setFocus();
		return false;
	}
	if(utlf_isNull(edt_rrgstno.value)){
		sysf_messageBox("주민등록번호를 입력하세요.", "E999", "");
		edt_rrgstno.setFocus();
		return false;
	}
	if(utlf_isNull(edt_juso.value)){
		sysf_messageBox("주소를 입력하세요.", "E999", "");
		edt_juso.setFocus();
		return false;
	}
	if(utlf_isNull(edt_tel.value)){
		sysf_messageBox("전화번호를 입력하세요.", "E999", "");
		edt_tel.setFocus();
		return false;
	}
	if(utlf_isNull(edt_weight.value)){
		sysf_messageBox("체중을 입력하세요.", "E999", "");
		edt_weight.setFocus();
		return false;
	}
	if(utlf_isNull(edt_lastMenses.value)){
		sysf_messageBox("최종월경일을 입력하세요.", "E999", "");
		edt_lastMenses.setFocus();
		return false;
	}
	if(utlf_isNull(edt_LMP.value)){
		sysf_messageBox("임신주수(LMP)를 입력하세요.", "E999", "");
		edt_LMP.setFocus();
		return false;
	}
	if(utlf_isNull(edt_LMP_DD.value)){
		sysf_messageBox("임신주수(LMP)를 입력하세요.", "E999", "");
		edt_LMP_DD.setFocus();
		return false;
	}
	if(utlf_isNull(edt_BPD3.value)){
		sysf_messageBox("임신주수(USG)를 입력하세요.", "E999", "");
		edt_BPD3.setFocus();
		return false;
	}
	if(utlf_isNull(edt_BPD_DD3.value)){
		sysf_messageBox("임신주수(USG)를 입력하세요.", "E999", "");
		edt_BPD_DD3.setFocus();
		return;
	}
	if(utlf_isNull(edt_BPD_NT1.value)){
		if(cmb_title.value == "NNM0005G"){
			sysf_messageBox("Dual Marker 검사 의뢰서 작성시 NT 값을 반드시 입력해야 합니다.", "E999", "");
			edt_BPD_NT1.setFocus();
			return false;
		}
	}
	
	//두명일때
	if(cmb_cm.value == "2"){
		if(utlf_isNull(edt_CRL_NT1.value)){
			if(cmb_title.value == "NNM0005G"){
				sysf_messageBox("Dual Marker 검사 의뢰서 작성시 NT 값을 반드시 입력해야 합니다.", "E999", "");
				edt_CRL_NT1.setFocus();
				return false;
			}
		}
		if(utlf_isNull(edt_USG1.value)){
			sysf_messageBox("임신주수(USG)를 입력하세요.", "E999", "");
			edt_USG1.setFocus();
			return false;
		}
		if(utlf_isNull(edt_USG_DD1.value)){
			sysf_messageBox("임신주수(USG)를 입력하세요.", "E999", "");
			edt_USG_DD1.setFocus();
			return false;
		}
	}
	
	//세명일때
	if(cmb_cm.value == "3"){
		if(utlf_isNull(edt_CRL_NT1.value)){
			if(cmb_title.value == "NNM0005G"){
				sysf_messageBox("Dual Marker 검사 의뢰서 작성시 NT 값을 반드시 입력해야 합니다.", "E999", "");
				edt_CRL_NT1.setFocus();
				return false;
			}
		}
		if(utlf_isNull(edt_USG1.value)){
			sysf_messageBox("임신주수(USG)를 입력하세요.", "E999", "");
			edt_USG1.setFocus();
			return false;
		}
		if(utlf_isNull(edt_USG_DD1.value)){
			sysf_messageBox("임신주수(USG)를 입력하세요.", "E999", "");
			edt_USG_DD1.setFocus();
			return false;
		}
		
		if(utlf_isNull(edt_BPD_NT2.value)){
			if(cmb_title.value == "NNM0005G"){
				sysf_messageBox("Dual Marker 검사 의뢰서 작성시 NT 값을 반드시 입력해야 합니다.", "E999", "");
				edt_BPD_NT2.setFocus();
				return false;
			}
		}
		if(utlf_isNull(edt_BPD4.value)){
			sysf_messageBox("임신주수(USG)를 입력하세요.", "E999", "");
			edt_BPD4.setFocus();
			return false;
		}
		if(utlf_isNull(edt_BPD_DD4.value)){
			sysf_messageBox("임신주수(USG)를 입력하세요.", "E999", "");
			edt_BPD_DD4.setFocus();
			return false;
		}
	}
	
	//data 만들기 
	lf_makeData();

	
	//검체추가정보 설정
	 dsf_createDsRow("ds_send1"
						 , [{col: "pid", val: ds_hidden_reqfrminfo.getColumn(0, "pid")}
						 ,  {col: "reqno", val: ds_hidden_reqfrminfo.getColumn(0, "reqno")}
						 ,  {col: "reqcnts", val: objDOM.documentElement.source.replace("<![CDATA[","").replace("]]]]><![CDATA[>","")}
						 ,  {col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}]);									
				
								
	// 서브밋호출
	tranf_submit({   id: "TXLRR90201"
				   , service: "diagtestapplib.LisCommon"
				   , method: "reqExeReqFrmInfo"
				   , inds : "refData=ds_send1"
				   , outds: "ds_reqfrminfo=reflist"
				   , callback: "cbf_SPLRR91000"
				   , async: false
	 });
	 
	opener.ds_hidden_reqfrminfo.setColumn(0,"reqno", ds_rtnvalinfo.getColumn(0,"reqno"));
	 
	close();
}

function lf_makeData(){
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/title", utlf_transNullToEmpty(cmb_title.value));
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/titlenm", utlf_transNullToEmpty(cmb_title.text));
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/pid", utlf_transNullToEmpty(edt_pid.value));
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/patnm", utlf_transNullToEmpty(edt_patnm.value));
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/rgstno", utlf_transNullToEmpty(edt_rrgstno.value));
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/address", utlf_transNullToEmpty(edt_juso.value));
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/telno", utlf_transNullToEmpty(edt_tel.value));
	
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/orddd", utlf_transNullToEmpty(cal_usdt.value));
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/depdd", utlf_transNullToEmpty(cal_reqdt.value));
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/ioflag", utlf_transNullToEmpty(rdo_inout.value));
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/dephost", utlf_transNullToEmpty(edt_reqHosp.value));
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/orddept", utlf_transNullToEmpty(edt_dept.value));
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/orddr", utlf_transNullToEmpty(edt_dr.value));
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/bcnostyle", (rdo_spccd.index == -1) ? '' : rdo_spccd.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/childm", utlf_transNullToEmpty(cmb_cm.value));
	
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/nt", (utlf_isNull(edt_BPD_NT1.value)) ? '' : edt_BPD_NT1.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/nt2", (utlf_isNull(edt_CRL_NT1.value)) ? '' : edt_CRL_NT1.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/nt3", (utlf_isNull(edt_BPD_NT2.value)) ? '' : edt_BPD_NT2.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/nt4", (utlf_isNull(edt_CRL_NT2.value)) ? '' : edt_CRL_NT2.value);
	
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/crl", (utlf_isNull(edt_BPD1.value)) ? '' : edt_BPD1.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/crl2", (utlf_isNull(edt_CRL1.value)) ? '' : edt_CRL1.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/crl3", (utlf_isNull(edt_BPD2.value)) ? '' : edt_BPD2.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/crl4", (utlf_isNull(edt_CRL2.value)) ? '' : edt_CRL2.value);
	
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/bweek", (utlf_isNull(edt_LMP.value)) ? '' : edt_LMP.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/bweek2", (utlf_isNull(edt_BPD3.value)) ? '' : edt_BPD3.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/bweek3", (utlf_isNull(edt_USG1.value)) ? '' : edt_USG1.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/bweek4", (utlf_isNull(edt_BPD4.value)) ? '' : edt_BPD4.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/bweek5", (utlf_isNull(edt_USG2.value)) ? '' : edt_USG2.value);
	
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/bdd", (utlf_isNull(edt_LMP_DD.value)) ? '' : edt_LMP_DD.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/bdd2", (utlf_isNull(edt_BPD_DD3.value)) ? '' : edt_BPD_DD3.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/bdd3", (utlf_isNull(edt_USG_DD1.value)) ? '' : edt_USG_DD1.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/bdd4", (utlf_isNull(edt_BPD_DD4.value)) ? '' : edt_BPD_DD4.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/bdd5", (utlf_isNull(edt_USG_DD2.value)) ? '' : edt_USG_DD2.value);
	
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/ultradd", (edt_ultrasonicDD.value == null) ? '' : edt_ultrasonicDD.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/firstm", utlf_transNullToEmpty(edt_lastMenses.value));
	
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/past1", rdo_down.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/past2", rdo_ntd.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/past3", rdo_iddm.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/past4", rdo_apriority.value);
	rptf_setValueToDOM(objDOM,"/reqfrminfo/inptitem01/past5", rdo_chromosome.value);	

}
function fSetClose(){
	// 의뢰서조회
	
	this.close();
	
}

function fReport(){
	var objDomParser = new DomParser;
	var objDOM = objDomParser.parseFromString(ds_reqfrmtbl.getColumn(ds_reqfrmtbl.rowposition, "reqcnts"));
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;
	trace(objDOM.documentElement.source);
	var option = "open=1;save=1;directprint=0;printdialog=0;print=1;zoom=0";
	rptf_exeReportPreview30(["RPLRR91000"], [objParam], option);
}

function SPLRR91000_onload(obj:Form, e:LoadEventInfo){
	//폼 초기화 함수
	frmf_initForm(obj);
	
	dsf_createDs("ds_hidden_reqfrminfo"
					, [{col: "pid"}
					,  {col: "reqno"}
					,  {col: "scrnno"}
					,  {col: "reqcnts"}
					,  {col: "prcpcd"}
					,  {col: "spccd"}
					,  {col: "instcd"}]);
					
	
	ds_hidden_reqfrminfo.copyData(arg_ds_hidden_reqfrminfo);


	
	//의뢰지초기 셋팅
	fExeInitialize();	
}

function btn_close_onclick(obj:Button,  e:ClickEventInfo){
	fSetClose();
}

function bnt_exit_onclick(obj:Button,  e:ClickEventInfo){
	fSetClose();
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo){
	fExeClinicSave();
	
}

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