YNU_JEUS/app_home/himed/xpapps/lis/colgverixp/xp/SPLVJ90300_종합검증접수결과.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLVJ90300" position="absolute 0 0 1202 774" titletext="New Form" oninit="SPLVJ90300_oninit" onload="SPLVJ90300_onload">
    <Layouts>
      <Layout>
        <Button id="setbtn" taborder="9" text="수정보고" class="btn4" visible="false" position="absolute 1046 24 1126 46" anchor="top right" onclick="setbtn_onclick"/>
        <cp_checkboxList id="checkbox1" taborder="26" scrollbars="none" position="absolute 2 410 723 464" style="background:transparent; " col="1" row="1" cellspacing="2" vcellspacing="0" itemWidth="100" itemHeight="20" overflow="visible"/>
        <Button id="btn_LstRept" taborder="24" text="결과저장" class="btn4" position="absolute 1046 24 1126 46" anchor="top right" onclick="btn_LstRept_onclick" visible="false"/>
        <Static id="caption6" text="종합검증접수결과" class="tit_1" position="absolute 0 0 145 23"/>
        <Static id="caption10" text="검증인수" class="cell_1" position="absolute 117 23 177 45"/>
        <Button id="button6" taborder="1" text="보기" class="btn6" position="absolute 57 24 116 46" onclick="button6_onclick"/>
        <Button id="btn_print" taborder="2" text="출력" class="btn6" position="absolute 0 24 56 46" onclick="btn_print_onclick"/>
        <Edit id="output5" taborder="3" readonly="true" position="absolute 179 25 236 44" enable="false"/>
        <Static id="caption4" text="/" visible="false" position="absolute 430 26 445 46"/>
        <Edit id="output4" taborder="4" readonly="true" visible="false" position="absolute 445 26 470 45"/>
        <Static id="caption16" text="검사자" class="tit_2" visible="false" position="absolute 725 28 785 49" anchor="top right"/>
        <Edit id="ipt_testpsn" taborder="5" class="input_essential" visible="false" position="absolute 795 27 871 46" anchor="top right" autoselect="true" onkeydown="ipt_testpsn_onkeydown" inputmode="upper"/>
        <Edit id="opt_testpsn" taborder="6" readonly="true" visible="false" position="absolute 873 27 955 46" anchor="top right"/>
        <Button id="cancelbtn" taborder="7" text="취소보고" class="btn4" visible="false" position="absolute 965 24 1045 46" anchor="top right" onclick="cancelbtn_onclick"/>
        <Button id="btn_cle" taborder="10" text="초기화" class="btn4" position="absolute 1127 24 1195 46" anchor="top right" onclick="btn_cle_onclick"/>
        <Shape id="line17" class="line_6" position="absolute 0 45 1194 51" anchor="left top right"/>
        <Static id="caption31" text="환자정보" class="tit_2" position="absolute 1 58 116 80" anchor="left top"/>
        <Shape id="line12" class="line_10" position="absolute 0 74 725 80" anchor="left top"/>
        <Static id="caption32" text="Lab No" class="cell_1" position="absolute 0 79 90 102" anchor="left top"/>
        <Edit id="output3" taborder="11" readonly="true" position="absolute 93 81 225 100" anchor="left top" enable="false"/>
        <Shape id="line15" class="line_3" position="absolute 0 101 725 107" anchor="left top"/>
        <Shape id="line16" class="line_10" position="absolute 0 129 725 135" anchor="left top" onclick="line16_onclick"/>
        <Static id="caption37" text="비정상 결과 혹은 유의한 결과를 보이는 항목" class="tit_2" position="absolute 0 113 297 134" anchor="left top"/>
        <Shape id="line18" class="line_10" position="absolute 0 407 725 413" anchor="left top"/>
        <Static id="caption38" text="검증방법" class="tit_2" position="absolute 0 391 115 412" anchor="left top"/>
        <Shape id="line19" class="line_10" position="absolute 0 491 695 497" anchor="left top"/>
        <Static id="caption39" text="검증/판독 소견/추천" class="tit_2" position="absolute 0 475 185 496" anchor="left top"/>
        <Button id="button2" taborder="12" text="리스트조회" class="btn2" position="absolute 650 55 725 74" anchor="left top" onclick="button2_onclick"/>
        <Grid id="spclrslt" taborder="13" binddataset="ds_main_spclrslt" useinputpanel="false" position="absolute 0 134 362 384" anchor="left top" cellsizingtype="col" onrbuttondown="spclrslt_onrbuttondown" oncellclick="spclrslt_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="23"/>
                <Column size="120"/>
                <Column size="70"/>
                <Column size="60"/>
                <Column size="70"/>
                <Column size="120"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="검사명"/>
                <Cell col="2" text="결과치"/>
                <Cell col="3" text="참고치"/>
                <Cell col="4" text="단위"/>
                <Cell col="5" text="보고일시"/>
                <Cell col="6" text="검체명"/>
                <Cell col="7" text="prcpcd"/>
                <Cell col="8" text="spccd"/>
                <Cell col="9" text="bcolldt"/>
                <Cell col="10" text="spcacptdt"/>
                <Cell col="11" text="spcacptid"/>
              </Band>
              <Band id="body">
                <Cell displaytype="image" style="align:center middle;" text="bind:check" expr="expr:check == '1' ? 'IMG::lis/chkRPT1.png' : 'IMG::lis/chkRPT0.png'"/>
                <Cell col="1" style="align:left middle;background:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');background2:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');" text="bind:prcpnm"/>
                <Cell col="2" style="background:EXPR(String(reptrslt).indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');background2:EXPR(String(reptrslt).indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');" text="bind:reptrslt"/>
                <Cell col="3" style="align:left middle;background:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');background2:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');" text="bind:ref"/>
                <Cell col="4" style="align:left middle;background:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');background2:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');" text="bind:rsltunit"/>
                <Cell col="5" displaytype="date" style="align:left middle;background:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');background2:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');" text="bind:lastreptdt" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="nulltext"/>
                <Cell col="6" style="align:left middle;background:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');background2:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');" text="bind:spcscrnnm"/>
                <Cell col="7" text="bind:prcpcd"/>
                <Cell col="8" text="bind:spccd"/>
                <Cell col="9" text="bind:bcolldt"/>
                <Cell col="10" text="bind:spcacptdt"/>
                <Cell col="11" text="bind:spcacptid"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Edit id="output2" taborder="14" readonly="true" position="absolute 323 81 725 100" anchor="left top" enable="false"/>
        <Static id="caption2" text="검증항목" class="cell_1" position="absolute 230 79 320 102" anchor="left top"/>
        <Tab id="switch1" taborder="15" tabindex="0" position="absolute 735 55 1193 760" anchor="all">
          <Tabpages>
            <Tabpage id="case1" text="결과예문">
              <Layouts>
                <Layout>
                  <Grid id="readcmtlist" taborder="3" binddataset="ds_init_readcmtlist" useinputpanel="false" position="absolute 0 35 218 671" anchor="left top bottom" autofittype="col" cellsizingtype="col" oncelldblclick="switch1_case1_readcmtlist_oncelldblclick" oncellclick="switch1_case1_readcmtlist_oncellclick" cellclickbound="cell">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="25"/>
                          <Column size="0"/>
                          <Column size="182"/>
                          <Column size="0"/>
                          <Column size="0"/>
                        </Columns>
                        <Rows>
                          <Row size="24" band="head"/>
                          <Row size="24"/>
                        </Rows>
                        <Band id="head">
                          <Cell/>
                          <Cell col="1" text="소견코드"/>
                          <Cell col="2" text="소견명"/>
                          <Cell col="3" text="소견"/>
                          <Cell col="4"/>
                        </Band>
                        <Band id="body">
                          <Cell displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                          <Cell col="1" text="bind:readcmtcd"/>
                          <Cell col="2" style="align:left middle;" text="bind:readcmttitl"/>
                          <Cell col="3" displaytype="none" edittype="none" text="bind:readcmtcnts"/>
                          <Cell col="4" displaytype="none" edittype="none" text="bind:upreadcmtcnts"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                  <Shape id="line6" class="line_10" position="absolute 0 30 454 36" anchor="left top right"/>
                  <Static id="caption9" text="소견조회" class="tit_2" position="absolute 0 14 75 35" anchor="left top"/>
                  <Edit id="input1" taborder="4" position="absolute 333 11 455 30" anchor="top right" onkeydown="switch1_case1_input1_onkeydown"/>
                  <Combo id="cmb_SectCd" taborder="5" codecolumn="codecolumn" datacolumn="datacolumn" visible="false" position="absolute 83 11 165 30" anchor="left top" onitemchanged="switch1_case1_cmb_SectCd_onitemchanged">
                    <Dataset id="innerdataset">
                      <ColumnInfo>
                        <Column id="codecolumn"/>
                        <Column id="datacolumn"/>
                      </ColumnInfo>
                      <Rows>
                        <Row>
                          <Col id="codecolumn">0</Col>
                          <Col id="datacolumn">전체</Col>
                        </Row>
                        <Row>
                          <Col id="codecolumn">1</Col>
                          <Col id="datacolumn">코드명</Col>
                        </Row>
                      </Rows>
                    </Dataset>
                  </Combo>
                  <Button id="button12" taborder="6" text="소견조회" class="btn2" visible="false" position="absolute 169 11 233 30" anchor="left top" onclick="switch1_case1_button12_onclick"/>
                  <Grid id="readcmtlist2" taborder="7" binddataset="ds_init_readcmtlist2" useinputpanel="false" position="absolute 220 35 454 671" anchor="all" cellsizingtype="col" autofittype="col" oncellclick="switch1_case1_readcmtlist2_oncellclick" oncelldblclick="switch1_case1_readcmtlist2_oncelldblclick" cellclickbound="cell">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="25" band="left"/>
                          <Column size="0"/>
                          <Column size="190"/>
                          <Column size="0"/>
                          <Column size="0"/>
                        </Columns>
                        <Rows>
                          <Row size="24" band="head"/>
                          <Row size="24"/>
                        </Rows>
                        <Band id="head">
                          <Cell/>
                          <Cell col="1" text="소견코드"/>
                          <Cell col="2" text="소견명"/>
                          <Cell col="3" text="소견"/>
                          <Cell col="4"/>
                        </Band>
                        <Band id="body">
                          <Cell displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                          <Cell col="1" text="bind:readcmtcd"/>
                          <Cell col="2" style="align:left middle;" text="bind:readcmttitl"/>
                          <Cell col="3" displaytype="none" edittype="none" text="bind:readcmtcnts"/>
                          <Cell col="4" displaytype="none" edittype="none" text="bind:upreadcmtcnts"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                  <Static id="caption8" text="검색 :" position="absolute 290 12 330 31" anchor="top right"/>
                </Layout>
              </Layouts>
            </Tabpage>
            <Tabpage id="case2" text="일자별 검사결과">
              <Layouts>
                <Layout>
                  <Static id="caption1" text="검사결과" class="tit_2" position="absolute 0 14 75 35" anchor="left top"/>
                  <Shape id="line1" class="line_10" position="absolute 1 30 446 36" anchor="left top right"/>
                  <Grid id="alltestlist" class="datagrid2" taborder="1" useinputpanel="false" cellsizingtype="col" onrbuttondown="switch1_case2_alltestlist_onrbuttondown" position="absolute 2 35 445 672" anchor="all">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="40" band="left"/>
                        </Columns>
                        <Rows>
                          <Row size="24" band="head"/>
                          <Row size="24"/>
                        </Rows>
                        <Band id="head">
                          <Cell/>
                        </Band>
                        <Band id="body">
                          <Cell celltype="head" expr="currow+1"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
          </Tabpages>
        </Tab>
        <Edit id="input4" taborder="16" class="input_default" position="absolute 231 452 396 471"/>
        <TextArea id="readcmtcnts" taborder="17" position="absolute 0 496 695 621" anchor="left top" wordwrap="word"/>
        <Static id="caption5" text="추가보고" class="tit_2" position="absolute 0 627 185 648" anchor="left top"/>
        <TextArea id="textarea2" taborder="18" position="absolute 0 648 695 708" anchor="left top" wordwrap="word"/>
        <Shape id="line8" class="line_10" position="absolute 0 643 695 649" anchor="left top"/>
        <Static id="caption7" text="보고일" class="tit_2" position="absolute 0 714 185 735" anchor="left top"/>
        <Grid id="spclrslt2" taborder="19" binddataset="ds_main_spclrslt2" useinputpanel="false" position="absolute 362 134 725 384" anchor="left top" cellsizingtype="col" onrbuttondown="spclrslt2_onrbuttondown" oncellclick="spclrslt2_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="21"/>
                <Column size="120"/>
                <Column size="70"/>
                <Column size="60"/>
                <Column size="70"/>
                <Column size="120"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="검사명"/>
                <Cell col="2" text="결과치"/>
                <Cell col="3" text="참고치"/>
                <Cell col="4" text="단위"/>
                <Cell col="5" text="보고일시"/>
                <Cell col="6" text="검체명"/>
                <Cell col="7" text="prcpcd"/>
                <Cell col="8" text="spccd"/>
                <Cell col="9" text="bcolldt"/>
                <Cell col="10" text="spcacptdt"/>
                <Cell col="11" text="spcacptid"/>
              </Band>
              <Band id="body">
                <Cell displaytype="image" style="align:center middle;" text="bind:check" expr="expr:check == '1' ? 'IMG::lis/chkRPT1.png' : 'IMG::lis/chkRPT0.png'"/>
                <Cell col="1" style="align:left middle;background:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');background2:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');" text="bind:prcpnm"/>
                <Cell col="2" style="background:EXPR(String(reptrslt).indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');background2:EXPR(String(reptrslt).indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');" text="bind:reptrslt"/>
                <Cell col="3" style="background:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');background2:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');" text="bind:ref"/>
                <Cell col="4" style="background:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');background2:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');" text="bind:rsltunit"/>
                <Cell col="5" displaytype="date" style="background:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');background2:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');" text="bind:lastreptdt" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="nulltext"/>
                <Cell col="6" style="background:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');background2:EXPR(reptrslt.indexOf('▲') != -1 ? '#ffc0cb' : '#e6e6fa');" text="bind:spcscrnnm"/>
                <Cell col="7" text="bind:prcpcd"/>
                <Cell col="8" text="bind:spccd"/>
                <Cell col="9" text="bind:bcolldt"/>
                <Cell col="10" text="bind:spcacptdt"/>
                <Cell col="11" text="bind:spcacptid"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn1" taborder="20" class="icon_left" visible="false" position="absolute 702 495 728 514" onclick="btn1_onclick"/>
        <Button id="btn2" taborder="21" class="icon_left" visible="false" position="absolute 702 647 728 666" anchor="default" onclick="btn2_onclick"/>
        <Static id="view" text="caption12" visible="false" position="absolute 115 159 280 224" onclick="view_onclick"/>
        <Static id="view2" text="caption12" visible="false" position="absolute 478 159 638 224" onclick="view2_onclick"/>
        <Grid id="testlist" taborder="22" binddataset="ds_main_testlist" useinputpanel="false" autofittype="col" visible="false" position="absolute 575 324 680 399">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="검증항목"/>
              </Band>
              <Band id="body">
                <Cell text="bind:testlrgnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="datagrid1" taborder="23" binddataset="ds_datagrid1" useinputpanel="false" visible="false" position="absolute 337 707 695 763" anchor="left top">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="caption1"/>
                <Cell col="1" text="caption2"/>
                <Cell col="2" text="caption3"/>
                <Cell col="3"/>
                <Cell col="4"/>
                <Cell col="5"/>
                <Cell col="6"/>
                <Cell col="7"/>
                <Cell col="8"/>
                <Cell col="9"/>
                <Cell col="10"/>
                <Cell col="11"/>
                <Cell col="12"/>
              </Band>
              <Band id="body">
                <Cell text="bind:chk"/>
                <Cell col="1" text="bind:tclscd"/>
                <Cell col="2" text="bind:testcd"/>
                <Cell col="3" text="bind:tclsnm"/>
                <Cell col="4" text="bind:bcno"/>
                <Cell col="5" text="bind:orddeptnm"/>
                <Cell col="6" text="bind:atdrid"/>
                <Cell col="7" text="bind:spccd"/>
                <Cell col="8" text="bind:rsltstat"/>
                <Cell col="9" text="bind:prcpgenrflag"/>
                <Cell col="10" text="bind:sectcd"/>
                <Cell col="11" text="bind:tsectcd"/>
                <Cell col="12" text="bind:execprcpuniqno"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <PopupMenu id="pmn_menu1" position="absolute 1253 109 1359 149" innerdataset="@ds_hidden_popupmenu" idcolumn="func" captioncolumn="label" levelcolumn="level" onmenuclick="pmn_menu1_onmenuclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="testlist" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="patnm" type="STRING" size="256"/>
          <Column id="sexage" type="STRING" size="256"/>
          <Column id="orddeptroom" type="STRING" size="256"/>
          <Column id="verimthd" type="STRING" size="256"/>
          <Column id="verimthdother" type="STRING" size="256"/>
          <Column id="readcont" type="STRING" size="256"/>
          <Column id="addreadcont" type="STRING" size="256"/>
          <Column id="readno" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="atdrnm" type="STRING" size="256"/>
          <Column id="readdt" type="STRING" size="256"/>
          <Column id="readid" type="STRING" size="256"/>
          <Column id="readnm" type="STRING" size="256"/>
          <Column id="usernm" type="STRING" size="256"/>
          <Column id="licnsno" type="STRING" size="256"/>
          <Column id="termhngnm" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="execprcpuniqno" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="count" type="STRING" size="256"/>
          <Column id="usercount" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="bcno" type="STRING" size="256"/>
          <Column id="roomcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="testlist"/>
            <Col id="pid"/>
            <Col id="patnm"/>
            <Col id="sexage"/>
            <Col id="orddeptroom"/>
            <Col id="verimthd"/>
            <Col id="verimthdother"/>
            <Col id="readcont"/>
            <Col id="addreadcont"/>
            <Col id="readno"/>
            <Col id="orddd"/>
            <Col id="atdrnm"/>
            <Col id="readdt"/>
            <Col id="readid"/>
            <Col id="readnm"/>
            <Col id="usernm"/>
            <Col id="licnsno"/>
            <Col id="termhngnm"/>
            <Col id="prcpdd"/>
            <Col id="execprcpuniqno"/>
            <Col id="instcd"/>
            <Col id="count"/>
            <Col id="usercount"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_ref" 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="notipsn" type="STRING" size="256"/>
          <Column id="end" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="notipsn"/>
            <Col id="end"/>
            <Col id="orddd"/>
            <Col id="userid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_getUsernm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="usernm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_spclrslt" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="check" type="STRING" size="256" sumtext="check"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="reptrslt" type="STRING" size="256" sumtext="결과"/>
          <Column id="spcscrnnm" type="STRING" size="256" sumtext="검체명"/>
          <Column id="prcpcd" type="STRING" size="256" sumtext="검사항목코드"/>
          <Column id="spccd" type="STRING" size="256" sumtext="검체코드"/>
          <Column id="bcolldt" type="STRING" size="256" sumtext="채혈일시"/>
          <Column id="lastreptdt" type="STRING" size="256" sumtext="보고일시"/>
          <Column id="spcacptdt" type="STRING" size="256" sumtext="접수일시"/>
          <Column id="spcacptid" type="STRING" size="256" sumtext="접수자ID"/>
          <Column id="ref" type="STRING" size="256" sumtext="참고치"/>
          <Column id="rsltunit" type="STRING" size="256" sumtext="참고치"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="check"/>
            <Col id="prcpnm"/>
            <Col id="reptrslt"/>
            <Col id="spcscrnnm"/>
            <Col id="prcpcd"/>
            <Col id="spccd"/>
            <Col id="bcolldt"/>
            <Col id="lastreptdt"/>
            <Col id="spcacptdt"/>
            <Col id="spcacptid"/>
            <Col id="ref"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_spclrslt2" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="check" type="STRING" size="256" sumtext="check"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="reptrslt" type="STRING" size="256" sumtext="결과"/>
          <Column id="spcscrnnm" type="STRING" size="256" sumtext="검체명"/>
          <Column id="prcpcd" type="STRING" size="256" sumtext="검체항목코드"/>
          <Column id="spccd" type="STRING" size="256" sumtext="검체코드"/>
          <Column id="bcolldt" type="STRING" size="256" sumtext="채혈일시"/>
          <Column id="lastreptdt" type="STRING" size="256" sumtext="보고일시"/>
          <Column id="spcacptdt" type="STRING" size="256" sumtext="접수일시"/>
          <Column id="spcacptid" type="STRING" size="256" sumtext="접수자ID"/>
          <Column id="ref" type="STRING" size="256" sumtext="참고치"/>
          <Column id="rsltunit" type="STRING" size="256" sumtext="참고치"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="check"/>
            <Col id="prcpnm"/>
            <Col id="reptrslt"/>
            <Col id="spcscrnnm"/>
            <Col id="prcpcd"/>
            <Col id="spccd"/>
            <Col id="bcolldt"/>
            <Col id="lastreptdt"/>
            <Col id="spcacptdt"/>
            <Col id="spcacptid"/>
            <Col id="ref"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="readkind" type="STRING" size="256"/>
          <Column id="search" type="STRING" size="256"/>
          <Column id="cmtlist" type="STRING" size="256"/>
          <Column id="rptchk" type="STRING" size="256"/>
          <Column id="rptother" type="STRING" size="256"/>
          <Column id="addreadcont" type="STRING" size="256"/>
          <Column id="data1" type="STRING" size="256"/>
          <Column id="data2" type="STRING" size="256"/>
          <Column id="rsltstat" type="STRING" size="256"/>
          <Column id="readcont" type="STRING" size="256"/>
          <Column id="bcno" type="STRING" size="256"/>
          <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="orddd" type="STRING" size="256"/>
          <Column id="getgbn" type="STRING" size="256"/>
          <Column id="signbfcnts" type="STRING" size="256"/>
          <Column id="signafcnts" type="STRING" size="256"/>
          <Column id="execprcpuniqno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="readkind"/>
            <Col id="search"/>
            <Col id="cmtlist"/>
            <Col id="rptchk"/>
            <Col id="rptother"/>
            <Col id="addreadcont"/>
            <Col id="data1"/>
            <Col id="data2"/>
            <Col id="rsltstat"/>
            <Col id="readcont"/>
            <Col id="bcno"/>
            <Col id="chk1"/>
            <Col id="chk2"/>
            <Col id="chk3"/>
            <Col id="chk4"/>
            <Col id="chk5"/>
            <Col id="chk6"/>
            <Col id="orddd"/>
            <Col id="getgbn"/>
            <Col id="signbfcnts"/>
            <Col id="signafcnts"/>
            <Col id="execprcpuniqno"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_readcmtlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256" sumtext="체크"/>
          <Column id="readcmtcd" type="STRING" size="256" sumtext="판독코드"/>
          <Column id="readcmttitl" type="STRING" size="256" sumtext="판독코드명"/>
          <Column id="upreadcmtcnts" type="STRING" size="256" sumtext="판독내용"/>
          <Column id="readcmtcnts" type="STRING" size="256" sumtext="판독내용"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_readcmtlist2" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256" sumtext="체크"/>
          <Column id="readcmtcd" type="STRING" size="256" sumtext="판독코드"/>
          <Column id="readcmttitl" type="STRING" size="256" sumtext="판독코드명"/>
          <Column id="upreadcmtcnts" type="STRING" size="256" sumtext="판독내용"/>
          <Column id="readcmtcnts" type="STRING" size="256" sumtext="판독내용"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_chk_checkbox1" 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">Calibration Verification</Col>
            <Col id="value">1</Col>
          </Row>
          <Row>
            <Col id="label">Internal Quality Control</Col>
            <Col id="value">2</Col>
          </Row>
          <Row>
            <Col id="label">Delta Check Verification</Col>
            <Col id="value">3</Col>
          </Row>
          <Row>
            <Col id="label">Panic/Alert Value Verification</Col>
            <Col id="value">4</Col>
          </Row>
          <Row>
            <Col id="label">Repeat / Recheck</Col>
            <Col id="value">5</Col>
          </Row>
          <Row>
            <Col id="label">Others :</Col>
            <Col id="value">6</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_cmtref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="readkind" type="STRING" size="256"/>
          <Column id="search" type="STRING" size="256"/>
          <Column id="viewcap" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="readkind">0</Col>
            <Col id="search"/>
            <Col id="viewcap"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_popupmenu" 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="func" type="STRING" size="256"/>
          <Column id="level" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_rslt_rsltlist_row" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_testlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_rsltrow_rsltlist_header" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_lb0124" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_cancelbcno" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="bcno" type="STRING" size="256" sumtext="바코드번호"/>
          <Column id="cancelgbn" type="STRING" size="256" sumtext="취소구분"/>
          <Column id="resncd" type="STRING" size="256" sumtext="취소코드"/>
          <Column id="resndesc" type="STRING" size="256" sumtext="취소내용"/>
          <Column id="cmt" type="STRING" size="256" sumtext="코멘트"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="spcstat" type="STRING" size="256" sumtext="검체상태"/>
          <Column id="resncdkind" type="STRING" size="256" sumtext="사유코드종류"/>
          <Column id="rtnid" type="STRING" size="256" sumtext="아이디"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_cancelgrd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256"/>
          <Column id="tclscd" type="STRING" size="256"/>
          <Column id="testcd" type="STRING" size="256"/>
          <Column id="tclsnm" type="STRING" size="256"/>
          <Column id="bcno" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="atdrid" type="STRING" size="256"/>
          <Column id="spccd" type="STRING" size="256"/>
          <Column id="rsltstat" type="STRING" size="256"/>
          <Column id="prcpgenrflag" type="STRING" size="256"/>
          <Column id="sectcd" type="STRING" size="256"/>
          <Column id="tsectcd" type="STRING" size="256"/>
          <Column id="execprcpuniqno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="chk"/>
            <Col id="tclscd"/>
            <Col id="testcd"/>
            <Col id="tclsnm"/>
            <Col id="bcno"/>
            <Col id="orddeptnm"/>
            <Col id="atdrid"/>
            <Col id="spccd"/>
            <Col id="rsltstat"/>
            <Col id="prcpgenrflag"/>
            <Col id="sectcd"/>
            <Col id="tsectcd"/>
            <Col id="execprcpuniqno"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_spclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_cert_certdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_rsltrow_rsltlist_row" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_sign" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="cmtlist" type="STRING" size="256" sumtext="서술결과"/>
          <Column id="rptchk" type="STRING" size="256" sumtext="검증방법"/>
          <Column id="rptother" type="STRING" size="256" sumtext="검증방법Other"/>
          <Column id="addreadcont" type="STRING" size="256" sumtext="추가소견"/>
          <Column id="rsltstat" type="STRING" size="256" sumtext="결과상태"/>
          <Column id="readcont" type="STRING" size="256" sumtext="소견"/>
          <Column id="bcno" type="STRING" size="256" sumtext="검증번호"/>
          <Column id="signbfcnts" type="STRING" size="256" sumtext="검증번호"/>
          <Column id="signafcnts" type="STRING" size="256" sumtext="검증번호"/>
          <Column id="orddd" type="STRING" size="256" sumtext="검증번호"/>
          <Column id="execprcpuniqno" type="STRING" size="256" sumtext="검증번호"/>
          <Column id="userid" type="STRING" size="256" sumtext="검증번호"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_data1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_data2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="output5" propid="value" datasetid="ds_main_patinfo" columnid="count"/>
      <BindItem id="item1" compid="output4" propid="value" datasetid="ds_main_patinfo" columnid="usercount"/>
      <BindItem id="item2" compid="ipt_testpsn" propid="value" datasetid="ds_hidden_ref" columnid="userid"/>
      <BindItem id="item3" compid="opt_testpsn" propid="value" datasetid="ds_main_getUsernm" columnid="usernm"/>
      <BindItem id="item4" compid="output3" propid="value" datasetid="ds_main_patinfo" columnid="readno"/>
      <BindItem id="item5" compid="output2" propid="value" datasetid="ds_main_patinfo" columnid="testlist"/>
      <BindItem id="item6" compid="switch1.case1.input1" propid="value" datasetid="ds_hidden_cmtref" columnid="search"/>
      <BindItem id="item7" compid="switch1.case1.cmb_SectCd" propid="value" datasetid="ds_hidden_cmtref" columnid="readkind"/>
      <BindItem id="item8" compid="readcmtcnts" propid="value" datasetid="ds_main_patinfo" columnid="readcont"/>
      <BindItem id="item9" compid="input4" propid="value" datasetid="ds_main_patinfo" columnid="verimthdother"/>
      <BindItem id="item10" compid="textarea2" propid="value" datasetid="ds_main_patinfo" columnid="addreadcont"/>
    </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";
include "emr_carecomxp::ENRSignEngine.xjs";
function SPLVJ90300_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	
	Sign.init();
}

function SPLVJ90300_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(spclrslt);
	grdf_initGrid(spclrslt2);
	grdf_initGrid(switch1.case1.readcmtlist);
	grdf_initGrid(switch1.case1.readcmtlist2);
	grdf_initGrid(switch1.case2.alltestlist);
	
	frmf_open("SPLVJ90100", "SPLVJ90100", "", "", "", "", "", "", "", "", "", "", "M");
	
	var oParam = {};
		oParam.id          = "TRLVF00101";
		oParam.service     = "verificationbasemngtapp.CmtCdMngt";
		oParam.method      = "reqGetColgCmtList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_init_readcmtlist=getColgCmtList ds_init_readcmtlist2=getColgCmtList2";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLVF00101";

	tranf_submit(oParam);
	
	lf_getDbDeptcd("0124|", "");
	
	var sProp="col=2,row=3,cellspacing=4,vcellspacing=0,itemWidth=-1,itemHeight=20,overflow='visible'";
	checkbox1.setInitComp(sProp, ds_chk_checkbox1,"value","label","fn_cmpEvent");
}

function fn_cmpEvent()
{
	var data = checkbox1.getData();
	data = String(data).replace(",","▦");
	
	ds_main_patinfo.setColumn(0, "verimthd", data);
}

function ipt_testpsn_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		fKeyEvent();
	}
}

function fKeyEvent()
{
	fUserNMRef();
	ipt_testpsn.setFocus();
}

function fUserNMRef()
{
	if(!utlf_isNull(ds_hidden_ref.getColumn(0, "userid")))
	{
		var oParam = {};
			oParam.id          = "TRLZZ00104";
			oParam.service     = "diagtestapplib.LisCommon";
			oParam.method      = "reqGetUserNM";
			oParam.inds        = "cond=ds_hidden_ref";
			oParam.outds       = "ds_main_getUsernm=usernm";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLZZ00104";

		tranf_submit(oParam);
	}
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_open("SPLVJ90100", "SPLVJ90100", "", "", "", "", "", "", "", "", "", "", "M");
}

function switch1_case1_cmb_SectCd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fviewtext();
}

function fviewtext()
{
	ds_hidden_cmtref.setColumn(0, "searcd", "");
	
	if(ds_hidden_cmtref.getColumn(0, "readkind") == 0)
	{
		input1.visible = false;
	}
	else
	{
		input1.visible = true;
	}			
}

function switch1_case1_input1_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		
		getFindSell();
	}
}

function getFindSell() 
{				
	var searchtext = switch1.case1.input1.value;
	
	var findrow1 = ds_init_readcmtlist.findRowAs("readcmttitl", searchtext);
	var findrow2 = ds_init_readcmtlist2.findRowAs("upreadcmtcnts", searchtext);
	
	if(findrow1 != -1)
	{
		ds_init_readcmtlist.rowposition = findrow1;
	}
	if(findrow2 != -1)
	{
		ds_init_readcmtlist2.rowposition = findrow2;
	}
}

function switch1_case1_readcmtlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fcmtmove();
}

function switch1_case1_readcmtlist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	fbtnview();
}

function fcmtmove(cmtcode) 
{
	if(cmtcode == 1) 
	{
		for(var i = 0; i < ds_init_readcmtlist.rowcount; i++)
		{
			if(ds_init_readcmtlist.getColumn(i, "chk") == "1")
			{
				if(!utlf_isNull(ds_main_patinfo.getColumn(0, "readcont")))
				{
					if(ds_main_patinfo.getColumn(0, "readcont").indexOf(ds_init_readcmtlist.getColumn(i, "readcmtcnts")) == -1)
					{
						ds_main_patinfo.setColumn(0, "readcont", ds_main_patinfo.getColumn(0, "readcont")+"\n"+ds_init_readcmtlist.getColumn(i, "readcmtcnts"));
					}
					else
					{
						alert(ds_init_readcmtlist.getColumn(i, "readcmttitl") + "는 선택되었습니다.");	
					}
				}
				else
				{
					ds_main_patinfo.setColumn(0, "readcont", ds_init_readcmtlist.getColumn(i, "readcmtcnts"));
				}
				ds_init_readcmtlist.setColumn(i, "chk", "0");
			}
		}				
	}
	else if(cmtcode == 2)
	{
		for(var i = 0; i < ds_init_readcmtlist.rowcount; i++)
		{
			if(ds_init_readcmtlist.getColumn(i, "chk") == "1")
			{
				if(!utlf_isNull(ds_main_patinfo.getColumn(0, "addreadcont")))
				{
					if(ds_main_patinfo.getColumn(0, "addreadcont").indexOf(ds_init_readcmtlist.getColumn(i, "readcmtcnts")) == -1)
					{
						ds_main_patinfo.setColumn(0, "addreadcont", ds_main_patinfo.getColumn(0, "addreadcont") + "\n" + ds_init_readcmtlist.getColumn(i, "readcmtcnts"));
					}
					else
					{
						alert(ds_init_readcmtlist.getColumn(i, "readcmttitl") + "는 선택되었습니다.");	
					}
				}		
				else
				{
					ds_main_patinfo.setColumn(0, "addreadcont", ds_init_readcmtlist.getColumn(i, "readcmtcnts"));
				}
				ds_init_readcmtlist.setColumn(i, "chk", "0");
			}
		}
	}
	else
	{
		if(!utlf_isNull(ds_main_patinfo.getColumn(0, "readcont")))
		{
			if(ds_main_patinfo.getColumn(0, "readcont").indexOf(ds_init_readcmtlist.getColumn(ds_init_readcmtlist.rowposition, "readcmtcnts")) == -1)
			{
				ds_main_patinfo.setColumn(0, "readcont", ds_main_patinfo.getColumn(0, "readcont") + "\n" + ds_init_readcmtlist.getColumn(ds_init_readcmtlist.rowposition, "readcmtcnts"));
			}
			else
			{
				alert(ds_init_readcmtlist.getColumn(ds_init_readcmtlist.rowposition, "readcmttitl") + "는 선택되었습니다.");	
			}
		}
		else
		{
			ds_main_patinfo.setColumn(0, "readcont", ds_init_readcmtlist.getColumn(ds_init_readcmtlist.rowposition, "readcmtcnts"));
		}
		ds_init_readcmtlist.setColumn(ds_init_readcmtlist.rowposition, "chk", "0");			
	}
	ds_init_readcmtlist.rowposition = -1;
	btn1.visible = false;
	btn2.visible = false;
}

function fbtnview() 
{ 
	btn1.visible = true;
	btn2.visible = true;
}

function switch1_case1_button12_onclick(obj:Button,  e:ClickEventInfo)
{
	fgetreadlsit();	
}

function fgetreadlsit() 
{
	ds_init_readcmtlist.clearData();
	ds_init_readcmtlist2.clearData();
	
	ds_send.setColumn(0, "readkind", ds_hidden_cmtref.getColumn(0, "readkind"));
	ds_send.setColumn(0, "search", ds_hidden_cmtref.getColumn(0, "search"));
	
	var oParam = {};
		oParam.id          = "TRLVF00101";
		oParam.service     = "verificationbasemngtapp.CmtCdMngt";
		oParam.method      = "reqGetColgCmtList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_init_readcmtlist=getColgCmtList ds_init_readcmtlist2=getColgCmtList2";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLVF00101";

	tranf_submit(oParam);
}

function switch1_case1_readcmtlist2_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	fbtnview();	
}

function switch1_case1_readcmtlist2_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fcmtmove2();
}

function fcmtmove2(cmtcode) 
{
	if(cmtcode == 1)
	{
		for(var i = 0; i < ds_init_readcmtlist2.rowcount; i++)
		{
			if(ds_init_readcmtlist2.getColumn(i, "chk") == "1")
			{
				if(!utlf_isNull(ds_main_patinfo.getColumn(0, "readcont")))
				{
					if(ds_main_patinfo.getColumn(0, "readcont").indexOf(ds_init_readcmtlist2.getColumn(i, "readcmtcnts")) == -1)
					{
						ds_main_patinfo.setColumn(0, "readcont", ds_main_patinfo.getColumn(0, "readcont") + "\n" + ds_init_readcmtlist2.getColumn(i, "readcmtcnts"));
					}
					else
					{
						alert(ds_init_readcmtlist2.getColumn(i, "readcmttitl") + "는 선택되었습니다.");	
					}
				}
				else
				{
					ds_main_patinfo.setColumn(0, "readcont", ds_init_readcmtlist2.getColumn(i, "readcmtcnts"));
				}
				ds_init_readcmtlist2.setColumn(i, "chk", "0");
			}
		}				
	}
	else if(cmtcode == 2)
	{
		for(var i = 0; i < ds_init_readcmtlist2.rowcount; i++)
		{
			if(ds_init_readcmtlist2.getColumn(i, "chk") == "1")
			{
				if(!utlf_isNull(ds_main_patinfo.getColumn(0, "addreadcont")))
				{
					if(ds_main_patinfo.getColumn(0, "addreadcont").indexOf(ds_init_readcmtlist2.getColumn(i, "readcmtcnts")) == -1)
					{
						ds_main_patinfo.setColumn(0, "addreadcont", ds_main_patinfo.getColumn(0, "addreadcont") + "\n" + ds_init_readcmtlist2.getColumn(i, "readcmtcnts"));
					}
					else
					{
						alert(ds_init_readcmtlist2.getColumn(i, "readcmttitl") + "는 선택되었습니다.");	
					}
				}		
				else
				{
					ds_main_patinfo.setColumn(0, "addreadcont", ds_init_readcmtlist2.getColumn(i, "readcmtcnts"));
				}
				ds_init_readcmtlist2.setColumn(i, "chk", "0");
			}
		}
	}
	else
	{
		if(!utlf_isNull(ds_main_patinfo.getColumn(0, "readcont")))
		{
			if(ds_main_patinfo.getColumn(0, "readcont").indexOf(ds_init_readcmtlist2.getColumn(ds_init_readcmtlist2.rowposition, "readcmtcnts")) == -1)
			{
				ds_main_patinfo.setColumn(0, "readcont", ds_main_patinfo.getColumn(0, "readcont") + "\n" + ds_init_readcmtlist2.getColumn(ds_init_readcmtlist2.rowposition, "readcmtcnts"));
			}
			else
			{
				alert(ds_init_readcmtlist2.getColumn(ds_init_readcmtlist2.rowposition, "readcmttitl") + "는 선택되었습니다.");
			}
		}
		else
		{
			ds_main_patinfo.setColumn(0, "readcont", ds_init_readcmtlist2.getColumn(ds_init_readcmtlist2.rowposition, "readcmtcnts"));
		}
		ds_init_readcmtlist2.setColumn(ds_init_readcmtlist2.rowposition, "chk", "0");				
	}
	ds_init_readcmtlist2.rowposition = -1;
	btn1.visible = false;
	btn2.visible = false;
}

function btn1_onclick(obj:Button,  e:ClickEventInfo)
{
	fcmtmove(1);	
	fcmtmove2(1);	
}

function btn2_onclick(obj:Button,  e:ClickEventInfo)
{
	fcmtmove(2);	
	fcmtmove2(2);		
}

function btn_print_onclick(obj:Button,  e:ClickEventInfo)
{
	fviewreport2();
}

function button6_onclick(obj:Button,  e:ClickEventInfo)
{
	fviewreport();
}

function cancelbtn_onclick(obj:Button,  e:ClickEventInfo)
{
	 fcalcelbcno();
	 //fmakeString(4);
}

function btn_LstRept_onclick(obj:Button,  e:ClickEventInfo)
{
	 fmakeString(1);
}

function setbtn_onclick(obj:Button,  e:ClickEventInfo)
{
	fmakeString(3);
}

function spclrslt_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	ds_main_spclrslt.clearSelect();
	ds_main_spclrslt.selectRow(e.row);
	ds_main_spclrslt.rowposition = e.row;
	
	fpopupmenu();
	pmn_menu1.trackPopup(e.screenX,e.screenY);
}

function fpopupmenu() 
{			
	ds_hidden_popupmenu.clearData();
	ds_hidden_popupmenu.addRow();
	
	ds_hidden_popupmenu.setColumn(0, "label", "▶ 삭제");
	ds_hidden_popupmenu.setColumn(0, "func", "fbfrslt");
}

function fpopupmenu2() 
{				
	ds_hidden_popupmenu.clearData();
	ds_hidden_popupmenu.addRow();
	
	ds_hidden_popupmenu.setColumn(0, "label", "▶ 삭제");
	ds_hidden_popupmenu.setColumn(0, "func", "fbfrslt2");
}

function fbfrslt()
{
	ds_main_spclrslt.deleteRow(ds_main_spclrslt.rowposition);
}

function fbfrslt2()
{
	ds_main_spclrslt2.deleteRow(ds_main_spclrslt2.rowposition);
}

function pmn_menu1_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{
	eval(e.id +"();");
}

function spclrslt2_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{	
	ds_main_spclrslt2.clearSelect();
	ds_main_spclrslt2.selectRow(e.row);
	ds_main_spclrslt2.rowposition = e.row;
	
	fpopupmenu2();
	pmn_menu1.trackPopup(e.screenX,e.screenY);
}

function switch1_case2_alltestlist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	ds_main_rslt_rsltlist_row.clearSelect();
	ds_main_rslt_rsltlist_row.selectRow(e.row);
	ds_main_rslt_rsltlist_row.rowposition = e.row;
	
	fpopupmenu3(e.row, e.col);
	pmn_menu1.trackPopup(e.screenX,e.screenY);
}

function fpopupmenu3(row, col)
{				
	ds_hidden_popupmenu.clearData();
	ds_hidden_popupmenu.addRow();

	var cols = switch1.case2.alltestlist.getCellCount("Head") - 4;

	if(col > 2 && col < cols)
	{
		if(!utlf_isNull(ds_main_rslt_rsltlist_row.getColumn(row, col)))
		{
			ds_hidden_popupmenu.setColumn(0, "label", "▶ 추가");
			ds_hidden_popupmenu.setColumn(0, "func", "fbfrslt3");
		}
		else
		{
			if(ds_main_rslt_rsltlist_row.getColumn(row, "prcpcd") == "LHR105")
			{
				ds_hidden_popupmenu.setColumn(0, "label", "▶ XE2100결과");
				ds_hidden_popupmenu.setColumn(0, "func", "fbfrslt4");
			}
		}
	}
}

function fbfrslt3()
{
	if(ds_main_spclrslt.rowcount < 10)
	{
		var Row = ds_main_spclrslt.addRow();
		
		ds_main_spclrslt.setColumn(Row, "check", "1");
		ds_main_spclrslt.setColumn(Row, "prcpnm", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, "tclsnm"));
		ds_main_spclrslt.setColumn(Row, "reptrslt", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, switch1.case2.alltestlist.currentcol));
		ds_main_spclrslt.setColumn(Row, "spcscrnnm", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, "spcnm"));
		ds_main_spclrslt.setColumn(Row, "prcpcd", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, "prcpcd"));
		ds_main_spclrslt.setColumn(Row, "spccd", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, "spccd"));
		ds_main_spclrslt.setColumn(Row, "lastreptdt", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, switch1.case2.alltestlist.currentcol+1));
		ds_main_spclrslt.setColumn(Row, "ref", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, "ref"));
		ds_main_spclrslt.setColumn(Row, "rsltunit", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, "rsltunit"));
	}
	else
	{
		var Row = ds_main_spclrslt2.addRow();
		
		ds_main_spclrslt2.setColumn(Row, "check", "1");
		ds_main_spclrslt2.setColumn(Row, "prcpnm", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, "tclsnm"));
		ds_main_spclrslt2.setColumn(Row, "reptrslt", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, switch1.case2.alltestlist.currentcol));
		ds_main_spclrslt2.setColumn(Row, "spcscrnnm", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, "spcnm"));
		ds_main_spclrslt2.setColumn(Row, "prcpcd", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, "prcpcd"));
		ds_main_spclrslt2.setColumn(Row, "spccd", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, "spccd"));
		ds_main_spclrslt2.setColumn(Row, "lastreptdt", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, switch1.case2.alltestlist.currentcol+1));
		ds_main_spclrslt2.setColumn(Row, "ref", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, "ref"));
		ds_main_spclrslt2.setColumn(Row, "rsltunit", ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, "rsltunit"));
	}		
}

function fbfrslt4()
{
	dsf_createDsRow("ds_hidden", [{col:"bcno", type:"STRING", size:256 , val : ds_main_rslt_rsltlist_row.getColumn(ds_main_rslt_rsltlist_row.rowposition, switch1.case2.alltestlist.currentcol+2)}]);

	var objArg = new Object();
		objArg.arg_ds_send = ds_hidden;
		
	frmf_modal("SPLLR91500", "SPLLR91500", objArg, "", "", "", "", "", "", "", "", "", "M");			
}

function fgetreadrsltlist(flag)
{
	frmf_setParameter("condparam", "S" + "▦" + ds_main_patinfo.getColumn(0, "prcpdd")+ "▦" 
							+ ds_main_patinfo.getColumn(0, "execprcpuniqno")+ "▦" 
							+ ds_main_patinfo.getColumn(0, "instcd"));

	if(flag == 1)
	{
		btn_LstRept.visible = true;						
		setbtn.visible = false;
		cancelbtn.visible = false;
		
		ds_send.setColumn(0, "getgbn", "1");
	}
	else
	{
		btn_LstRept.visible = false;
		setbtn.visible = true;	
		cancelbtn.visible = true;
		ds_send.setColumn(0, "getgbn", "2");
	}
	if(ds_main_rsltrow_rsltlist_header.rowcount > 0)
	{
		switch1.case2.alltestlist.setFormatColProperty(2, "band", "body");
		switch1.case2.alltestlist.setFormatColProperty(1, "band", "body");
		switch1.case2.alltestlist.setFormatColProperty(0, "band", "body");
	}

	for(var i = switch1.case2.alltestlist.getCellCount("Head"); i > 0; i--)
	{
		//alert("i = " + i);
		switch1.case2.alltestlist.deleteContentsCol(i);
	}

	ds_main_rslt_rsltlist_row.clear();
	ds_main_rsltrow_rsltlist_header.clear();
	ds_main_spclrslt.clearData();
	ds_main_spclrslt2.clearData();
	
	ds_send.setColumn(0, "pid", ds_hidden_ref.getColumn(0, "pid"));
	ds_send.setColumn(0, "orddd", ds_hidden_ref.getColumn(0, "orddd"));
	
	if(flag == 1) 
	{
		var oParam = {};
			oParam.id          = "TXLVJ0302";
			oParam.service     = "verificationbasemngtapp.CmtCdMngt";
			oParam.method      = "reqInsTempRead";
			oParam.inds        = "cond=ds_send";
			oParam.async       = false;
			oParam.error	   = false;
			//oParam.callback    = "cf_TXLVJ0302";

		tranf_submit(oParam);
	}
	
	switch1.tabindex = 1;
	
	var oParam = {};
		oParam.id          = "TRLVJ90101";
		oParam.service     = "verificationbasemngtapp.CmtCdMngt";
		oParam.method      = "reqGetColgReadList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_main_patinfo=getColgReadList ds_main_spclrslt=getColgReadList2 ds_main_spclrslt2=getColgReadList3 ds_main_testlist=getColgReadList4 ds_main_rslt_rsltlist_row=row ds_main_rsltrow_rsltlist_header=header";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLVJ90101";

	tranf_submit(oParam);
	
	dsf_setFixVal(ds_main_spclrslt, "check:1");
	dsf_setFixVal(ds_main_spclrslt2, "check:1");

	ftestlist();
	fwritemthd();
	fSetAllTestList();
}

function ftestlist() 
{
	var teststring = "";
	
	for(var i = 0; i < ds_main_testlist.rowcount; i++)
	{
		if(i == 0)
		{
			teststring = ds_main_testlist.getColumn(i, "testlrgnm");
		}
		
		if(i > 1 && teststring.indexOf(ds_main_testlist.getColumn(i, "testlrgnm")) == -1)
		{
			teststring = teststring + ",  "+ ds_main_testlist.getColumn(i, "testlrgnm");
		}					
	}
	
	if(0 < teststring.length)
	{
		ds_main_patinfo.setColumn(0, "testlist", teststring);
	}
	else
	{
		alert("검사항목이 없습니다.");
		return;
	}
}

function fwritemthd() 
{
	if(!utlf_isNull(ds_main_patinfo.getColumn(0, "verimthd")))
	{
		var code = ds_main_patinfo.getColumn(0, "verimthd");
		var newcode = "";
		
		for(var i = 0; i < 6; i++)
		{
			if(code.charAt(i)=='Y')
			{
				newcode = newcode + ""+(i+1)+"▦";
			}					
		}
		
		ds_main_patinfo.setColumn(0, "verimthd", newcode);
		checkbox1.setData(newcode.split("▦"));
	}	
}

function fSetAllTestList()
{
	switch1.case2.alltestlist.binddataset = "ds_main_rslt_rsltlist_row"
 	var gridCaption = ds_main_rsltrow_rsltlist_header.getColumn(0, "caption");
	
	if(utlf_isNull(gridCaption))
	{
		return;
	}
	
	var gridColRef = ds_main_rsltrow_rsltlist_header.getColumn(0, "colref");
 	var gridColRefArray = gridColRef.split("^");	
	//trace("gridColRefArray = " + gridColRefArray)
	
	var gridColType = ds_main_rsltrow_rsltlist_header.getColumn(0, "type");
	var gridColTypeArray = gridColType.split("^");
	//trace("gridColTypeArray = " + gridColRefArray)
	
	var gridColCaption = ds_main_rsltrow_rsltlist_header.getColumn(0, "caption");
	var gridColCaptionArray = gridColCaption.split("^");
	//trace("gridColCaptionArray = " + gridColRefArray)
	
	
	
	for(var i = 0; i < gridColCaptionArray.length; i++)
	{
		var col = switch1.case2.alltestlist.appendContentsCol();
		switch1.case2.alltestlist.setCellProperty("Head", col, "text", gridColCaptionArray[i]);
		switch1.case2.alltestlist.setCellProperty("Body", col, "text", "bind:"+gridColRefArray[i]);
	}
	
	switch1.case2.alltestlist.setFormatColProperty(1, "size", 140);
	switch1.case2.alltestlist.setFormatColProperty(2, "size", 70);

	for(var i = 3; i < switch1.case2.alltestlist.getCellCount("Head")-4; i++ ) 
	{
		if(i == switch1.case2.alltestlist.getCellCount("Head") - 1)
		{
			switch1.case2.alltestlist.setFormatColProperty(i, "size", 0);
		}
		else
		{
			if(i%3 != 0)
			{
				switch1.case2.alltestlist.setFormatColProperty(i, "size", 0);
			}
			else
			{
				switch1.case2.alltestlist.setFormatColProperty(i, "size", 60);
			}
		}
	}
	switch1.case2.alltestlist.setFormatColProperty(switch1.case2.alltestlist.getCellCount("Head")-4, "size", 100);	
	switch1.case2.alltestlist.setFormatColProperty(switch1.case2.alltestlist.getCellCount("Head")-3, "size", 0);
	switch1.case2.alltestlist.setFormatColProperty(switch1.case2.alltestlist.getCellCount("Head")-2, "size", 0);
	switch1.case2.alltestlist.setFormatColProperty(switch1.case2.alltestlist.getCellCount("Head")-1, "size", 100);
	
	switch1.case2.alltestlist.setFormatColProperty(1, "band", "left");
	switch1.case2.alltestlist.setFormatColProperty(2, "band", "left");
	switch1.case2.alltestlist.setCellProperty("Body", 1, "align", "left middle");
}

function fchkvalue() 
{
	var code = String(ds_main_patinfo.getColumn(0, "verimthd"));
	
	if(code.indexOf('1')!=-1)
	{
		ds_send.setColumn(0, "chk1", "●");
	}
	else
	{
		ds_send.setColumn(0, "chk1", "○");
	}
	
	if(code.indexOf('2')!=-1)
	{
		ds_send.setColumn(0, "chk2", "●");
	}
	else
	{
		ds_send.setColumn(0, "chk2", "○");
	}
	if(code.indexOf('3')!=-1)
	{
		ds_send.setColumn(0, "chk3", "●");
	}
	else
	{
		ds_send.setColumn(0, "chk3", "○");
	}
	if(code.indexOf('4')!=-1)
	{				
		ds_send.setColumn(0, "chk4", "●");
	}
	else
	{
		ds_send.setColumn(0, "chk4", "○");
	}
	if(code.indexOf('5')!=-1)
	{
		ds_send.setColumn(0, "chk5", "●");
	}
	else
	{
		ds_send.setColumn(0, "chk5", "○");
	}
	if(code.indexOf('6')!=-1)
	{
		ds_send.setColumn(0, "chk6", "●");
	}
	else
	{
		ds_send.setColumn(0, "chk6", "○");	
	}										
}			

function fviewreport2() 
{	
	fchkvalue();

	for(var i = 0 ; i < ds_main_spclrslt2.rowcount; i++)
	{
		var a = ds_main_spclrslt.addRow();
		
		dsf_makeValue(ds_main_spclrslt, "check", "string", "", a);
		dsf_makeValue(ds_main_spclrslt, "prcpnm", "string", "", a);
		dsf_makeValue(ds_main_spclrslt, "reptrslt", "string", "", a);
		dsf_makeValue(ds_main_spclrslt, "spcscrnnm", "string", "", a);
		dsf_makeValue(ds_main_spclrslt, "prcpcd", "string", "", a);
		dsf_makeValue(ds_main_spclrslt, "spccd", "string", "", a);
		
		ds_main_spclrslt.copyRow(a, ds_main_spclrslt2, i);
	}	
	
	if (ds_main_patinfo.getColumn(0, "instcd") == "032" ) 
	{
		dsf_makeValue(ds_main_patinfo, "hospengnm", "string", "Department of Laboratory Medicine" + "\n" + "Kyungpook National University Hospital Daegu, Korea", 0);
		dsf_makeValue(ds_main_patinfo, "hospnm", "string", ds_init_lb0124.getColumn(0, "etc02")+ " " + ds_init_lb0124.getColumn(0, "nm") + " 진단검사의학과", 0);
	} 
	else 
	{
		dsf_makeValue(ds_main_patinfo, "hospengnm", "string", "Department of Laboratory Medicine"+ "\n" + "Kyungpook National University Hospital Daegu, Korea", 0);
		dsf_makeValue(ds_main_patinfo, "hospnm", "string", ds_init_lb0124.getColumn(0, "etc02")+ " " + ds_init_lb0124.getColumn(0, "nm") + " 진단검사의학과" + " " + "053) 420-5278", 0);
	}
	
	if(ds_main_spclrslt.rowcount > 0)
	{
		var objDOM = rptf_createDOM();
			rptf_setNodeListToDOM(objDOM, "/root/main/spclrslt", ds_main_spclrslt);
			rptf_setNodeListToDOM(objDOM, "/root/main/patinfo", ds_main_patinfo);
			rptf_setNodeListToDOM(objDOM, "/root/send", ds_send);
		var objParam = new Object();
			objParam.xml_data_XML1 = objDOM.documentElement.source;          // 최상의노드 XML 스트링 추출
		var option = ""; 
			rptf_exeReportPreview30(["RPLVJ90301"],[objParam], option);
		
		ds_send.setColumn(0, "bcno", ds_main_patinfo.getColumn(0, "bcno"));
		
		var oParam = {};
			oParam.id          = "TXLVJ90304";
			oParam.service     = "verificationbasemngtapp.CmtCdMngt";
			oParam.method      = "reqprtudate";
			oParam.inds        = "cond=ds_send";
			oParam.async       = false;
			//oParam.callback    = "cf_TXLVJ90304";

		tranf_submit(oParam);
	}
	else
	{
		var objDOM = rptf_createDOM();
			rptf_setNodeListToDOM(objDOM, "/root/properties/report/mainreport/params", ds_send);
			rptf_setNodeListToDOM(objDOM, "/root/main/patinfo", ds_main_patinfo);
		var objParam = new Object();
			objParam.xml_data_XML1 = objDOM.documentElement.source;          // 최상의노드 XML 스트링 추출
		var option = ""; 
			rptf_exeReportPreview30(["RPLVJ90302"],[objParam], option);
			
		ds_send.setColumn(0, "bcno", ds_main_patinfo.getColumn(0, "bcno"));
		
		var oParam = {};
			oParam.id          = "TXLVJ90304";
			oParam.service     = "verificationbasemngtapp.CmtCdMngt";
			oParam.method      = "reqprtudate";
			oParam.inds        = "cond=ds_send";
			oParam.async       = false;
			//oParam.callback    = "cf_TXLVJ90304";

		tranf_submit(oParam);
	}
}	

function fviewreport() 
{
	fchkvalue();

	for(var i = 0; i < ds_main_spclrslt2.rowcount; i++)
	{
		var a = ds_main_spclrslt.addRow();
		
		dsf_makeValue(ds_main_spclrslt, "check", "string", "", a);
		dsf_makeValue(ds_main_spclrslt, "prcpnm", "string", "", a);
		dsf_makeValue(ds_main_spclrslt, "reptrslt", "string", "", a);
		dsf_makeValue(ds_main_spclrslt, "spcscrnnm", "string", "", a);
		dsf_makeValue(ds_main_spclrslt, "prcpcd", "string", "", a);
		dsf_makeValue(ds_main_spclrslt, "spccd", "string", "", a);
		
		ds_main_spclrslt.copyRow(a, ds_main_spclrslt2, i);
	}
	
	if (ds_main_patinfo.getColumn(0, "instcd") == "032" ) 
	{
		dsf_makeValue(ds_main_patinfo, "hospengnm", "string", "Department of Laboratory Medicine" + "\n" + "Kyungpook National University Hospital Daegu, Korea", 0);
		dsf_makeValue(ds_main_patinfo, "hospnm", "string", ds_init_lb0124.getColumn(0, "etc02")+ " " + ds_init_lb0124.getColumn(0, "nm") + " 진단검사의학과", 0);
	} 
	else 
	{
		dsf_makeValue(ds_main_patinfo, "hospengnm", "string", "Department of Laboratory Medicine"+ "\n" + "Kyungpook National University Hospital Daegu, Korea", 0);
		dsf_makeValue(ds_main_patinfo, "hospnm", "string", ds_init_lb0124.getColumn(0, "etc02")+ " " + ds_init_lb0124.getColumn(0, "nm") + " 진단검사의학과" + " " + "053) 420-5278", 0);
	}
	
	if(ds_main_spclrslt.rowcount > 1)
	{
		var objDOM = rptf_createDOM();
			rptf_setNodeListToDOM(objDOM, "/root/main/spclrslt", ds_main_spclrslt);
			rptf_setNodeListToDOM(objDOM, "/root/main/patinfo", ds_main_patinfo);
			rptf_setNodeListToDOM(objDOM, "/root/send", ds_send);
		var objParam = new Object();
			objParam.xml_data_XML1 = objDOM.documentElement.source;          // 최상의노드 XML 스트링 추출
		var option = ""; 
			rptf_exeReportPreview30(["RPLVJ90301"],[objParam], option);
	}
	else
	{
		var objDOM = rptf_createDOM();
			rptf_setNodeListToDOM(objDOM, "/root/properties/report/mainreport/params", ds_send);
			rptf_setNodeListToDOM(objDOM, "/root/main/patinfo", ds_main_patinfo);
		var objParam = new Object();
			objParam.xml_data_XML1 = objDOM.documentElement.source;          // 최상의노드 XML 스트링 추출
		var option = ""; 
			rptf_exeReportPreview30(["RPLVJ90302"],[objParam], option);
	}
}	

function fcalcelbcno()
{
	ds_hidden_cancelbcno.setColumn(0, "bcno", ds_main_patinfo.getColumn(0, "bcno"));
	ds_hidden_cancelbcno.setColumn(0, "cancelgbn", "04");
	ds_hidden_cancelbcno.setColumn(0, "resncd", "04000");
	ds_hidden_cancelbcno.setColumn(0, "resndesc", "검체 Clot 됨");
	ds_hidden_cancelbcno.setColumn(0, "resncdkind", "04");
	ds_hidden_cancelbcno.setColumn(0, "pid", ds_main_patinfo.getColumn(0, "pid"));
	ds_hidden_cancelbcno.setColumn(0, "spcstat", "4");
	
	ds_hidden_cancelgrd.setColumn(0, "chk", "true");
	ds_hidden_cancelgrd.setColumn(0, "bcno", ds_main_patinfo.getColumn(0, "bcno"));
	ds_hidden_cancelgrd.setColumn(0, "spccd", "700");
	ds_hidden_cancelgrd.setColumn(0, "tclscd", "LAA100");
	ds_hidden_cancelgrd.setColumn(0, "testcd", "LAA100");
	ds_hidden_cancelgrd.setColumn(0, "orddeptnm", "2110000000");
	ds_hidden_cancelgrd.setColumn(0, "prcpgenrflag", "I");
	ds_hidden_cancelgrd.setColumn(0, "sectcd", "L");
	ds_hidden_cancelgrd.setColumn(0, "tsectcd", "L1");
	ds_hidden_cancelgrd.setColumn(0, "execprcpuniqno", ds_main_patinfo.getColumn(0, "execprcpuniqno"));
		
	var oParam = {};
		oParam.id          = "TXLLJ00301";
		oParam.service     = "acptmngtapp.AcptMngt";
		oParam.method      = "reqExeSpcCancel";
		oParam.inds        = "grdinfo=ds_hidden_cancelgrd:U cancelinfo=ds_hidden_cancelbcno";
		oParam.async       = false;
		//oParam.callback    = "cf_TXLLJ00301";

	tranf_submit(oParam);
	
	fmakeString(4);
}

function fmakeString(rsltstat)
{
	var list = "\n";
	list = list + "등록번호 : " + utlf_transNullToEmpty(ds_main_patinfo.getColumn(0, "pid")) + "\n";
	list = list + "환자명 : " + utlf_transNullToEmpty(ds_main_patinfo.getColumn(0, "patnm")) + "\n";
	list = list + "성별/나이 : " + utlf_transNullToEmpty(ds_main_patinfo.getColumn(0, "sexage")) + "\n";
	list = list + "진료병동 : " + utlf_transNullToEmpty(ds_main_patinfo.getColumn(0, "orddeptnm")) + "\n";
	list = list + "병실 : " + utlf_transNullToEmpty(ds_main_patinfo.getColumn(0, "roomcd")) + "\n\n"
	+ "----------------------------------------------------------------------------------------\n\n";
	list = list + "비정상 결과 혹은 유의한 결과 항목\n\n"
	+ "검사항목                                            결과치                        검체명\n";

	for(var i = 0; i < ds_main_spclrslt.rowcount; i++)
	{	
		list = list + ds_main_spclrslt.getColumn(i, "prcpnm").getRightPad(50," ") + "      "
		+ ds_main_spclrslt.getColumn(i, "reptrslt").getRightPad(20," ") +  "      "
		+ ds_main_spclrslt.getColumn(i, "spcscrnnm").getRightPad(50," ") + "\n";
	}
	
	for(var i = 0; i < ds_main_spclrslt2.rowcount; i++)
	{		
		list = list + ds_main_spclrslt2.getColumn(i, "prcpnm").getRightPad(50," ") + "      "
		+ ds_main_spclrslt2.getColumn(i, "reptrslt").getRightPad(20," ") +  "      "
		+ ds_main_spclrslt2.getColumn(i, "spcscrnnm").getRightPad(50," ") + "\n";
	}				
	
	list = list + "----------------------------------------------------------------------------------------\n\n" +"검증방법\n\n";	
	var code = checkbox1.getLableData();
	var newcode = "";
	
	for(var i = 0; i < code.length;i++)
	{
		if(String(code).charAt(i)=="▦")
		{
			newcode = newcode + "\n";
		}
		else
		{
			newcode = newcode + String(code).charAt(i);
		}
	}
	list = list + newcode;
	if(String(code).indexOf("Others") != -1)
	{
		list = list + " " +input4.text;
	}
	
	list = list + "\n\n----------------------------------------------------------------------------------------\n\n" +
	"검증 / 판독소견 / 추천\n\n" + readcmtcnts.text + "\n\n";	
	list = list + "----------------------------------------------------------------------------------------\n\n" +
	"추가보고\n\n" + textarea2.text + "\n\n";
	
	ds_send.setColumn(0, "cmtlist", list);
	
	freadmthd();
	readcont = ds_main_patinfo.getColumn(0, "readcont");
	addreadcont = ds_main_patinfo.getColumn(0, "addreadcont");
	
	ds_send.setColumn(0, "addreadcont", addreadcont);
	ds_send.setColumn(0, "readcont", readcont);
	ds_send.setColumn(0, "bcno", ds_main_patinfo.getColumn(0, "bcno"));
	ds_send.setColumn(0, "rsltstat", rsltstat);
	ds_send_data1.copyData(ds_main_spclrslt);
	ds_send_data2.copyData(ds_main_spclrslt2);
	
	ds_main_patinfo.clearData();
	ds_main_spclrslt.clearData();
	ds_main_spclrslt2.clearData();
	ds_main_testlist.clearData();
	ds_main_rsltrow_rsltlist_header.clearData();
	ds_main_rsltrow_rsltlist_row.clearData();
	
	var oParam = {};
		oParam.id          = "TXLVJ90301";
		oParam.service     = "verificationbasemngtapp.CmtCdMngt";
		oParam.method      = "reqReadAddPrcp";
		oParam.inds        = "cond=ds_send data1=ds_send_data1 data2=ds_send_data2";
		oParam.outds       = "ds_spclist=ms";
		oParam.transaction = false;
		oParam.async       = false;
		oParam.error	   = false;
		//oParam.callback    = "cf_TXLVJ90301";

	tranf_submit(oParam);
	
	if(!utlf_isNull(ds_spclist.getColumn(0, "Msg")))
	{
		alert("이미 검증한 환자입니다.");
		return;
	}
	
 	fgetreadrsltlist();

// 	ds_main_spclrslt.copyData(ds_send_data1);
// 	ds_main_spclrslt2.copyData(ds_send_data2);
// 	ds_main_patinfo.setColumn(0, "readcont", ds_send.getColumn(0, "readcont"));
// 	ds_main_patinfo.setColumn(0, "addreadcont", ds_send.getColumn(0, "addreadcont"));
		
	if(rsltstat == 1)
	{
		if (Sign.signprocess())
		{
			ds_send.setColumn(0, "execprcpuniqno", ds_main_patinfo.getColumn(0, "execprcpuniqno"));
			ds_send.setColumn(0, "rsltstat", 10);
			ds_send.setColumn(0, "signbfcnts", Sign.signedInfos[1]);
			ds_send.setColumn(0, "signafcnts", Sign.signedInfos[2]);
			
			var oParam = {};
				oParam.id          = "TXLVJ90301";
				oParam.service     = "verificationbasemngtapp.CmtCdMngt";
				oParam.method      = "reqReadAddPrcp";
				oParam.inds        = "cond=ds_send data1=ds_send_data1 data2=ds_send_data2";
				oParam.outds       = "ds_spclist=ms";
				oParam.transaction = false;
				oParam.async       = false;
				//oParam.callback    = "cf_TXLVJ90301";

			tranf_submit(oParam);
		}
		else 
		{
			return false;
		}
	}
  	frmf_open("SPLVJ90100", "SPLVJ90100", "", "", "", "", "", "", "", "", "", "", "M");
}

function fMake_SignData()
{   
    var arrSignPath = new Array();	
	var arrSignDs = new Array();
    
    arrSignPath[0] = "/certdata/patinfo";
 	arrSignPath[1] = "/certdata/testlist";
 	arrSignPath[2] = "/certdata/spclrslt";
 	arrSignPath[3] = "/certdata/spclrslt2";
	arrSignPath[4] = "/certdata/rlst/rlstlist/row";
 	arrSignPath[5] = "/certdata/rsltrow/rsltlist/header";
 	
 	arrSignDs[0] = ds_main_patinfo.saveXML();
 	arrSignDs[1] = ds_main_testlist.saveXML(); 
 	arrSignDs[2] = ds_main_spclrslt.saveXML();
 	arrSignDs[3] = ds_main_spclrslt2.saveXML();
 	arrSignDs[4] = ds_main_rslt_rsltlist_row.saveXML();
 	arrSignDs[5] = ds_main_rsltrow_rsltlist_header.saveXML();
	
	Sign.addnodeset(arrSignPath, arrSignDs, true);
}


function freadmthd() 
{
	var code = String(ds_main_patinfo.getColumn(0, "verimthd"));
	var newcode = "";
	
	for(var i = 1; i < 7; i++)
	{
		if(code.indexOf(""+i+"")!=-1)
		{
			newcode = newcode + 'Y';
		}
		else
		{
			newcode = newcode + 'N';
		}
	}
	
	ds_send.setColumn(0, "rptchk", newcode);
	ds_send.setColumn(0, "rptother", ds_main_patinfo.getColumn(0, "verimthdother"));
}

function btn_cle_onclick(obj:Button,  e:ClickEventInfo)
{
	
}

function spclrslt_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	if(e.col == 0)
	{
		if(ds_main_spclrslt.getColumn(ds_main_spclrslt.rowposition, "check") == "1")
		{
			ds_main_spclrslt.setColumn(ds_main_spclrslt.rowposition, "check", "0");
		}
		else
		{
			ds_main_spclrslt.setColumn(ds_main_spclrslt.rowposition, "check", "1");
		}
	}
}

function spclrslt2_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	if(e.col == 0)
	{
		if(ds_main_spclrslt2.getColumn(ds_main_spclrslt2.rowposition, "check") == "1")
		{
			ds_main_spclrslt2.setColumn(ds_main_spclrslt2.rowposition, "check", "0");
		}
		else
		{
			ds_main_spclrslt2.setColumn(ds_main_spclrslt2.rowposition, "check", "1");
		}
	}
}]]></Script>
  </Form>
</FDL>