YNU_JEUS/app_home/himed/xpapps/lis/refprintmngtxp/xp/SMLRP00700_특수검사의뢰서조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLRP00700" position="absolute 0 0 1260 814" titletext="특수검사의뢰서조회" onload="SMLRP00700_onload">
    <Layouts>
      <Layout>
        <Button id="btn_wlprint" taborder="14" text="W/L 출력" class="btn6" position="absolute 1276 23 1371 43" anchor="top right" onclick="btn_wlprint_onclick" visible="false"/>
        <Shape id="line1" class="line_1" position="absolute 1 144 1195 144"/>
        <Static id="caption1" text="특수검사의뢰 리스트" class="tit_2" position="absolute 1 100 161 120"/>
        <Tab id="tab_sw" taborder="1" tabindex="0" class="sw_box" position="absolute 1 27 1257 99" anchor="left top right" onchanged="tab_sw_onchanged">
          <Tabpages>
            <Tabpage id="pag_spcltestno" text="특수검사번호별" position="absolute 0 0 0 0">
              <Layouts>
                <Layout>
                  <Shape id="line3" linetype="vertical" class="line_4" position="absolute 1102 11 1102 33" anchor="default"/>
                  <Button id="btn_init" taborder="7" text="초기화" onlbuttonup="btn_init_onlbuttonup" class="btn4" position="absolute 1176 5 1245 25" anchor="top right"/>
                  <Div id="grp_sea" anchor="left top right" taborder="8" style="align:center top;" position="absolute 0 0 1256 42" class="div_SA2">
                    <Layouts>
                      <Layout width="1256" height="42">
                        <MaskEdit id="acptsdd" taborder="0" type="string" mask="##:##" position="absolute 169 9 211 29"/>
                        <MaskEdit id="acptedd" taborder="1" type="string" mask="##:##" position="absolute 315 9 357 29"/>
                      </Layout>
                    </Layouts>
                  </Div>
                  <Button id="btn_seqrch" taborder="9" text="조회" onclick="tab_sw_pag_spcltestno_btn_seqrch_onclick" class="btn1" position="absolute 1189 10 1245 30" anchor="top right"/>
                  <Edit id="edt_seqeno" taborder="10" class="input_search" position="absolute 777 10 862 30" inputtype="number" maxlength="5"/>
                  <Static id="caption11" text="~" position="absolute 761 11 777 31" style="align:center middle;"/>
                  <Edit id="edt_seqsno" taborder="11" canchange="tab_sw_tab_spcltestno_edt_seqsno_canchange" class="input_search" position="absolute 676 10 761 30" inputtype="number" maxlength="5"/>
                  <Static id="caption9" text="일련번호" class="search_name" position="absolute 602 10 676 30"/>
                  <Combo id="cmb_spcltestgrup" taborder="12" innerdataset="@ds_init_lb0005" codecolumn="cd" datacolumn="nm" class="combo_s_essential" position="absolute 468 10 578 30" onitemchanged="tab_sw_pag_spcltestno_cmb_spcltestgrup_onitemchanged"/>
                  <Static id="caption8" text="의뢰서서식" class="search_name" position="absolute 381 10 468 30"/>
                  <Calendar id="cal_acptedd" taborder="13" class="input_search" position="absolute 228 10 313 30" dateformat="yyyy-MM-dd" value="null" editformat="yyyy-MM-dd" onkeyup="tab_sw_pag_spcltestno_cal_acptedd_onkeyup" autoselect="true"/>
                  <Static id="caption10" text="~" position="absolute 213 10 229 30" style="align:center middle;"/>
                  <Calendar id="cal_acptsdd" taborder="14" canchange="tab_sw_tab_spcltestno_cal_acptsdd_canchange" class="input_search" position="absolute 82 10 167 30" dateformat="yyyy-MM-dd" value="null" editformat="yyyy-MM-dd" autoselect="true"/>
                  <Static id="caption5" text="접수일자" class="search_name" position="absolute 8 10 82 30"/>
                </Layout>
              </Layouts>
            </Tabpage>
            <Tabpage id="pag_testitem" text="검사항목별">
              <Layouts>
                <Layout>
                  <Shape id="line4" linetype="vertical" class="line_4" position="absolute 1102 11 1102 33"/>
                  <Div id="grp_sea" anchor="left top right" taborder="1" style="align:center top;" position="absolute 0 0 1256 42" class="div_SA2">
                    <Layouts>
                      <Layout/>
                    </Layouts>
                  </Div>
                  <Static id="caption13" text="작업일자 :" class="search_name" position="absolute 8 10 79 30"/>
                  <Calendar id="cal_worksdd" taborder="2" canchange="tab_sw_testitem_cal_worksdd_canchange" class="input_essential" position="absolute 82 10 191 30"/>
                  <Static id="caption12" text="~" class="search_no_b" position="absolute 243 10 258 30"/>
                  <Calendar id="cal_workedd" taborder="3" class="input_essential" position="absolute 254 10 363 30"/>
                  <Static id="caption14" text="검사항목 :" class="search_name" position="absolute 422 10 496 30"/>
                  <Combo id="cmb_testitem" taborder="4" innerdataset="@ds_init_lb0103" codecolumn="cd" datacolumn="nm" onitemchanged="tab_sw_pag_testitem_cmb_testitem_onitemchanged" position="absolute 496 10 632 30"/>
                  <Edit id="edt_tclscdlist" taborder="5" class="input_essential" position="absolute 635 10 1031 30" enable="false"/>
                  <Button id="btn_search" taborder="6" onclick="tab_sw_pag_testitem_btn_search_onclick" class="icon_search" position="absolute 1033 10 1053 30"/>
                  <Button id="button1" taborder="7" text="조회" class="btn1" position="absolute 1109 10 1165 30" anchor="top right" onclick="tab_sw_pag_spcltestno_btn_seqrch_onclick"/>
                  <Button id="btn_init" taborder="8" text="초기화" onclick="tab_sw_pag_testitem_btn_init_onclick" class="btn4" position="absolute 1176 10 1245 30" anchor="top right"/>
                  <MaskEdit id="worksdd" taborder="9" type="string" mask="##:##" position="absolute 199 10 241 30"/>
                  <MaskEdit id="workedd" taborder="10" type="string" mask="##:##" position="absolute 365 10 407 30"/>
                </Layout>
              </Layouts>
            </Tabpage>
          </Tabpages>
        </Tab>
        <Grid id="grd_print" taborder="3" useinputpanel="false" visible="false" position="absolute 342 371 987 521">
          <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"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="22" band="head"/>
                <Row size="20"/>
              </Rows>
              <Band id="head">
                <Cell text="NO"/>
                <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="진료과"/>
                <Cell col="8" text="병동/병실"/>
                <Cell col="9" text="검사명"/>
                <Cell col="10" text="검체명"/>
                <Cell col="11"/>
                <Cell col="12"/>
                <Cell col="13"/>
                <Cell col="14"/>
                <Cell col="15"/>
                <Cell col="16"/>
                <Cell col="17"/>
              </Band>
              <Band id="body">
                <Cell text="bind:no"/>
                <Cell col="1" text="bind:spcltestno"/>
                <Cell col="2" text="bind:pid"/>
                <Cell col="3" text="bind:patnm"/>
                <Cell col="4" style="align:center middle;" text="bind:sexage"/>
                <Cell col="5" style="align:center middle;" text="bind:brthdate" mask="####-##-##"/>
                <Cell col="6" text="bind:orddrnm"/>
                <Cell col="7" text="bind:orddeptnm"/>
                <Cell col="8" text="bind:wardroom"/>
                <Cell col="9" text="bind:tclsnm"/>
                <Cell col="10" text="bind:spcnm"/>
                <Cell col="11" text="bind:reqfrmcd"/>
                <Cell col="12" text="bind:rrgstno"/>
                <Cell col="13" text="bind:spcacptdt"/>
                <Cell col="14" text="bind:reqcnts"/>
                <Cell col="15" text="bind:descrslt"/>
                <Cell col="16" text="bind:termhngnm"/>
                <Cell col="17" text="bind:usernm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption6" text="특수검사의뢰서조회" class="tit_1" position="absolute 0 0 144 25"/>
        <Button id="btn_print" taborder="6" text="출력" class="btn6" position="absolute 894 23 947 46" anchor="top right" onclick="btn_print_onclick"/>
        <Button id="btn_listPrt" taborder="7" text="리스트출력" class="btn6" position="absolute 953 23 1048 46" anchor="top right" onclick="btn_listPrt_onclick"/>
        <ActiveX id="socket" visible="false" position="absolute 369 18 404 48" progid="{81e9de7e-90be-4958-bbda-ac731c05aba8}" useautobitmapcache="1" anchor="default" taborder="10" OnError="socket_OnError" OnConnect="socket_OnConnect" OnClose="socket_OnClose"/>
        <ActiveX id="socket2" visible="false" position="absolute 404 18 439 48" progid="{81e9de7e-90be-4958-bbda-ac731c05aba8}" useautobitmapcache="1" anchor="default" taborder="11" OnError="socket2_OnError" OnConnect="socket2_OnConnect"/>
        <Grid id="grd_spcltestlist" taborder="13" binddataset="ds_grid_grd_spcltestlist" useinputpanel="false" autofittype="col" position="absolute 1 120 1257 807" anchor="all" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="30"/>
                <Column size="0"/>
                <Column size="30"/>
                <Column size="119"/>
                <Column size="120"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="60"/>
                <Column size="80"/>
                <Column size="78"/>
                <Column size="78"/>
                <Column size="98"/>
                <Column size="200"/>
                <Column size="150"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="26" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="상태"/>
                <Cell col="2" displaytype="checkbox" edittype="checkbox"/>
                <Cell col="3" text="접수일시"/>
                <Cell col="4" text="특수검사번호"/>
                <Cell col="5" text="등록번호"/>
                <Cell col="6" text="성명"/>
                <Cell col="7" text="성별/나이"/>
                <Cell col="8" text="생년월일"/>
                <Cell col="9" text="의뢰의사"/>
                <Cell col="10" text="진료과"/>
                <Cell col="11" text="병동/병실"/>
                <Cell col="12" text="검사명"/>
                <Cell col="13" text="검체명"/>
                <Cell col="14" text="의뢰서양식코드"/>
                <Cell col="15" text="주민등록번호"/>
                <Cell col="16" text="접수일자"/>
                <Cell col="17" text="의뢰내용"/>
                <Cell col="18" text="서술결과"/>
                <Cell col="19" text="상병명"/>
                <Cell col="20" text="전문의"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" displaytype="image" expr="expr:expr: getRowType(currow) == 2 ?'theme://images/ico_i.png' : (getRowType(currow) == 4 ? 'theme://images/ico_u.png' : (getRowType(currow) == 8 ? 'theme://images/ico_d.png' : 'theme://images/ico_e.png'))"/>
                <Cell col="2" displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                <Cell col="3" displaytype="date" edittype="normal" text="bind:spcacptdt" mask="yyyy-MM-dd HH:mm"/>
                <Cell col="4" style="align:left middle;" text="bind:spcltestno"/>
                <Cell col="5" edittype="text" text="bind:pid"/>
                <Cell col="6" text="bind:patnm"/>
                <Cell col="7" style="align:center middle;" text="bind:sexage"/>
                <Cell col="8" style="align:center middle;" text="bind:patbrthdd" mask="####-##-##"/>
                <Cell col="9" text="bind:atdrnm"/>
                <Cell col="10" text="bind:orddeptnm"/>
                <Cell col="11" text="bind:wardroom"/>
                <Cell col="12" style="align:left middle;" text="bind:tclsscrnnm"/>
                <Cell col="13" text="bind:spcnm"/>
                <Cell col="14"/>
                <Cell col="15"/>
                <Cell col="16"/>
                <Cell col="17"/>
                <Cell col="18"/>
                <Cell col="19"/>
                <Cell col="20"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_slide" taborder="15" text="Slide 출력" class="btn3" position="absolute 1052 23 1147 46" anchor="top right" onclick="btn_slide_onclick"/>
        <Button id="btn_block" taborder="16" text="Block 출력" class="btn3" position="absolute 1152 23 1247 46" anchor="top right" onclick="btn_block_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_lb0005" 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_init_lb0000" 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_init_lb0103" 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_init_lb0124" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING"/>
          <Column id="nm" type="STRING"/>
          <Column id="etc01" type="STRING" size="256"/>
          <Column id="etc02" type="STRING" size="256"/>
          <Column id="etc03" type="STRING" size="256"/>
          <Column id="etc04" type="STRING" size="256"/>
          <Column id="etc05" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_updatePrtList" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <column id="instcd" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="reqno" type="STRING"/>
          <Column id="reqhistno" type="STRING"/>
          <Column id="printyn" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grid_grd_spcltestlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <column id="chk" type="STRING"/>
          <Column id="spcltestno" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="sexage" type="STRING"/>
          <Column id="patbrthdd" type="STRING"/>
          <Column id="atdrnm" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="wardroom" type="STRING"/>
          <Column id="tclsscrnnm" type="STRING"/>
          <Column id="spcnm" type="STRING"/>
          <Column id="reqfrmcd" type="STRING"/>
          <Column id="rrgstno" type="STRING"/>
          <Column id="spcacptdt" type="STRING"/>
          <Column id="reqcnts" type="STRING"/>
          <Column id="tclscd" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="bcno" type="STRING"/>
          <Column id="orddrnm" type="STRING"/>
          <Column id="prcpgenrflag" type="STRING"/>
          <Column id="tclsprntnm" type="STRING"/>
          <Column id="rack" type="STRING"/>
          <Column id="workno" type="STRING"/>
          <Column id="bcolldt" type="STRING"/>
          <Column id="prcpdd" type="STRING"/>
          <Column id="reqno" type="STRING"/>
          <Column id="reqhistno" type="STRING"/>
          <Column id="printyn" type="STRING"/>
          <Column id="instcd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_tclscdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <column id="chk" type="STRING"/>
          <Column id="tclsnm" type="STRING"/>
          <Column id="tclscd" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="tclsprntnm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_temp_sendtclsnm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_tclscdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <column id="chk" type="STRING"/>
          <Column id="tclsnm" type="STRING"/>
          <Column id="tclscd" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="tclsprntnm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_getReqfrminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <column id="choi" type="STRING"/>
          <Column id="spcseqno" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="spccd2" type="STRING"/>
          <Column id="reqcnts" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grid_grd_print" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo><column id="chk" type="STRING"/><Column id="spcltestno" type="STRING"/><Column id="pid" type="STRING"/><Column id="patnm" type="STRING"/><Column id="sexage" type="STRING"/><Column id="brthdate" type="STRING"/>  ----&gt; val : patbrthdd 
		<Column id="reqdr" type="STRING"/>
		<Column id="orddeptnm" type="STRING"/>
		<Column id="wardroom" type="STRING"/>
		<Column id="tclsscrnnm" type="STRING"/>
		<Column id="spcnm" type="STRING"/>
		<Column id="reqfrmcd" type="STRING"/>
		<Column id="rrgstno" type="STRING"/>
		<Column id="spcacptdt" type="STRING"/>
		<Column id="reqcnts" type="STRING"/>
		<Column id="tclscd" type="STRING"/>
		<Column id="spccd" type="STRING"/>
		<Column id="bcno" type="STRING"/>
		<Column id="orddrnm" type="STRING"/>
		<Column id="prcpgenrflag" type="STRING"/>
		<Column id="tclsprntnm" type="STRING"/>
		<Column id="rack" type="STRING"/>
		<Column id="workno" type="STRING"/>
		<Column id="bcolldt" type="STRING"/>
		<Column id="prcpdd" type="STRING"/>  
		<Column id="tclsnm" type="STRING"/>
		<column id="no" type="STRING"/>
		<column id="descrslt" type="STRING"/>
		<Column id="termhngnm" type="STRING"/>
		<Column id="usernm" type="STRING"/> 
        <Column id="instcd" type="STRING" size="0"/></ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_grid_grd_printList" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo><column id="chk" type="STRING"/><Column id="spcltestno" type="STRING"/><Column id="pid" type="STRING"/><Column id="patnm" type="STRING"/><Column id="sexage" type="STRING"/><Column id="brthdate" type="STRING"/>  ----&gt; val : patbrthdd 
		<Column id="no" type="STRING"/>
		<Column id="spcltestno" type="STRING"/>
		<Column id="pid" type="STRING"/>
		<Column id="patnm" type="STRING"/>
		<Column id="sexage" type="STRING"/>
		<Column id="brthdate" type="STRING"/>
		<Column id="reqdr" type="STRING"/>
		<Column id="orddeptnm" type="STRING"/>
		<Column id="wardroom" type="STRING"/>
		<Column id="tclsnm" type="STRING"/>
		<Column id="spcnm" type="STRING"/>
		<Column id="rack" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_getRslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <column id="reptrslt" type="STRING"/>
          <Column id="tclsnm" type="STRING"/>
          <Column id="lastreptdt" type="STRING"/>
          <Column id="tclscd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_getCFRslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <column id="dispptno" type="STRING"/>
          <Column id="rsltcnts3" type="STRING"/>
          <Column id="readdrnm" type="STRING"/>
          <Column id="readdd" type="STRING"/>
          <Column id="pid" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_getDetlTestList" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <column id="tclscd" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="tclsnm" type="STRING"/>
          <Column id="termengnm" type="STRING"/>
          <Column id="termhngnm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_getBfresultlistt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <column id="testcd" type="STRING"/>
          <Column id="rsltunit" type="STRING"/>
          <Column id="lastreptdt" type="STRING"/>
          <Column id="spcacptdt" type="STRING"/>
          <Column id="reptrslt" type="STRING"/>
          <column id="testcmt" type="STRING"/>
          <Column id="tclsscrnnm" type="STRING"/>
          <Column id="workno" type="STRING"/>
          <Column id="prcpremfact" type="STRING"/>
          <Column id="tclscd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grid_grd_printList2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_sucess" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_LL107" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="basecd" type="STRING" size="256"/>
          <Column id="basecdidnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grid_grd_wlPrintList" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="no" type="STRING" size="256"/>
          <Column id="spcacptdt" type="STRING" size="256"/>
          <Column id="workno" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="patnm" type="STRING" size="256"/>
          <Column id="wardroom" type="STRING" size="256"/>
          <Column id="spcltestno" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grid_grd_bm_cbc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_slide" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="spclno" type="STRING" size="256" sumtext="결과값"/>
          <Column id="patnm" type="STRING" size="256" sumtext="검사명"/>
          <Column id="workdd" type="STRING" size="256" sumtext="최종보고일시"/>
          <Column id="etc" type="STRING" size="256" sumtext="검사코드"/>
          <Column id="etc1" type="STRING" size="256" sumtext="검사코드"/>
          <Column id="etc2" type="STRING" size="256" sumtext="검사코드"/>
          <Column id="hospnm" type="STRING" size="256" sumtext="검사코드"/>
          <Column id="prntcnt" type="STRING" size="256" sumtext="검사코드"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_temp_ip" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="slideip" type="STRING" size="256" sumtext="결과값"/>
          <Column id="slideport" type="STRING" size="256" sumtext="검사명"/>
          <Column id="casetip" type="STRING" size="256" sumtext="최종보고일시"/>
          <Column id="casetport" type="STRING" size="256" sumtext="검사코드"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_ref_tclscdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="tclscdlist" type="STRING" size="256"/>
          <Column id="tclsnmlist" type="STRING" size="256"/>
          <Column id="tclscdlist2" type="STRING" size="256"/>
          <Column id="testgrup" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_data_inptitem01" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_data_inptitem02" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_inptitem01" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="dsvaluepath" type="STRING" size="256"/>
          <Column id="chodd1" type="STRING" size="256"/>
          <Column id="sdd1" type="STRING" size="256"/>
          <Column id="weight1" type="STRING" size="256"/>
          <Column id="birth1" type="STRING" size="256"/>
          <Column id="race1" type="STRING" size="256"/>
          <Column id="week1" type="STRING" size="256"/>
          <Column id="day1" type="STRING" size="256"/>
          <Column id="bpdmm1" type="STRING" size="256"/>
          <Column id="ntmm1" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="tab_sw.pag_testitem.cmb_testitem" propid="value" datasetid="ds_hidden_ref_tclscdlist" columnid="testgrup"/>
      <BindItem id="item1" compid="tab_sw.pag_testitem.edt_tclscdlist" propid="value" datasetid="ds_hidden_ref_tclscdlist" columnid="tclsnmlist"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
 
include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LLZ001.xjs";
include "com_commodulexp::SSZFM00901.xjs";

var submitrtn = false;//submit 정상여부
var PB_Report_depth = "";
var p_sendtclscd  = "";

function SMLRP00700_onload(obj:Form, e:LoadEventInfo)
{
	//폼 초기화 함수
	frmf_initForm(obj);
	
	//초기정보 조회 
	lf_setInit_search();
	 
	//컨트롤 초기화 
	lf_setInit();
	
	// 그리드 전체 체크박스
	grdf_initGrid(grd_spcltestlist);
	
	grdf_setRowTypeIcon(grd_spcltestlist, 1);

}

//콜백함수
function cbf_common(strSvcID, nErrorCode, strErrorMsg){

	//에러 처리
	if(nErrorCode == 0){
		submitrtn = true;
	}else{
		submitrtn = false;
	}
}


function cbf_SMLRP00700(strSvcID, nErrorCode, strErrorMag){	
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");	
	if(nErrorCode == 0 && strSvcID == "TXLRP00701"){
		lf_getSpclTestList();
	}
	
	if(nErrorCode == 0 && strSvcID == "TRLRP00701"){
		for(i = 0; i < grd_spcltestlist.getCellCount("Body"); i++){
			grd_spcltestlist.setCellProperty("Body", i, "background", "EXPR(printyn == 'Y' ? '#cccc00' : '')");
			grd_spcltestlist.setCellProperty("Body", i, "background2", "EXPR(printyn == 'Y' ? '#cccc00' : '')");
			grd_spcltestlist.setCellProperty("Body", i, "selectbackground", "EXPR(printyn == 'Y' ? '#cccc00' : '')");
		}
	}
}

function lf_setInit_search(){
	
	// 초기정보 조회
	//0005 : 의뢰서 서식, 0000 : 유저 과플래그 조회, 0103 : 사용자별검사그룹
	lf_getDbDeptcd("0000|0005|0103|0124|","cbf_SMLRP00700");
}

function lf_setInit(ref){
	if(ref != "2")
	{
		
				 
		//접수일자 오늘날짜
		tab_sw.pag_spcltestno.cal_acptsdd.value = utlf_getCurrentDate();
		tab_sw.pag_spcltestno.cal_acptedd.value = utlf_getCurrentDate();
		
		tab_sw.pag_spcltestno.grp_sea.acptsdd.value = "0000";
		tab_sw.pag_spcltestno.grp_sea.acptedd.value = "2359";
		
		tab_sw.pag_spcltestno.cmb_spcltestgrup.value = "00";
		
		tab_sw.pag_spcltestno.edt_seqsno.value = "";
		tab_sw.pag_spcltestno.edt_seqeno.value = "";
		
			
		//작업일자 오늘날짜
		tab_sw.pag_testitem.cal_worksdd.value = utlf_getCurrentDate();
		tab_sw.pag_testitem.cal_workedd.value = utlf_getCurrentDate();
		
		tab_sw.pag_testitem.worksdd.value = "0000";
		tab_sw.pag_testitem.workedd.value = "2359";
		
		tab_sw.pag_testitem.cmb_testitem.value = ""
		
		//ds 초기화
		ds_grid_grd_spcltestlist.clearData();
		tab_sw.pag_testitem.edt_tclscdlist.value = ""
		
		p_sendtclscd = "";
	}
}

function lf_getSpclTestList(){

    // 이재오 조건 추가 2016.6월 14일					
	var start1 = tab_sw.pag_spcltestno.cal_acptsdd.value;
	var end1   = tab_sw.pag_spcltestno.cal_acptedd.value;
	var ldiff = end1 - start1 ;
	
	
	if(ldiff > 7 ){					
		sysf_messageBox("작업기간을 7일 이내로 조정하세요.","C002","");
		 return;
	}

	if(tab_sw.tabindex == 0){
		// 특수검사번호별로 조회 
		 var sInDsName = dsf_createDsRow("ds_temp_search"
									 , [{col: "acptsdd", val: tab_sw.pag_spcltestno.cal_acptsdd.value}
									 ,  {col: "acptsdd2", val: tab_sw.pag_spcltestno.grp_sea.acptsdd.value}
									 ,  {col: "acptedd", val: tab_sw.pag_spcltestno.cal_acptedd.value}
									 ,  {col: "acptedd2", val: tab_sw.pag_spcltestno.grp_sea.acptedd.value}
									 ,  {col: "spcltestgrup", val: tab_sw.pag_spcltestno.cmb_spcltestgrup.value}
									 ,  {col: "seqsno", val: tab_sw.pag_spcltestno.edt_seqsno.value}
									 ,  {col: "seqeno", val: tab_sw.pag_spcltestno.edt_seqeno.value}
									 ,  {col: "userdeptflagcd", val: lgv_sUserdeptflagcd}
									 ,  {col: "refflag", val: "1"}]);									
	}else{
	
		// 검사항목별 조회 
		 var sInDsName = dsf_createDsRow("ds_temp_search"
									 , [{col: "worksdd", val: tab_sw.pag_testitem.cal_worksdd.value}
									 ,  {col: "worksdd2", val: tab_sw.pag_testitem.worksdd.value}
									 ,  {col: "workedd", val: tab_sw.pag_testitem.cal_workedd.value}
									 ,  {col: "workedd2", val: tab_sw.pag_testitem.workedd.value}
									 ,  {col: "tclscdlist", val: p_sendtclscd}									 
									 ,  {col: "userdeptflagcd", val: lgv_sUserdeptflagcd}
	                                 ,  {col: "refflag", val: "2"}]);			
	}
	
	var oParam = {};
		oParam.id          = "TRLLP00701";
		oParam.service     = "refprintmngtapp.SpecialTestRefPrintMngt";
		oParam.method      = "reqGetSpclTestList";
		oParam.inds        = "cond="+sInDsName;
		oParam.outds       = "ds_grid_grd_spcltestlist=getSpclTestList";
		oParam.async       = false;
		oParam.callback    = "cbf_SMLRP00700";

	tranf_submit(oParam);
}


function lf_selectTestGrup(){
	 //검사그룹조회
	 var sInDsName = dsf_createDsRow("ds_temp_search"
	                             , [{col: "testgrupnm", val: tab_sw.pag_testitem.cmb_testitem.text }]);			
	
	var oParam = {};
		oParam.id          = "TRLLF90401";
		oParam.service     = "diagtestapplib.LisCommon";
		oParam.method      = "reqGetTestGrupDetl";
		oParam.inds        = "cond="+sInDsName;
		oParam.outds       = "ds_tclscdlist=getTestGrupDetl";
		oParam.async       = false;
		oParam.callback    = "cbf_SMLRP00700";

	tranf_submit(oParam);
	 
	return ds_tclscdlist.rowcount;
}

function lf_setPopUpTclscdList(){

	
	if(ds_tclscdlist.rowcount > 0){
		var sendtclsnm  = ds_tclscdlist.getColumn(0, "tclsnm");
		var sendtclscd  = ds_tclscdlist.getColumn(0, "tclscd");
		var sendtclscd2 = ds_tclscdlist.getColumn(0, "tclscd");
		var sendtclsnms = "";
		
		// 검사그룹 상세 목록 존재할때
		for(i=0; i<ds_tclscdlist.rowcount; i++){
			if(!utlf_isNull(ds_tclscdlist.getColCount(0, "tclsnm"))){
				sendtclsnm  = sendtclsnm  + ", " 	+ ds_tclscdlist.getColumn(i, "tclsnm");
				sendtclscd  = sendtclscd  + "','"  	+ ds_tclscdlist.getColumn(i, "tclscd");
				sendtclscd2 = sendtclscd2 + "▦"  	+ ds_tclscdlist.getColumn(i, "tclscd");
			}
		}
		
		tab_sw.pag_testitem.edt_tclscdlist.value = sendtclsnm.substr(0, sendtclsnm.length);
		p_sendtclscd = "'" + sendtclscd + "'";
		
	}
}


function lf_setPrintColumn(nRow, nFindRow){
	trace("lf_setPrintColumn :"+nRow+"/"+nFindRow);

	var nRow = ds_grid_grd_print.addRow();
	ds_grid_grd_print.copyRow(nRow, ds_grid_grd_spcltestlist, nFindRow);
	ds_grid_grd_print.setColumn(nRow, "brthdate", ds_grid_grd_spcltestlist.getColumn(nFindRow, "patbrthdd"));
	ds_grid_grd_print.setColumn(nRow, "reqdr", ds_grid_grd_spcltestlist.getColumn(nFindRow, "atdrnm"));
	ds_grid_grd_print.setColumn(nRow, "tclsnm", ds_grid_grd_spcltestlist.getColumn(nFindRow, "tclsscrnnm"));
}
function lf_print(){
	var nFindRow;
	var nRow;
	var reportNames = new Array();
	var reportParams = new Array();
	

	for(i = 0; i < ds_grid_grd_spcltestlist.rowcount; i++){
		ds_grid_grd_print.clearData();	
		nFindRow = ds_grid_grd_spcltestlist.findRow("chk", "1", i, -1);
		if(nFindRow < 0) break;
		
		//화면과 rexport 컬럼 매칭
		lf_setPrintColumn(nRow, nFindRow);
		
	
		//병리결과조회
		lf_getCFRslt(nFindRow);

		var nReport = ds_grid_grd_print.rowposition;
			
		
		//CBC 검사결과 데이터 생성 
		var tclslist = "";
		var rsltlist = "";
		var tclslist2 = "";
		var rsltlist2 = "";
		var tcls = "";
		var lastreptdt = 0;
		
		for(j = 0; j < ds_getRslt.rowcount; j++)
		{
			tcls = utlf_transNullToEmpty(ds_getRslt.getColumn(j, "testcd"));
			if(tcls.substr(3,3) != "105")
			{
				tclslist = tclslist + ds_getRslt.getColumn(j, "tclsnm") + "\n";
				rsltlist = rsltlist + ds_getRslt.getColumn(j, "reptrslt") + "\n";
				
			}
			else if(tcls.substr(3,3) == "105"){
				tclslist2 = tclslist2 + ds_getRslt.getColumn(j, "tclsnm") + "\n";
				rsltlist2 = rsltlist2 + ds_getRslt.getColumn(j, "reptrslt") + "\n";
			}
			if (j>0){
			  if (ds_getRslt.getColumn(j,"lastreptdt") > ds_getRslt.getColumn(j-1,"lastreptdt")){
			      lastreptdt = ds_getRslt.getColumn(j,"lastreptdt");
			  }
			}else{
			     lastreptdt = ds_getRslt.getColumn(j,"lastreptdt");
			}
// 			lastreptdt = Math.max(parseInt(lastreptdt), parseInt(ds_getRslt.getColumn(j, "lastreptdt"))); //최근일자
// 			
// 			lastreptdt = ds_getRslt.getColumn(j,"lastreptdt");
		}
		//CF 검사결과 데이터 생성	
		var sPtno = "";
		var sInter = "";
		var sReaddd = "";
		var sDrnm = "";

		for(j = 0; j < ds_getCFRslt.rowcount; j++){
			sPtno = sPtno + ds_getCFRslt.getColumn(j, "dispptno") + "\n";
			sInter = sInter + ds_getCFRslt.getColumn(j, "rsltcnts3") + "\n";
			sReaddd = sReaddd + ds_getCFRslt.getColumn(j, "readdd") + "\n";
			sDrnm = sDrnm + ds_getCFRslt.getColumn(j, "readdrnm") + "\n";
		}

		//진단명조회
		lf_getDetlTestList(nFindRow);
		
// 		ds_grid_grd_print.addColumn("termhngnm", "string"); 
// 		ds_grid_grd_print.setColumn(nReport, "termhngnm", ds_getDetlTestList.getColumn(0, "termhngnm"));

		ds_grid_grd_print.addColumn("termengnm", "string"); 
		ds_grid_grd_print.setColumn(nReport, "termengnm", ds_getDetlTestList.getColumn(0, "termhngnm"));
			
// 		for(x = 0; x < ds_init_lb0124.rowcount; x++){
// 			if(ds_init_lb0124.getColumn(x, "etc05") == "0"){
// 				ds_grid_grd_print.addColumn("hosadd", "string"); 
// 				ds_grid_grd_print.setColumn(nReport, "hosadd", ds_init_lb0124.getColumn(x, "etc02"));
// 			}else if(ds_init_lb0124.getColumn(x, "etc05") == "F"){
// 				ds_grid_grd_print.addColumn("sepotel", "string"); 
// 				ds_grid_grd_print.setColumn(nReport, "sepotel", ds_init_lb0124.getColumn(x, "etc01"));
// 			}
// 		}	
			
		//trace('aa :'+ds_grid_grd_print.saveXML());
		//rex3.0 세팅
		var objParam = new Object();
		var objDOM = rptf_createDOM();
		
		var reqfrmcd = ds_grid_grd_spcltestlist.getColumn(nFindRow,"reqfrmcd");
		
		rptf_setNodeListToDOM(objDOM, "/root/hidden/report/getspcltestlist", ds_grid_grd_print);	// 데이터셋 1

		//rptf_setNodeListToDOM(objDOM, "/root/hidden/report/getspcltestlist/rbc/rslt", ds_getRslt);
		
		// DOM 객체 조작
		var sXMLStr = ds_grid_grd_spcltestlist.getColumn(nFindRow,"reqcnts");
		var objDomParser = new DomParser;
		var objSubDOM = objDomParser.parseFromString(sXMLStr); 
		// var objElement = rptf_makeNodeToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts");
	
// 		objElement.replaceChild(objSubDOM.documentElement,objElement.childNodes[0]);	
		
		
		var pParamObj = new Object();
    	pParamObj.pathYN = "Y";
		pParamObj.nullColumnYN = "Y";
		
        var sXML = ds_grid_grd_spcltestlist.getColumn(nFindRow,"reqcnts");
               
               
        // trace("  sXML : "+sXML);    
     	lf_convertXmlToDs(sXML,pParamObj);

		//염색체 
		var r_reqcnts = utlf_transNullToEmpty(ds_data_reqfrminfo.getColumn(0,"reqcnts"));
		var r_famchk  = utlf_transNullToEmpty(ds_data_reqfrminfo.getColumn(0,"famchk"));
		var r_family  = utlf_transNullToEmpty(ds_data_reqfrminfo.getColumn(0,"family"));
		var r_etc     = utlf_transNullToEmpty(ds_data_reqfrminfo.getColumn(0,"etc"));
		var r_claim   = utlf_transNullToEmpty(ds_data_reqfrminfo.getColumn(0,"claim"));
		

// 		
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/reqcnts",r_reqcnts);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/famchk",r_famchk);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/family",r_family);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/etc",r_etc);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/claim",r_claim);
		

		
		//골수 결과
		var Initial    = "";
		var item02     = "";
		var chemo_01   = "";
		var bmt_01     = "";
		var ro_01      = "";
		var others_01  = "";
		
		if (reqfrmcd == "01"){
			Initial    = utlf_transNullToEmpty(ds_data_inptitem01.getColumn(0,"initial")) +" "+utlf_transNullToEmpty(ds_data_inptitem01.getColumn(0,"fu"))+" "+utlf_transNullToEmpty(ds_data_inptitem01.getColumn(0,"others"));
			item02     = utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"initial")) +" "+utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"chemo"))+" "+utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"bmt"))+" "+ utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"ro"))+" "+ utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"others"));			
			chemo_01   = utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"chemo"));
			bmt_01     = utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"bmt"));
			ro_01      = utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"ro"));
			others_01  = utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"others"));
		}	
		//
		//분자유전 검사 의뢰서 
		var item01     = "";
		var item05     = "";
		if (reqfrmcd == "02"){
			item05  = utlf_transNullToEmpty(ds_data_reqfrminfo.getColumn(0,"inptitem05"));
			item01  = utlf_transNullToEmpty(ds_data_reqfrminfo.getColumn(0,"inptitem01"));
			item02  = utlf_transNullToEmpty(ds_data_reqfrminfo.getColumn(0,"inptitem02"));
			item03  = utlf_transNullToEmpty(ds_data_reqfrminfo.getColumn(0,"inptitem03"));
		}
 		//trace('reqfrmcd: '+reqfrmcd+" / "+item05+" / "+item02+" / "+item03+" / "+item01);
// 		trace('tclslist2: '+tclslist2);
		
						
		//rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
		
		if (reqfrmcd == "16"){
		rptf_makeNodeToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem01");
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem01/initial", Initial);
		rptf_setNodeListToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem01",ds_data_inptitem01);  //16_삼성서울병원 약물의뢰서용으로 추가 
		}
		rptf_makeNodeToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem02");
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem02/inptitem02", item02);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem02/chemo", chemo_01);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem02/bmt", bmt_01);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem02/ro", ro_01);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem02/others", others_01); // 수정 2019.9.18
		
		if (reqfrmcd == "02"){
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem01", item01);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem03", item03);
		//rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem02/item04", item04);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem05", item05);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/instcd", sysf_getUserInfo("dutplceinstcd"));
		}
	
		
		if (reqfrmcd == "03"){

			ds_temp_inptitem01.clearData();
			var v_row =  "";
			for(i = 0; i < ds_data_inptitem01.rowcount; i++){
				
				v_row = ds_temp_inptitem01.addRow();
				ds_temp_inptitem01.setColumn(v_row,"dsvaluepath",ds_data_inptitem01.getColumn(i,"dsvaluepath"));
				ds_temp_inptitem01.setColumn(v_row,"chodd1",     ds_data_inptitem01.getColumn(i,"chodd1"));
				ds_temp_inptitem01.setColumn(v_row,"sdd1",       ds_data_inptitem01.getColumn(i,"sdd1"));
				ds_temp_inptitem01.setColumn(v_row,"weight1",    ds_data_inptitem01.getColumn(i,"weight1"));
				ds_temp_inptitem01.setColumn(v_row,"birth1",     ds_data_inptitem01.getColumn(i,"birth1"));
				ds_temp_inptitem01.setColumn(v_row,"race1",      ds_data_inptitem01.getColumn(i,"race1"));
				ds_temp_inptitem01.setColumn(v_row,"week1",      ds_data_inptitem01.getColumn(i,"week1"));
				ds_temp_inptitem01.setColumn(v_row,"day1",       ds_data_inptitem01.getColumn(i,"day1"));
				ds_temp_inptitem01.setColumn(v_row,"bpdmm1",     ds_data_inptitem01.getColumn(i,"bpdmm1"));
				ds_temp_inptitem01.setColumn(v_row,"ntmm1",      ds_data_inptitem01.getColumn(i,"ntmm1"));
			}
			rptf_setNodeListToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem00",ds_data_inptitem00); 
			rptf_setNodeListToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem01",ds_temp_inptitem01); 
			rptf_setNodeListToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem02",ds_data_inptitem02); 
			rptf_setNodeListToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem03",ds_data_inptitem03); 
			rptf_setNodeListToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem04",ds_data_inptitem04); 
		}
		
		
		if (reqfrmcd == "10"){
			Initial    = utlf_transNullToEmpty(ds_data_inptitem01.getColumn(0,"initial")) +" "+utlf_transNullToEmpty(ds_data_inptitem01.getColumn(0,"fu"))+" "+utlf_transNullToEmpty(ds_data_inptitem01.getColumn(0,"others"));
		    item02     = utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"initial")) +" "+utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"chemo"))+" "+utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"bmt"))+" "+ utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"ro"))+" "+ utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"bmtdt"))+" "+ utlf_transNullToEmpty(ds_data_inptitem02.getColumn(0,"others"));			
		    
     		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem01/initial",Initial); 
     		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem02",item02); 
		}
		
		if (reqfrmcd == "11"){
		    
     		//rptf_setNodeListToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo",ds_data_reqfrminfo); 
     		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem01",ds_data_reqfrminfo.getColumn(0,"inptitem01")); 
     		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem02",ds_data_reqfrminfo.getColumn(0,"inptitem02")); 
     		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem03",ds_data_reqfrminfo.getColumn(0,"inptitem03")); 
     		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem04",ds_data_reqfrminfo.getColumn(0,"inptitem04")); 
     		rptf_setNodeListToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem05",ds_data_inptitem05); 

		}
		
		if (reqfrmcd == "13" ){
		    rptf_setNodeListToDOM(objDOM, "/root/hidden/report/getspcltestlist/reqcnts/reqfrminfo/inptitem01",ds_data_inptitem01); 

		}

        if (reqfrmcd == "14" ){
		    rptf_setNodeListToDOM(objDOM, "/root/properties/report/mainreport/params/getspcltestlist/reqcnts/reqfrminfo/inptitem01",ds_data_inptitem01); 

		}
		
		//CBC 검사결과//
		rptf_makeNodeToDOM(objDOM, "/root/hidden/report/getspcltestlist/rbc");
		
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/rbc/tcls", tclslist);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/rbc/rslt", rsltlist);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/rbc/tcls2", tclslist2);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/rbc/rslt2", rsltlist2);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/rbc/tm", lastreptdt);		
		
		
			
		rptf_makeNodeToDOM(objDOM, "/root/hidden/report/getspcltestlist/cf");
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/cf/dispptno", sPtno);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/cf/inter", sInter);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/cf/readdd", sReaddd);
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/cf/readdrnm", sDrnm);
		
		//PB 검사결과DEPTH//
		rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/pb_reportdepth", PB_Report_depth);
			
		//검사여부,이전결과조회   데이터 셋팅
		lf_testRstSet(nFindRow, objDOM);
		
		// 서브리포트 섹션 데이터
		ds_grid_grd_printList2.clear();
		ds_grid_grd_printList2.copyData(ds_getCFRslt);
		ds_grid_grd_printList2.updateColID("rsltcnts3","inter");
		
		var objDOM2 = rptf_createDOM();											// DOM 객체 설정
		rptf_setNodeListToDOM(objDOM2, "root/hidden/report/getspcltestlist/cf", ds_grid_grd_printList2);	// 데이터셋 1	
		
		
		objParam.xml_data_XML1 = objDOM.documentElement.source;
		objParam.xml_data_XML2 = objDOM2.documentElement.source;					// 최상의노드 XML 스트링 추출
		
		var option = "open=1;save=1;directprint=0;printdialog=0;print=1;zoom=0";

		for(y = 0; y < ds_grid_grd_print.rowcount; y++){

			var flag = ds_grid_grd_print.getColumn(y, "reqfrmcd");
		
			trace("flag : "+flag);
			if(flag == "13"){//13_아산병원유전자검사의뢰서
				rptf_exeReportPreview30(["RPLRP92000"], [objParam], option);			
			}else if(flag == "01"){ //01_골수검사의뢰서
				rptf_exeReportPreview30(["RPLRP90100"], [objParam], option);//개발필요-> 개발함
			}else if(flag == "02"){ //02_분자생물학부의뢰서
				rptf_exeReportPreview30(["RPLRR90200"], [objParam], option);//개발필요-> 개발함
			}else if(flag == "03"){ //03_산[]전검사의뢰서
				rptf_exeReportPreview30(["RPLRR90300"], [objParam], option);//개발필요-> 개발함
			}else if(flag == "04"){ //04_세포유전학검사의뢰서
				rptf_exeReportPreview30(["RPLRR90400"], [objParam], option);//개발필요
			}else if(flag == "05"){ //05_장기이식검사의뢰서
 				reportNames.push("RPLRP90500");  //---
 				reportParams.push(objParam);
				rptf_exeReportPreview30(["RPLRP90500"], [objParam], option);//개발필요
			}else if(flag == "06"){ //06_TDM의뢰서
				rptf_exeReportPreview30(["RPLRP90600"], [objParam], option);//개발필요
			}else if(flag == "09"){ //09_염색체검사의뢰서
				//reportNames.push("RPLRR91300"); //---
				//reportParams.push(objParam);
				rptf_exeReportPreview30(["RPLRR91300"], [objParam], option);//개발필요				
			}else if(flag == "11"){ //11_AMH 검사의뢰서
				rptf_exeReportPreview30(["RPLRP91900"], [objParam], option);//개발필요		
			}else if(flag == "12"){ //12_서울대유전자검사의뢰서
				rptf_exeReportPreview30(["RPLRP92100"], [objParam], option);//개발필요	
			}else if(flag == "14"){ //14_삼성서울병원유전자검사의뢰서
				rptf_exeReportPreview30(["RPLRP92200"], [objParam], option);//개발필요
			}else if(flag == "15"){ //15_기생충항체검사의뢰서
				rptf_exeReportPreview30(["RPLRP91800"], [objParam], option);//개발필요
			}else if(flag == "16"){ //16_삼성서울병원 약물의뢰서
				rptf_exeReportPreview30(["RPLRP92300"], [objParam], option);//개발필요
				
			}else if(flag == "17"){ //17_말라리아검사의뢰서
				rptf_exeReportPreview30(["RPLRP92400"], [objParam], option);//개발필요
			}else{ //그외  M의뢰서
				rptf_exeReportPreview30(["RPLRP00100"], [objParam], option,null,null,"true");//개발필요
			}
		} 
		i = nFindRow;
	}
}

function lf_getCFRslt(nFindRow){
	 //병리결과조회
	 var sInDsName = dsf_createDsRow("ds_temp_search"
	                             , [{col: "pid", val: ds_grid_grd_spcltestlist.getColumn(nFindRow, "pid")}
	                             ,  {col: "instcd", val: ds_init_lb0103.getColumn(tab_sw.pag_spcltestno.cmb_spcltestgrup.index, "cd")}
	                             ,  {col: "bcno", val: ds_grid_grd_spcltestlist.getColumn(nFindRow, "bcno")}]);			
	
	var oParam = {};
		oParam.id          = "TRLRP00703";
		oParam.service     = "refprintmngtapp.SpecialTestRefPrintMngt";
		oParam.method      = "reqGetRslt";
		oParam.inds        = "cond="+sInDsName;
		oParam.outds       = "ds_getRslt=getRslt ds_getCFRslt=getCFRslt";
		oParam.async       = false;
		oParam.callback    = "cbf_SMLRP00700";

	tranf_submit(oParam);
}

function lf_getDetlTestList(nFindRow){
	 //진단명조회
	 var sInDsName = dsf_createDsRow("ds_temp_search"
	                             , [{col: "bcno", val: ds_grid_grd_spcltestlist.getColumn(nFindRow, "bcno")}
	                             ,  {col: "tclscd", val: ds_grid_grd_spcltestlist.getColumn(nFindRow, "tclscd")}
	                             ,  {col: "spccd", val: ds_grid_grd_spcltestlist.getColumn(nFindRow, "spccd")}
	                             ,  {col: "prcpgenrflag", val: ds_grid_grd_spcltestlist.getColumn(nFindRow, "prcpgenrflag")}]);	
	                            
	var oParam = {};
		oParam.id          = "TRLRP00702";
		oParam.service     = "refprintmngtapp.SpecialTestRefPrintMngt";
		oParam.method      = "reqGetDetlTestList";
		oParam.inds        = "cond="+sInDsName;
		oParam.outds       = "ds_getDetlTestList=getDetlTestList";
		oParam.async       = false;
		oParam.callback    = "cbf_SMLRP00700";

	tranf_submit(oParam);		
}

function lf_testRstSet(nFindRow, objDOM){
	rptf_makeNodeToDOM(objDOM, "/root/hidden/report/getspcltestlist/past");
	
	for(y = 0; y < ds_getBfresultlistt.rowcount; y++){
		//유무, 과거검사번호 
		if(ds_getBfresultlistt.getColumn(y, "testcd") == ds_grid_grd_spcltestlist.getColumn(nFindRow, "tclscd")){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/YN", "Y");
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/workno", ds_getBfresultlistt.getColumn(y, "workno"));
		}
		
		//WBC검사결과, 처방소견, 접수일시
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "B1050000"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/wbc", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/opinions", ds_getBfresultlistt.getColumn(y, "prcpremfact"));
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/spcacptdt1", ds_getBfresultlistt.getColumn(y, "spcacptdt"));		
		}
		
		//HB검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "B1010000"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/hb", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
		
		//Hct검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "B1020000"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/hct", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
		
		//PLT검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "B1060000"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/plt", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
		
		//MCV검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "BHS00001"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/mcv", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
		
		//MCH검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "BHS00002"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/mch", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
				
		//MCHC검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "BHS00003"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/mchc", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
		
		//RDW검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "BHS00006"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/rdw", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
		
		//NRBC검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "B109100018"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/nrbc", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}		
		
		//Reti검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "B108100001"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/reti", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
		
		//LDH검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "B2590000"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/ldh", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
		
		//Iron검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "C2490000"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/iron", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
		
		//TIBC검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "BCS00031"){//"GBC00025"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/tibc", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
		
		//Ferritin검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "C2520000"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/ferritin", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
		
		//Bilirubin, total, neonate검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "C3720000"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/bil", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
		
		//Total protein검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "C2200000"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/protein", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
		
		//A/G ratio검사결과
		if(ds_getBfresultlistt.getColumn(y, "testcd") == "BCS00001"){
			rptf_setValueToDOM(objDOM, "/root/hidden/report/getspcltestlist/past/agratio", utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "reptrslt")) + " " + utlf_transNullToEmpty(ds_getBfresultlistt.getColumn(y, "rsltunit")));
		}
	}
}

function lf_listPrint(){
	var nRowfind;
	var bcno = "";
	var	count = 0;
	ds_grid_grd_printList.clearData();
	
	for(i = 0; i < ds_grid_grd_spcltestlist.rowcount; i++) {
		nRowfind = ds_grid_grd_spcltestlist.findRow("chk", "1", i, -1);
		bcno = ds_grid_grd_spcltestlist.getColumn(i, "bcno");
		
		if(nRowfind < 0){
			break;
		}else{
			if(bcno == ds_grid_grd_spcltestlist.getColumn(nRowfind, "bcno")){
			++count;
			var addRow = ds_grid_grd_printList.addRow();
			ds_grid_grd_printList.copyRow(addRow, ds_grid_grd_spcltestlist, nRowfind);
			ds_grid_grd_printList.setColumn(addRow, "brthdate", ds_grid_grd_spcltestlist.getColumn(nRowfind, "patbrthdd"));
			ds_grid_grd_printList.setColumn(addRow, "reqdr", ds_grid_grd_spcltestlist.getColumn(nRowfind, "atdrnm"));
			ds_grid_grd_printList.setColumn(addRow, "tclsnm", ds_grid_grd_spcltestlist.getColumn(nRowfind, "tclsscrnnm"));
			ds_grid_grd_printList.setColumn(addRow, "no", count);
			}
		}
	
	}
	if(count < 1){
		sysf_messageBox("출력할", "E013", "");
		return;
	}
	var objParam = new Object();
	objParam.xml_data_XML1 = rptf_getXMLString(ds_grid_grd_printList,"root/hidden/report");
	var option = "open=1;save=1;directprint=0;printdialog=0;print=1;zoom=0";
	rptf_exeReportPreview30(["RPLRP00500"], [objParam], option);
	
}


function lf_wlPrint(){

	ds_grid_grd_wlPrintList.clearData();
	var count = 1;
	if(tab_sw.pag_spcltestno.cmb_spcltestgrup.value == '00'){
		sysf_messageBox("의뢰서서식을 선택하셔야 합니다.", "I999");
	}
	
	if(tab_sw.pag_spcltestno.cmb_spcltestgrup.value == '01'){
		for(var i=0; i<ds_grid_grd_spcltestlist.rowcount; i++ ){
			if(ds_grid_grd_spcltestlist.getColumn(i,"chk") == "1"){
				var nRow = ds_grid_grd_wlPrintList.addRow();
				ds_grid_grd_wlPrintList.setColumn(nRow,"no",count);
				
				ds_grid_grd_wlPrintList.setColumn(nRow,"spcltestno",ds_grid_grd_spcltestlist.getColumn(i,"spcltestno"));
				ds_grid_grd_wlPrintList.setColumn(nRow,"patnm",ds_grid_grd_spcltestlist.getColumn(i,"patnm"));
				ds_grid_grd_wlPrintList.setColumn(nRow,"pid",ds_grid_grd_spcltestlist.getColumn(i,"pid"));
				ds_grid_grd_wlPrintList.setColumn(nRow,"workno",ds_grid_grd_spcltestlist.getColumn(i,"workno"));
				ds_grid_grd_wlPrintList.setColumn(nRow,"orddeptnm",ds_grid_grd_spcltestlist.getColumn(i,"orddeptnm"));
				ds_grid_grd_wlPrintList.setColumn(nRow,"wardroom",ds_grid_grd_spcltestlist.getColumn(i,"wardroom"));
				ds_grid_grd_wlPrintList.setColumn(nRow,"spcacptdt",ds_grid_grd_spcltestlist.getColumn(i,"spcacptdt").substr(4,4));
				count++;
			}
		}
		
		if(count < 2){
			sysf_messageBox("출력할", "E013", "");
			return;
		}else{
			var objParam = new Object();
			objParam.xml_data_XML1 = rptf_getXMLString(ds_grid_grd_wlPrintList,"root/hidden/report");
			var option = "open=1;save=1;directprint=0;printdialog=0;print=1;zoom=0";
			rptf_exeReportPreview30(["RPLRP00600"], [objParam], option);
		}	
	
	}else if(tab_sw.pag_spcltestno.cmb_spcltestgrup.value == '10'){    //PB
		for(var i=0; i<ds_grid_grd_spcltestlist.rowcount; i++ ){
			if(ds_grid_grd_spcltestlist.getColumn(i,"chk") == "1"){
				var nRow = ds_grid_grd_wlPrintList.addRow();
				ds_grid_grd_wlPrintList.setColumn(nRow,"no",count);
				ds_grid_grd_wlPrintList.setColumn(nRow,"spcacptdt",ds_grid_grd_spcltestlist.getColumn(i,"spcacptdt"));
				ds_grid_grd_wlPrintList.setColumn(nRow,"workno",ds_grid_grd_spcltestlist.getColumn(i,"workno"));
				ds_grid_grd_wlPrintList.setColumn(nRow,"pid",ds_grid_grd_spcltestlist.getColumn(i,"pid"));
				ds_grid_grd_wlPrintList.setColumn(nRow,"patnm",ds_grid_grd_spcltestlist.getColumn(i,"patnm"));
				ds_grid_grd_wlPrintList.setColumn(nRow,"wardroom",ds_grid_grd_spcltestlist.getColumn(i,"wardroom"));
				count++;
			}
		}
		
		if(count < 2){
			sysf_messageBox("출력할", "E013", "");
			return;
		}else{
			var objParam = new Object();
			objParam.xml_data_XML1 = rptf_getXMLString(ds_grid_grd_wlPrintList,"root/hidden/report");
			var option = "open=1;save=1;directprint=0;printdialog=0;print=1;zoom=0";
			rptf_exeReportPreview30(["RPLRP00700"], [objParam], option);
		}
	}


}

function tab_sw_pag_spcltestno_btn_seqrch_onclick(obj:Button,  e:ClickEventInfo){
	//특수검사의뢰서 조회 
	lf_getSpclTestList();
}

function tab_sw_pag_testitem_cmb_testitem_onitemchanged(obj:Combo, e:ItemChangeEventInfo){
	//검사그룹조회 후 edt에 조회항목edit
	if (lf_selectTestGrup() > 0){
		lf_setPopUpTclscdList();
	}
}

function tab_sw_pag_testitem_btn_init_onclick(obj:Button,  e:ClickEventInfo){
	lf_setInit();
}

function tab_sw_pag_testitem_btn_search_onclick(obj:Button,  e:ClickEventInfo){
	//검사항목 돋보기 버튼 클릭
	
	dsf_createDsRow("ds_tclscdlist"
							 , [{col: "testgrpnm", val: tab_sw.pag_testitem.cmb_testitem.value}
							 ,  {col: "testmdlcd", val: ""}
							 ,  {col: "menuparam", val: ""}]);
	
	var objArg = new Object();
	objArg.testGrup = ds_tclscdlist;
	ds_temp_sendtclsnm.clearData();
	frmf_modal("SMLLF90400","SMLLF90400",objArg, "", "", "", "", "", "", "", "", "", "M");
	tab_sw.pag_testitem.edt_tclscdlist.value = utlf_isNull(ds_temp_sendtclsnm.getColumn(0, "tclsnmlist")) ? tab_sw.pag_testitem.edt_tclscdlist.value : ds_temp_sendtclsnm.getColumn(0, "tclsnmlist");
	tab_sw.pag_testitem.cmb_testitem.text = utlf_isNull(ds_temp_sendtclsnm.getColumn(0, "testgrupnm")) ? tab_sw.pag_testitem.cmb_testitem.text : ds_temp_sendtclsnm.getColumn(0, "testgrupnm");
}

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

function btn_listPrt_onclick(obj:Button,  e:ClickEventInfo){
	lf_listPrint();
}

function lf_save_grd_ds(objDs, objCondDs)		
{
	dsf_createDs(objCondDs);     			//데이타셋 생성
	eval(objCondDs).copyData(objDs);		//데이타셋 복사
	eval(objCondDs).addColumn("status", "string", 10);	//status추가
	
	eval(objCondDs).clearData();
	for (var i=0; i<objDs.rowcount; i++) {
		// 저장용 데이타셋 생성
		if ( objDs.getRowType(i) > 1 ) {
			var aRow = eval(objCondDs).addRow();
			eval(objCondDs).copyRow(aRow, objDs, i);
			
			if ( objDs.getRowType(i) == 2) {
				eval(objCondDs).setColumn(aRow, "status", "i");
				
			} else if ( objDs.getRowType(i) == 4) {
				eval(objCondDs).setColumn(aRow, "status", "u");
				
			} else if ( objDs.getRowType(i) == 8) {
				eval(objCondDs).setColumn(aRow, "status", "d");

			}
		}
	}
	
}

function cbf_updateSpecialTestPrintYN(strSvcID, nErrorCode, strErrorMsg){

	if(nErrorCode != 0){
	
	} else {
	
		sysf_messageBox("정상적으로", "I001");
    
		//재조회
		tab_sw_pag_spcltestno_btn_seqrch_onclick();
		
	}

}

function tab_sw_pag_spcltestno_cmb_spcltestgrup_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
// 	// 골수검 or PB 일 때, W/L 출력 버튼 활성화
// 	if(tab_sw.pag_spcltestno.cmb_spcltestgrup.value == '01' || tab_sw.pag_spcltestno.cmb_spcltestgrup.value == '10' ){
// 		btn_wlprint.visible = true;
// 	}else{
// 		btn_wlprint.visible = false;
// 	}
// 	
// 	//특수검사의뢰서 조회 
 	lf_getSpclTestList();
}

function btn_wlprint_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_wlPrint();
}

function tab_sw_onchanged(obj:Tab, e:TabIndexChangeEventInfo)
{
// 	if(obj.tabindex == 0)
// 	{
// 		if(tab_sw.pag_spcltestno.cmb_spcltestgrup.value == '01' || tab_sw.pag_spcltestno.cmb_spcltestgrup.value == '10' ){
// 			btn_wlprint.visible = true;
// 		}
// 	}else{
// 		btn_wlprint.visible = false;
// 	}
}

function tab_sw_pag_spcltestno_cal_acptedd_onkeyup(obj:Calendar, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		lf_getSpclTestList();
	}
}

function btn_slide_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_fSlidePrint();
}

//Slide출력
function lf_fSlidePrint()
{	
	var pidno = "";
	var spcltestno = "";
	
	var count = 0;
	
	for(i = 0; i < ds_grid_grd_spcltestlist.rowcount; i++)
	{
		var chk = ds_grid_grd_spcltestlist.getColumn(i, "chk");
		if(chk == 1)
		{
			pidno = ds_grid_grd_spcltestlist.getColumn(i, "pid");
			spcltestno = ds_grid_grd_spcltestlist.getColumn(i, "spcltestno");
			count ++;
		}
		if(count > 1)
		{
			alert("슬라이드 출력은 한개만 가능 합니다.");
			return;
		}
	}
	dsf_createDsRow("ds_send", [{col : "slidegbn",   val : "1"}
	                           ,{col : "pidno",      val : pidno}
	                           ,{col : "spcltestno", val : spcltestno}]);
	var oParam = {};
		oParam.id          = "TRLRP00703";
		oParam.service     = "refprintmngtapp.SpecialTestRefPrintMngt";
		oParam.method      = "reqGetRePrntSlideList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_temp_slide=getRePrntSlideList ds_temp_ip=getRePrntSlideIp";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLRP00703";
	tranf_submit(oParam);
	
	var slideprnt = ds_temp_slide.rowcount;
	
	if(slideprnt > 0)
	{
		sSlidBcIP = ds_temp_ip.getColumn(0, "slideip");
		sSlidBcPort = ds_temp_ip.getColumn(0, "slideport");
		
		//----------------------------------------
		if( utlf_isNull(sSlidBcIP) || sSildBcIP =="-")
		{
			sysf_messageBox("슬라이드 라벨지 장비의 IP주소가 없습니다. 병원별 환경설정에서 ", "C001");
			return false;
		}
		//--------------------------------------------
		if( utlf_isNull(sSlidBcPort) || sSlidBcPort == "-")
		{
			sysf_messageBox("슬라이드 라벨지 장비의 Port번호가 없습니다. 병원별 환경설정에서 ", "C001");
			return false;
		}
		//-------------------------------------
		socket.connect(sSlidBcIP, sSlidBcPort);
	}
}

//Block출력
function btn_block_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_fBlockPrint();
}

function lf_fBlockPrint()
{	
	var pidno = "";
	var spcltestno = "";
	
	var count = 0;
	
	for(i = 0 ; i <  ds_grid_grd_spcltestlist.rowcount; i++)
	{
		var chk = ds_grid_grd_spcltestlist.getColumn(i, "chk");
		if(chk == 1)
		{
			pidno = ds_grid_grd_spcltestlist.getColumn(i, "pid");
			spcltestno = ds_grid_grd_spcltestlist.getColumn(i, "spcltestno");
			count ++;
		}
		if(count > 1)
		{
			alert("블럭 출력은 한개만 가능 합니다.");
			return;
		}
	}
	dsf_createDsRow("ds_send", [{col : "slidegbn",   val : "2"}
						       ,{col : "pidno",      val : pidno}
						       ,{col : "spcltestno", val : spcltestno}]);
	var oParam = {};
		oParam.id          = "TRLRP00703";
		oParam.service     = "refprintmngtapp.SpecialTestRefPrintMngt";
		oParam.method      = "reqGetRePrntSlideList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_slide=getRePrntSlideList ds_ip=getRePrntSlideIp";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLRP00703";
	tranf_submit(oParam);
	
	var slideprnt = ds_slide.rowcount;
	
	if(slideprnt > 0)
	{
		sSlidBcIP = ds_ip.getColumn(0, "casetip");
		sSlidBcPort = ds_ip.getColumn(0, "casetport");
		
		if(utlf_isNull(sSlidBcIP) || sSlidBcIP == "-")
		{
			sysf_messageBox("슬라이드 라벨지 장비의 IP주소가 없습니다. 병원별 환경설정에서 ", "C001");
			return false;
		}
		if( utlf_isNull(sSlidBcPort) || sSlidBcPort == "-")
		{
			sysf_messageBox("슬라이드 라벨지 장비의 Port번호가 없습니다. 병원별 환경설정에서 ", "C001");
			return false;
		}
		//-------------------------------------
		socket2.connect(sSlidBcIP, sSlidBcPort);
	}
}

function socket_OnError(obj:ActiveX, e)
{
	alert("Error code = " + lError+"\nError Message : "+szMsg);
	socket.close();					// 소켓 닫기
	isConnected = false; 			// 접속 여부 false
}

function socket_OnConnect(obj:ActiveX, e)
{
	fEXESlidePrint();
}

function socket_OnClose(obj:ActiveX, e)
{
	isConnected = false;	// 접속 여부 false
}

function socket2_OnError(obj:ActiveX, e)
{
	alert("Error code = " + lError+"\nError Message : "+szMsg);
	socket.close();					// 소켓 닫기
	//isConnected = false; 			// 접속 여부 false
}

function socket2_OnConnect(obj:ActiveX, e)
{
	fEXEBlockPrint();
}

function fEXESlidePrint()
{	
	var iMaxRowCnt = 0;
	var sSlidNode = ds_temp_slide;
	
	iMaxRowCnt = ds_temp_slide.rowcount;
	
	for(var iRowNo = 0; iRowNo < iMaxRowCnt; iRowNo++)
	{
		for(var i = 0; i < ds_temp_slide.getColumn(iRowNo, "prntcnt"); i++)
		{
			var patnm = getNameInitial(ds_temp_slide.getColumn(iRowNo, "patnm"));
			var etc1 = getNameInitial(ds_temp_slide.getColumn(iRowNo, "etc1"));
			
			if(utlf_isNull(etc1))
			{
				etc1 = "-";
			}
			
			sSendMsg  = "S▦";   											 	//슬라이드구분
			sSendMsg += ds_temp_slide.getColumn(iRowNo, "spclno") + "▦";		// 특수검사연번호
			sSendMsg += patnm + "▦";											// 환자명
			sSendMsg += etc1 + "▦";			
			sSendMsg += ds_temp_slide.getColumn(iRowNo, "workdd") + "▦";		// 접수일시
			sSendMsg += ds_temp_slide.getColumn(iRowNo, "etc2") + "▦";
			sSendMsg += ds_temp_slide.getColumn(iRowNo, "hospnm") + "▩";		// 병원명
			
			socket.sendString(sSendMsg);									
		}
	}
	socket.close();	
}


function fEXEBlockPrint()
{		
	var iMaxRowCnt = 0;
	var sSlidNode = ds_temp_slide;
	
	iMaxRowCnt = ds_temp_slide.rowcount;
	
	for(var iRowNo = 0; iRowNo < iMaxRowCnt; iRowNo++)
	{
		var patnm = getNameInitial(ds_temp_slide.getColumn(iRowNo, "patnm"));
		var etcvalue = ds_temp_slide.getColumn(iRowNo, "etc");
		var etcMark = "";
		
		if(etcvalue.indexOf("C") == -1)
		{
			etcMark = "1";
		}
		else
		{
			etcMark = "2";
		}
			
			
		sSendMsg  = "C▦";   													//카세트구분
		sSendMsg += ds_temp_slide.getColumn(iRowNo, "spclno") + "▦";			// 특수검사연번호
		sSendMsg += etcMark + "▦";												//후퍼 
		sSendMsg += ds_temp_slide.getColumn(iRowNo, "etc") + "▦";  
		sSendMsg += patnm + "▩";												// 환자명
			
		socket2.sendString(sSendMsg);	
	}
	socket2.close();					
}

function getNameInitial(nameStr)
{
	//받은 이름 문자열을 스페이스바로 분리
	var part = nameStr.split(' ');
	
	var str = "";
	var nameChr = "";
	var chr;
	var cnt = 3;
	
	//영문이름을 위한 대문자 변환
	nameStr = nameStr.toUpperCase();

	//스페이스로 구분되어 있는 이름(영문)의 경우 첫단어와 마지막 단어의 이니셜만 처리
	if(part.length>1)
	{
		if(part[0].length == 0) part[0] = " ";
		if(part[part.length-1].length == 0) part[part.length-1] = " ";

		nameChr = part[0].substr(0,1) + "." + part[part.length-1].substr(0,1);
	}
	else
	{
		nameChr = part[0];
	}
	
	//변환할 값이 0보다 큰지 확인
	if(nameChr.length < cnt) cnt = nameChr.length;
	if(cnt <= 0) return str;
	
	//영문일 때를 위해 대문자로 변환
	nameChr = nameChr.toUpperCase();
	
	for(i=0; i < cnt; i++)
	{
		chr = nameChr.substr(i,1).charCodeAt(0);

		if(chr<128) str = str + nameChr.substr(i,1);
		else{
			switch(nameChr.substr(i,1)){
				case "박":
					str = str + "P";
					break;
				case "김":
					str = str + "K";
					break;
				case "이":
					if(i==0) str = str + "L";
					else  str = str + "I";
					break;
			default :
					if(chr>=44032 && chr<45208) str = str + "G";
					else if(chr>=45208 && chr<45796) str = str + "N";
					else if(chr>=45796 && chr<46972) str = str + "D";
					else if(chr>=46972 && chr<47560) str = str + "R";
					else if(chr>=47560 && chr<48148) str = str + "M";
					else if(chr>=48148 && chr<49324) str = str + "B";
					else if(chr>=49324 && chr<50500) str = str + "S";
					else if(chr>=50500 && chr<50556) str = str + "A";
					else if(chr>=50556 && chr<50612) str = str + "Y";
					else if(chr>=50612 && chr<50668) str = str + "E";
					else if(chr>=50668 && chr<50724) str = str + "Y";
					else if(chr>=50724 && chr<50752) str = str + "O";
					else if(chr>=50752 && chr<50808) str = str + "W";
					else if(chr>=50808 && chr<50836) str = str + "O";
					else if(chr>=50836 && chr<50864) str = str + "Y";
					else if(chr>=50864 && chr<50892) str = str + "U";
					else if(chr>=50892 && chr<50976) str = str + "W";
					else if(chr>=50976 && chr<51004) str = str + "Y";
					else if(chr>=51004 && chr<51032) str = str + "E";
					else if(chr>=51032 && chr<51060) str = str + "U";
					else if(chr>=51060 && chr<51088) str = str + "I";
					else if(chr>=51088 && chr<52264) str = str + "J";
					else if(chr>=52264 && chr<52852) str = str + "C";
					else if(chr>=52852 && chr<53440) str = str + "K";
					else if(chr>=53440 && chr<54028) str = str + "T";
					else if(chr>=54028 && chr<54616) str = str + "P";
					else if(chr>=54616 && chr<55203) str = str + "H";
				  else str = str + " ";
					break;
			}
		}
	}
	
	return str;
}
]]></Script>
  </Form>
</FDL>