YNU_JEUS/app_home/himed/xpapps/lis/plgycsteslidmngtxp/xp/SMLPB00700_슬라이드일괄발행.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLPB00700" position="absolute 0 0 1197 788" titletext="슬라이드 일괄발행" oninit="SMLPB00700_oninit" onload="SMLPB00700_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 1195 29" id="grp_tle" anchor="left top right">
          <Layouts>
            <Layout>
              <Static text="슬라이드 일괄발행" position="absolute 0 0 152 26" id="caption6" class="tit_1" anchor="left top"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 56 1195 784" id="grp_biz" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Combo position="absolute 725 50 859 69" id="cmb_prnteqmt" visible="false" codecolumn="codecolumn" datacolumn="datacolumn" anchor="top right">
                <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">라벨 프린터1</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">라벨 프린터2</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Div position="absolute 0 10 1194 45" align="align:center top;" id="grp_sea" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Static text="접수일자 :" position="absolute 732 9 818 26" id="caption2" class="search_name" anchor="top right"/>
                    <Static text="~" position="absolute 918 10 930 27" id="caption5" class="search_no_b" anchor="top right"/>
                    <Shape position="absolute 1104 7 1110 29" linetype="vertical" id="line13" class="line_4" anchor="top right"/>
                    <Calendar position="absolute 805 8 907 27" id="ipt_acptddfrom" class="input_s_essential" taborder="8" mask="yyyy-mm-dd" anchor="top right"/>
                    <Calendar position="absolute 933 8 1035 27" id="ipt_acptddto" class="input_s_essential" taborder="9" mask="yyyy-mm-dd" anchor="top right" onkeyup="grp_biz_grp_sea_ipt_acptddto_onkeyup"/>
                    <Static text="등록번호 :" position="absolute 533 9 619 26" id="caption1" class="search_name" anchor="top right"/>
                    <Button position="absolute 1123 7 1179 29" id="btn_sea" class="btn1" taborder="10" text="조회" anchor="top right" onclick="grp_biz_grp_sea_btn_sea_onclick"/>
                    <Edit position="absolute 625 8 718 27" id="ipt_seaval" class="input_search" taborder="1" anchor="top right"/>
                    <Combo position="absolute 100 8 251 27" id="cbo_ptnocd" taborder="2" innerdataset="ds_init_cbo_ptnocd" datacolumn="ptnonm" codecolumn="ptnocd" anchor="left top"/>
                    <Static text="~" position="absolute 337 8 349 25" id="caption10" class="search_no_b" anchor="left top"/>
                    <Edit position="absolute 284 8 334 27" id="ipt_fromptno" class="text_center" taborder="4" anchor="left top"/>
                    <Edit position="absolute 382 8 432 27" id="input1" class="text_center" taborder="6" anchor="left top"/>
                    <Edit position="absolute 352 8 379 27" id="input2" class="text_center" taborder="5" anchor="left top"/>
                    <Static text="병리번호 :" position="absolute 6 9 96 26" id="caption9" class="search_name" anchor="left top"/>
                    <Edit position="absolute 254 8 281 27" id="ipt_fromyear" class="text_center" taborder="3" anchor="left top"/>
                    <Combo position="absolute 434 8 520 27" id="combo1" taborder="7" codecolumn="codecolumn" datacolumn="datacolumn" anchor="left top">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn"/>
                          <Column id="datacolumn"/>
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">0</Col>
                            <Col id="datacolumn">CELL블럭</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">1</Col>
                            <Col id="datacolumn">가상블럭</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Combo>
                    <CheckBox position="absolute 1037 10 1094 25" id="chk_prntyn" anchor="top right" text="미발행" truevalue="1" falsevalue="0"/>
                  </Layout>
                </Layouts>
              </Div>
              <Shape position="absolute 0 70 365 76" linetype="horizontal" id="line1" class="line_1" anchor="left top" style="strokepen:3 solid #33bbbbff;"/>
              <Static text="Cassette 목록" position="absolute 3 51 113 68" id="caption3" class="tit_2" anchor="default"/>
              <Grid position="absolute 0 74 365 727" id="grd_cstelist" class="datagrid2" taborder="11" binddataset="ds_grd_cstelist" anchor="left top bottom" autofittype="col" onrbuttondown="grp_biz_grd_cstelist_onrbuttondown" selecttype="multirow" cellclickbound="cell" oncellclick="grp_biz_grd_cstelist_oncellclick">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="30"/>
                      <Column size="90"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="88"/>
                      <Column size="0"/>
                      <Column size="50"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="98"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <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 text="기관코드"/>
                      <Cell col="1" text="ptno"/>
                      <Cell col="2"/>
                      <Cell col="3" displaytype="checkbox" edittype="checkbox"/>
                      <Cell col="4" text="병리번호"/>
                      <Cell col="5" text="검체접수일자"/>
                      <Cell col="6" text="검체접수번호"/>
                      <Cell col="7" text="검체&#10;번호"/>
                      <Cell col="8" text="검 체 명"/>
                      <Cell col="9" text="Cassette&#10;번호"/>
                      <Cell col="10" text="Cassette내용"/>
                      <Cell col="11" text="기존&#10;Slide수"/>
                      <Cell col="12" text="발행할&#10;Slide수"/>
                      <Cell col="13" text="삭제할&#10;Slide수"/>
                      <Cell col="14" text="출력"/>
                      <Cell col="15" text="caption1"/>
                      <Cell col="16" style="align:left middle;" text="슬라이드최종번호"/>
                      <Cell col="17" text="scrno"/>
                      <Cell col="18" text="bizflagcd"/>
                      <Cell col="19" text="workflagcd"/>
                      <Cell col="20" text="acptdd"/>
                      <Cell col="21" text="acptno"/>
                      <Cell col="22" text="spccd"/>
                      <Cell col="23" text="spchistno"/>
                      <Cell col="24" text="pid"/>
                      <Cell col="25" text="patnm"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:instcd"/>
                      <Cell col="1" text="bind:ptno"/>
                      <Cell col="2"/>
                      <Cell col="3" displaytype="checkbox" edittype="checkbox" text="bind:choi"/>
                      <Cell col="4" class="text_center" text="bind:dispptno"/>
                      <Cell col="5" text="bind:spcacptdd"/>
                      <Cell col="6" text="bind:spcacptno"/>
                      <Cell col="7" class="text_center" text="bind:spcacptseqno"/>
                      <Cell col="8" text="bind:spcnm"/>
                      <Cell col="9" class="text_center" text="bind:csteno"/>
                      <Cell col="10" text="bind:cstecnts"/>
                      <Cell col="11" class="text_center" text="bind:bfslidcnt"/>
                      <Cell col="12" displaytype="text" edittype="text" style="align:center;" class="text_center" text="bind:afslidcnt"/>
                      <Cell col="13" displaytype="text" edittype="text" class="text_center" text="bind:delslidcnt" mask="##"/>
                      <Cell col="14" displaytype="checkbox" edittype="checkbox" text="bind:prntstat"/>
                      <Cell col="15" text="bind:prntcsscnts"/>
                      <Cell col="16" text="bind:maxslidno"/>
                      <Cell col="17" text="bind:scrno"/>
                      <Cell col="18" text="bind:bizflagcd"/>
                      <Cell col="19" text="bind:workflagcd"/>
                      <Cell col="20" text="bind:acptdd"/>
                      <Cell col="21" text="bind:acptno"/>
                      <Cell col="22" text="bind:spccd"/>
                      <Cell col="23" text="bind:spchistno"/>
                      <Cell col="24" text="bind:pid"/>
                      <Cell col="25" text="bind:patnm"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static text="발행 및 삭제 슬라이드 목록" position="absolute 369 51 553 67" id="caption7" class="tit_2" anchor="default"/>
              <Shape position="absolute 367 69 1195 77" linetype="horizontal" id="line2" class="line_1" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
              <Button position="absolute 300 49 364 68" id="btn_addcste" class="btn2" taborder="12" text="정보전달" anchor="default" onclick="grp_biz_btn_addcste_onclick"/>
              <Grid position="absolute 367 74 1195 727" id="grd_issslidlist" class="datagrid2" taborder="13" binddataset="ds_grd_issslidlist" anchor="all" autofittype="col" selecttype="multirow" onrbuttondown="grp_biz_grd_issslidlist_onrbuttondown">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="24"/>
                      <Column size="43"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="90"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="67"/>
                      <Column size="0"/>
                      <Column size="60"/>
                      <Column size="80"/>
                      <Column size="0"/>
                      <Column size="160"/>
                      <Column size="147"/>
                      <Column size="160"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <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" displaytype="checkbox" edittype="checkbox"/>
                      <Cell col="2" text="선택&#10;병리번호"/>
                      <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="Cassette&#10;번호"/>
                      <Cell col="10" text="Cassette&#10;내용"/>
                      <Cell col="11" text="Cassette&#10;출력"/>
                      <Cell col="12" text="슬라이드&#10;번호"/>
                      <Cell col="13" text="슬라이드&#10;종류"/>
                      <Cell col="14" text="슬라이드내용"/>
                      <Cell col="15" text="검사항목명"/>
                      <Cell col="16" text="Block번호"/>
                      <Cell col="17" text="슬라이드내용"/>
                      <Cell col="18" text="종류입력"/>
                      <Cell col="19" text="maxcsteno"/>
                      <Cell col="20" text="bizflagcd"/>
                      <Cell col="21" text="acptdd"/>
                      <Cell col="22" text="acptno"/>
                      <Cell col="23" text="testcd"/>
                      <Cell col="24" text="acptitemno"/>
                      <Cell col="25" text="scrno"/>
                      <Cell col="26" text="spccd"/>
                      <Cell col="27" text="spchistno"/>
                      <Cell col="28" text="statsinclflagcd"/>
                      <Cell col="29" text="relaptno"/>
                      <Cell col="30" text="bloccnts"/>
                      <Cell col="31" text="reladispptno"/>
                      <Cell col="32" text="workflagcd"/>
                      <Cell col="33" text="pid"/>
                      <Cell col="34" text="patnm"/>
                    </Band>
                    <Band id="body">
                      <Cell text="expr:currow + 1"/>
                      <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:choi"/>
                      <Cell col="2" displaytype="checkbox" edittype="checkbox" text="bind:ptnochoi"/>
                      <Cell col="3" text="bind:instcd"/>
                      <Cell col="4" text="bind:ptno"/>
                      <Cell col="5" class="text_center" text="bind:dispptno"/>
                      <Cell col="6" text="bind:spcacptdd"/>
                      <Cell col="7" text="bind:spcacptno"/>
                      <Cell col="8" class="text_center" text="bind:spcacptseqno"/>
                      <Cell col="9" class="text_center" text="bind:csteno"/>
                      <Cell col="10" text="bind:bloccnts"/>
                      <Cell col="11" displaytype="text" edittype="text" text="bind:prntcsscnts"/>
                      <Cell col="12" class="text_center" text="bind:slidno"/>
                      <Cell col="13" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:cstekindcd" combodataset="ds_resncdlist" combocodecol="resncd" combodatacol="resncnts"/>
                      <Cell col="14" displaytype="text" edittype="text" text="bind:cstecnts"/>
                      <Cell col="15" text="bind:workattr"/>
                      <Cell col="16" displaytype="text" edittype="text" text="bind:prntcsscnts" combodataset="ds_resncdlist3" combocodecol="resncd" combodatacol="resncnts"/>
                      <Cell col="17" displaytype="normal" edittype="none" text="bind:cstecnts" combodataset="ds_resncdlist2" combocodecol="resncd" combodatacol="resncnts"/>
                      <Cell col="18" displaytype="text" edittype="text" class="text_center" text="bind:ipttype"/>
                      <Cell col="19" text="bind:maxcsteno"/>
                      <Cell col="20" text="bind:bizflagcd"/>
                      <Cell col="21" text="bind:acptdd"/>
                      <Cell col="22" text="bind:acptno"/>
                      <Cell col="23" text="bind:testcd"/>
                      <Cell col="24" text="bind:acptitemno"/>
                      <Cell col="25" text="bind:scrno"/>
                      <Cell col="26" text="bind:spccd"/>
                      <Cell col="27" text="bind:spchistno"/>
                      <Cell col="28" text="bind:statsinclflagcd"/>
                      <Cell col="29" text="bind:relaptno"/>
                      <Cell col="30" text="bind:bloccnts"/>
                      <Cell col="31" text="bind:reladispptno"/>
                      <Cell col="32" text="bind:workflagcd"/>
                      <Cell col="33" text="bind:pid"/>
                      <Cell col="34" text="bind:patnm"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 1141 49 1194 68" id="btn_clear" class="btn2" taborder="14" text="초기화" anchor="top right" onclick="grp_biz_btn_clear_onclick"/>
              <ActiveX position="absolute 625 45 660 75" id="socket" progid="{81e9de7e-90be-4958-bbda-ac731c05aba8}" visible="false" anchor="default" OnError="grp_biz_socket_OnError" OnClose="grp_biz_socket_OnClose" OnConnect="grp_biz_socket_OnConnect"/>
              <MaskEdit position="absolute 245 49 295 68" id="ipt_isscnt" anchor="default" onkeydown="grp_biz_ipt_isscnt_onkeydown" type="number"/>
              <CheckBox position="absolute 122 45 167 65" id="chballyn" visible="false" anchor="default" text="선택" value="false"/>
              <Button position="absolute 560 49 586 68" id="button102" class="icon_left" text="" anchor="default" onclick="grp_biz_button102_onclick"/>
              <Button position="absolute 587 49 613 68" id="button103" class="icon_right" text="" anchor="default" onclick="grp_biz_button103_onclick"/>
              <Combo position="absolute 887 49 1002 68" id="cmb_blocno" anchor="top right" onitemchanged="grp_biz_cmb_blocno_onitemchanged"/>
              <Combo position="absolute 1034 49 1134 68" id="cmb_slidcnts" anchor="top right" onitemchanged="grp_biz_cmb_slidcnts_onitemchanged"/>
              <Combo position="absolute 648 49 728 68" id="cmb_cstekind" innerdataset="ds_init_cmb_cstekind" datacolumn="resncnts" codecolumn="resncd" anchor="top right" onitemchanged="grp_biz_cmb_cstekind_onitemchanged"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 33 1195 68" id="grp_btn" anchor="left top right">
          <Layouts>
            <Layout>
              <Button position="absolute 1138 3 1194 25" id="btn_save" class="btn4" taborder="16" text="삭제" anchor="top right" onclick="grp_btn_btn_save_onclick"/>
              <Button position="absolute 1079 3 1135 25" id="button1" class="btn4" taborder="15" text="발행" anchor="top right" onclick="grp_btn_button1_onclick"/>
              <Shape position="absolute 0 29 1194 35" linetype="horizontal" id="line17" class="line_6" anchor="left top right" style="strokepen:3 solid #9ebed4ff;"/>
              <Radio position="absolute 1001 6 1071 26" id="radio1" columncount="2" codecolumn="codecolumn" datacolumn="datacolumn" anchor="top right">
                <Radio position="absolute 1000 6 1070 26" id="radio1" columncount="2" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
                  <Dataset id="innerdataset">
                    <ColumnInfo>
                      <Column id="codecolumn"/>
                      <Column id="datacolumn"/>
                    </ColumnInfo>
                    <Rows>
                      <Row>
                        <Col id="codecolumn">1</Col>
                        <Col id="datacolumn">정</Col>
                      </Row>
                      <Row>
                        <Col id="codecolumn">2</Col>
                        <Col id="datacolumn">역</Col>
                      </Row>
                    </Rows>
                  </Dataset>
                </Radio>
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn" size="256"/>
                    <Column id="datacolumn" size="256"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">정</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">역</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Static text="발행순서" position="absolute 931 5 996 24" align="align:left middle;" id="caption11" class="cell_1" anchor="top right"/>
              <Static text="출력장비" position="absolute 723 4 788 23" align="align:left middle;" id="caption4" class="cell_1" anchor="top right"/>
              <Combo position="absolute 795 4 929 23" id="cmb_slideqlist" innerdataset="ds_init_cmb_slideqlist" datacolumn="eqnm" codecolumn="eqseqno" anchor="top right"/>
              <Static text="ZEBRA바코드출력" position="absolute 554 5 676 24" align="align:left middle;" id="caption8" class="cell_1" anchor="top right"/>
              <CheckBox position="absolute 680 5 725 25" id="chk_bcodeprnt" anchor="top right"/>
              <CheckBox position="absolute 253 5 324 25" id="chk_seabasecd" anchor="default" text="조직대상"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_cbo_ptnocd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="ptnonm" type="STRING"/>
          <Column id="ptnocd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_issslidlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING"/>
          <Column id="ptnochoi" type="STRING"/>
          <Column id="instcd" type="STRING"/>
          <Column id="ptno" type="STRING"/>
          <Column id="dispptno" type="STRING"/>
          <Column id="spcacptdd" type="STRING"/>
          <Column id="spcacptno" type="STRING"/>
          <Column id="spcacptseqno" type="STRING"/>
          <Column id="csteno" type="STRING"/>
          <Column id="bloccnts" type="STRING"/>
          <Column id="prntcsscnts" type="STRING"/>
          <Column id="slidno" type="STRING"/>
          <Column id="cstekindcd" type="STRING"/>
          <Column id="cstecnts" type="STRING"/>
          <Column id="workattr" type="STRING"/>
          <Column id="prntcsscnts" type="STRING"/>
          <Column id="cstecnts" type="STRING"/>
          <Column id="ipttype" type="STRING"/>
          <Column id="maxcsteno" type="STRING"/>
          <Column id="bizflagcd" type="STRING"/>
          <Column id="acptdd" type="STRING"/>
          <Column id="acptno" type="STRING"/>
          <Column id="testcd" type="STRING"/>
          <Column id="acptitemno" type="STRING"/>
          <Column id="scrno" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="spchistno" type="STRING"/>
          <Column id="statsinclflagcd" type="STRING"/>
          <Column id="relaptno" type="STRING"/>
          <Column id="bloccnts" type="STRING"/>
          <Column id="reladispptno" type="STRING"/>
          <Column id="workflagcd" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="tisscnt" type="STRING" size="256"/>
          <Column id="maxslidno" type="STRING" size="256"/>
          <Column id="prtnblocnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_blocno" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="resncnts" type="STRING"/>
          <Column id="resncnts" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_slidcnts" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="resncnts" type="STRING"/>
          <Column id="resncd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_cstekind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="resncnts" type="STRING"/>
          <Column id="resncd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_slideqlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="eqnm" type="STRING"/>
          <Column id="eqseqno" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hosoenvinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="lendrtnterm" type="STRING" size="256" sumtext="대출반환기간"/>
          <Column id="recvqualmthdcd" type="STRING" size="256" sumtext="수신확인방법"/>
          <Column id="plgydeptcd" type="STRING" size="256" sumtext="병리과"/>
          <Column id="plgyteamcd" type="STRING" size="256" sumtext="병리팀"/>
          <Column id="doctjobgradcd" type="STRING" size="256" sumtext="병리의사직급코드"/>
          <Column id="teamjobgradcd" type="STRING" size="256" sumtext="레지던트직급코드"/>
          <Column id="csteeqmtip" type="STRING" size="256" sumtext="Cassette장비IP"/>
          <Column id="csteeqmtport" type="STRING" size="256" sumtext="Cassette장비Port"/>
          <Column id="slideqmtip" type="STRING" size="256" sumtext="슬라이드장비IP"/>
          <Column id="norcptacptyn" type="STRING" size="256" sumtext="외래미수납접수여부"/>
          <Column id="slidbceqmtip" type="STRING" size="256" sumtext="슬라이드(라벨지)장비IP"/>
          <Column id="acptreaddr" type="STRING" size="256" sumtext="접수시점판독의지정여부"/>
          <Column id="slidbceqmtip2" type="STRING" size="256" sumtext="슬라이드(라벨지)장비IP2"/>
          <Column id="slidbceqmtport2" type="STRING" size="256" sumtext="슬라이드(라벨지)장비Port2"/>
          <Column id="repttitl" type="STRING" size="256" sumtext="보고서제목"/>
          <Column id="repttitl2" type="STRING" size="256" sumtext="자문의뢰제목"/>
          <Column id="plgyrecroom1" type="STRING" size="256" sumtext="병리과기록실1"/>
          <Column id="plgyrecroom2" type="STRING" size="256" sumtext="병리과기록실2"/>
          <Column id="ptnoacptflag" type="STRING" size="256" sumtext="병리번호접수구분"/>
          <Column id="autoacptflagcd" type="STRING" size="256" sumtext="자동접수구분"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="detlrefcrite" type="STRING" size="256"/>
          <Column id="userdeptcd" type="STRING" size="256"/>
          <Column id="prtndirect" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="prtndirect">1</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_userinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING" size="256" sumtext="선택"/>
          <Column id="dutplceinstcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="userid" type="STRING" size="256" sumtext="사용자ID"/>
          <Column id="usernm" type="STRING" size="256" sumtext="사용자명"/>
          <Column id="jobkindcd" type="STRING" size="256" sumtext="직종구분코드"/>
          <Column id="userabbr" type="STRING" size="256" sumtext="직종구분코드"/>
          <Column id="mpphonno" type="STRING" size="256" sumtext="직종구분코드"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_caeqlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="eqnm" type="STRING" size="256" sumtext="장비명"/>
          <Column id="eqip" type="STRING" size="256" sumtext="장비ip"/>
          <Column id="eqport" type="STRING" size="256" sumtext="장비port"/>
          <Column id="eqflag" type="STRING" size="256" sumtext="1:카세트, 2:슬라이드"/>
          <Column id="eqseqno" type="STRING" size="256" sumtext="장비순번"/>
          <Column id="resncd" type="STRING" size="256" sumtext="사유코드"/>
          <Column id="baseflagcd" type="STRING" size="256" sumtext="기초구분코드"/>
          <Column id="dispseqno" type="STRING" size="256" sumtext="표시순서"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_data_sysdtinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sysdd" type="STRING" size="256"/>
          <Column id="systm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="ptnocode" type="STRING" size="256"/>
          <Column id="fromyear" type="STRING" size="256"/>
          <Column id="fromptno" type="STRING" size="256"/>
          <Column id="toyear" type="STRING" size="256"/>
          <Column id="toptno" type="STRING" size="256"/>
          <Column id="acptfromdd" type="STRING" size="256"/>
          <Column id="acpttodd" type="STRING" size="256"/>
          <Column id="seameth" type="STRING" size="256"/>
          <Column id="seavaal" type="STRING" size="256"/>
          <Column id="blockind" type="STRING" size="256"/>
          <Column id="prtflag" type="STRING" size="256"/>
          <Column id="isscnt" type="STRING" size="256"/>
          <Column id="eqseqno" type="STRING" size="256"/>
          <Column id="blocslidcmd" type="STRING" size="256"/>
          <Column id="bloccmb" type="STRING" size="256"/>
          <Column id="slidcmb" type="STRING" size="256"/>
          <Column id="choicstekindcd" type="STRING" size="256"/>
          <Column id="bcodeprnt" type="STRING" size="256"/>
          <Column id="prntyn" type="STRING" size="256"/>
          <Column id="seabasecd" type="STRING" size="256"/>
          <Column id="seaval" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_resncdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING" size="256" sumtext="선택"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="baseflagcd" type="STRING" size="256" sumtext="구분코드"/>
          <Column id="resncd" type="STRING" size="256" sumtext="사유코드"/>
          <Column id="resncnts" type="STRING" size="256" sumtext="사유내용"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_eqinfo_caeqlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="eqnm" type="STRING" size="256"/>
          <Column id="eqip" type="STRING" size="256"/>
          <Column id="eqport" type="STRING" size="256"/>
          <Column id="eqflag" type="STRING" size="256"/>
          <Column id="eqseqno" type="STRING" size="256"/>
          <Column id="resncd" type="STRING" size="256"/>
          <Column id="baseflagcd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_cstelist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING"/>
          <Column id="ptno" type="STRING"/>
          <Column id="choi" type="STRING"/>
          <Column id="dispptno" type="STRING"/>
          <Column id="spcacptdd" type="STRING"/>
          <Column id="spcacptno" type="STRING"/>
          <Column id="spcacptseqno" type="STRING"/>
          <Column id="spcnm" type="STRING"/>
          <Column id="csteno" type="STRING"/>
          <Column id="cstecnts" type="STRING"/>
          <Column id="bfslidcnt" type="STRING"/>
          <Column id="afslidcnt" type="STRING"/>
          <Column id="delslidcnt" type="STRING"/>
          <Column id="prntstat" type="STRING"/>
          <Column id="prntcsscnts" type="STRING"/>
          <Column id="maxslidno" type="STRING"/>
          <Column id="scrno" type="STRING"/>
          <Column id="bizflagcd" type="STRING"/>
          <Column id="workflagcd" type="STRING"/>
          <Column id="acptdd" type="STRING"/>
          <Column id="acptno" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="spchistno" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_btn.chk_seabasecd" propid="value" datasetid="ds_init" columnid="seabasecd"/>
      <BindItem id="item1" compid="grp_biz.grp_sea.cbo_ptnocd" propid="value" datasetid="ds_init" columnid="ptnocode"/>
      <BindItem id="item2" compid="grp_biz.grp_sea.ipt_fromyear" propid="value" datasetid="ds_init" columnid="fromyear"/>
      <BindItem id="item3" compid="grp_biz.ipt_isscnt" propid="value" datasetid="ds_init" columnid=""/>
      <BindItem id="item4" compid="grp_biz.grp_sea.ipt_fromptno" propid="value" datasetid="ds_init" columnid="fromptno"/>
      <BindItem id="item5" compid="grp_biz.grp_sea.input2" propid="value" datasetid="ds_init" columnid="toyear"/>
      <BindItem id="item6" compid="grp_biz.grp_sea.input1" propid="value" datasetid="ds_init" columnid="toptno"/>
      <BindItem id="item7" compid="grp_biz.grp_sea.combo1" propid="value" datasetid="ds_init" columnid="blockind"/>
      <BindItem id="item8" compid="grp_btn.chk_bcodeprnt" propid="value" datasetid="ds_init" columnid="bcodeprnt"/>
      <BindItem id="item9" compid="grp_biz.grp_sea.ipt_seaval" propid="value" datasetid="ds_init" columnid="seaval"/>
      <BindItem id="item10" compid="grp_biz.cmb_cstekind" propid="value" datasetid="ds_init" columnid="choicstekindcd"/>
      <BindItem id="item11" compid="grp_biz.cmb_prnteqmt" propid="value" datasetid="ds_init" columnid="prtflag"/>
      <BindItem id="item12" compid="grp_biz.grp_sea.ipt_acptddfrom" propid="value" datasetid="ds_init" columnid="acptfromdd"/>
      <BindItem id="item13" compid="grp_btn.cmb_slideqlist" propid="value" datasetid="ds_init" columnid="eqseqno"/>
      <BindItem id="item14" compid="grp_biz.grp_sea.ipt_acptddto" propid="value" datasetid="ds_init" columnid="acpttodd"/>
      <BindItem id="item15" compid="grp_biz.cmb_blocno" propid="value" datasetid="ds_init" columnid="bloccmb"/>
      <BindItem id="item16" compid="grp_biz.grp_sea.chk_prntyn" propid="value" datasetid="ds_init" columnid="prntyn"/>
      <BindItem id="item17" compid="grp_biz.cmb_slidcnts" propid="value" datasetid="ds_init" columnid="slidcmb"/>
      <BindItem id="item18" compid="grp_btn.radio1" propid="value" datasetid="ds_hidden" columnid="prtndirect"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LPZ001.xjs";

/******************************************************************
 * Argument          : 
 * Description       : 초기화
 ******************************************************************/
 
function SMLPB00700_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMLPB00700_onload(obj:Form, e:LoadEventInfo)
{
	//grdf_setRowTypeIcon(grp_biz.grd_cstelist, 2);
	ds_grd_cstelist.updatecontrol = false;
	grdf_initGrid(grp_biz.grd_cstelist);
	grdf_initGrid(grp_biz.grd_issslidlist);

	frmf_createPopupMenu("pmn_popupMenu", "pmn_popupMenu_onmenuclick");
	frmf_createPopupMenu("pmn_popupMenu1", "pmn_popupMenu_onmenuclick1");
	fExeInitialize();
}

var sRefPtno = ""; //오른쪽 마우스 버튼을 이용하여 관련검사조회시 사용.

/******************************************************************
 * Argument          : 
 * Description       : 초기화함수
 ******************************************************************/
 function fExeInitialize()
 {	
	//ds_grd_cstelist.clear();
	var sCurDate = "";
	
	dsf_createDsRow( "ds_send",  [{col : "instcd",   val : sysf_getUserInfo("dutplceinstcd")}]);
	
	var oParam = {};
		oParam.id          = "TRLPZ00101";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetHospitalEnvironmentSetInfo";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_hosoenvinfo=hospenvinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPZ00101";
	tranf_submit(oParam);
	
	dsf_createDsRow("ds_send", [{col : "instcd",    val : sysf_getUserInfo("dutplceinstcd")}
							   ,{col : "refflagcd", val : "0"}]);	
	
	var oParam = {};
		oParam.id          = "TRLPZ00109";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetPtNoCdList";
		oParam.inds        = "refdata=ds_send";
		oParam.outds       = "ds_init_cbo_ptnocd=rsltlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPZ00109";
	tranf_submit(oParam);
	
	//---------------------------------------------------------
	// 병원환경정보를 취득하여 병리과와 병리팀 코드를 편집한다.
		lpzfUserDeptCd(ds_hosoenvinfo, ds_hidden);

	
	dsf_createDsRow("ds_send", [{col : "instcd",        val : sysf_getUserInfo("dutplceinstcd")}
	                           ,{col : "userdeptcd",    val : ds_hidden.getColumn(0, "userdeptcd")}
	                           ,{col : "doctjobgradcd", val : ds_hosoenvinfo.getColumn(0, "doctjobgradcd")}
	                           ,{col : "teamjobgradcd", val : ds_hosoenvinfo.getColumn(0, "teamjobgradcd")}]);
	//submit("TRLPZ00105", false);
		var oParam = {};
		oParam.id          = "TRLPZ00105";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetUserInfoList";
		oParam.inds        = "refdata=ds_send";
		oParam.outds       = "ds_userinfolist=reflist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPZ00105";
	tranf_submit(oParam);
	
	//------------------------------------------
	//  Cassette(블록), Slide(슬라이드), 블록번호, 슬라이드내용 목록 조회
	dsf_createDsRow( "ds_send", [{col : "instcd",     val : sysf_getUserInfo("dutplceinstcd")}
	                            ,{col : "baseflagcd", val : "'82', 'S1', 'S2'"}]);		
	var oParam = {};
		oParam.id          = "TRLPZ00103";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetReasonCodeList";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_resncdlist=refrslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPZ00103";
	tranf_submit(oParam);
	
	ds_resncdlist.filter("resncd!='ZZZZ'");
	
	fdsf_createDsFilter("ds_resncdlist1", "ds_resncdlist", "baseflagcd=='82'");
	grp_biz.cmb_cstekind.innerdataset = ds_resncdlist1;
	grp_biz.cmb_cstekind.codecolumn = "resncd";
	grp_biz.cmb_cstekind.datacolumn = "resncnts";
	
	fdsf_createDsFilter("ds_resncdlist2", "ds_resncdlist", "baseflagcd=='S2'");
	grp_biz.cmb_slidcnts.innerdataset = ds_resncdlist2;
	grp_biz.cmb_slidcnts.codecolumn = "resncd";
	grp_biz.cmb_slidcnts.datacolumn = "resncnts";
	
	fdsf_createDsFilter("ds_resncdlist3", "ds_resncdlist", "baseflagcd=='S1'");
	grp_biz.cmb_blocno.innerdataset = ds_resncdlist3;
	grp_biz.cmb_blocno.codecolumn = "resncd";
	grp_biz.cmb_blocno.datacolumn = "resncnts";
	
	//슬라이드 장비 조회
	dsf_createDsRow( "ds_send",    [{col : "instcd",     val : sysf_getUserInfo("dutplceinstcd")}
	                               ,{col : "baseflagcd", val : "EQ"}
	                               ,{col : "seaflagcd",  val : 0}]);
	//submit("TRLPC01802");
	var oParam = {};
		oParam.id          = "TRLPC01802";
		oParam.service     = "plgybaseinfomngtapp.HospEnvSet";
		oParam.method      = "reqGetEqList";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_caeqlist=caeqlist ds_init_cmb_slideqlist=slideqlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPC01802";
	tranf_submit(oParam);
	
	grp_btn.cmb_slideqlist.index = 0;
					
	// 시스템 현재일시를 조회
	fExeSysDtSet();
	
	//------------------------------------------------------------
	sCurDate = ds_data_sysdtinfo.getColumn(0, "sysdd");
	
	ds_init.setColumn(0, "seameth",   "1");							// 검색방법 초기화(0:병리번호, 1:등록번호)
	ds_init.setColumn(0, "seaval",    "");                          // 검색값 초기화
	ds_init.setColumn(0, "blockind",  "0");                         // 블럭종류(0:일반,1:가상)
	ds_init.setColumn(0, "ptnocode",  "");                       
	ds_init.setColumn(0, "fromyear",  sCurDate.substr(2,2));
	ds_init.setColumn(0, "toyear",    sCurDate.substr(2,2));
	ds_init.setColumn(0, "fromptno",  "");
	ds_init.setColumn(0, "toptno",    "");
	ds_init.setColumn(0, "prtflag",   "1");
	ds_init.setColumn(0, "prntyn",    "1");							// 슬라이드 발행된 자료만 조회
	ds_init.setColumn(0, "bcodeprnt", "B");                         // Zebra바코드 출력(Default)
	ds_init.setColumn(0, "seabasecd", "1");                         // 1:조직만 조회
	                                                        
	grp_biz.chballyn.value = true;
	
}

/******************************************************************
 * Argument          : 
 * Description       : 시스템일시 설정 처리 Function
 ******************************************************************/
function fExeSysDtSet()
{
	// 시스템 현재일시를 조회
	var oParam = {};
		oParam.id          = "TRLPZ00102";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetSystemDateTimeInformation";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_data_sysdtinfo=sysdtinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPZ00102";
		tranf_submit(oParam);
		
	ds_init.setColumn(0, "acptfromdd", ds_data_sysdtinfo.getColumn(0, "sysdd"));
	ds_init.setColumn(0, "acpttodd", ds_data_sysdtinfo.getColumn(0, "sysdd"));
}
 
 
function fGetIssCsteList()
{
	var sTemp   = "";
	var sRefVal = ds_init.getColumn(0, "seaval");
	var sFromDD = ds_init.getColumn(0, "acptfromdd");
	var sToDD   = ds_init.getColumn(0, "acpttodd");

	//------------------------------------------
	// 등록번호는 최소 4자리 이상 입력하여야 함.
	if (sRefVal.length> 0)
	{
		if (sRefVal.length < 4)
		{
			sysf_messageBox("등록번호는 최소 4자 이상 입력하여 주십시오! 조회를 ", "E001");
			return false;
		}
	}
	
	//------------------------------------------------
	if( !utlf_isNull(ds_init.getColumn(0, "ptnocode")))
	{
		//------------------------------------------------
		if( utlf_isNull(ds_init.getColumn(0, "fromyear")))
		{
			ds_init.setColumn(0, "fromyear", sFromDD.substr(2,2));
		}
		else
		{
			sTemp = ds_init.getColumn(0, "fromyear");
			ds_init.setColumn(0, "fromyear", sTemp.getLeftPad(2, "0"));
		}
		//----------------------------------------------
		if( utlf_isNull(ds_init.getColumn(0, "toyear")))
		{
			ds_init.setColumn(0, "toyear", sToDD.substr(2,2));
		}
		else
		{
			sTemp = ds_init.getColumn(0, "toyear");
			ds_init.setColumn(0, "toyear", sTemp.getLeftPad(2,"0"));
		}
		//------------------------------------------------
		if( utlf_isNull(ds_init.getColumn(0, "fromptno")))
		{
			ds_init.setColumn(0, "fromptno", "000000");
		}
		else
		{
			sTemp = ds_init.getColumn(0, "fromptno");
			ds_init.setColumn(0, "fromptno", sTemp.getLeftPad(6, "0"));
		}
		//----------------------------------------------
		if(utlf_isNull(ds_init.getColumn(0, "toptno")))
		{
			ds_init.setColumn(0, "toptno", "999999");
		}
		else
		{
			sTemp = ds_init.getColumn(0, "toptno");
			ds_init.setColumn(0, "toptno", sTemp.getLeftPad(6,"0"));
		}
	}
	//--------------------------------------------
	sTemp = ds_init.getColumn(0, "ptnocode");
	
	
	
	dsf_createDsRow( "ds_send",    [{col : "instcd",       val : sysf_getUserInfo("dutplceinstcd")}
	                               ,{col : "acptfromdd",   val : ds_init.getColumn(0, "acptfromdd")}
	                               ,{col : "acpttodd",     val : ds_init.getColumn(0, "acpttodd")}
	                               ,{col : "seamthd",      val : ds_init.getColumn(0, "seameth")}
	                               ,{col : "seaval",       val : ds_init.getColumn(0, "seaval")}
	                               ,{col : "blockind",       val : ds_init.getColumn(0, "blockind")}
	                               ,{col : "ptnocode",       val : sTemp.replace("-", "")}
	                               ,{col : "fromyear",       val : ds_init.getColumn(0, "fromyear")}
	                               ,{col : "fromptno",       val : ds_init.getColumn(0, "fromptno")}
	                               ,{col : "toyear",       val : ds_init.getColumn(0, "toyear")}
	                               ,{col : "toptno",       val : ds_init.getColumn(0, "toptno")}
	                               ,{col : "seabasecd",       val : ds_init.getColumn(0, "seabasecd")}]);
	//---------------------------
	//submit("TRLPB00701", false);
	
	var oParam = {};
		oParam.id          = "TRLPB00701";
		oParam.service     = "plgycsteslidmngtapp.SpcCsteSlid";
		oParam.method      = "reqGetIssCsteList";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_grd_cstelist=rsltlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPB00701";
	tranf_submit(oParam);
	
	if(ds_grd_cstelist.rowcount > 0)
	{
		for(var i = 0; i < ds_grd_cstelist.rowcount; i++)
		{
			ds_grd_cstelist.setColumn(i, "afslidcnt", 1);
			ds_grd_cstelist.setColumn(i, "delslidcnt", 0);
		}
	}
	
	if(ds_init.getColumn(0, "prntyn") == "1")
	{
		fdsf_createDsFilter("ds_grd_cstelist1", "ds_grd_cstelist", "maxslidno == '000'");
		grp_biz.grd_cstelist.binddataset = ds_grd_cstelist1;
	}
	else
	{
		grp_biz.grd_cstelist.binddataset = ds_grd_cstelist;
	}
}
				
function fExeInfoSend() 
{
	var iCurCnt     = -1;
	var iIssCnt     = -1;
	var iDelCnt     = -1;
	var iLastRowNo  = -1;
	var iLastSlidNo = -1;
	var iLoopCnt    = -1;
	var sPtNo       = "";
	var sTempPtNo   = "";
	var sPrtnCsStr  = "";
	
	var strCssNm    = "";   // 정보전달시 중복 블럭 삭제..
	var strCssTxt   = "";   // 중복블럭 카세트 내용
	
	//-------------------------------------------------
	var strSrcNode = ds_grd_cstelist;
	var strDescNode = ds_grd_issslidlist;
	
	//-------------------------------------------------------------------
	for(var iRowNo = 0; iRowNo <= ds_grd_cstelist.rowcount; iRowNo++)
	{
		if(ds_grd_cstelist.getColumn(iRowNo, "choi") == 1)
		{
			//--------------------------------------------------------------------------
			iIssCnt = parseInt(ds_grd_cstelist.getColumn(iRowNo, "afslidcnt"));
			iDelCnt = parseInt(ds_grd_cstelist.getColumn(iRowNo, "delslidcnt"));
			
			//----------------------------------------------------------
			// 발행Slide 수 와 삭제 Slide 수 가 동시에 입력되면 처리불가
			if (iIssCnt > 0 && iDelCnt > 0)
			{
				sysf_messageBox("발행 슬라이드 수 와 삭제 슬라이드 수 를 동시에 처리", "E001");
				return false;
			}
			
			//---------------------------------
			//발행 블록 수 를 입력한 경우 처리
			if (iIssCnt > 0 || iDelCnt > 0) 
			{							
				
				//----------------------------------------------------------------
				if(sTempPtNo != ds_grd_cstelist.getColumn(iRowNo, "ptno"))
				{
					sPtNo += "'" + ds_grd_cstelist.getColumn(iRowNo, "ptno") + "', "
					sTempPtNo = ds_grd_cstelist.getColumn(iRowNo, "ptno");
				}
					
				//----------------------------------------
				iLastRowNo = ds_grd_issslidlist.rowcount;
				iLastSlidNo = parseInt(ds_grd_cstelist.getColumn(iRowNo, "maxslidno"));
				ds_grd_cstelist.setColumn(iRowNo, "prntstat", "true");
				//----------------------------------
				if (iIssCnt > 0) iLoopCnt = iIssCnt;
				if (iDelCnt > 0) iLoopCnt = iDelCnt;
				
				//--------------------------------------
				for(var iNo = 1; iNo <= iLoopCnt; iNo++)  
				{
					var addRw = ds_grd_issslidlist.addRow();
					var arrPostion = new Array();
					arrPostion[0] = addRw;
					grdf_setStatus(grp_biz.grd_issslidlist, "I", arrPostion);
					//-----------------------------------------
					iCurCnt = Number(iLastRowNo)+parseInt(iNo)-1;

					//--------------------------------------------------------------------
					ds_grd_issslidlist.setColumn(iCurCnt, "choi", 1);
					ds_grd_issslidlist.setColumn(iCurCnt, "ptnochoi", false);
					ds_grd_issslidlist.setColumn(iCurCnt, "instcd", ds_grd_cstelist.getColumn(iRowNo, "instcd"));
					ds_grd_issslidlist.setColumn(iCurCnt, "ptno", ds_grd_cstelist.getColumn(iRowNo, "ptno"));
					ds_grd_issslidlist.setColumn(iCurCnt, "dispptno", ds_grd_cstelist.getColumn(iRowNo, "dispptno"));
					ds_grd_issslidlist.setColumn(iCurCnt, "spcacptdd", ds_grd_cstelist.getColumn(iRowNo, "spcacptdd"));
					ds_grd_issslidlist.setColumn(iCurCnt, "spcacptno", ds_grd_cstelist.getColumn(iRowNo, "spcacptno"));
					ds_grd_issslidlist.setColumn(iCurCnt, "spcacptseqno", ds_grd_cstelist.getColumn(iRowNo, "spcacptseqno"));
	
					if(ds_init.getColumn(0, "blockind") == "0")
					{
						ds_grd_issslidlist.setColumn(iCurCnt, "csteno", ds_grd_cstelist.getColumn(iRowNo, "csteno"));
					}
					else
					{
						ds_grd_issslidlist.setColumn(iCurCnt, "csteno", "000");
					}
					
					//----------------
					if (iIssCnt > 0) 
					{
						ds_grd_issslidlist.setColumn(iCurCnt, "slidno", (iNo+iLastSlidNo).toString().getLeftPad(3, "0"));
					} 
					else if (iDelCnt > 0) 
					{
						ds_grd_issslidlist.setColumn(iCurCnt, "slidno", (iLastSlidNo).toString().getLeftPad(3, "0"));
						iLastSlidNo--;
					}
					
					//---------------------------------------------------------------
					switch(ds_grd_cstelist.getColumn(iRowNo, "workflagcd"))
					{
						case "1001" :
						case "1002" :
							ds_grd_issslidlist.setColumn(iCurCnt, "cstekindcd", "1001");
							ds_grd_issslidlist.setColumn(iCurCnt, "cstecnts", "");
							break;
						
						case "1003" :
							if (iLoopCnt > 1)
							{
								if (iNo == 1)
								{
									ds_grd_issslidlist.setColumn(iCurCnt, "cstekindcd", "1002");
									ds_grd_issslidlist.setColumn(iCurCnt, "cstecnts", "");
								}
								else
								{
									ds_grd_issslidlist.setColumn(iCurCnt, "cstekindcd", "1002");
									ds_grd_issslidlist.setColumn(iCurCnt, "cstecnts", "");
								}
							}
							else
							{
								ds_grd_issslidlist.setColumn(iCurCnt, "cstekindcd", "1002");
								ds_grd_issslidlist.setColumn(iCurCnt, "cstecnts", "");
							}
							break;
							
						default : 
							ds_grd_issslidlist.setColumn(iCurCnt, "cstekindcd", "1001");
							ds_grd_issslidlist.setColumn(iCurCnt, "cstecnts", "H&E");
							break;
					}
					
					ds_grd_issslidlist.setColumn(iCurCnt, "tisscnt",  			"1");
					ds_grd_issslidlist.setColumn(iCurCnt, "maxslidno",  		ds_grd_cstelist.getColumn(iRowNo, "maxslidno"));
					ds_grd_issslidlist.setColumn(iCurCnt, "acptdd",  			ds_grd_cstelist.getColumn(iRowNo, "acptdd"));
					ds_grd_issslidlist.setColumn(iCurCnt, "acptno", 			ds_grd_cstelist.getColumn(iRowNo, "acptno"));
					ds_grd_issslidlist.setColumn(iCurCnt, "spccd",  			ds_grd_cstelist.getColumn(iRowNo, "spccd"));
					ds_grd_issslidlist.setColumn(iCurCnt, "spchistno", 			ds_grd_cstelist.getColumn(iRowNo, "spchistno"));
					ds_grd_issslidlist.setColumn(iCurCnt, "testcd",  			"-");
					ds_grd_issslidlist.setColumn(iCurCnt, "acptitemno",  		"0");
					ds_grd_issslidlist.setColumn(iCurCnt, "workattr",  			"-");
					ds_grd_issslidlist.setColumn(iCurCnt, "scrno",  			"20");
					ds_grd_issslidlist.setColumn(iCurCnt, "statsinclflagcd",  	"0");
					ds_grd_issslidlist.setColumn(iCurCnt, "relaptno",  			"-");
					ds_grd_issslidlist.setColumn(iCurCnt, "bloccnts",  			ds_grd_cstelist.getColumn(iRowNo, "cstecnts"));
					ds_grd_issslidlist.setColumn(iCurCnt, "workflagcd",  		ds_grd_cstelist.getColumn(iRowNo, "workflagcd"));
					ds_grd_issslidlist.setColumn(iCurCnt, "pid",              	ds_grd_cstelist.getColumn(iRowNo, "pid"));
					ds_grd_issslidlist.setColumn(iCurCnt, "patnm",           	ds_grd_cstelist.getColumn(iRowNo, "patnm"));
					
					if(ds_grd_cstelist.getColumn(iRowNo, "workflagcd") == "1003")
					{
						ds_grd_issslidlist.setColumn(iCurCnt, "prntcsscnts", "A");
						ds_grd_issslidlist.setColumn(iCurCnt, "maxcsteno", "A");
					}
					else
					{
						ds_grd_issslidlist.setColumn(iCurCnt, "prntcsscnts", ds_grd_cstelist.getColumn(iRowNo, "cstecnts"));
						ds_grd_issslidlist.setColumn(iCurCnt, "maxcsteno", ds_grd_cstelist.getColumn(iRowNo, "cstecnts"));
					}
				} //for
			}//if
		}//if
		
		//-------------------
		// 전달된 블럭 초기화
		ds_grd_cstelist.setColumn(iRowNo, "choi", false);
	}//for

}

/******************************************************************
 * Argument          : 
 * Description       : 블럭 생성정보 전달 처리 Function
 ******************************************************************/
function fExeSlidIssDel(pBizFlagCd)
{
	var sRelaPtNo = "";
	
	//--------------------------------
	//카세트 및 슬라이드 삭제
	if(pBizFlagCd == "SMLPB00700_D")
	{
		for(var iRowNo = 0; iRowNo = ds_grd_issslidlist.rowcount; iRowNo++)
		{
			if(ds_grd_issslidlist.getColumn(iRowNo, "choi") == 1)
			{
				ds_grd_issslidlist.setColumn(iRowNo, "bizflagcd", pBizFlagCd);
				ds_grd_issslidlist.setColumn(iRowNo, "scrno", "20");
				//grd_cstelist.addStatus(iRowNo, "delete");
				grdf_setStatus(grp_biz.grd_cstelist, "D", iRowNo)
			}
		}
		
		//-------------------------------------------------------------------------
		var temp = grdf_getGridUpdateData(grp_biz.grd_cstelist, "all");
		grdf_setStatusColumn(temp, "state");
		dsf_createDs("ds_send_isscstelist");
		ds_send_isscstelist.copyData(temp, true);

		var oParam = {};
			oParam.id          = "TXLPB00702";
			oParam.service     = "plgycsteslidmngtapp.SpcCsteSlid";
			oParam.method      = "reqExeCsteSlidDel";
			oParam.inds        = "refData=ds_send_isscstelist:D";
			oParam.async       = false;
			oParam.callback    = "cf_TXLPB00702";
		tranf_submit(oParam);
		//  슬라이드(Slide) 생성 후 자료 초기화
		fGetIssCsteList();
		
	}
	else
	{
		
		for(var iRowNo =0; iRowNo < ds_grd_issslidlist.rowcount; iRowNo++)
		{
			if(ds_grd_issslidlist.getColumn(iRowNo, "choi") == 1)
			{
				ds_grd_issslidlist.setColumn(iRowNo, "bizflagcd", pBizFlagCd);
				ds_grd_issslidlist.setColumn(iRowNo, "scrno", "20");
				ds_grd_issslidlist.setColumn(iRowNo, "tisscnt", "0");
				ds_grd_issslidlist.setColumn(iRowNo, "prtnblocnm", ds_grd_issslidlist.getColumn(iRowNo, "prntcsscnts"));
			}
		}

		var temp = grdf_getGridUpdateData(grp_biz.grd_issslidlist, "I");
		grdf_setStatusColumn(temp, "state");
		dsf_createDs("ds_send_isscstelist");
		ds_send_isscstelist.copyData(temp, true);
		
		var oParam = {};
			oParam.id          = "TXLPB00701";
			oParam.service     = "plgycsteslidmngtapp.SpcCsteSlid";
			oParam.method      = "reqExeCsteIssDel";
			oParam.inds        = "refData=ds_send_isscstelist";
			oParam.async       = false;
			//oParam.callback    = "cf_TXLPB00701";
		tranf_submit(oParam);
		
			sysf_messageBox("슬라이드(Slide) 발행 및 삭제가 ", "I002");
			
			//-----------------------------
			if (pBizFlagCd == "SMLPB00700_C")
			{
				fExeSlidIss();
			}
			
			//  슬라이드(Slide) 생성 후 자료 초기화
			fGetIssCsteList();
		
	}
}

function cf_TXLPB00702(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    sysf_messageBox("Cassette(블럭) 및 슬라이드(Slide) 삭제가 ", "I002");
}
/******************************************************************
 * Argument          : 
 * Description       : 슬라이드 목록을 장비에 출력 처리 함수 
 ******************************************************************/
function fExeSlidIss() 
{	
	var sInfoNode = ds_hosoenvinfo;
	var sSlidBcIP   = "";
	var sSlidBcPort = "";
	
	
	//장비IP set
	for (var iRowNo = 0; iRowNo < ds_init_cmb_slideqlist.rowcount; iRowNo++)
	{
		if(ds_init.getColumn(0, "eqseqno") == ds_init_cmb_slideqlist.getColumn(iRowNo, "eqseqno"))
		{
			sSlidBcIP  = ds_init_cmb_slideqlist.getColumn(iRowNo, "eqip");
			sSlidBcPort = ds_init_cmb_slideqlist.getColumn(iRowNo, "eqport");
		}
	}
	//----------------------------------------
	if( utlf_isNull(sSlidBcIP) || sSlidBcIP == "-")
	{
		sysf_messageBox("슬라이드 라벨지 장비의 IP주소가 없습니다. 병원별 환경설정에서 ", "C001");
		return false;
	}
	//--------------------------------------------
	if( utlf_isNull(sSlidBcPort) || sSlidBcPort == "-")
	{
		sysf_messageBox("슬라이드 라벨지 장비의 Port번호가 없습니다. 병원별 환경설정에서 ", "C001");
		return false;
	}

	//-------------------------------------
	trace("prot : "+sSlidBcPort);
	trace("ip : "+sSlidBcIP);
	trace("---------");
	grp_biz.socket.connect(sSlidBcIP, sSlidBcPort);
}

/******************************************************************
 * Argument          : 
 * Description       : 블록번호, 슬라이드내용 일괄 입력
 ******************************************************************/
function fSetBlocSlidCnt(pFlag)
{
	for(var iRowNo = 0; iRowNo < ds_grd_issslidlist.rowcount; iRowNo++)
	{
		if(ds_grd_issslidlist.getColumn(iRowNo, "choi") == "1")
		{
			if(pFlag == "B") 
			{
				ds_grd_issslidlist.setColumn(iRowNo, "prntcsscnts", ds_resncdlist3.getColumn(0, "resncnts"));
			}
			else if(pFlag == "C")
			{
				ds_grd_issslidlist.setColumn(iRowNo, "cstecnts", grp_biz.cmb_slidcnts.text);
			}
			
		}
	}
}


/******************************************************************
 * Argument          : 
 * Description       : 슬라이드종류일괄 변경 
 ******************************************************************/
function fExeSlidCharKind()
{	
	var sNode= ds_grd_issslidlist;
	
	for(var iNo = 0; iNo < ds_grd_issslidlist.rowcount; iNo++)
	{
		if(ds_grd_issslidlist.getColumn(iNo, "choi") == 1)
		{
			ds_grd_issslidlist.setColumn(iNo, "cstekindcd", ds_init.getColumn(0, "choicstekindcd"));
		}
	}
}
				
/******************************************************************
 * Argument          : 
 * Description       :  발행 및 삭제Cassette목록 초기화 처리 Function
 ******************************************************************/
function fExeIssDelListInitialize()
{
	ds_grd_issslidlist.clearData();
}

/******************************************************************
 * Argument          : 
 * Description       : 조회 호출함수
 ******************************************************************/
function grp_biz_grp_sea_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetIssCsteList();	
}

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

/******************************************************************
 * Argument          : 
 * Description       : 정보전달 호출함수
 ******************************************************************/
function grp_biz_btn_addcste_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeInfoSend();
}

/******************************************************************
 * Argument          : 
 * Description       : 그리드초기화 호출함수
 ******************************************************************/
function grp_biz_btn_clear_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeIssDelListInitialize();
}

function grp_biz_button102_onclick(obj:Button,  e:ClickEventInfo)
{
	grp_biz.grd_issslidlist.setFormatColProperty(grp_biz.grd_issslidlist.getBindCellIndex("body", "slidno"), "size", 0);
	grp_biz.grd_issslidlist.setFormatColProperty(grp_biz.grd_issslidlist.getBindCellIndex("body", "cstekindcd"), "size", 0);
	grp_biz.cmb_cstekind.visible = false;	
	grp_biz.cmb_blocno.position.left = "748";
	grp_biz.cmb_blocno.position.right = "882";
	grp_biz.cmb_slidcnts.position.left = "884";
	grp_biz.cmb_slidcnts.position.right = "982";
}

function grp_biz_button103_onclick(obj:Button,  e:ClickEventInfo)
{					
	grp_biz.grd_issslidlist.setFormatColProperty(grp_biz.grd_issslidlist.getBindCellIndex("body", "slidno"), "size", 56);
	grp_biz.grd_issslidlist.setFormatColProperty(grp_biz.grd_issslidlist.getBindCellIndex("body", "cstekindcd"), "size", 80);
	grp_biz.cmb_cstekind.visible = true;
	grp_biz.cmb_blocno.position.left = "887";
	grp_biz.cmb_blocno.position.right = "1002";
	grp_biz.cmb_slidcnts.position.left = "1034";
	grp_biz.cmb_slidcnts.position.right = "1134";

}

/******************************************************************
 * Argument          : 
 * Description       : 발행 호출함수
 ******************************************************************/
function grp_btn_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeSlidIssDel("SMLPB00700_C");	
}


/******************************************************************
 * Argument          : 
 * Description       : 삭제 호출함수
 ******************************************************************/
function grp_btn_btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	if ( sysf_messageBox("선택한 Cassette의 슬라이드(Slide) 삭제를", "Q004") == 6 )
	{
		fExeSlidIssDel("SMLPB00700_D");				
	}
}

/******************************************************************
 * Argument          : 
 * Description       : Cassette 목록 우클릭 함수
 ******************************************************************/
function grp_biz_grd_cstelist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	if(e.row > -1)
	{	
		frmf_setPopupMenuDs( "pmn_popupMenu",  [{id: "fSelectList",   level: "0", title: "선택"}
											   ,{id: "fDeSelectList", level: "0", title: "해제"}]);
		pmn_popupMenu.trackPopup(e.screenX,e.screenY);
	}
}

//우클릭조회
function pmn_popupMenu_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{
	if(e.id == "fSelectList")
	{
		fSelectList();
	}
	else if(e.id == "fDeSelectList")
	{
		fDeSelectList();
	}
}

//다중선택함수
function fSelectList()
{
	var SelectedRows = grdf_getSelectedRows(grp_biz.grd_cstelist);

	for(var i = 0; i < SelectedRows.length; i++)
	{
		ds_grd_cstelist.setColumn(SelectedRows[i], "choi", 1);
	}
}

function fDeSelectList()
{	
	var SelectedRows = grdf_getSelectedRows(grp_biz.grd_cstelist);

	for(var i = 0; i < SelectedRows.length; i++)
	{
		ds_grd_cstelist.setColumn(SelectedRows[i], "choi", 0);
	}
}

function grp_biz_grd_issslidlist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	if(e.row > -1)
	{	
		
		frmf_setPopupMenuDs( "pmn_popupMenu1",  [{id: "fSelectList1",   level: "0", title: "선택"}
											    ,{id: "fDeSelectList1", level: "0", title: "해제"}]);

		pmn_popupMenu1.trackPopup(e.screenX,e.screenY);
	}
}

//우클릭조회
function pmn_popupMenu_onmenuclick1(obj:PopupMenu, e:MenuClickEventInfo)
{
	if(e.id == "fSelectList1")
	{
		fSelectList1();
	}
	else if(e.id == "fDeSelectList1")
	{
		fDeSelectList1();
	}
}

function fSelectList1()
{
	var SelectedRows = grdf_getSelectedRows(grp_biz.grd_issslidlist);
	trace("SelectedRows="+SelectedRows);
	for(var i = 0; i < SelectedRows.length; i++)
	{
		ds_grd_issslidlist.setColumn(SelectedRows[i], "choi", 1);
	}
}

function fDeSelectList1()
{	
	
	var SelectedRows = grdf_getSelectedRows(grp_biz.grd_issslidlist);
	for(var i = 0; i < SelectedRows.length; i++)
	{
		ds_grd_issslidlist.setColumn(SelectedRows[i], "choi", 0);
	}
}



function grp_biz_cmb_cstekind_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fExeSlidCharKind();
}

function grp_biz_cmb_blocno_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fSetBlocSlidCnt("B");
}

function grp_biz_cmb_slidcnts_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fSetBlocSlidCnt("C");
						
	for(var iNo=0; iNo <=ds_grd_issslidlist.rowcount; iNo++)
	{
		ds_grd_issslidlist.setColumn(iNo, "choi", "");
	}
}

function grp_biz_ipt_isscnt_onkeydown(obj:MaskEdit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		fExeIssCntKeyPress();
	}
}

function fExeIssCntKeyPress()
{
	
	var sNode = ds_grd_cstelist;
	
	ds_init.setColumn(0, "isscnt", grp_biz.ipt_isscnt.text);

	if( utlf_isNull(ds_init.getColumn(0, "isscnt"))) return false;
	
	for (var iNo=0; iNo < sNode.rowcount; iNo++)
	{
		if(sNode.getColumn(iNo, "choi") == "1")
		{
			sNode.setColumn(iNo, "afslidcnt", ds_init.getColumn(0, "isscnt"));
			sNode.setColumn(iNo, "choi", "0");
		}
	}
}
function grp_biz_grd_cstelist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	if(e.col == 3)
	{
		if(ds_grd_cstelist.getColumn(ds_grd_cstelist.rowposition, "choi") == "1")
		{
			ds_grd_cstelist.setRowType(ds_grd_cstelist.rowposition, 4);
		}
	}
}

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

/*소켓 close 이벤트*/
function grp_biz_socket_OnClose(obj:ActiveX, e)
{
	isConnected = false;	// 접속 여부 false
	grp_biz.socket.close();
	ds_grd_issslidlist.clearData();
	trace("close");
}

/*소켓 연결 이벤트*/
function grp_biz_socket_OnConnect(obj:ActiveX, e)
{
	fExeSlidSend();
}

// Socket으로 슬라이드정보 전송
function fExeSlidSend()
{	
	var iMaxRowCnt = 0;
	var iIssRowCnt = 0;
	var sSlidNode = ds_grd_issslidlist;
	
	iMaxRowCnt = ds_grd_issslidlist.rowcount;
	
	// 발행대상 건수 검사	
	for(var iRowNo = 0; iRowNo < iMaxRowCnt; iRowNo++)
	{
		if(ds_grd_issslidlist.getColumn(iRowNo, "choi") == "1")
		{
			iIssRowCnt++;
		}
	}
	trace(ds_grd_issslidlist.rowcount);
	if(ds_hidden.getColumn(0, "prtndirect") != "2")
	{
		//정방향출력
		for(var iRowNo = 0; iRowNo < iMaxRowCnt; iRowNo++)
		{
			if(ds_grd_issslidlist.getColumn(iRowNo, "choi") == "1")
			{
				sSendMsg  = "";
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "ptno") + "▦";						// 병리번호
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "dispptno") + "▦";					// 표시병리번호
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "spcacptseqno") + "▦";				// 검체일련번호
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "csteno") + "▦";						// 블럭번호
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "slidno") + "▦";						// 슬라이드번호
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "prntcsscnts") + "▦";					// 블럭내용
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "cstecnts") + "▦";					// 슬라이드내용
				
				//------------------
				// 전송종료여부 설정
				if (iRowNo == iIssRowCnt)
				{
					sSendMsg += "Y" + "▦";
				}
				else
				{
					sSendMsg += "N" + "▦";
				}							
				
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "pid") + "▦";						// 환자번호
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "patnm") + "▦";					// 환자명
				
				if (grp_btn.chk_bcodeprnt.value  == "B")	   // 바코드출력여부 (B :출력, -: 미출력)
				{
					sSendMsg += "B" + "▩";
				} else {
					sSendMsg += "-" + "▩";
				}
				trace("sSend="+sSendMsg);
				grp_biz.socket.sendString(sSendMsg);											// 전송한다.
			}
		}
	}
	else	//역방향 출력
	{
		for(var iRowNo = iMaxRowCnt-1; iRowNo >= 0; iRowNo--)
		{
			trace("iRowNo="+iRowNo);
			if(ds_grd_issslidlist.getColumn(iRowNo, "choi") == "1")
			{
				sSendMsg  = "";
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "ptno") + "▦";			// 병리번호
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "dispptno") + "▦";			// 표시병리번호
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "spcacptseqno") + "▦";			// 검체일련번호
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "csteno") + "▦";			// 블럭번호
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "slidno") + "▦";			// 슬라이드번호
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "prntcsscnts") + "▦";			// 블럭내용
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "cstecnts") + "▦";			// 슬라이드내용
				//sSendMsg += ds_init.getColumn(0, "bcodeprnt") + "▦";			// 바코드출력여부 (B :출력, -: 미출력)
				
				// 전송종료여부 설정
				if (iRowNo == iIssRowCnt)
				{
					sSendMsg += "Y" + "▦";
				}
				else
				{
					sSendMsg += "N" + "▦";
				}							
			
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "pid") + "▦";					// 환자번호
				sSendMsg += ds_grd_issslidlist.getColumn(iRowNo, "patnm") + "▦";					// 환자명
								
				if(grp_btn.chk_bcodeprnt.value  == "B")	   // 바코드출력여부 (B :출력, -: 미출력)
				{
					sSendMsg += "B" + "▩";
				}
				else
				{
					sSendMsg += "-" + "▩";
				}
				trace("sSendMsg :"+sSendMsg);
				grp_biz.socket.sendString(sSendMsg);											// 전송한다.
			}
		}
	}						
	//----------
	// 소켓 닫기
	grp_biz_socket_OnClose();
	//socket.close();					
}
]]></Script>
  </Form>
</FDL>