YNU_JEUS/app_home/himed/xpapps/lis/plgyacptmngtxp/xp/SMLPJ02200_처방및검체변경.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLPJ02200" position="absolute 0 0 1198 784" titletext="처방 및 검체 변경" oninit="SMLPJ02200_oninit" onload="SMLPJ02200_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 40 1197 784" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Div position="absolute 0 10 1194 45" align="align:center top;" id="grp_sea" class="div_SA" anchor="default">
                <Layouts>
                  <Layout>
                    <Static text="접수일자 :" position="absolute 797 10 868 26" id="caption2" class="search_name" anchor="default"/>
                    <Static text="등록번호 :" position="absolute 519 9 591 26" id="caption4" class="search_name" anchor="default"/>
                    <Static text="~" position="absolute 980 10 992 27" id="caption5" class="search_no_b" anchor="default"/>
                    <Shape position="absolute 1104 7 1110 29" linetype="vertical" id="line13" class="line_4" anchor="default"/>
                    <Calendar position="absolute 871 8 973 27" id="ipt_acptddfrom" class="input_s_essential" taborder="7" mask="yyyy-mm-dd" anchor="default"/>
                    <Calendar position="absolute 999 8 1101 27" id="ipt_acptddto" class="input_s_essential" taborder="8" mask="yyyy-mm-dd" onkeyup="grp_biz_grp_sea_ipt_acptddto_onkeyup" anchor="default"/>
                    <Button position="absolute 1123 7 1179 29" id="btn_sea" class="btn1" taborder="9" text="조회" onclick="grp_biz_grp_sea_btn_sea_onclick" anchor="default"/>
                    <Edit position="absolute 597 8 727 27" id="ipt_seaval" class="input_search" taborder="6" anchor="default" onkeyup="grp_biz_grp_sea_ipt_seaval_onkeyup"/>
                    <Combo position="absolute 93 8 254 27" id="cbo_ptnocd" taborder="1" innerdataset="ds_init_cbo_ptnocd" datacolumn="ptnonm" codecolumn="ptnocd" anchor="default"/>
                    <Edit position="absolute 287 8 345 27" id="ipt_fromptno" class="text_center" taborder="3" anchor="default" maxlength="6"/>
                    <Static text="병리번호 :" position="absolute 15 9 86 26" id="caption8" class="search_name" anchor="default"/>
                    <Static text="~" position="absolute 349 11 361 28" id="caption11" class="search_no_b" anchor="default"/>
                    <Edit position="absolute 393 8 451 27" id="input1" class="text_center" taborder="5" anchor="default" maxlength="6"/>
                    <Edit position="absolute 363 8 390 27" id="input2" class="text_center" taborder="4" anchor="default" maxlength="2"/>
                    <Edit position="absolute 257 8 284 27" id="ipt_fromyear" class="text_center" taborder="2" anchor="default" maxlength="2"/>
                  </Layout>
                </Layouts>
              </Div>
              <Shape position="absolute 0 70 1194 76" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;" anchor="default"/>
              <Static text="처방리스트" position="absolute 3 53 93 71" id="caption3" class="tit_2" anchor="default"/>
              <Static text="전달검체 리스트" position="absolute 3 248 126 264" id="caption7" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 266 644 272" linetype="horizontal" id="line2" class="line_1" anchor="default" style="strokepen:3 solid #33bbbbff;"/>
              <Shape position="absolute 648 266 1194 272" linetype="horizontal" id="line4" class="line_1" anchor="default" style="strokepen:3 solid #33bbbbff;"/>
              <Static text="임상정보" position="absolute 649 248 728 264" id="caption9" class="tit_2" anchor="default"/>
              <TextArea position="absolute 648 270 1194 535" id="textarea1" taborder="15" anchor="default"/>
              <TextArea position="absolute 648 562 1194 741" id="textarea2" taborder="16" anchor="default"/>
              <Shape position="absolute 648 558 1194 564" linetype="horizontal" id="line5" class="line_1" anchor="default" style="strokepen:3 solid #33bbbbff;"/>
              <Static text="Comments" position="absolute 649 541 740 557" id="caption10" class="tit_2" anchor="default"/>
              <Grid position="absolute 0 74 1194 239" id="grd_acptprcplist" class="datagrid2" taborder="10" binddataset="ds_grd_acptprcplist" oncellclick="grp_biz_grd_acptprcplist_oncellclick" onselectchanged="grp_biz_grd_acptprcplist_onselectchanged" anchor="default" cellsizingtype="col" oncloseup="grp_biz_grd_acptprcplist_oncloseup" cellclickbound="control" selecttype="row" autoenter="select" onkeyup="grp_biz_grd_acptprcplist_onkeyup">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="23"/>
                      <Column size="80"/>
                      <Column size="0"/>
                      <Column size="80"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="0"/>
                      <Column size="80"/>
                      <Column size="70"/>
                      <Column size="60"/>
                      <Column size="0"/>
                      <Column size="87"/>
                      <Column size="110"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="0"/>
                      <Column size="80"/>
                      <Column size="0"/>
                      <Column size="70"/>
                      <Column size="80"/>
                      <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="90"/>
                      <Column size="0"/>
                      <Column size="90"/>
                      <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="24" band="head"/>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell text="기관코드"/>
                      <Cell col="1" text="병리번호"/>
                      <Cell col="2" rowspan="2" taborder="undefined"/>
                      <Cell col="3" rowspan="2" text="병리번호" taborder="undefined"/>
                      <Cell col="4" text="relaptno"/>
                      <Cell col="5" rowspan="2" text="관련병리번호" taborder="undefined"/>
                      <Cell col="6" rowspan="2" text="등록번호" taborder="undefined"/>
                      <Cell col="7" rowspan="2" text="환자성명" taborder="undefined"/>
                      <Cell col="8" text="prcpgenrflag"/>
                      <Cell col="9" rowspan="2" text="환자&#10;구분" taborder="undefined"/>
                      <Cell col="10" rowspan="2" text="처방일자" taborder="undefined"/>
                      <Cell col="11" rowspan="2" text="처방&#10;시간" taborder="undefined"/>
                      <Cell col="12" text="진료일자"/>
                      <Cell col="13" colspan="2" text="변 경 전" taborder="undefined"/>
                      <Cell col="15" colspan="2" text="변 경 후" taborder="undefined"/>
                      <Cell col="17" text="처방과코드"/>
                      <Cell col="18" rowspan="2" text="진료과" taborder="undefined"/>
                      <Cell col="19" text="진료의ID"/>
                      <Cell col="20" rowspan="2" text="진료의" taborder="undefined"/>
                      <Cell col="21" rowspan="2" text="퇴원(예정)&#10;일자" taborder="undefined"/>
                      <Cell col="22" text="execprcpuniqno"/>
                      <Cell col="23" text="acptdd"/>
                      <Cell col="24" text="acptno"/>
                      <Cell col="25" text="acptitemno"/>
                      <Cell col="26" text="spcacptdd"/>
                      <Cell col="27" text="spcacptno"/>
                      <Cell col="28" text="reqcnts"/>
                      <Cell col="29" text="ptnocd"/>
                      <Cell col="30" text="cretno"/>
                      <Cell col="31" text="prcpno"/>
                      <Cell col="32" text="reqfrmno"/>
                      <Cell col="33" text="wardcd"/>
                      <Cell col="34" text="roomcd"/>
                      <Cell col="35" text="grosdrid"/>
                      <Cell col="36" text="grosplgyid"/>
                      <Cell col="37" text="bfspccd"/>
                      <Cell col="38" rowspan="2" text="변경전 검체" taborder="undefined"/>
                      <Cell col="39" text="변경전 검체"/>
                      <Cell col="40" rowspan="2" text="변경후 검체" taborder="undefined"/>
                      <Cell col="41" text="변경 사유"/>
                      <Cell col="42" text="acptstatcd"/>
                      <Cell col="43" text="afspcnm"/>
                      <Cell col="44" text="afspcabbr"/>
                      <Cell col="45" text="caption1"/>
                      <Cell col="46" text="caption2"/>
                      <Cell col="47" text="oprsrvno"/>
                      <Cell col="48"/>
                      <Cell col="49"/>
                      <Cell row="1" text="기관코드"/>
                      <Cell row="1" col="1" text="병리번호"/>
                      <Cell row="1" col="4" text="relaptno"/>
                      <Cell row="1" col="8" text="prcpgenrflag"/>
                      <Cell row="1" col="12" text="진료일자"/>
                      <Cell row="1" col="13" text="처방코드"/>
                      <Cell row="1" col="14" text="처  방  명"/>
                      <Cell row="1" col="15" text="처방코드"/>
                      <Cell row="1" col="16" text="처  방  명"/>
                      <Cell row="1" col="17" text="처방과코드"/>
                      <Cell row="1" col="19" text="진료의ID"/>
                      <Cell row="1" col="22" text="execprcpuniqno"/>
                      <Cell row="1" col="23" text="acptdd"/>
                      <Cell row="1" col="24" text="acptno"/>
                      <Cell row="1" col="25" text="acptitemno"/>
                      <Cell row="1" col="26" text="spcacptdd"/>
                      <Cell row="1" col="27" text="spcacptno"/>
                      <Cell row="1" col="28" text="reqcnts"/>
                      <Cell row="1" col="29" text="ptnocd"/>
                      <Cell row="1" col="30" text="cretno"/>
                      <Cell row="1" col="31" text="prcpno"/>
                      <Cell row="1" col="32" text="reqfrmno"/>
                      <Cell row="1" col="33" text="wardcd"/>
                      <Cell row="1" col="34" text="roomcd"/>
                      <Cell row="1" col="35" text="grosdrid"/>
                      <Cell row="1" col="36" text="grosplgyid"/>
                      <Cell row="1" col="37" text="bfspccd"/>
                      <Cell row="1" col="39" text="변경전 검체"/>
                      <Cell row="1" col="41" text="변경 사유"/>
                      <Cell row="1" col="42" text="acptstatcd"/>
                      <Cell row="1" col="43" text="afspcnm"/>
                      <Cell row="1" col="44" text="afspcabbr"/>
                      <Cell row="1" col="45" text="caption1"/>
                      <Cell row="1" col="46" text="caption2"/>
                      <Cell row="1" col="47" text="oprsrvno"/>
                      <Cell row="1" col="48"/>
                      <Cell row="1" col="49"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:instcd"/>
                      <Cell col="1" text="bind:ptno"/>
                      <Cell col="2"/>
                      <Cell col="3" class="text_center" text="bind:dispptno"/>
                      <Cell col="4" text="bind:relaptno"/>
                      <Cell col="5" text="bind:disprelaptno"/>
                      <Cell col="6" class="text_center" text="bind:pid"/>
                      <Cell col="7" class="text_center" text="bind:patnm"/>
                      <Cell col="8" text="bind:prcpgenrflag"/>
                      <Cell col="9" class="text_center" text="bind:patflagnm"/>
                      <Cell col="10" displaytype="date" edittype="date" class="text_center" text="bind:prcpdd" mask="yyyy-MM-dd"/>
                      <Cell col="11" displaytype="date" edittype="date" class="text_center" text="bind:prcptm" mask="hh:mm:ss"/>
                      <Cell col="12" class="text_center" text="bind:orddd"/>
                      <Cell col="13" style="align:left middle;" text="bind:bfprcpcd"/>
                      <Cell col="14" style="align:left middle;" text="bind:bfprcpnm"/>
                      <Cell col="15" displaytype="combo" edittype="combo" style="align:left middle;" text="bind:afprcpcd" combodataset="ds_testitemlist" combocodecol="testcd" combodatacol="testcd" combotype="search" id="colafprcpcd"/>
                      <Cell col="16" displaytype="combo" edittype="combo" style="align:left middle;" text="bind:afprcpnm" combodataset="ds_testitemlist" combocodecol="testcd" combodatacol="testengnm" combodisplayrowcount="27"/>
                      <Cell col="17" text="bind:orddeptcd"/>
                      <Cell col="18" text="bind:orddeptnm"/>
                      <Cell col="19" text="bind:orddrid"/>
                      <Cell col="20" text="bind:orddrnm"/>
                      <Cell col="21" style="align:left middle;" text="bind:dschdd"/>
                      <Cell col="22" text="bind:execprcpuniqno"/>
                      <Cell col="23" text="bind:acptdd"/>
                      <Cell col="24" text="bind:acptno"/>
                      <Cell col="25" text="bind:acptitemno"/>
                      <Cell col="26" text="bind:spcacptdd"/>
                      <Cell col="27" text="bind:spcacptno"/>
                      <Cell col="28" text="bind:reqcnts"/>
                      <Cell col="29" text="bind:ptnocd"/>
                      <Cell col="30" text="bind:cretno"/>
                      <Cell col="31" text="bind:prcpno"/>
                      <Cell col="32" text="bind:reqfrmno"/>
                      <Cell col="33" text="bind:wardcd"/>
                      <Cell col="34" text="bind:roomcd"/>
                      <Cell col="35" text="bind:grosdrid"/>
                      <Cell col="36" text="bind:grosplgyid"/>
                      <Cell col="37" text="bind:bfspccd" enable="false"/>
                      <Cell col="38" style="align:left middle;" text="bind:spcnm"/>
                      <Cell col="39" text="bind:bfspcabbr"/>
                      <Cell col="40" displaytype="combo" edittype="combo" text="bind:afspccd" combodataset="ds_reprspclist" combocodecol="spccd" combodatacol="spcnm"/>
                      <Cell col="41" text="bind:tempcol19"/>
                      <Cell col="42" text="bind:acptstatcd"/>
                      <Cell col="43" text="bind:afspcnm"/>
                      <Cell col="44" text="bind:afspcabbr"/>
                      <Cell col="45" text="bind:grostestdd"/>
                      <Cell col="46" text="bind:grostesttm"/>
                      <Cell col="47" text="bind:oprsrvno"/>
                      <Cell col="48"/>
                      <Cell col="49"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Grid position="absolute 0 270 644 741" id="grd_acptspclist" class="datagrid2" taborder="11" binddataset="ds_grd_acptspclist" autofittype="none" anchor="default" oncloseup="grp_biz_grd_acptspclist_oncloseup" cellsizingtype="col" autoenter="select">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="18"/>
                      <Column size="60"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="80"/>
                      <Column size="156"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="80"/>
                      <Column size="140"/>
                      <Column size="107"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="28" band="head"/>
                      <Row size="49"/>
                    </Rows>
                    <Band id="head">
                      <Cell text="기관코드"/>
                      <Cell col="1" text="검체접수일자"/>
                      <Cell col="2" text="검체접수번호"/>
                      <Cell col="3"/>
                      <Cell col="4" text="검체순번"/>
                      <Cell col="5" text="ordspcacptseqno"/>
                      <Cell col="6" text="spchistno"/>
                      <Cell col="7" text="spcacpttm"/>
                      <Cell col="8" text="검체코드"/>
                      <Cell col="9" text="검  체  명"/>
                      <Cell col="10" text="바코드번호"/>
                      <Cell col="11" text="검체상태"/>
                      <Cell col="12" text="spcadddd"/>
                      <Cell col="13" text="spcaddtm"/>
                      <Cell col="14" text="spcaddid"/>
                      <Cell col="15" text="delflagcd"/>
                      <Cell col="16" text="추가여부"/>
                      <Cell col="17" text="변      경&#10;검체코드"/>
                      <Cell col="18" text="변   경&#10;검체명"/>
                      <Cell col="19" text="선택"/>
                      <Cell col="20" text="ptno"/>
                      <Cell col="21" text="delyn"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:instcd"/>
                      <Cell col="1" text="bind:spcacptdd"/>
                      <Cell col="2" text="bind:spcacptno"/>
                      <Cell col="3"/>
                      <Cell col="4" class="text_center" text="expr:currow + 001"/>
                      <Cell col="5" text="bind:orgspcacptseqno"/>
                      <Cell col="6" text="bind:spchistno"/>
                      <Cell col="7" text="bind:spcacpttm"/>
                      <Cell col="8" class="text_center" text="bind:bfspccd"/>
                      <Cell col="9" style="align:left middle;" text="bind:bfspcnm"/>
                      <Cell col="10" text="bind:spcbarcdno"/>
                      <Cell col="11" text="bind:acptstatcd"/>
                      <Cell col="12" text="bind:spcadddd"/>
                      <Cell col="13" text="bind:spcaddtm"/>
                      <Cell col="14" text="bind:spcaddid"/>
                      <Cell col="15" text="bind:delflagcd"/>
                      <Cell col="16" text="bind:addyn"/>
                      <Cell col="17" class="text_center" text="bind:afspccd"/>
                      <Cell col="18" displaytype="text" edittype="text" text="bind:afspcnm"/>
                      <Cell col="19" displaytype="combo" edittype="combo" text="bind:choispccd" combodataset="ds_detlspclist" combocodecol="spccd" combodatacol="spcnm" combodisplayrowcount="20"/>
                      <Cell col="20" text="bind:ptno"/>
                      <Cell col="21" text="bind:delyn"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 423 245 465 264" id="btn_spcadd" class="btn2" taborder="12" text="추가" onclick="grp_biz_btn_spcadd_onclick" anchor="default"/>
              <Button position="absolute 468 245 510 264" id="btn_spcdel" class="btn2" taborder="13" text="삭제" onclick="grp_biz_btn_spcdel_onclick" anchor="default"/>
              <Button position="absolute 513 245 577 264" id="btn_delcncl" class="btn2" taborder="14" text="삭제취소" anchor="default" onclick="grp_biz_btn_delcncl_onclick"/>
              <Button position="absolute 580 245 644 264" id="btn_spcsave" class="btn2" taborder="12" text="검체저장" onclick="grp_biz_btn_spcsave_onclick" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_save" taborder="1" text="변경" class="btn4" position="absolute 1138 23 1194 45" onclick="btn_save_onclick"/>
        <Shape id="line17" linetype="horizontal" class="line_6" position="absolute 0 46 1194 52" style="strokepen:3 solid #9ebed4ff;"/>
        <Combo id="cmb_readdr" taborder="2" innerdataset="ds_init_cmb_readdr" codecolumn="userid" datacolumn="usernm" visible="true" position="absolute 1045 24 1120 43"/>
        <Static id="cap_orddrid" text="후인증 의사" class="cell_1" visible="true" position="absolute 963 22 1044 45"/>
        <Static id="caption6" text="처방 및 검체 변경" class="tit_1" position="absolute 0 0 140 25"/>
      </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_acptprcplist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grd_acptprcplist_oncolumnchanged">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="ptno" type="STRING" size="256" sumtext="병리번호"/>
          <Column id="dispptno" type="STRING" size="256" sumtext="표시병리번호"/>
          <Column id="relaptno" type="STRING" size="256" sumtext="관련병리번호"/>
          <Column id="disprelaptno" type="STRING" size="256" sumtext="표시관련병리번호"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="patnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="prcpgenrflag" type="STRING" size="256" sumtext="처방발생구분"/>
          <Column id="patflagnm" type="STRING" size="256" sumtext="환자구분명"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
          <Column id="prcptm" type="STRING" size="256" sumtext="처방시간"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
          <Column id="bfprcpcd" type="STRING" size="256" sumtext="변경전 처방코드"/>
          <Column id="bfprcpnm" type="STRING" size="256" sumtext="변경전 처방명"/>
          <Column id="afprcpcd" type="STRING" size="256" sumtext="변경후 처방코드"/>
          <Column id="afprcpnm" type="STRING" size="256" sumtext="변경후 처방명"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과명"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="진료의ID"/>
          <Column id="orddrnm" type="STRING" size="256" sumtext="진료의명"/>
          <Column id="dschdd" type="STRING" size="256" sumtext="퇴원(예정)일자"/>
          <Column id="execprcpuniqno" type="STRING" size="256" sumtext="실시처방유일번호"/>
          <Column id="acptdd" type="STRING" size="256" sumtext="접수일자"/>
          <Column id="acptno" type="STRING" size="256" sumtext="접수번호"/>
          <Column id="acptitemno" type="STRING" size="256" sumtext="접수항목번호"/>
          <Column id="spcacptdd" type="STRING" size="256" sumtext="검체접수일자"/>
          <Column id="spcacptno" type="STRING" size="256" sumtext="검체접수번호"/>
          <Column id="reqcnts" type="STRING" size="256" sumtext="의뢰지내용"/>
          <Column id="ptnocd" type="STRING" size="256" sumtext="병리번호코드"/>
          <Column id="cretno" type="STRING" size="256" sumtext="원무키번호"/>
          <Column id="prcpno" type="STRING" size="256" sumtext="처방번호"/>
          <Column id="reqfrmno" type="STRING" size="256" sumtext="처방의뢰지번호"/>
          <Column id="wardcd" type="STRING" size="256" sumtext="병동코드"/>
          <Column id="roomcd" type="STRING" size="256" sumtext="병실코드"/>
          <Column id="grosdrid" type="STRING" size="256" sumtext="육안검사의ID"/>
          <Column id="grosplgyid" type="STRING" size="256" sumtext="육안병리사ID"/>
          <Column id="bfspccd" type="STRING" size="256" sumtext="변경전 검체코드"/>
          <Column id="spcnm" type="STRING" size="256" sumtext="변경전 검체명"/>
          <Column id="spcabbr" type="STRING" size="256" sumtext="변경전 검체약어"/>
          <Column id="afspccd" type="STRING" size="256" sumtext="변경후 검체코드"/>
          <Column id="afspcnm" type="STRING" size="256" sumtext="변경후 검체명"/>
          <Column id="afspcabbr" type="STRING" size="256" sumtext="변경후 검체약어"/>
          <Column id="grostestdd" type="STRING" size="256" sumtext="육안검사일자"/>
          <Column id="grostesttm" type="STRING" size="256" sumtext="육안검사시간"/>
          <Column id="oprsrvno" type="STRING" size="256" sumtext="수술예약번호"/>
          <Column id="acptstatcd" type="STRING" size="256" sumtext="접수상태"/>
          <Column id="tempcol19" type="STRING" size="256" sumtext="변경사유"/>
          <Column id="delyn" type="STRING" size="256"/>
          <Column id="delflagcd" type="STRING" size="256"/>
          <Column id="prcpcd" type="STRING" size="256"/>
          <Column id="prcpnm" type="STRING" size="256"/>
          <Column id="status" type="STRING" size="256"/>
          <Column id="ordtype" type="STRING" size="256"/>
          <Column id="spccd" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_acptspclist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grd_acptspclist_oncolumnchanged">
        <ColumnInfo>
          <Column id="instcd" type="STRING"/>
          <Column id="spcacptdd" type="STRING"/>
          <Column id="spcacptno" type="STRING"/>
          <Column id="spcacptseqno" type="STRING"/>
          <Column id="orgspcacptseqno" type="STRING"/>
          <Column id="spchistno" type="STRING"/>
          <Column id="spcacpttm" type="STRING"/>
          <Column id="bfspccd" type="STRING"/>
          <Column id="bfspcnm" type="STRING"/>
          <Column id="spcbarcdno" type="STRING"/>
          <Column id="acptstatcd" type="STRING"/>
          <Column id="spcadddd" type="STRING"/>
          <Column id="spcaddtm" type="STRING"/>
          <Column id="spcaddid" type="STRING"/>
          <Column id="delflagcd" type="STRING"/>
          <Column id="addyn" type="STRING"/>
          <Column id="afspccd" type="STRING"/>
          <Column id="afspcnm" type="STRING"/>
          <Column id="choispccd" type="STRING"/>
          <Column id="ptno" type="STRING"/>
          <Column id="delyn" type="STRING"/>
          <Column id="spccd" type="STRING" size="256"/>
          <Column id="spcnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_readdr" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="usernm" type="STRING"/>
          <Column id="userid" type="STRING"/>
        </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>
      </Dataset>
      <Dataset id="ds_hosoenvinfo" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="lendrtnterm" type="STRING" size="256"/>
          <Column id="recvqualmthdcd" type="STRING" size="256"/>
          <Column id="plgydeptcd" type="STRING" size="256"/>
          <Column id="plgyteamcd" type="STRING" size="256"/>
          <Column id="doctjobgradcd" type="STRING" size="256"/>
          <Column id="teamjobgradcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_testitemlist" 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="dispseqno" type="STRING" size="256" sumtext="검사코드"/>
          <Column id="testcd" type="STRING" size="256" sumtext="검사코드"/>
          <Column id="testengnm" type="STRING" size="256" sumtext="검사영문명"/>
          <Column id="testengabbr" type="STRING" size="256" sumtext="검사영문약어명"/>
          <Column id="testhngnm" type="STRING" size="256" sumtext="검사한글명"/>
          <Column id="testhngabbr" type="STRING" size="256" sumtext="검사한글약어명"/>
          <Column id="basepartcd" type="STRING" size="256" sumtext="기본파트"/>
          <Column id="basepartnm" type="STRING" size="256" sumtext="기본파트"/>
          <Column id="detlpartcd" type="STRING" size="256" sumtext="세부파트"/>
          <Column id="detlpartnm" type="STRING" size="256" sumtext="세부파트"/>
          <Column id="singletest_cnt" type="STRING" size="256" sumtext="하위검사코드개수"/>
          <Column id="ptnocd" type="STRING" size="256" sumtext="병리번호코드"/>
          <Column id="stdyptnocd" type="STRING" size="256" sumtext="연구용 병리번호코드"/>
          <Column id="trustptnocd" type="STRING" size="256" sumtext="수탁용 병리번호코드"/>
          <Column id="workflagcd" type="STRING" size="256" sumtext="작업구분코드"/>
          <Column id="reqfrmflagcd" type="STRING" size="256" sumtext="의뢰지구분코드"/>
          <Column id="choi" type="STRING" size="256" sumtext="선택"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_reprspclist" 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="spccd" type="STRING" size="256" sumtext="검체코드"/>
          <Column id="spcnm" type="STRING" size="256" sumtext="검체명"/>
          <Column id="spcabbr" type="STRING" size="256" sumtext="검체약어"/>
        </ColumnInfo>
      </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>
      </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="readdr" type="STRING" size="256"/>
          <Column id="grosdr" type="STRING" size="256"/>
          <Column id="punch" type="STRING" size="256"/>
          <Column id="sysdt" type="STRING" size="256"/>
          <Column id="resncd" type="STRING" size="256"/>
          <Column id="ptnocd" type="STRING" size="256"/>
          <Column id="jobkindcd" type="STRING" size="256"/>
          <Column id="userinfo" type="STRING" size="256"/>
          <Column id="hospenv" type="STRING" size="256"/>
          <Column id="ptnocase" type="STRING" size="256"/>
          <Column id="pidno" type="STRING" size="256"/>
          <Column id="prtntestnm" type="STRING" size="256"/>
          <Column id="makedd" type="STRING" size="256"/>
          <Column id="maketm" type="STRING" size="256"/>
          <Column id="prntyn" type="STRING" size="256"/>
          <Column id="basecd" type="STRING" size="256"/>
          <Column id="prcpfromdd" type="STRING" size="256"/>
          <Column id="prcptodd" type="STRING" size="256"/>
          <Column id="refval" type="STRING" size="256"/>
          <Column id="refmthd" type="STRING" size="256"/>
          <Column id="ordinfo" type="STRING" size="256"/>
          <Column id="cmtcnts" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_jaewoninfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="jaewon" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_prcpspclist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="spcacptdd" type="STRING" size="256" sumtext="검체접수일자"/>
          <Column id="spcacptno" type="STRING" size="256" sumtext="검체접수번호"/>
          <Column id="spcacptseqno" type="STRING" size="256" sumtext="검체접수일련번호"/>
          <Column id="spchistno" type="STRING" size="256" sumtext="검체이력번호"/>
          <Column id="spcacpttm" type="STRING" size="256" sumtext="검체접수시간"/>
          <Column id="spccd" type="STRING" size="256" sumtext="검체코드"/>
          <Column id="spcnm" type="STRING" size="256" sumtext="검체명"/>
          <Column id="spcbarcdno" type="STRING" size="256" sumtext="검체바코드번호"/>
          <Column id="acptstatcd" type="STRING" size="256" sumtext="접수상태코드"/>
          <Column id="spcadddd" type="STRING" size="256" sumtext="검체추가일자"/>
          <Column id="spcaddtm" type="STRING" size="256" sumtext="검체추가시간"/>
          <Column id="spcaddid" type="STRING" size="256" sumtext="검체추가자ID"/>
          <Column id="delflagcd" type="STRING" size="256" sumtext="사용여부구분"/>
          <Column id="addyn" type="STRING" size="256" sumtext="추가여부"/>
          <Column id="delyn" type="STRING" size="256" sumtext="삭제여부"/>
          <Column id="ptno" type="STRING" size="256" sumtext="병리번호"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="testcd" type="STRING" size="256"/>
          <Column id="reprspccd" type="STRING" size="256"/>
          <Column id="spcflagcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_detlspclist" 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="spccd" type="STRING" size="256" sumtext="검체코드"/>
          <Column id="spcnm" type="STRING" size="256" sumtext="검체명칭"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_reqfrminfocnts" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="reqcnts" type="STRING" size="256" sumtext="의뢰지내용"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="reqfrminfocnts" type="STRING" size="256"/>
          <Column id="readdrid" type="STRING" size="256"/>
          <Column id="afcertyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_choispclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING" size="256"/>
          <Column id="spcseqno" type="STRING" size="256"/>
          <Column id="spccd" type="STRING" size="256"/>
          <Column id="spcnm" type="STRING" size="256"/>
          <Column id="existyn" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.grp_sea.ipt_fromyear" propid="value" datasetid="ds_init" columnid="fromyear"/>
      <BindItem id="item1" compid="grp_biz.grp_sea.ipt_fromptno" propid="value" datasetid="ds_init" columnid="fromptno"/>
      <BindItem id="item2" compid="grp_biz.grp_sea.input2" propid="value" datasetid="ds_init" columnid="toyear"/>
      <BindItem id="item3" compid="grp_biz.grp_sea.input1" propid="value" datasetid="ds_init" columnid="toptno"/>
      <BindItem id="item4" compid="grp_biz.grp_sea.ipt_acptddfrom" propid="value" datasetid="ds_init" columnid="prcpfromdd"/>
      <BindItem id="item5" compid="grp_biz.grp_sea.ipt_acptddto" propid="value" datasetid="ds_init" columnid="prcptodd"/>
      <BindItem id="item6" compid="grp_biz.textarea1" propid="value" datasetid="ds_init" columnid="ordinfo"/>
      <BindItem id="item7" compid="grp_biz.textarea2" propid="value" datasetid="ds_init" columnid="cmtcnts"/>
      <BindItem id="item8" compid="grp_biz.grp_sea.cbo_ptnocd" propid="value" datasetid="ds_init" columnid="ptnocode"/>
      <BindItem id="item9" compid="cmb_readdr" propid="value" datasetid="ds_hidden" columnid="readdrid"/>
      <BindItem id="item10" compid="grp_biz.grp_sea.ipt_seaval" propid="value" datasetid="ds_init" columnid="refval"/>
    </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";
include "com_commodulexp::SSZFM00901.xjs"

function SMLPJ02200_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMLPJ02200_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grp_biz.grd_acptprcplist);
	grdf_initGrid(grp_biz.grd_acptspclist);	
	grdf_setRowTypeIcon(grp_biz.grd_acptprcplist, 2);
	grdf_setRowTypeIcon(grp_biz.grd_acptspclist, 3);
	fExeInitialize();
}

function fExeInitialize()
{
	var sCurDate = "";
	var menuparam = frmf_getMenuParam();
	
	//--------------------------------
	//model.removeNodeset("/root/send");
	//model.removeNodeset("/root/main/acptprcp/acptprcplist");
	//model.removeNodeset("/root/main/prcpspc/prcpspclist");
	//model.removeNodeset("/root/main/updtspc/updtspclist");
	
	// 시스템 일시 조회
	dsf_createDsRow("ds_send", [{col : "instcd", val : sysf_getUserInfo("dutplceinstcd")}]);
	//submit("TRLPZ00102", false);
	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);
	
	dsf_createDsRow("ds_send", [{col : "instcd",    val : sysf_getUserInfo("dutplceinstcd")}
	                           ,{col : "refflagcd", val : 0 }]);
	//submit("TRLPZ00109", false);
	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);
	
	dsf_createDsRow("ds_send", [{col : "instcd", val : sysf_getUserInfo("dutplceinstcd")}]);
	//submit("TRLPZ00101", false);
	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 : "delflagcd", val : "0"}
	                           ,{col : "refflag",   val : "0"}
	                           ,{col : "refval",    val : ""}]);
	                           
	//submit("TRLPC00401", false);
	var oParam = {};
		oParam.id          = "TRLPC00401";
		oParam.service     = "plgybaseinfomngtapp.TestCode";
		oParam.method      = "reqGetTestCodeList";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_testitemlist=rsltlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPC00401";
	tranf_submit(oParam);

	dsf_createDsRow("ds_send", [{col : "instcd",     val : sysf_getUserInfo("dutplceinstcd")}
	                           ,{col : "spcflagcd",  val : "0"}
	                           ,{col : "delflagcd",  val : "0"}]);
	//submit("TRLPJ01503", false);	// 모든 검체목록 조회
	var oParam = {};
		oParam.id          = "TRLPJ01503";
		oParam.service     = "plgyacptmngtapp.SpecimenAccept";
		oParam.method      = "reqGetSpecimanCodeList";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_reprspclist=refrslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPJ01503";
	tranf_submit(oParam);
	
	// 의사목록 조회....		
	dsf_createDsRow("ds_send", [{col : "instcd",         val : sysf_getUserInfo("dutplceinstcd")}
	                           ,{col : "userdeptcd",     val : "-"}
	                           ,{col : "doctjobgradcd",  val : "-"}		 // 예문 추가시 의사만 보일 수 있도록
	                           ,{col : "teamjobgradcd",  val : "-"}]);
	//submit("TRLPZ00105");
	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);
	
	fdsf_createDsFilter("ds_userinfolist1", "ds_userinfolist", "jobkindcd=='1'");
	cmb_readdr.innerdataset = ds_userinfolist1;
	cmb_readdr.codecolumn = "userid";
	cmb_readdr.datacolumn = "usernm";

	dsf_createDsRow("ds_basecdlist", [{col : "instcd",        val : sysf_getUserInfo("dutplceinstcd")}
	                                 ,{col : "testcd",        val : "-"}
	                                 ,{col : "testengnm",     val : "-"}
	                                 ,{col : "testengabbr",   val : "-"}
	                                 ,{col : "testhngnm",     val : "-"}
	                                 ,{col : "testhngabbr",   val : "-"}]);
	
	sCurDate = ds_data_sysdtinfo.getColumn(0, "sysdd");
	
	//------------
	// 초기값 설정
	ds_init.setColumn(0, "refval", "");													// 검색값
	ds_init.setColumn(0, "refmthd",   "1");												// 0:병리번호, 1:등록번호, 2:환자명
	ds_init.setColumn(0, "prcpfromdd", ds_data_sysdtinfo.getColumn(0, "sysdd"));		// 처방시작일자
	ds_init.setColumn(0, "prcptodd",   ds_data_sysdtinfo.getColumn(0, "sysdd"));        // 처방종료일자
// 	ds_init.setColumn(0, "prcpfromdd", "20170112");
// 	ds_init.setColumn(0, "prcptodd", "20170115");
	ds_init.setColumn(0, "ordinfo",  "");                                          
	ds_init.setColumn(0, "cmtcnts",  "");
	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",   "");

	fGetAcptPrcpList();
	//---------------------			
	if (menuparam == "1")
	{
		// Continue
	}
	else
	{
		//-------------------------------------
		// WorkList화면에서 호출할 경우 처리
		if (opener.frmf_getParameter("SMLPJ01000_scrno") == "SMLPP00200") 
		{
			ds_init.setColumn(0, "ptnocode",   opener.frmf_getParameter("SMLPJ01000_ptnocd"));
			ds_init.setColumn(0, "fromyear",   opener.frmf_getParameter("SMLPJ01000_year"));
			ds_init.setColumn(0, "toyear",     opener.frmf_getParameter("SMLPJ01000_year"));
			ds_init.setColumn(0, "fromptno",   opener.frmf_getParameter("SMLPJ01000_no"));
			ds_init.setColumn(0, "toptno",     opener.frmf_getParameter("SMLPJ01000_no"));
			ds_init.setColumn(0, "prcpfromdd", opener.frmf_getParameter("SMLPJ01000_acptdd"));
			ds_init.setColumn(0, "prcptodd",   opener.frmf_getParameter("SMLPJ01000_acptdd"));
			
			fGetAcptPrcpList();	
		}
	}	
	//후인증여부확인.
	//if(model.getValue("/root/init/userinfo/userinfolist[userid="+ getUserId() +" and jobkindcd=1]/usernm") != "")
	fdsf_createDsFilter("ds_userinfolist1", "ds_userinfolist", "userid=="+sysf_getUserId()+" && jobkindcd=='1'");

	if(!utlf_isNull(ds_userinfolist1.getColumn("userid=='"+sysf_getUserId()+" && jobkindcd == '1'", "usernm")))
	{
		//model.makeValue("/root/hidden/afcertyn", "N");
		ds_hidden.setColumn(0, "afcertyn", "N");
		cap_orddrid.visible = false;
		cmb_readdr.visible = false;
	}
	else
	{
		//model.makeValue("/root/hidden/afcertyn", "Y");
		ds_hidden.setColumn(0, "afcertyn", "Y");
		cap_orddrid.visible = true;
		cmb_readdr.visible = true;
	}
	fdsf_createDsFilter("ds_userinfolist1", "ds_userinfolist", "jobkindcd=='1'");
	
}

function fGetAcptPrcpList()
{					
	var sTemp = "";

	ds_init.setColumn(0, "ordinfo", "");
	
	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");
	trace("sTemp================"+sTemp);
	dsf_createDsRow( "ds_send", [{col : "instcd",     val : sysf_getUserInfo("dutplceinstcd")}	// 기관코드
	                            ,{col : "refval",     val : ds_init.getColumn(0, "refval")}		// 검색값
	                            ,{col : "refmthd",    val : ds_init.getColumn(0, "refmthd")}	// 검색방법(0:병리번호,1:등록번호,2:환자명)
	                            ,{col : "prcpfromdd", val : ds_init.getColumn(0, "prcpfromdd")}	// 처방시작일자
	                            ,{col : "prcptodd",   val : ds_init.getColumn(0, "prcptodd")}	// 처방종료일자
	                            ,{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")}])

	//submit("TRLPJ02201");
	
	var oParam = {};
		oParam.id          = "TRLPJ02201";
		oParam.service     = "plgyacptmngtapp.SpecimenAccept";
		oParam.method      = "reqGetPrcpUpdtList";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_grd_acptprcplist=refrslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPJ02201";
	tranf_submit(oParam);
	
	ds_grd_acptprcplist.updatecontrol = false;
	for(var i = 0; i < ds_grd_acptprcplist.rowcount; i++)
	{
		ds_grd_acptprcplist.setColumn(i, "afspccd", "-");
		ds_grd_acptprcplist.setColumn(i, "afspcnm", "-");
		ds_grd_acptprcplist.setColumn(i, "afspcabbr", "-");
		ds_grd_acptprcplist.setColumn(i, "spccd", ds_grd_acptprcplist.getColumn(i, "bfspccd"));
	}
	
	ds_grd_acptprcplist.updatecontrol = true;
	ds_choispclist.clearData();
}

// function cf_TRLPJ02201(sSvcId, nErrorCode, sErrorMsg)
// {
//     if(nErrorCode < 0) return;
//     
//     for(var i = 0; i < ds_grd_acptprcplist.rowcount; i++)
//  	{
// 		lf_convertXmlToDs(ds_grd_acptprcplist.getColumn(i,"reqcnts"));
// 	}
//     //lf_convertXmlToDs(ds_grd_acptprcplist.getColumn(ds_grd_acptprcplist.rowposition,"reqfrminfo"));.
//     
//     
// }

//변경검체의 검체 추가 시 처리 Function
function fExeSpcLnAdd()
{
	var sBarCdNo   = "";
	var sSpcSeqNo = "";;
	var sDescNode = ds_grd_acptspclist;
	//var sCopyNode = ds_grd_acptspclist;
	var iRowCnt = ds_grd_acptspclist.rowcount;
	var iChk = 0;
	
	//프로즌 검체 여부를 체크하여 경고 메세지를 보여줌.
	var sPrcpCd = ds_grd_acptprcplist.getColumn(Number(ds_grd_acptprcplist.rowposition), "bfprcpcd");
	trace("sPrcpCd ="+sPrcpCd);
	
	for(var iNodeCnt = 0; iNodeCnt < ds_testitemlist.rowcount; iNodeCnt++)
	{
		if(ds_testitemlist.getColumn(iNodeCnt, "testcd") == sPrcpCd)
		{
			if(ds_testitemlist.getColumn(iNodeCnt, "workflagcd") == "1002")
			{
				if(sysf_messageBox("프로즌 검체 입니다. 주의 하십시오. ", "Q003") != "6") 
				{
					return;
				}
				break;
			}
		}
	}
	
	//-----------------
	if (iRowCnt <= 0)
	{
		sysf_messageBox("원 처방을 선택하여 검체를 조회하십시오! 검체를 추가 ", "E001");
		return false;
	}
	else
	{
		iRowCnt = Number(iRowCnt);
		trace("iRowCnt="+iRowCnt);
		ds_grd_acptspclist.addRow();
		
		sBarCdNo = ds_grd_acptspclist.getColumn(0, "spcbarcdno");
		sBarCdNo = utlf_transNullToEmpty(sBarCdNo).substr(0, 9);
		trace("sBarCdNo="+sBarCdNo);
		//------------------------------------
		sSpcSeqNo = fExeMakeSpcSeqNo(iRowCnt);
		trace("sSpcSeqNo="+sSpcSeqNo);
		sBarCdNo  += sSpcSeqNo.substr(1,2); 
		trace("sBarCdNo="+sBarCdNo);
		var iRow = ds_grd_acptprcplist.rowposition;
		
		ds_grd_acptspclist.setColumn(iRowCnt, "instcd",          ds_grd_acptspclist.getColumn(0, "instcd"));
		ds_grd_acptspclist.setColumn(iRowCnt, "spcacptdd",       ds_grd_acptspclist.getColumn(0, "spcacptdd"));
		ds_grd_acptspclist.setColumn(iRowCnt, "spcacptno",       ds_grd_acptspclist.getColumn(0, "spcacptno"));
		ds_grd_acptspclist.setColumn(iRowCnt, "spcacptseqno",    sSpcSeqNo);
		ds_grd_acptspclist.setColumn(iRowCnt, "orgspcacptseqno", "0");
		ds_grd_acptspclist.setColumn(iRowCnt, "spchistno",       ds_grd_acptspclist.getColumn(0, "spchistno"));
		ds_grd_acptspclist.setColumn(iRowCnt, "spcacpttm",       ds_grd_acptspclist.getColumn(0, "spcacpttm"));
		ds_grd_acptspclist.setColumn(iRowCnt, "bfspccd",         "-");
		ds_grd_acptspclist.setColumn(iRowCnt, "bfspcnm",         "-");
		ds_grd_acptspclist.setColumn(iRowCnt, "spcbarcdno",      sBarCdNo);
		ds_grd_acptspclist.setColumn(iRowCnt, "acptstatcd",      ds_grd_acptspclist.getColumn(0, "acptstatcd"));
		ds_grd_acptspclist.setColumn(iRowCnt, "addyn",           "Y");
		ds_grd_acptspclist.setColumn(iRowCnt, "delyn",           "N");
		ds_grd_acptspclist.setColumn(iRowCnt, "afspccd",         "");
		ds_grd_acptspclist.setColumn(iRowCnt, "afspcnm",         "");
		ds_grd_acptspclist.setColumn(iRowCnt, "choispccd",       "");
		ds_grd_acptspclist.setColumn(iRowCnt, "spcadddd",        ds_data_sysdtinfo.getColumn(0, "sysdd"));
		ds_grd_acptspclist.setColumn(iRowCnt, "spcaddtm",        ds_data_sysdtinfo.getColumn(0, "systm"));
		ds_grd_acptspclist.setColumn(iRowCnt, "spcaddid",        sysf_getUserInfo("userid"));
		ds_grd_acptspclist.setColumn(iRowCnt, "delflagcd",       ds_grd_acptspclist.getColumn(0, "acptstatcd"));
		ds_grd_acptspclist.setColumn(iRowCnt, "ptno",            ds_grd_acptspclist.getColumn(0, "acptstatcd"));
	}
}

function fExeComboChange()
{	
	ds_grd_acptspclist.clearData();
	var iRowNo = Number(ds_grd_acptprcplist.rowposition);
	var iColNo = grp_biz.grd_acptprcplist.currentcol
	var sSrcNode = ds_grd_acptprcplist;

	//재원 유무 체크
	fJaewon_yn();		
	
	fExePrcpClick();		
	//----------------------------------
	// 변경 후 처방명을 클릭할 경우 처리
	if (iColNo == 15 || iColNo == 16) 
	{

		var sPtNoCD = ds_grd_acptprcplist.getColumn(iRowNo, "ptnocd");
		
		ds_testitemlist.filterstr = "ptnocd=='" + sPtNoCD + "' || stdyptnocd=='" + sPtNoCD + "' || trustptnocd=='" +sPtNoCD +"'";
		
	}
}

function fJaewon_yn()
{			
	var iRowNo = ds_grd_acptprcplist.rowposition;
	var sjaewonNode = ds_jaewoninfo;
	var sSrcNode = ds_grd_acptprcplist;

	dsf_createDsRow("ds_temp_search", [{col : "instcd",    val : ds_grd_acptprcplist.getColumn(iRowNo, "instcd")} 		//기관코드
	                                  ,{col : "spcacptdd", val : ds_grd_acptprcplist.getColumn(iRowNo, "spcacptdd")}	//검체접수일자
	                                  ,{col : "spcacptno", val : ds_grd_acptprcplist.getColumn(iRowNo, "spcacptno")}	//검체접수번호
	                                 // ,{col : "delflagcd", val : ds_grd_acptprcplist.getColumn(iRowNo, "delflagcd")}	//삭제구분코드
	                                  ,{col : "ptno", val : ds_grd_acptprcplist.getColumn(iRowNo, "ptno")}				//병리번호
	                                  ,{col : "pid", val : ds_grd_acptprcplist.getColumn(iRowNo, "pid")}]);				//차트번호

	var oParam = {};
		oParam.id          = "TRLPJ02204";
		oParam.service     = "plgyacptmngtapp.SpecimenAccept";
		oParam.method      = "reqGetjaewon";
		oParam.inds        = "refData=ds_temp_search";
		oParam.outds       = "ds_jaewoninfo=jaewoninfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPJ02204";
	tranf_submit(oParam);

	for (var iNo = 0; iNo < ds_jaewoninfo.rowcount; iNo++)
	{
		if(ds_jaewoninfo.getColumn(iNo, "jaewon") == "N")
		{ 
			sysf_messageBox("가퇴원 또는 퇴원 환자입니다. 확인하세요");								  
		}							
	} 
}

//처방의뢰지 내용 표시 처리 Function
function fExePrcpClick()
{
	trace("처방의뢰지 내용 표시 처리");
	ds_send.clearData();
	var iRowNo = ds_grd_acptprcplist.rowposition;
	var sSrcNode = ds_grd_acptprcplist;
	var sDescNode = ds_prcpspclist;
	var sCopyNode = ds_grd_acptspclist;
	var sjaewonNode = ds_jaewoninfo;
	
	ds_grd_acptspclist.clearData();
	
	objDomParser = new DomParser;
	objDOM = objDomParser.parseFromString(ds_grd_acptprcplist.getColumn(iRowNo, "reqcnts"));
	var reqcnts = rptf_getValueFromDOM(objDOM, "/reqfrminfo/reqcnts");
	ds_init.setColumn(0, "ordinfo", reqcnts);
	
	dsf_createDsRow( "ds_send1", [{col : "instcd",      val : sysf_getUserInfo("dutplceinstcd")}					// 기관코드
	                             ,{col : "spcacptdd",   val : ds_grd_acptprcplist.getColumn(iRowNo, "spcacptdd")}	// 검체접수일자
	                             ,{col : "spcacptno",   val : ds_grd_acptprcplist.getColumn(iRowNo, "spcacptno")}	// 검체접수번호
	                             ,{col : "ptno",        val : ds_grd_acptprcplist.getColumn(iRowNo, "ptno")}		// 병리번호
	                             ,{col : "delflagcd",   val : "0"}]);												// 삭제구분코드
	                            
	//submit("TRLPJ02202");
	var oParam = {};
		oParam.id          = "TRLPJ02202";
		oParam.service     = "plgyacptmngtapp.SpecimenAccept";
		oParam.method      = "reqGetAcptSpcList";
		oParam.inds        = "refData=ds_send1";
		oParam.outds       = "ds_prcpspclist=refrslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPJ02202";
	tranf_submit(oParam);
	
	//ds_grd_acptprcplist.updatecontrol = false;
	ds_grd_acptspclist.updatecontrol = false;
	// 접수검체의 목록을 변경대상으로 복사
	for(var iNo = 0; iNo < ds_prcpspclist.rowcount; iNo++)
	{
		ds_grd_acptspclist.addRow();
		ds_grd_acptspclist.setColumn(iNo, "instcd", ds_prcpspclist.getColumn(iNo, "instcd"));
		ds_grd_acptspclist.setColumn(iNo, "spcacptdd", ds_prcpspclist.getColumn(iNo, "spcacptdd"));
		ds_grd_acptspclist.setColumn(iNo, "spcacptno", ds_prcpspclist.getColumn(iNo, "spcacptno"));
		ds_grd_acptspclist.setColumn(iNo, "spcacptseqno", ds_prcpspclist.getColumn(iNo, "spcacptseqno"));
		ds_grd_acptspclist.setColumn(iNo, "orgspcacptseqno", ds_prcpspclist.getColumn(iNo, "spcacptseqno"));
		ds_grd_acptspclist.setColumn(iNo, "spchistno", ds_prcpspclist.getColumn(iNo, "spchistno"));
		ds_grd_acptspclist.setColumn(iNo, "spcacpttm", ds_prcpspclist.getColumn(iNo, "spcacpttm"));
 		ds_grd_acptspclist.setColumn(iNo, "bfspccd", ds_prcpspclist.getColumn(iNo, "spccd"));
 		ds_grd_acptspclist.setColumn(iNo, "bfspcnm", ds_prcpspclist.getColumn(iNo, "spcnm"));
		ds_grd_acptspclist.setColumn(iNo, "spcbarcdno", ds_prcpspclist.getColumn(iNo, "spcbarcdno"));
		ds_grd_acptspclist.setColumn(iNo, "acptstatcd", ds_prcpspclist.getColumn(iNo, "acptstatcd"));
		ds_grd_acptspclist.setColumn(iNo, "spcadddd", ds_prcpspclist.getColumn(iNo, "spcadddd"));
		ds_grd_acptspclist.setColumn(iNo, "spcaddtm", ds_prcpspclist.getColumn(iNo, "spcaddtm"));
		ds_grd_acptspclist.setColumn(iNo, "spcaddid", ds_prcpspclist.getColumn(iNo, "spcaddid"));
		ds_grd_acptspclist.setColumn(iNo, "delflagcd", ds_prcpspclist.getColumn(iNo, "delflagcd"));
 		ds_grd_acptspclist.setColumn(iNo, "addyn", ds_prcpspclist.getColumn(iNo, "addyn"));
 		ds_grd_acptspclist.setColumn(iNo, "delyn", ds_prcpspclist.getColumn(iNo, "delyn"));
 		ds_grd_acptspclist.setColumn(iNo, "ptno", ds_prcpspclist.getColumn(iNo, "ptno")); 		
		ds_grd_acptspclist.setColumn(iNo, "afspccd", "");
		ds_grd_acptspclist.setColumn(iNo, "afspcnm", "");
		ds_grd_acptspclist.setColumn(iNo, "choispccd", "");
 	}
 	dsf_setFixVal(ds_grd_acptspclist, "addyn:N,delyn:N");
 	
	//ds_grd_acptprcplist.updatecontrol = true;
	ds_grd_acptspclist.updatecontrol = true;
	// 처방에 해당하는 대표검체 조회

	ds_send2.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
	
	if(ds_grd_acptprcplist.getColumn(iRowNo, "afprcpcd") == "-" || utlf_isNull(ds_grd_acptprcplist.getColumn(iRowNo, "afprcpcd")))
	{ 
		ds_send2.setColumn(0, "testcd", ds_grd_acptprcplist.getColumn(iRowNo, "bfprcpcd"));
	}
	else
	{
		ds_send2.setColumn(0, "testcd", ds_grd_acptprcplist.getColumn(iRowNo, "afprcpcd"));
	}
	
	if(ds_grd_acptprcplist.getColumn(iRowNo, "afspccd") == "-" || utlf_isNull(ds_grd_acptprcplist.getColumn(iRowNo, "afspccd")))
	{
		trace("if");
		ds_send2.setColumn(0, "reprspccd", ds_grd_acptprcplist.getColumn(iRowNo, "bfspccd"));
	}
	else
	{ 
		trce("else");
		ds_send2.setColumn(0, "reprspccd", ds_grd_acptprcplist.getColumn(iRowNo, "afspccd"));
	}
	
	ds_send2.setColumn(0, "spcflagcd", "1");
	
	//submit("TRLPJ01501");
	var oParam = {};
		oParam.id          = "TRLPJ01501";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetTestInfoList";
		oParam.inds        = "refData=ds_send2";
		oParam.outds       = "ds_detlspclist=refrslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPJ01501";
	tranf_submit(oParam);
}

function fExeSpcLnDel()
{	
	//프로즌 검체 여부를 체크하여 경고 메세지를 보여줌.
	var sPrcpCd = ds_grd_acptprcplist.getColumn(Number(ds_grd_acptprcplist.rowposition-1), "bfprcpcd");

	for(var iNodeCnt = 0; iNodeCnt < ds_testitemlist.rowcount; iNodeCnt++)
	{

		if(ds_testitemlist.getColumn(iNodeCnt, "testcd") == sPrcpCd)
		{

			if(ds_testitemlist.getColumn(iNodeCnt, "workflagcd") == "1002")
			{
				if(sysf_messageBox("프로즌 검체 입니다. 주의 하십시오. ", "Q003") != "6")
				{
					return;
				}
				break;
			}
		}
	}
	
	if(ds_grd_acptspclist.getColumn(ds_grd_acptspclist.rowposition, "addyn") == "Y")
	{
		var arrPostion = new Array();
		arrPostion[0]  = ds_grd_acptspclist.rowposition;
		grdf_setStatus(grp_biz.grd_acptspclist, "D", arrPostion);
	}
	else
	{
// 		var arrPostion = new Array();
// 		arrPostion[0]  = ds_grd_acptspclist.rowposition;
// 		grdf_setStatus(grp_biz.grd_acptspclist, "D", arrPostion);
		ds_grd_acptspclist.setColumn(ds_grd_acptspclist.rowposition, "delyn", "Y");
	}
}

function fExeDetlSpcUpdt() 
{	
	var iSpcNo      = 1;
	var iPrcpNo = ds_grd_acptprcplist.rowposition;
	var iChoiNo = ds_grd_acptspclist.rowposition;
	var sSrcNode = ds_grd_acptprcplist; //처방리스트
	var sSpcNode = ds_grd_acptspclist;  //전달검체 리스트
	var sReqFrmNode = ds_choispclist;
	var bState      = false;
	var sLastSpc = "";
	var SFrznYN  = "N";
	
	for(var iRowNo = 0; iRowNo < ds_grd_acptspclist.rowcount; iRowNo++)
	{
		// 추가검체는 상태를 "i"로 설정
		if(ds_grd_acptspclist.getColumn(iRowNo, "addyn") == "N")
		{
			// 상세검체 삭제의 경우 처리
// 			if(ds_grd_acptspclist.getColumn(iRowNo, "delyn") == "Y")
// 			{
// 				ds_grd_acptspclist.setRowType(iRowNo, "d");
// 				bState = true;
// 			} 
			if(ds_grd_acptspclist.getColumn(iRowNo, "afspccd") == "-" || utlf_isNull(ds_grd_acptspclist.getColumn(iRowNo, "afspccd")))
			{
 				ds_grd_acptspclist.setColumn(iRowNo, "afspccd", ds_grd_acptspclist.getColumn(iRowNo, "bfspccd"));
 				ds_grd_acptspclist.setColumn(iRowNo, "afspcnm", ds_grd_acptspclist.getColumn(iRowNo, "bfspcnm"));
 				ds_grd_acptspclist.setRowType(iRowNo, "u");
 				bState = true;								
			} 
			else if(ds_grd_acptspclist.getColumn(iRowNo, "bfspccd") != ds_grd_acptspclist.getColumn(iRowNo, "afspccd"))
			{
				ds_grd_acptspclist.setRowType(iRowNo, "u");
				bState = true;
			} 
			else 
			{
				ds_grd_acptspclist.setRowType(iRowNo, "i");
				bState = true;
			}
			// 상세검체 삭제의 경우 처리
			if(ds_grd_acptspclist.getColumn(iRowNo, "delyn") == "Y")
			{
				ds_grd_acptspclist.setRowType(iRowNo, "d");
				bState = true;
			} 			
		} 
		else 
		{
			if(ds_grd_acptspclist.getColumn(iRowNo, "afspccd") == "-" || utlf_isNull(ds_grd_acptspclist.getColumn(iRowNo, "afspccd")))
			{
				sysf_messageBox("변경 후 검체를 ", "C002");
				return false;
			}
			ds_grd_acptspclist.setRowType(iRowNo, "i");
			bState = true;
		}
	}
	trace("bState = " + bState);
	if (bState) 
	{
		//의뢰지가 변경(프로즌 검체 추가) 되었을 경우를 체크하기 위하여 의뢰지를 다시 조회한다.
		dsf_createDsRow("ds_temp_search", [{col : "pid",      val : ds_grd_acptprcplist.getColumn(iPrcpNo, "pid")}
		                                  ,{col : "reqno",    val : ds_grd_acptprcplist.getColumn(iPrcpNo, "reqfrmno")}]);
		//submit("TRLPJ02203");
		var oParam = {};
			oParam.id          = "TRLPJ02203";
			oParam.service     = "plgyacptmngtapp.SpecimenAccept";
			oParam.method      = "reqGetReqCnts";
			oParam.inds        = "refData=ds_temp_search";
			oParam.outds       = "ds_reqfrminfocnts=reqfrminfocnts";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLPJ02203";
		tranf_submit(oParam);
	
		// 검체의 변경 및 추가내용을 처방의뢰지에 반영하기 위해 자료생성
		lf_convertXmlToDs(ds_reqfrminfocnts.getColumn(0, "reqcnts"));
		
		//프로즌 검체 여부 체크.
		var sPrcpCd = ds_grd_acptprcplist.getColumn(ds_grd_acptprcplist.rowposition, "bfprcpcd");
	
		for(var iNodeCnt = 0; iNodeCnt < ds_testitemlist.rowcount; iNodeCnt++)
		{
			if(ds_testitemlist.getColumn(iNodeCnt, "testcd") == sPrcpCd)
			{
				if(ds_testitemlist.getColumn(iNodeCnt, "workflagcd") == "1002")
				{
					SFrznYN = "Y";
				}
			}
		}
		
		//---------
		iSpcNo = 1;
		trace("sLastSpc="+sLastSpc);
		trace("SFrznYN ="+SFrznYN);
		for(var iNo=0; iNo < ds_grd_acptspclist.rowcount; iNo++)
		{
			trace("sLastSpc1="+sLastSpc);
			//마지막 검체부터 삭제 되도록 한다.
			if(sLastSpc == "N")
			{
				if(ds_grd_acptspclist.getColumn(iNo, "delyn") == "N")
				{
					sysf_messageBox("마지막 검체 부터 삭제 하여 주세요. ", "E999");
					
					fGetAcptPrcpList();
					return false;
				}
			}
			
			if(ds_grd_acptspclist.getColumn(iNo, "delyn") == "N")
			{
  				ds_choispclist.addRow();
  				ds_choispclist.setColumn(iNo, "choi", "true");
  				ds_choispclist.setColumn(iNo, "spcseqno", ds_grd_acptspclist.getColumn(iNo, "spcacptseqno"));
  				ds_choispclist.setColumn(iNo, "existyn", "N");
				
			  	if(utlf_isNull(ds_grd_acptspclist.getColumn(iNo, "afspccd")) || utlf_transNullToEmpty(ds_grd_acptspclist.getColumn(iNo, "afspccd")).getTrim() == "-")
				{
					ds_choispclist.setColumn(iNo, "spccd", ds_grd_acptspclist.getColumn(iNo, "bfspccd"));
					ds_choispclist.setColumn(iNo, "spcnm", ds_grd_acptspclist.getColumn(iNo, "bfspcnm"));
				 /* 이재오 막다 2017 6월 12일 */					
				} 
				else 
				{ 
					ds_choispclist.setColumn(iNo, "spccd", ds_grd_acptspclist.getColumn(iNo, "afspccd"));
					ds_choispclist.setColumn(iNo, "spcnm", ds_grd_acptspclist.getColumn(iNo, "afspcnm"));
				}
				iSpcNo++;
			}
			else
			{
				
				//프로즌 검체의 경우 접수되지 않은 검체가 존재할수도 있기 때문에 의뢰지 상에서 검체를 삭제 하면 안된다.
				if (SFrznYN != "Y")
				{
//					model.removenode(sReqFrmNode+"["+iSpcNo+"]");
					sLastSpc = "N";
				}
				
			}
		} 
		
		//var node = instance1.selectSingleNode("/root/init/reqfrm/reqfrmtbl/reqfrminfo");
	}
	//--------------------------------						
//	model.removeNodeset("/root/send");
// 	model.makeValue("/root/send/instcd",       getUserInfo("dutplceinstcd"));
// 	model.makeValue("/root/send/updtprcplist", grd_acptprcplist.getUpdateData());
// 	model.makeValue("/root/send/prcpspclist",  grd_acptspclist.getUpdateData());
// 	model.makeValue("/root/send/pid",          model.getValue(sSrcNode+"["+iPrcpNo+"]/pid"));
// 	model.makeValue("/root/send/reqfrmno",     model.getValue(sSrcNode+"["+iPrcpNo+"]/reqfrmno"));
// 	model.makeNode("/root/send/reqcnts");
// 	model.setValue("/root/send/reqcnts",       node.xml, true);

    // 이재오 추가   2017 6월 13일 //
    var sReqcnts = ds_init.getColumn(0, "ordinfo");
    // 이재오 막다  2017 6월 13일 //
	//var sReqcnts = ds_data_reqfrminfo.getColumn(0, "reqcnts");
	// 이재오 막다  2017 6월 13일 //
	
	var reqcntsXmlText = "<reqfrminfo>";
	reqcntsXmlText = reqcntsXmlText + 	"<reqcnts>"	+ sReqcnts 	+"</reqcnts>";
	reqcntsXmlText = reqcntsXmlText + 	"<choispc>";
//	for(var i = 0; i < ds_data_choispclist.rowcount; i++)
	for(var i = 0; i < ds_choispclist.rowcount; i++)	
	{
		reqcntsXmlText = reqcntsXmlText + 	"<choispclist>";
		reqcntsXmlText = reqcntsXmlText + 	"<choi>"			+ ds_choispclist.getColumn(i, "choi") 		+ "</choi>";
		reqcntsXmlText = reqcntsXmlText + 	"<spcseqno>"		+ ds_choispclist.getColumn(i, "spcseqno") 	+ "</spcseqno>";
		reqcntsXmlText = reqcntsXmlText + 	"<spccd>"			+ ds_choispclist.getColumn(i, "spccd") 	+ "</spccd>";
		reqcntsXmlText = reqcntsXmlText + 	"<spccd2>"			+ ds_choispclist.getColumn(i, "spccd") 	+ "</spccd2>";
		reqcntsXmlText = reqcntsXmlText + 	"<spcnm><![CDATA["	+ ds_choispclist.getColumn(i, "spcnm") 	+ "]]]]><![CDATA[></spcnm>";
		reqcntsXmlText = reqcntsXmlText + 	"<existyn>"			+ ds_choispclist.getColumn(i, "existyn") 	+ "</existyn>";
		//reqcntsXmlText = reqcntsXmlText + 	"<slidno>"			+ ds_data_choispclist.getColumn(i, "slidno") 	+ "</slidno>";
		reqcntsXmlText = reqcntsXmlText + 	"</choispclist>";
		
/*		
		reqcntsXmlText = reqcntsXmlText + 	"<choispclist>";
		reqcntsXmlText = reqcntsXmlText + 	"<choi>"			+ ds_data_choispclist.getColumn(i, "choi") 		+ "</choi>";
		reqcntsXmlText = reqcntsXmlText + 	"<spcseqno>"		+ ds_data_choispclist.getColumn(i, "spcseqno") 	+ "</spcseqno>";
		reqcntsXmlText = reqcntsXmlText + 	"<spccd>"			+ ds_data_choispclist.getColumn(i, "spccd") 	+ "</spccd>";
		reqcntsXmlText = reqcntsXmlText + 	"<spccd2>"			+ ds_data_choispclist.getColumn(i, "spccd2") 	+ "</spccd2>";
		reqcntsXmlText = reqcntsXmlText + 	"<spcnm><![CDATA["	+ ds_data_choispclist.getColumn(i, "spcnm") 	+ "]]]]><![CDATA[></spcnm>";
		reqcntsXmlText = reqcntsXmlText + 	"<existyn>"			+ ds_data_choispclist.getColumn(i, "existyn") 	+ "</existyn>";
		//reqcntsXmlText = reqcntsXmlText + 	"<slidno>"			+ ds_data_choispclist.getColumn(i, "slidno") 	+ "</slidno>";
		reqcntsXmlText = reqcntsXmlText + 	"</choispclist>"
*/				
	}	
	reqcntsXmlText = reqcntsXmlText + 	"</choispc>";
	reqcntsXmlText = reqcntsXmlText + 	"</reqfrminfo>";
	
	trace("reqcntsXmlText= " + reqcntsXmlText);
	alert("정상적으로 처리되었습니다.");

	var sInDsName = dsf_createDsRow("ds_temp_search"
							, [{col: "instcd"	, val: sysf_getUserInfo("dutplceinstcd")}
							,  {col: "pid"		, val: ds_grd_acptprcplist.getColumn(ds_grd_acptprcplist.rowposition, "pid")}
							,  {col: "reqno"	, val: ds_grd_acptprcplist.getColumn(ds_grd_acptprcplist.rowposition, "reqfrmno")}
							,  {col: "reqcnts"	, val: reqcntsXmlText}]);	
															
	var sSignData = dsf_createDsRow("ds_temp_search1", [{col: "doctid"		, val: cmb_readdr.value}
													,  {col: "doctnm"		, val: cmb_readdr.text}
													,  {col: "afcertyn"		, val: ds_hidden.getColumn(0, "afcertyn")}]);
						
	
	var oParam = {};
		oParam.id          = "TXLPJ02201";
		oParam.service     = "plgyacptmngtapp.SpecimenAccept";
		oParam.method      = "reqExePrcpUpdtList";
		oParam.inds        = "reqfrminfo="+sInDsName+" prcplist=ds_grd_acptprcplist:U prcpspclist=ds_grd_acptspclist:U prcpsigndata="+sSignData;
		oParam.async       = false;
		//oParam.callback    = "cf_TXLPJ02201";
	tranf_submit(oParam);
	
// 	tranf_submit({
// 		 id: "TXLPJ02201"
// 	   , service: "plgyacptmngtapp.SpecimenAccept"
// 	   , method: "reqExePrcpUpdtList"
// 	   , inds: "reqfrminfo="+sInDsName+" prcplist=ds_grd_acptprcplist:U prcpspclist=ds_grd_acptspclist:U" //
// 	   //, callback: "cbf_SMLPJ02200"
// 	   , async: false
// 	});

	ds_grd_acptprcplist.clearData();
	ds_grd_acptspclist.clearData();
	fGetAcptPrcpList();
}

function fExePrcpChange() 
{					
	var iRowNo = Number(ds_grd_acptprcplist.rowposition);
	var iColNo   = grp_biz.grd_acptprcplist.currentcol;
	trace("iColNo="+iColNo);
	var sSrcNode = ds_grd_acptprcplist;
	
	if( utlf_isNull(ds_grd_acptprcplist.getColumn(iRowNo, "afprcpcd")) || ds_grd_acptprcplist.getColumn(iRowNo, "afprcpcd") == "-")
	{
		//return false;
	}
	else
	{
		if (iColNo == 15) 
		{
			/*
			model.setValue(sSrcNode + "[" + (Number(grd_acptprcplist.row)-1) + "]/afprcpnm", 
						   model.getValue("/root/init/testitemcnts/testitemlist[testcd='" 
						   + model.getValue(sSrcNode + "[" + (Number(grd_acptprcplist.row)-1) + "]/afprcpcd") + "']/testengnm"));					
			*/ 
			//alert("asdasd");
			
			//model.setValue(sSrcNode + "[" + (Number(grd_acptprcplist.row)-1) + "]/afprcpnm",  model.getValue(sSrcNode + "[" + (Number(grd_acptprcplist.row)-1) + "]/afprcpcd"));		
			ds_grd_acptprcplist.setColumn(iRowNo, "afprcpnm", ds_grd_acptprcplist.getColumn(iRowNo, "afprcpcd"));
		} 
	}
	
	//----------------------------------------------------------------------------------------------------------------------
	//if (model.getValue(sSrcNode+"["+iRowNo+"]/afprcpnm") == "" 	|| model.getValue(sSrcNode+"["+iRowNo+"]/afprcpnm") == "-") 
	if( utlf_isNull(ds_grd_acptprcplist.getColumn(iRowNo, "afprcpnm")) || ds_grd_acptprcplist.getColumn(iRowNo, "afprcpnm") == "-")
	{
		//return false;
	}
	else
	{
		if (iColNo == 16)
		{
			ds_grd_acptprcplist.setColumn(iRowNo, "afprcpcd", ds_grd_acptprcplist.getColumn(iRowNo, "afprcpnm"));
		}
	}
	if( utlf_isNull(ds_grd_acptprcplist.getColumn(iRowNo, "afspccd")) || ds_grd_acptprcplist.getColumn(iRowNo, "afspccd") == "-")
   {
		//return false;
	}
	else
	{
		if (iColNo == 40) 
		{
			fExePrcpClick();
		}
	}
	
}
				
//조회
function grp_biz_grp_sea_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetAcptPrcpList();
}
//조회
function grp_biz_grp_sea_ipt_acptddto_onkeyup(obj:Calendar, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		fGetAcptPrcpList();
	}
}

//전달검체 리스트 추가
function grp_biz_btn_spcadd_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeSpcLnAdd();
}

function grp_biz_grd_acptprcplist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	fExeComboChange();
}

//삭제
function grp_biz_btn_spcdel_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeSpcLnDel();
}

//검체저장
function grp_biz_btn_spcsave_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeDetlSpcUpdt();
}

function grp_biz_grd_acptprcplist_onselectchanged(obj:Grid, e:GridSelectEventInfo)
{
	fExePrcpChange();
}

//검체의 일련번호 생성 처리 Function
function fExeMakeSpcSeqNo(pRowCnt)
{	
	trace("pRowCnt="+pRowCnt);
	var iSpcSeqNo = 0;
	var iCurSeqNo = 0;
	var iSeqNo    = 0;
	var iRowNo    = 1;
	var sBarCdNo  = "";
	var sSpcSeqNo = "";
	
	//--------------------------------------
	for (var iNo=0; iNo < pRowCnt; iNo++)
	{
		iCurSeqNo = ds_grd_acptspclist.getColumn(iNo, "spcacptseqno");
		if(!utlf_isNull(iCurSeqNo))
		{
			//--------------------------------
			// 삭제대상 Row는 비교하지 않는다.
	//		if (grd_acptspclist.rowStatus(iNo) != 4)
	//		{
				//--------------------------------
				if (Number(iCurSeqNo) >= iSeqNo)
				{
					iSeqNo = Number(iCurSeqNo);
					//model.setValue("/root/main/updtspc/prcpspclist["+iNo+"]/spcacptseqno", (iRowNo).toString().getLeftPad(3,"0"));
					ds_grd_acptspclist.setColumn(iNo, "spcacptseqno", (iRowNo).toString().getLeftPad(3,"0"));
					
					//------------------------------------------------------------------------------
					//sBarCdNo = model.getValue("/root/main/updtspc/prcpspclist["+iNo+"]/spcbarcdno");
					sBarCdNo = ds_grd_acptspclist.getColumn(iNo, "spcbarcdno");
					sBarCdNo = utlf_transNullToEmpty(sBarCdNo).substr(0, 9);
					
					//------------------------------------------------
					sSpcSeqNo = (iRowNo).toString().getLeftPad(3,"0");
					sBarCdNo  += sSpcSeqNo.substr(1,2); 
					
					//model.setValue("/root/main/updtspc/prcpspclist["+iNo+"]/spcbarcdno", sBarCdNo);
					ds_grd_acptspclist.setColumn(iNo, "spcbarcdno", sBarCdNo);
					iRowNo++;
				}
	//		}
		}
	}
	//--------------------------------------------
	return (iRowNo).toString().getLeftPad(3, "0");
}

//변경 button
function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	fExePrcpUpdt();
}

function fExePrcpUpdt() 
{					
	var bState      = false;
	var iChoiNo = ds_grd_acptprcplist.rowposition ; //Number((ds_grd_acptprcplist.rowcount)- 1);
	var sSrcNode = ds_grd_acptprcplist;
	var sSpcNode = ds_grd_acptspclist;
	//var sReqFrmNode = "/root/init/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist";
	var itemp = 0;
	var sBfPatInfo = "Y";
	var sAfPatInfo = "Y";
	var sBfSignBfCnts = "";
	var sAftSignBfCnts = "";
	var sChkPid = "EMPTY";
	var bCurDate = false;
	
//	grd_acptprcplist.clearStatus();
//	grd_acptspclist.clearStatus();
	
	for(var iRowNo=0; iRowNo < ds_grd_acptprcplist.rowcount; iRowNo++)
	{	
		// 처방변경건이 존재하면 상태를 변경
		if(ds_grd_acptprcplist.getColumn(iRowNo, "afprcpcd") == "-" || utlf_isNull(ds_grd_acptprcplist.getColumn(iRowNo, "afprcpcd")))
		{
		  /* 이재오 막다 2017.06.09 일 */
		  // ds_grd_acptprcplist.setColumn(iRowNo, "afprcpcd", ds_grd_acptprcplist.getColumn(iRowNo, "bfprcpcd"));
		  // ds_grd_acptprcplist.setColumn(iRowNo, "afprcpnm", ds_grd_acptprcplist.getColumn(iRowNo, "bfprcpcd"));
		  /* 이재오 막다 2017.06.09 일 */			
		} 
		else 
		{
			itemp = iRowNo;
		
			bState = true;
			ds_grd_acptprcplist.setColumn(iRowNo, "status", "I");
			ds_grd_acptprcplist.setColumn(iRowNo, "prcpcd", ds_grd_acptprcplist.getColumn(iRowNo, "bfprcpcd"));
			ds_grd_acptprcplist.setColumn(iRowNo, "prcpnm", ds_grd_acptprcplist.getColumn(iRowNo, "bfprcpnm"));
			
			//한번에 여러환자의 처방을 변경할 수 없도록 수정.
			if(sChkPid != "EMPTY") 
			{
				if(sChkPid != ds_grd_acptprcplist.getColumn(iRowNo, "pid"))
				{
					sysf_messageBox("여러 환자의 처방을 동시에 변경할 수 없습니다.", "E999");
					fGetAcptPrcpList();
					return;
				}
			}
			else
			{
				sChkPid = ds_grd_acptprcplist.getColumn(iRowNo, "pid");
			}
		}
		
		//----------------------------------
		// 검체변경건이 존재하면 상태를 변경
		if(ds_grd_acptprcplist.getColumn(iRowNo, "afspccd") == "-" || utlf_isNull(ds_grd_acptprcplist.getColumn(iRowNo, "afspccd")))
		{
			// Continue
             /* 이재오 막다 2017.06.09 일 */
			//ds_grd_acptprcplist.setColumn(iRowNo, "afspccd", ds_grd_acptprcplist.getColumn(iRowNo, "bfspccd"));
			 /* 이재오 막다 2017.06.09 일 */
		} 
		else 
		{
			itemp = iRowNo;
			bState = true;
			
			ds_grd_acptprcplist.setColumn(iRowNo, "status", "I");
			ds_grd_acptprcplist.setColumn(iRowNo, "spccd", ds_grd_acptprcplist.getColumn(iRowNo, "bfspccd"));
			ds_grd_acptprcplist.setColumn(iRowNo, "spcnm", ds_grd_acptprcplist.getColumn(iRowNo, "bfspcnm"));
			
			//한번에 여러환자의 처방을 변경할 수 없도록 수정.
			if(sChkPid != "EMPTY")
			{
				if(sChkPid != ds_grd_acptprcplist.getColumn(iRowNo, "pid"))
				{
					sysf_messageBox("여러 환자의 처방을 동시에 변경할 수 없습니다.", "E999");
					fGetAcptPrcpList();
					return;
				}
			}
			else
			{
				sChkPid = ds_grd_acptprcplist.getColumn(iRowNo, "pid");
			}
		}
		
		if((bState) && (Number(ds_grd_acptprcplist.getColumn(iRowNo, "prcpdd"))) < Number(utlf_getCurrentDate().substr(0,8)))
		{
			bCurDate = true;
		}
		
		if(ds_hidden.getColumn(0, "afcertyn") == "Y")
		{
			if(utlf_isNull(ds_hidden.getColumn(0, "readdrid")) || ds_hidden.getColumn(0, "readdrid") == "A0")
			{
				sysf_messageBox("후인증 의사를 선택하여 주세요.", "E999");
				fGetAcptPrcpList();
				return;
			}
		}
		else
		{
			// 처방 or 대표검체 변경건이 존재하면 인증데이터 생성.
			if(bState && (ds_grd_acptprcplist.getColumn(iRowNo, "status") == "I"))
			{
				//병원환경설정에 외래 처방에 대한 미수납 접수 여부를 체크하여 외래 처방에대한 변경을 Block
				if(ds_hosoenvinfo.getColumn(0, "norcptacptyn") != "Y")
				{
					if((ds_grd_acptprcplist.getColumn(iRowNo, "prcpgenrflag") == "O") || (ds_grd_acptprcplist.getColumn(iRowNo, "prcpgenrflag") == "S"))
					{
						sysf_messageBox("변경신청건중 외래 환자가 존재합니다! 외래 환자는 처방변경을 ", "E001");
						fGetAcptPrcpList();
						return false;
						
					}
				}
				
				ds_grd_acptprcplist.setColumn(iRowNo, "prcpflag", "1");

				//처방변경전 인증전 데이터 생성
				ds_grd_acptprcplist.setColumn(iRowNo, "tempstatus", "C");
 				ds_grd_acptprcplist.setColumn(iRowNo, "tempprcpcd", ds_grd_acptprcplist.getColumn((Number(iRowNo)+1), "bfprcpcd"));
 				ds_grd_acptprcplist.setColumn(iRowNo, "tempprcpnm", ds_grd_acptprcplist.getColumn((Number(iRowNo)+1), "bfprcpnm"));
				ds_grd_acptprcplist.setColumn(iRowNo, "drugmthdspccd", ds_grd_acptprcplist.getColumn(iRowNo, "bfspccd"));
				ds_grd_acptprcplist.setColumn(iRowNo, "drugmthdspccdnm", ds_grd_acptprcplist.getColumn((Number(iRowNo)+1), "bfspcnm"));
				
				if(sBfPatInfo == "Y")
				{
					sBfSignBfCnts  = lpzfPlgyPrcpSignMake(ds_grd_acptprcplist.getColumn(iRowNo, "Y", "Y")); //(sSrcNode+"["+iRowNo+"]", "Y", "Y");
					sBfPatInfo = "N";
				} else {
					sBfSignBfCnts += lpzfPlgyPrcpSignMake(ds_grd_acptprcplist.getColumn(iRowNo, "N", "Y")); //lpzfPlgyPrcpSignMake(sSrcNode+"["+iRowNo+"]", "N", "Y");
				}
				trace("인증데이터");
				trace("sBfSignCnts="+sBfSignCnts);
				//처방변경후 인증전 데이터 생성
				
				ds_grd_acptprcplist.setColumn(iRowNo, "tempstatus", "I");
 				ds_grd_acptprcplist.setColumn(iRowNo, "tempprcpcd", ds_grd_acptprcplist.getColumn((Number(iRowNo) + 1), "afprcpcd"));
				ds_grd_acptprcplist.setColumn(iRowNo, "tempprcpnm", ds_grd_acptprcplist.getColumn((Number(iRowNo) + 1), "afprcpnm"));
				ds_grd_acptprcplist.setColumn(iRowNo, "drugmthdspccd", ds_grd_acptprcplist.getColumn(iRowNo, "afspccd"));
				ds_grd_acptprcplist.setColumn(iRowNo, "drugmthdspccdnm", ds_grd_acptprcplist.getColumn((Number(iRowNo) + 1), "afspccd"));
				
				if(sAfPatInfo == "Y")
				{
					sAftSignBfCnts  = lpzfPlgyPrcpSignMake(ds_grd_acptprcplist.getColumn(iRowNo, "Y", "Y"));//lpzfPlgyPrcpSignMake(sSrcNode+"["+iRowNo+"]", "Y", "Y");
					sAfPatInfo = "N";
				}
				else
				{
					sAftSignBfCnts += lpzfPlgyPrcpSignMake(ds_grd_acptprcplist.getColumn(iRowNo, "N", "Y"));//lpzfPlgyPrcpSignMake(sSrcNode+"["+iRowNo+"]", "N", "Y");
				}	
			} 
			
		}
	}
	
	trace("bState="+bState);
	// 과거처방 사유등록
	trace("bCurDate="+bCurDate);
	if ( (bState) && (bCurDate) )
	{
		bState = fExeSaveResn();	
	}
	trace("!!!bState!!!="+bState);
	//-----------
	if (bState) 
	{
		//--------------------------------						
		//model.removeNodeset("/root/send");
// 		model.makeValue("/root/send/instcd",       getUserInfo("dutplceinstcd"));
// 		model.makeValue("/root/send/updtprcplist", grd_acptprcplist.getUpdateData("update"));
// 		model.makeValue("/root/send/prcpspclist",  grd_acptspclist.getUpdateData());
// 		model.makeValue("/root/send/pid",          model.getValue(sSrcNode + "[" + iChoiNo + "]/pid"));
// 		model.makeValue("/root/send/reqfrmno",     model.getValue(sSrcNode + "[" + iChoiNo + "]/reqfrmno"));
// 		model.makeNode("/root/send/reqcnts");;
// 		
// 		model.makeValue("/root/send/doctid", model.getValue("/root/hidden/readdrid"));  //후인증의사
// 		model.makeValue("/root/send/doctnm", model.getValue("/root/init/userinfo/userinfolist[userid='"+ model.getValue("/root/hidden/readdrid") +"']/usernm"));
// 		model.makeValue("/root/send/afcertyn", model.getValue("/root/hidden/afcertyn"));

		dsf_createDsRow("ds_send0", [{col : "instcd", val : sysf_getUserInfo("dutplceinstcd")}
								   ,{col : "pid",    val : ds_grd_acptprcplist.getColumn(iChoiNo, "pid")}
								   ,{col : "reqno",  val : ds_grd_acptprcplist.getColumn(iChoiNo, "reqfrmno")}
								   ,{col : "reqcnts", val : ""}]);
		
		//if(model.getValue("/root/hidden/afcertyn") != "Y")
		
		if(ds_hidden.getColumn(0, "afcertyn") != "Y")
		{
// 			model.makeValue("/root/send/bfsignbfcnts", sBfSignBfCnts);
// 			model.makeValue("/root/send/aftsignbfcnts", sAftSignBfCnts);
// 			model.makeNode("/root/send/bfsignafcnts");
// 			model.makeNode("/root/send/aftsignafcnts");
			
			//----------------
			// 암호화자료 생성
			sChek = lpzfPlgyPrcpSaveSign(sBfSignBfCnts, sysf_getUserInfo("userid"), sInptPsw, ds_send_bfsignafcnts);
			trace("sChek ="+sChek)
			sInptPsw = false;
			if(utlf_isNull(sChek)|| sChek == "N")
			{
				sysf_messageBox("처방인증을 하여 주십시오.","E999");
				return;
			}
			
			//----------------
			// 암호화자료 생성
			sChek = lpzfPlgyPrcpSaveSign(sAftSignBfCnts, sysf_getUserInfo("userid"), sInptPsw, ds_send_aftsignafcnts);
			trace("sChek ="+sChek)
			if(utlf_isNull(sChek)|| sChek == "N")
			{
				sysf_messageBox("처방인증을 하여 주십시오.","E999");
				return;
			}
		}
		var sSignData = dsf_createDsRow("ds_temp_search", [{col: "doctid"		, val: cmb_readdr.value}
														,  {col: "doctnm"		, val: cmb_readdr.text}
														,  {col: "afcertyn"		, val: ds_hidden.getColumn(0, "afcertyn")}]);
		trace("!!!test!!!1112121");				
		//-----------
		//setAlertOn();

		var oParam = {};
			oParam.id          = "TXLPJ02201";
			oParam.service     = "plgyacptmngtapp.SpecimenAccept";
			oParam.method      = "reqExePrcpUpdtList";
			oParam.inds        = "reqfrminfo=ds_send0 prcplist=ds_grd_acptprcplist:U prcpspclist=ds_grd_acptspclist:U prcpsigndata="+sSignData;
			//reqfrminfo="+sInDsName+" prcplist=ds_grd_acptprcplist:U prcpspclist=ds_grd_acptspclist:U" 
			oParam.async       = false;
			//oParam.callback    = "cf_TXLPJ02201";
		tranf_submit(oParam);
//		if (submit("TXLPJ02201")) 
//		{
			//model.removeNodeset("/root/main/prcpspc/prcpspclist");
// 			ds_grd_acptprcplist.clearData();
// 			//model.removeNodeset("/root/main/updtspc/prcpspclist");
// 			ds_grd_acptspclist.clearData();
// 			fGetAcptPrcpList();
//		}
		fGetAcptPrcpList();
	}
	else
	{
		fGetAcptPrcpList();	
	}
}

//과거 처방 및 검체 변경 사유 처리 Function
function fExeSaveResn()
{
	trace("과거 처방 및 검체 변경 사유 처리");
	// 과거처방 구분 사유를 입력할 화면 좌표처리										
// 	var xpt = window.screenleft + eval(300);
// 	var ypt = window.screenTop + eval(300);					
// 	var coord = getRelativeCoordinate ( xpt, ypt );
// 	var mon = coord[0];
// 	xpt = coord[1];
// 	ypt = coord[2];
	
	//var sSrcNode    = "/root/main/acptprcp/acptprcplist";
	var sSrcNode = ds_grd_acptprcplist;

// 과거처방 변경 시
	//if ( Number(model.getValue(sSrcNode + "[" + CurrValNo + "]/prcpdd")) < Number(getCurrentDate().substr(0,8)) )
	//if(Number(ds_grd_acptprcplist.getColumn(CurrvValNo, "prcpdd")) < Number(utlf_getCurrentDate().substr(0, 8)))
	//{
		frmf_setParameter ("SPMMO16500_resnflag" , "B" );					//과거처방사유구분 
		frmf_setParameter ("SPMMO16500_prcpinfo" , sSrcNode );	    		//저장할 처방의 노드경로
		frmf_setParameter ("SPMMO16500_paminfo" , sSrcNode );   //원무정보 노드경로 PID, INDD/ORDDD, CRETNO,INSTCD, ORDTYPE ...
		frmf_setParameter ("SPMMO16500_rtn1" , "N" );  						//사유 정상 입력여부 
		frmf_setParameter ("SPMMO16500_endrowdelyn" , "N" ); 				//처방LIST 최종ROW삭제여부 => 처방화면에 검색라인때문에 씀.
		frmf_modal("SPMMO16500", "SPMMO16500", "", null, null, null, null, null, null, null, null, null, "M");	
		
		if( frmf_getParameter ("SPMMO16500_rtn1" ) != "Y" ) 
		{
			return false ;
		}
		else
		{
			return true;	
		}
//	}
}


function grp_biz_btn_delcncl_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeReMakeSeqNo();
}

 //검체 삭제취소 시 처리 Function
function fExeReMakeSeqNo()
{
	trace("삭제취소");
	var arrPostion = new Array();
	arrPostion[0]  = ds_grd_acptspclist.rowposition;
	grdf_setStatus(grp_biz.grd_acptspclist, "", arrPostion);
}
function ds_grd_acptprcplist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	//fExePrcpChange();
}

function grp_biz_grd_acptprcplist_ontextchanged(obj:Grid, e:GridEditTextChangedEventInfo)
{
	//fExePrcpChange();
}

function grp_biz_grd_acptprcplist_oncloseup(obj:Grid, e:GridEditEventInfo)
{
	grp_biz.grd_acptprcplist.updateToDataset();
	fExePrcpChange();
}

function grp_biz_grd_acptspclist_oncloseup(obj:Grid, e:GridEditEventInfo)
{
	obj.updateToDataset()
	var iRowNo = ds_grd_acptspclist.rowposition;
	if(!utlf_isNull(ds_grd_acptspclist.getColumn(iRowNo, "choispccd")))
	{
		if(grp_biz.grd_acptspclist.currentcol == 19)
		{
			ds_detlspclist.filterstr = "spccd =='" + ds_grd_acptspclist.getColumn(iRowNo, "choispccd") + "'";
			
			ds_grd_acptspclist.setColumn(iRowNo, "afspccd", ds_grd_acptspclist.getColumn(iRowNo, "choispccd"));	
			ds_grd_acptspclist.setColumn(iRowNo, "afspcnm", ds_detlspclist.getColumn(0, "spcnm"));
			
			ds_detlspclist.filterstr = "";
		}
	}
}

function grp_biz_grp_sea_ipt_seaval_onkeyup(obj:Edit, e:KeyEventInfo)
{
	var sRefVal = "";
		
	if(e.keycode == 13)
	{
		sRefVal = grp_biz.grp_sea.ipt_seaval.text;
		ds_init.setColumn(0, "refval", sRefVal.toUpperCase());
		
		fGetAcptPrcpList();
	}
}
]]></Script>
  </Form>
</FDL>