YNU_JEUS/app_home/himed/xpapps/lis/plgyacptmngtxp/xp/SMLPJ01100_부가처방등록.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLPJ01100" position="absolute 0 0 1256 805" titletext="부가처방" oninit="SMLPJ01100_oninit" onload="SMLPJ01100_onload">
    <Layouts>
      <Layout>
        <Shape id="line17" linetype="horizontal" class="line_6" position="absolute 1 54 1195 60" style="strokepen:3 solid #9ebed4ff;"/>
        <Button id="btn_prcpcnfm" taborder="1" text="처방확인" class="btn4" position="absolute 1031 27 1111 49" onclick="btn_prcpcnfm_onclick" anchor="top right"/>
        <Button id="btn_save" taborder="2" text="처방저장" class="btn4" position="absolute 865 27 945 49" onclick="btn_save_onclick" anchor="top right"/>
        <Button id="btn_cnfmcncl" taborder="3" text="확인취소" class="btn4" position="absolute 1114 27 1194 49" onclick="btn_cnfmcncl_onclick" anchor="top right"/>
        <Button id="btn_prcpcncl" taborder="4" text="처방취소" class="btn4" position="absolute 948 27 1028 49" onclick="btn_prcpcncl_onclick" anchor="top right"/>
        <Button id="button13" taborder="5" text="EXCEL저장" class="btn7" position="absolute 3 30 95 52" onclick="button13_onclick"/>
        <Static id="caption6" text="부가처방" class="tit_1" position="absolute 0 0 85 25"/>
        <Div id="grp_sea" taborder="6" position="absolute 1 58 1195 93" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Static id="caption2" text="접수일자 :" class="search_name" position="absolute 798 9 884 26" anchor="top right"/>
              <Static id="caption4" text="등록번호 :" class="search_name" position="absolute 424 9 510 26"/>
              <Static id="caption5" text="~" class="search_no_b" position="absolute 980 10 992 27" anchor="top right"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1104 7 1110 29" anchor="top right"/>
              <Calendar id="ipt_acptddfrom" taborder="11" class="input_s_essential" position="absolute 871 8 973 27" anchor="top right"/>
              <Calendar id="ipt_acptddto" taborder="12" class="input_s_essential" position="absolute 998 8 1100 27" onkeyup="grp_sea_ipt_acptddto_onkeyup" anchor="top right"/>
              <Button id="btn_sea" taborder="13" text="조회" class="btn1" position="absolute 1123 7 1179 29" onclick="grp_sea_btn_sea_onclick" anchor="top right"/>
              <Edit id="ipt_seaval" taborder="14" class="input_search" position="absolute 501 7 579 26"/>
              <Static id="caption8" text="처방구분 :" class="search_name" position="absolute 597 9 688 26"/>
              <Combo id="cmbprcpflag" taborder="15" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 687 8 787 27">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">0</Col>
                      <Col id="datacolumn">등록처방</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">취소처방</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Combo id="cbo_ptnocd" taborder="16" innerdataset="ds_init_cbo_ptnocd" codecolumn="ptnocd" datacolumn="ptnonm" position="absolute 109 8 230 27"/>
              <Edit id="ipt_fromptno" taborder="17" class="text_center" position="absolute 263 8 313 27"/>
              <Static id="caption1" text="병리번호 :" class="search_name" position="absolute 15 9 105 26"/>
              <Static id="caption10" text="~" class="search_no_b" position="absolute 316 8 328 25"/>
              <Edit id="input1" taborder="18" class="text_center" position="absolute 361 8 411 27"/>
              <Edit id="input2" taborder="19" class="text_center" position="absolute 331 8 358 27"/>
              <Edit id="ipt_fromyear" taborder="20" class="text_center" position="absolute 233 8 260 27"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 1 329 930 335" style="strokepen:3 solid #33bbbbff;" anchor="left right bottom"/>
        <Static id="caption3" text="부가처방 목록" class="tit_2" position="absolute 3 312 110 329" anchor="left right bottom"/>
        <Static id="caption7" text="환자정보" class="tit_2" position="absolute 3 101 86 124"/>
        <Shape id="line2" linetype="horizontal" class="line_1" position="absolute 1 118 930 124" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
        <Shape id="line11" linetype="horizontal" class="line_1" position="absolute 937 118 1195 124" style="strokepen:3 solid #33bbbbff;" anchor="top right"/>
        <Static id="caption17" text="처방분류" class="tit_2" position="absolute 939 102 1014 118" anchor="top right"/>
        <Grid id="grd_prcplist" class="datagrid2" taborder="7" binddataset="ds_grd_prcplist" useinputpanel="false" position="absolute 1 333 930 790" anchor="left right bottom" autofittype="none">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="40"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="81"/>
                <Column size="65"/>
                <Column size="60"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="40"/>
                <Column size="60"/>
                <Column size="70"/>
                <Column size="60"/>
                <Column size="0"/>
                <Column size="50"/>
                <Column size="0"/>
                <Column size="120"/>
                <Column size="150"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="70"/>
                <Column size="60"/>
                <Column size="0"/>
                <Column size="60"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="40"/>
              </Columns>
              <Rows>
                <Row size="26" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="선&#10;택"/>
                <Cell col="1" text="기관코드"/>
                <Cell col="2" text="병리번호"/>
                <Cell col="3" text="병리번호"/>
                <Cell col="4" text="등록번호"/>
                <Cell col="5" text="환자명"/>
                <Cell col="6" text="검체코드"/>
                <Cell col="7" text="검체명"/>
                <Cell col="8" text="검체&#10;번호"/>
                <Cell col="9" text="Cassette&#10;번호"/>
                <Cell col="10" text="처방일자"/>
                <Cell col="11" text="처방시간"/>
                <Cell col="12" text="처방의ID"/>
                <Cell col="13" text="처방의"/>
                <Cell col="14" text="검사코드"/>
                <Cell col="15" text="검사항목"/>
                <Cell col="16" text="비고"/>
                <Cell col="17" text="검사그룹코드"/>
                <Cell col="18" text="검사그룹명"/>
                <Cell col="19" text="확인일자"/>
                <Cell col="20" text="확인시간"/>
                <Cell col="21" text="확인자ID"/>
                <Cell col="22" text="확인자"/>
                <Cell col="23" text="prcpseqno"/>
                <Cell col="24" text="cnfmflagcd"/>
                <Cell col="25" text="delflagcd"/>
                <Cell col="26" text="orgdelflagcd"/>
                <Cell col="27" text="처방&#10;상태"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:choi"/>
                <Cell col="1" text="bind:instcd"/>
                <Cell col="2" text="bind:ptno"/>
                <Cell col="3" class="text_center" text="bind:dispptno"/>
                <Cell col="4" class="text_center" text="bind:pid"/>
                <Cell col="5" class="text_center" text="bind:patnm"/>
                <Cell col="6" text="bind:spccd"/>
                <Cell col="7" text="bind:spcnm"/>
                <Cell col="8" class="text_center" text="bind:spcseqno"/>
                <Cell col="9" class="text_center" text="bind:csteno"/>
                <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" text="bind:orddrid"/>
                <Cell col="13" class="text_center" text="bind:orddrnm"/>
                <Cell col="14" text="bind:testcd"/>
                <Cell col="15" text="bind:testnm"/>
                <Cell col="16" displaytype="text" edittype="text" text="bind:remcmts"/>
                <Cell col="17" text="bind:testgrupcd"/>
                <Cell col="18" text="bind:testgrupnm"/>
                <Cell col="19" displaytype="date" edittype="date" class="text_center" text="bind:cnfmdd" mask="yyyy-MM-dd"/>
                <Cell col="20" displaytype="date" edittype="date" class="text_center" text="bind:cnfmtm" mask="hh:mm:ss"/>
                <Cell col="21" text="bind:cnfmid"/>
                <Cell col="22" class="text_center" text="bind:cnfmnm"/>
                <Cell col="23" text="bind:prcpseqno"/>
                <Cell col="24" text="bind:cnfmflagcd"/>
                <Cell col="25" text="bind:delflagcd"/>
                <Cell col="26" text="bind:orgdelflagcd"/>
                <Cell col="27" text="bind:prcpstatnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="grd_patinfolist" taborder="8" binddataset="ds_grd_patinfolist" useinputpanel="false" position="absolute 1 122 930 306" autofittype="col" oncellclick="grd_patinfolist_oncellclick" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="29"/>
                <Column size="40"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="90"/>
                <Column size="90"/>
                <Column size="90"/>
                <Column size="0"/>
                <Column size="243"/>
                <Column size="70"/>
                <Column size="90"/>
                <Column size="94"/>
                <Column size="93"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="선택"/>
                <Cell col="2" text="기관코드"/>
                <Cell col="3" text="ptno"/>
                <Cell col="4" text="병리번호"/>
                <Cell col="5" text="등록번호"/>
                <Cell col="6" text="환자명"/>
                <Cell col="7" text="검체코드"/>
                <Cell col="8" text="검체명"/>
                <Cell col="9" text="검체번호"/>
                <Cell col="10" text="Cassette번호"/>
                <Cell col="11" text="처방일자"/>
                <Cell col="12" text="접수일자"/>
                <Cell col="13" text="부가처방존재"/>
              </Band>
              <Band id="body">
                <Cell style="background:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);background2:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);" text="expr:currow + 1"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" style="background:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);background2:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);" text="bind:choi"/>
                <Cell col="2" style="background:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);background2:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);" text="bind:instcd"/>
                <Cell col="3" style="background:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);background2:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);" text="bind:ptno"/>
                <Cell col="4" style="background:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);background2:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);" class="text_center" text="bind:dispptno"/>
                <Cell col="5" style="background:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);background2:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);" class="text_center" text="bind:pid"/>
                <Cell col="6" style="background:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);background2:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);" class="text_center" text="bind:patnm"/>
                <Cell col="7" style="background:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);background2:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);" text="bind:spccd"/>
                <Cell col="8" style="align:left middle;background:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);background2:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);" text="bind:spcnm"/>
                <Cell col="9" style="background:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);background2:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);" class="text_center" text="bind:spcseqno"/>
                <Cell col="10" style="background:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);background2:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);" class="text_center" text="bind:csteno"/>
                <Cell col="11" displaytype="date" edittype="date" style="background:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);background2:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);" class="text_center" text="bind:prcpdd" mask="yyyy-MM-dd"/>
                <Cell col="12" displaytype="date" edittype="date" style="background:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);background2:EXPR(!utlf_isNull(addpr) ? &quot;#ffcc00&quot; : &quot;#f9ffff&quot;);" class="text_center" text="bind:acptdd" mask="yyyy-MM-dd"/>
                <Cell col="13" text="bind:addpr"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="trv_prcpkind" taborder="9" useinputpanel="false" treeusecheckbox="false" position="absolute 937 122 1195 306" autofit="col" binddataset="ds_prcpkindlist" oncellclick="trv_prcpkind_oncellclick" anchor="top right bottom">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="255"/>
              </Columns>
              <Rows>
                <Row size="24"/>
              </Rows>
              <Band id="body">
                <Cell displaytype="tree" edittype="tree" text="bind:earnclsnm" treelevel="bind:lvl"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line3" linetype="horizontal" class="line_1" position="absolute 936 329 1194 335" style="strokepen:3 solid #33bbbbff;fillbrush:solid #33bbbbff true;" anchor="right bottom"/>
        <Static id="caption9" text="처방목록" class="tit_2" position="absolute 938 312 1013 329" anchor="right bottom"/>
        <Grid id="grd_testcdlist" taborder="10" binddataset="ds_grd_testcdlist" useinputpanel="false" position="absolute 937 333 1195 790" autofittype="col" anchor="right bottom" oncelldblclick="grd_testcdlist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="256"/>
                <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"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="기관코드"/>
                <Cell col="1" text="처방코드"/>
                <Cell col="2" text="처방명"/>
                <Cell col="3" text="처방명"/>
                <Cell col="4" text="처방명"/>
                <Cell col="5" text="처방명"/>
                <Cell col="6" text="caption1"/>
                <Cell col="7" text="caption2"/>
                <Cell col="8" text="caption3"/>
                <Cell col="9" text="caption4"/>
                <Cell col="10" text="caption5"/>
                <Cell col="11" text="caption6"/>
                <Cell col="12" text="caption7"/>
                <Cell col="13" text="caption8"/>
                <Cell col="14" text="caption9"/>
                <Cell col="15" text="caption10"/>
                <Cell col="16" text="caption11"/>
                <Cell col="17" text="caption12"/>
                <Cell col="18" text="caption13"/>
                <Cell col="19" text="caption14"/>
                <Cell col="20" text="caption15"/>
                <Cell col="21" text="caption16"/>
              </Band>
              <Band id="body">
                <Cell text="bind:instcd"/>
                <Cell col="1" text="bind:testcd"/>
                <Cell col="2" style="align:left middle;" text="bind:testengnm"/>
                <Cell col="3" text="bind:testengabbr"/>
                <Cell col="4" text="bind:testhngnm"/>
                <Cell col="5" text="bind:testhngabbr"/>
                <Cell col="6" text="bind:acptdept"/>
                <Cell col="7" text="bind:ptnocd"/>
                <Cell col="8" text="bind:stdyptnocd"/>
                <Cell col="9" text="bind:trustptnocd"/>
                <Cell col="10" text="bind:workflagcd"/>
                <Cell col="11" text="bind:slidflagcd"/>
                <Cell col="12" text="bind:slidisscnt"/>
                <Cell col="13" text="bind:blocflagcd"/>
                <Cell col="14" text="bind:initblocno"/>
                <Cell col="15" text="bind:autokeepflagcd"/>
                <Cell col="16" text="bind:stdy_workflagcd"/>
                <Cell col="17" text="bind:stdy_slidflagcd"/>
                <Cell col="18" text="bind:stdy_slidisscnt"/>
                <Cell col="19" text="bind:stdy_blocflagcd"/>
                <Cell col="20" text="bind:stdy_initblocno"/>
                <Cell col="21" text="bind:stdy_autokeepflagcd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <MaskEdit id="ipt_isscnts" taborder="11" mask="#,###" position="absolute 1160 308 1195 327" anchor="right bottom"/>
        <Button id="btn_outoch2" taborder="12" text="영문정렬" class="btn2" visible="false" position="absolute 1084 308 1148 327" onclick="btn_outoch2_onclick" anchor="right bottom"/>
        <Button id="btn_outoch1" taborder="13" text="한글정렬" class="btn2" position="absolute 1084 308 1148 327" onclick="btn_outoch1_onclick" anchor="right bottom"/>
      </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_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING"/>
          <Column id="instcd" type="STRING"/>
          <Column id="ptno" type="STRING"/>
          <Column id="dispptno" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="spcnm" type="STRING"/>
          <Column id="spcseqno" type="STRING"/>
          <Column id="csteno" type="STRING"/>
          <Column id="prcpdd" type="STRING"/>
          <Column id="prcptm" type="STRING"/>
          <Column id="orddrid" type="STRING"/>
          <Column id="orddrnm" type="STRING"/>
          <Column id="testcd" type="STRING"/>
          <Column id="testnm" type="STRING"/>
          <Column id="remcmts" type="STRING"/>
          <Column id="testgrupcd" type="STRING"/>
          <Column id="testgrupnm" type="STRING"/>
          <Column id="cnfmdd" type="STRING"/>
          <Column id="cnfmtm" type="STRING"/>
          <Column id="cnfmid" type="STRING"/>
          <Column id="cnfmnm" type="STRING"/>
          <Column id="prcpseqno" type="STRING"/>
          <Column id="cnfmflagcd" type="STRING"/>
          <Column id="delflagcd" type="STRING"/>
          <Column id="orgdelflagcd" type="STRING"/>
          <Column id="prcpstatnm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING"/>
          <Column id="instcd" type="STRING"/>
          <Column id="ptno" type="STRING"/>
          <Column id="dispptno" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="spcnm" type="STRING"/>
          <Column id="spcseqno" type="STRING"/>
          <Column id="csteno" type="STRING"/>
          <Column id="prcpdd" type="STRING"/>
          <Column id="acptdd" type="STRING"/>
          <Column id="addpr" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_testcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING"/>
          <Column id="testcd" type="STRING"/>
          <Column id="testengnm" type="STRING"/>
          <Column id="testengabbr" type="STRING"/>
          <Column id="testhngnm" type="STRING"/>
          <Column id="testhngabbr" type="STRING"/>
          <Column id="acptdept" type="STRING"/>
          <Column id="ptnocd" type="STRING"/>
          <Column id="stdyptnocd" type="STRING"/>
          <Column id="trustptnocd" type="STRING"/>
          <Column id="workflagcd" type="STRING"/>
          <Column id="slidflagcd" type="STRING"/>
          <Column id="slidisscnt" type="STRING"/>
          <Column id="blocflagcd" type="STRING"/>
          <Column id="initblocno" type="STRING"/>
          <Column id="autokeepflagcd" type="STRING"/>
          <Column id="stdy_workflagcd" type="STRING"/>
          <Column id="stdy_slidflagcd" type="STRING"/>
          <Column id="stdy_slidisscnt" type="STRING"/>
          <Column id="stdy_blocflagcd" type="STRING"/>
          <Column id="stdy_initblocno" type="STRING"/>
          <Column id="stdy_autokeepflagcd" 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="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_prcpkindlist" 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="lvl" type="STRING" size="256" sumtext="Level"/>
          <Column id="earncls1" type="STRING" size="256" sumtext="수익분류1"/>
          <Column id="earncls2" type="STRING" size="256" sumtext="수익분류2"/>
          <Column id="earncls3" type="STRING" size="256" sumtext="수익분류3"/>
          <Column id="earnclsnm" type="STRING" size="256" sumtext="수익분류명"/>
          <Column id="earnclskey" type="STRING" size="256" sumtext="수익분류Key"/>
        </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="refval" type="STRING" size="256"/>
          <Column id="refmthd" type="STRING" size="256"/>
          <Column id="prcpfromdd" type="STRING" size="256"/>
          <Column id="prcptodd" type="STRING" size="256"/>
          <Column id="prcpflag" type="STRING" size="256"/>
          <Column id="isscnts" type="STRING" size="256"/>
          <Column id="patrefmthd" type="STRING" size="256"/>
          <Column id="patrefval" type="STRING" size="256"/>
          <Column id="ptnocode" type="STRING" size="256"/>
          <Column id="fromyear" type="STRING" size="256"/>
          <Column id="toyear" type="STRING" size="256"/>
          <Column id="fromptno" type="STRING" size="256"/>
          <Column id="toptno" type="STRING" size="256"/>
        </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="sortkind" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="sortkind">-</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_grupdetltestlist" 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="testgrupcd" type="STRING" size="256" sumtext="처방일자"/>
          <Column id="testcd" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="testnm" type="STRING" size="256" sumtext="환자성명"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.cbo_ptnocd" propid="value" datasetid="ds_init" columnid="ptnocode"/>
      <BindItem id="item1" compid="grp_sea.ipt_fromyear" propid="value" datasetid="ds_init" columnid="fromyear"/>
      <BindItem id="item2" compid="grp_sea.ipt_fromptno" propid="value" datasetid="ds_init" columnid="fromptno"/>
      <BindItem id="item3" compid="grp_sea.input2" propid="value" datasetid="ds_init" columnid="toyear"/>
      <BindItem id="item4" compid="grp_sea.input1" propid="value" datasetid="ds_init" columnid="toptno"/>
      <BindItem id="item5" compid="grp_sea.ipt_seaval" propid="value" datasetid="ds_init" columnid="refval"/>
      <BindItem id="item6" compid="grp_sea.cmbprcpflag" propid="value" datasetid="ds_init" columnid="prcpflag"/>
      <BindItem id="item7" compid="grp_sea.ipt_acptddfrom" propid="value" datasetid="ds_init" columnid="prcpfromdd"/>
      <BindItem id="item8" compid="grp_sea.ipt_acptddto" propid="value" datasetid="ds_init" columnid="prcptodd"/>
      <BindItem id="item9" compid="ipt_isscnts" propid="value" datasetid="ds_init" columnid="isscnts"/>
    </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";

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

function SMLPJ01100_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_patinfolist);
	grdf_initGrid(grd_prcplist);
	grdf_initGrid(grd_testcdlist);
	grdf_initGrid(trv_prcpkind);
	fExeInitialize();
}

//초기화
function fExeInitialize()
{
	var sCurDate = "";
	//-----------------------------------------
	btn_outoch1.visible = false;						
	btn_outoch2.visible = true;
	
	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);
	
	//submit("TRLPZ00109", false);		// 병리번호코드 조회
	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);
	
	//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);
	
	//submit("TRLPJ01001");			       // 처방분류
		var oParam = {};
		oParam.id          = "TRLPJ01001";
		oParam.service     = "plgyacptmngtapp.SpecimenAccept";
		oParam.method      = "reqGetPrcpKindList";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_prcpkindlist=reflist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPJ01001";
	tranf_submit(oParam);

	//-------------
	// 노드 초기화
	sCurDate = ds_data_sysdtinfo.getColumn(0, "sysdd");
	
	//------------
	// 초기값 설정
	ds_init.setColumn(0, "refval",     "");
	ds_init.setColumn(0, "refmthd",    "");
	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, "prcpflag",   "0");
	ds_init.setColumn(0, "isscnts",    "1");
	ds_init.setColumn(0, "patrefmthd", "0");
	ds_init.setColumn(0, "patrefval",  "0");
	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",     "");
	
	
	//---------------------------------------------------------
	// 병원환경정보를 취득하여 병리과와 병리팀 코드를 편집한다.
	//lpzfUserDeptCd("/root/init/hospenv/hospenvinfo", "/root/hidden");
	//lpzfUserDeptCd(ds_hosoenvinfo, ds_hidden);
}

//처방분류 선택 처리 Function
function fExePrcpKindClick()
{					
	var sEarnCls1 = "";
	var sEarnCls2 = "";
	var sEarnCls3 = "";
	
	var item = ds_prcpkindlist.rowposition;
	
	//-------------------------------
	// 최하위 노드를 선택할 경우 처리
	if(trv_prcpkind.isTreeLeafRow(item) == true)
	{
		sEarnCls1 = ds_prcpkindlist.getColumn(item, "earnclskey");

		//--------------
		// 처방분류 분리						
		sEarnCls3 = sEarnCls1.substr(5,2);
		sEarnCls2 = sEarnCls1.substr(3,2);
		sEarnCls1 = sEarnCls1.substr(1,2);
		
		dsf_createDsRow( "ds_send", [{col : "instcd",      val : sysf_getUserInfo("dutplceinstcd")}
									,{col : "earncls1",    val : sEarnCls1}
									,{col : "earncls2",    val : sEarnCls2}
									,{col : "earncls3",    val : sEarnCls3}
									,{col : "trustflagcd", val : "N"}
									,{col : "sortkind",    val : ds_hidden.getColumn(0, "sortkind")}]);

			
		//-------------------
		//submit("TRLPJ01006");
		var oParam = {};
			oParam.id          = "TRLPJ01006";
			oParam.service     = "plgyacptmngtapp.SpecimenAccept";
			oParam.method      = "reqGetPrcpCdTotList";
			oParam.inds        = "refData=ds_send";
			oParam.outds       = "ds_grd_testcdlist=reflist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLPJ01006";
		tranf_submit(oParam);
	}
}

function fGetPlgyAddPrcpList()
{					
	ds_grd_prcplist.clearData();
	var sTemp = "";
	//------------------------------------------------
	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 :"refval",     val : ds_init.getColumn(0, "refval")}			//등록번호
	                            ,{col :"refmthd",    val : ds_init.getColumn(0, "refmthd")}			
	                            ,{col :"prcpflag",   val : ds_init.getColumn(0, "prcpflag")}		//처방구분
	                            ,{col :"prcpfromdd", val : ds_init.getColumn(0, "prcpfromdd")}		//접수일자(From)
	                            ,{col :"prcptodd",   val : ds_init.getColumn(0, "prcptodd")}		//접수일자(To)
	                            ,{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")}]);
	
	//-------------------
		//if(submit("TRLPJ01102"))
	var oParam = {};
		oParam.id          = "TRLPJ01102";
		oParam.service     = "plgyacptmngtapp.SpecimenAccept";
		oParam.method      = "reqGetAddPrcpPatInfo";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_grd_patinfolist=refrslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPJ01102";
	tranf_submit(oParam);	
	
	// 부가처방이 존재한 데이터는 색을 표시한다.
	for(var iNo = 0; iNo <= ds_grd_patinfolist.rowcount; iNo++)
	{
		if( !utlf_isNull(ds_grd_patinfolist.getColumn(iNo, "addpr")))
		{
// 			// 부가처방이 존재하고...
// 			grd_patinfolist.setCellProperty("Body", iNo, "background", "#ffcc00");
// 			grd_patinfolist.setCellProperty("Body", iNo, "background2", "#ffcc00");
		
		}
		else
		{
			//	grd_patinfolist.setCellProperty("Body", iNo, "background", "#f9ffff");
			//	grd_patinfolist.setCellProperty("Body", iNo, "background2", "#f9ffff")// 존재 안하면 하얀색으로..
		}	
	}
		
}

function fExePatInfoClick()
{
	fExeChoiPatInfo();
}

//환자정보 선택 처리 Function
function fExeChoiPatInfo()
{	
	var sNode = ds_grd_patinfolist;
	var iRowNo = ds_grd_patinfolist.rowposition;
	
	//-----------------------------------------------------
	for(var iNo = 0; iNo<=ds_grd_patinfolist.rowcount; iNo++)
	{
		ds_grd_patinfolist.setColumn(iNo, "choi", false);
	}
	
	ds_grd_patinfolist.setColumn(iRowNo, "choi", true);
	
	dsf_createDsRow("ds_send",  [{col : "instcd",       val : sysf_getUserInfo("dutplceinstcd")}
	                            ,{col : "refval",       val : ds_grd_patinfolist.getColumn(iRowNo, "pid")}
	                            ,{col : "refmthd",      val : ds_init.getColumn(0, "refmthd")}
	                            ,{col : "prcpflag",     val : ds_init.getColumn(0, "prcpflag")}
	                            ,{col : "prcpfromdd",   val : ds_init.getColumn(0, "prcpfromdd")}
	                            ,{col : "prcptodd",     val : ds_init.getColumn(0, "prcptodd")}
	                            ,{col : "ptno",         val : ds_grd_patinfolist.getColumn(iRowNo, "ptno")}]);
	//-------------------
	//submit("TRLPJ01101");
	var oParam = {};
		oParam.id          = "TRLPJ01101";
		oParam.service     = "plgyacptmngtapp.SpecimenAccept";
		oParam.method      = "reqGetPlgyAddPrcpList";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_grd_prcplist=refrslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPJ01101";
	tranf_submit(oParam);
}

//부가처방 등록 처리 Function
function fExeSave()
{
	var bState     = false;
	var sSrcNode= ds_grd_prcplist;
	var iMaxRowCnt = ds_grd_prcplist.rowcount;
	
	for(var iNo=0; iNo < iMaxRowCnt; iNo++)
	{
		//--------------------------------------------------------
		if(ds_grd_prcplist.getColumn(iNo, "choi") == "true")
		{
			trace("????");
			//------------
			// 확인자 검사
			if(ds_grd_prcplist.getColumn(iNo, "cnfmid") == "-")
			{
				// 취소처방여부 검사
				if(ds_grd_prcplist.getColumn(iNo, "orgdelflagcd") == "1")
				{
					sysf_messageBox("취소된 부가처방은 재 등록 ", "E001");
					return false;
				} 
				else if(ds_grd_prcplist.getColumn(iNo, "orgdelflagcd") == "0")
				{
					sysf_messageBox("등록된 부가처방은 재 등록 ", "E001");
					return false;
				} 
				else
				{
					trace("else");
					ds_grd_prcplist.setColumn(iNo, "cnfmflagcd", "2");
					ds_grd_prcplist.setColumn(iNo, "delflagcd", "2");
					bState = true;
				}
			}
			else
			{	
				sysf_messageBox("등록된 부가처방은 재 등록 ", "E001");
				return false;
			}
		}
	}
	
	if( !lpzfGetDoctorCheck(ds_hosoenvinfo, sysf_getUserInfo("jobkindcd")) )
	{
		sysf_messageBox("의사직급만 처방이 ", "I006");
		return false;
	}
	trace("bState="+bState);
	//------------
	if (bState)
	{
		var oParam = {};
			oParam.id          = "TXLPJ01101";
			oParam.service     = "plgyacptmngtapp.SpecimenAccept";
			oParam.method      = "reqInsAddPrcp";
			oParam.inds        = "refData=ds_grd_prcplist";
			oParam.async       = false;
			oParam.callback    = "cf_TXLPJ01101";
		tranf_submit(oParam);
	}	
}

function cf_TXLPJ01101(sSvcId, nErrorCode, sErrorMsg)
{
    if(nErrorCode < 0) return;
    
    trace("callback");
    fGetPlgyAddPrcpList();
}
					
//부가처방 등록 처리 Function
function fExePrcpCnfm(pBizFlagCd)
{	
	var bState     = false	
	var sSrcNode = ds_grd_prcplist;
	var iMaxRowCnt = ds_grd_prcplist.rowcount;
	
	//-------------------------
	
	//-----------------------------------------
	for (var iNo=0; iNo < iMaxRowCnt; iNo++) 
	{
		//--------------------------------------------------------
		if(ds_grd_prcplist.getColumn(iNo, "choi") == "true")
		{
			switch (pBizFlagCd)
			{
				case "0" :
					//------------
					// 확인자 검사
					if(ds_grd_prcplist.getColumn(iNo, "cnfmdd") == "-")
					{
						
						//------------------
						// 취소처방여부 검사
						if(ds_grd_prcplist.getColumn(iNo, "orgdelflagcd") == "1")
						{
							sysf_messageBox("취소된 부가처방은 처방확인을 ", "E001");
							return false;
						} 
						else if (ds_grd_prcplist.getColumn(iNo, "orgdelflagcd") == "0")
						{
							ds_grd_prcplist.setColumn(iNo, "cnfmflagcd", "0");
							ds_grd_prcplist.setColumn(iNo, "delflagcd", "0");
							bState = true;
						}
						else
						{
							sysf_messageBox("신규 부가처방은 처방확인을 ", "E001");
							return false;
						}
					} 
					else 
					{
						sysf_messageBox("처방확인된 부가처방은 재 확인 ", "E001");
						return false;
					}
					break;
					
				//-------------
				// 처방확인취소
				case "1" :
					//------------
					// 확인자 검사
					if(ds_grd_prcplist.getColumn(iNo, "cnfmdd") != "-")
					{
						//------------------
						// 취소처방여부 검사
						if(ds_grd_prcplist.getColumn(iNo, "orgdelflagcd") == "1")
						{
							sysf_messageBox("취소된 부가처방은 확인취소를 ", "E001");
							return false;
						} 
						else if(ds_grd_prcplist.getColumn(iNo, "orgdelflagcd") == "0")
						{
							ds_grd_prcplist.setColumn(iNo, "cnfmflagcd", "1");
							ds_grd_prcplist.setColumn(iNo, "delflagcd", "0");
							bState = true;
						} 
						else
						{
							sysf_messageBox("신규 부가처방은 확인취소를 ", "E001");
							return false;
						}
					}
					else
					{
						sysf_messageBox("확인안된 부가처방은 확인취소를 ", "E001");
						return false;
					}
					break;
					
				//----------
				// 처방취소
				case "2" :
					//------------
					// 확인자 검사
					if(ds_grd_prcplist.getColumn(iNo, "cnfmdd") == "-")
					{	
						//------------------
						// 취소처방여부 검사
						if(ds_grd_prcplist.getColumn(iNo, "orgdelflagcd") =="1")
						{
							sysf_messageBox("취소된 부가처방은 처방취소를 ", "E001");
							return false;
						} 
						else if(ds_grd_prcplist.getColumn(iNo, "orgdelflagcd") == "0")
						{
							ds_grd_prcplist.setColumn(iNo, "cnfmflagcd", "2");
							ds_grd_prcplist.setColumn(iNo, "delflagcd", "1");
							bState = true;
						} 
						else
						{
							sysf_messageBox("신규 부가처방은 확인취소를 ", "E001");
							return false;
						}
					} 
					else 
					{
						sysf_messageBox("확인된 부가처방은 처방취소를 ", "E001");
						return false;
					}
					break;
			}
		}
	}
	
	//------------
	if (bState) 
	{
		dsf_createDsRow( "ds_send_addprcplist", [{ col : "addprcplist", val : ""}]);
		var temp = grdf_getGridUpdateData(grd_prcplist, "all")
		ds_send_addprcplist.copyData(temp, true);
		
		var oParam = {};
			oParam.id          = "TXLPJ01102";
			oParam.service     = "plgyacptmngtapp.SpecimenAccept";
			oParam.method      = "reqUpdAddPrcp";
			oParam.inds        = "refData=ds_send_addprcplist";
			oParam.async       = false;
			//oParam.callback    = "cf_TXLPJ01102";
		tranf_submit(oParam);
		fGetPlgyAddPrcpList();
	}					
}

/* @group  : 부가처방등록
 * @ver    : 2007.08.22 (CMCDEV-0001)
 * @by     : 유동철(ACK)
 * @-----------------------------------
 * @type   : function
 * @access : public
 * @desc   : 부가처방 추가 처리 Function
*/
function fExePrcpAdd()
{
	var iRowNo    = 0;
	var iFindNo   = 0;
	var sPatNode = ds_grd_patinfolist;
	var sSrcNode  = "";
	var sDescNode = ds_grd_prcplist;
	
	
	//-----------------------
	// 환자의 선택여부를 검사
	iFindRow = ds_grd_patinfolist.findRow("choi", true, 0)
	trace("iFindRow="+iFindRow);
	if (iFindRow <= -1)
	{
		sysf_messageBox("환자정보에서 환자를 ", "C002");
		return false;
	}
	
	//---------------------------------------------
	// 그룹(Battery) 처방일 경우 상세 검사항목 조회
	if(ds_grd_testcdlist.getColumn(ds_grd_testcdlist.rowposition, "grupsnglflag") == "G")
	{
		ds_send.clearData();
		dsf_createDsRow("ds_send", [{col : "instcd", val : ds_grd_testcdlist.getColumn(ds_grd_testcdlist.rowposition, "instcd")}
		                           ,{col : "prcpdd", val : utlf_getCurrentDate()}
		                           ,{col : "testcd", val : ds_grd_testcdlist.getColumn(ds_grd_testcdlist.rowposition, "testcd")}
		                           ,{col : "grupuseyn", val : "0"}
		                           ,{col : "testuseyn", val : "0"}]);
		
		var oParam = {};
			oParam.id          = "TRLPJ01103";
			oParam.service     = "plgyacptmngtapp.SpecimenAccept";
			oParam.method      = "reqGetGrupDetlTest";
			oParam.inds        = "refData=ds_send";
			oParam.outds       = "ds_grupdetltestlist=refrslt";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLPJ01103";
		tranf_submit(oParam);
		
		if(ds_grupdetltestlist.rowcount < 0)
		{
			sysf_messageBox("그룹검사에 대한 세부검사가 없습니다! 처방을 추가", "E001");
			return false;
		}
		else
		{
			sSrcNode = ds_grupdetltestlist;
			for(var iNodeCnt = 0; iNodeCnt < ds_grupdetltestlist.rowcount; iNodeCnt++)
			{
				
				// 처방 발생 수 만큼 증가
				for(var iNo=0; iNo < Number(ds_init.getColumn(0, "isscnts")); iNo++)				
				{
					//grd_prcplist.addRow();
					ds_grd_prcplist.addRow();
					//-------------------------------------
					iRowNo = Number(ds_grd_prcplist.rowcount) - 1;
					ds_grd_prcplist.setColumn(iRowNo, "choi", "true");
					ds_grd_prcplist.setColumn(iRowNo, "instcd", ds_grupdetltestlist.getColumn(iNodeCnt, "instcd"));
					ds_grd_prcplist.setColumn(iRowNo, "testcd", ds_grupdetltestlist.getColumn(iNodeCnt, "testcd"));
					
					ds_grd_prcplist.setColumn(iRowNo, "testnm", ds_grupdetltestlist.getColumn(iNodeCnt, "testnm"));
					ds_grd_prcplist.setColumn(iRowNo, "testgrupcd", ds_grupdetltestlist.getColumn(iNodeCnt, "testgrpcd"));
					ds_grd_prcplist.setColumn(iRowNo, "testgrupnm", ds_grupdetltestlist.getColumn(iNodeCnt, "testengnm"));
					ds_grd_prcplist.setColumn(iRowNo, "instcd", ds_grd_patinfolist.getColumn(iFindRow, "instcd"));
					ds_grd_prcplist.setColumn(iRowNo, "ptno", ds_grd_patinfolist.getColumn(iFindRow, "ptno"));
					ds_grd_prcplist.setColumn(iRowNo, "dispptno", ds_grd_patinfolist.getColumn(iFindRow, "dispptno"));
					ds_grd_prcplist.setColumn(iRowNo, "pid", ds_grd_patinfolist.getColumn(iFindRow, "pid"));
					ds_grd_prcplist.setColumn(iRowNo, "patnm", ds_grd_patinfolist.getColumn(iFindRow, "patnm"));
					ds_grd_prcplist.setColumn(iRowNo, "spccd", ds_grd_patinfolist.getColumn(iFindRow, "spccd"));
					ds_grd_prcplist.setColumn(iRowNo, "spcnm", ds_grd_patinfolist.getColumn(iFindRow, "spcnm"));
					ds_grd_prcplist.setColumn(iRowNo, "spcseqno", ds_grd_patinfolist.getColumn(iFindRow, "spcseqno"));
					ds_grd_prcplist.setColumn(iRowNo, "csteno", ds_grd_patinfolist.getColumn(iFindRow, "csteno"));
					ds_grd_prcplist.setColumn(iRowNo, "orddrid", "-");
					ds_grd_prcplist.setColumn(iRowNo, "orddrnm", "-");
					ds_grd_prcplist.setColumn(iRowNo, "cnfmdd", "-");
					ds_grd_prcplist.setColumn(iRowNo, "cnfmtm", "-");
					ds_grd_prcplist.setColumn(iRowNo, "cnfmid", "-");
					ds_grd_prcplist.setColumn(iRowNo, "cnfmnm", "-");
					ds_grd_prcplist.setColumn(iRowNo, "prcpseqno", "0");
					ds_grd_prcplist.setColumn(iRowNo, "cnfmflagcd", "-");
					ds_grd_prcplist.setColumn(iRowNo, "delflagcd", "-");
					ds_grd_prcplist.setColumn(iRowNo, "orgdelflagcd", "-");
				}
			}
		}
	}
	else
	{
		//sSrcNode = "/root/init/prcpcd/prcpcdlist";
		sSrcNode = ds_grupdetltestlist;
		//------------------------
		// 처방 발생 수 만큼 증가
		
		//for (var iNo=1; iNo <= Number(model.getValue("/root/init/isscnts")); iNo++)
		for(var iNo=0; iNo < Number(ds_init.getColumn(0, "isscnts")); iNo++)
		{
			ds_grd_prcplist.addRow();
			
			//-------------------------------------
			//iRowNo = Number(grd_prcplist.rows) - 1;
			iRowNo = Number(ds_grd_prcplist.rowcount) -1;
			
			//model.makeValue(sDescNode+"["+iRowNo+"]/choi",       "true");
			//model.makeValue(sDescNode+"["+iRowNo+"]/testcd",     model.getValue(sSrcNode+"["+grd_testcdlist.row+"]/testcd"));
			//model.makeValue(sDescNode+"["+iRowNo+"]/testnm",     model.getValue(sSrcNode+"["+grd_testcdlist.row+"]/testengnm"));
			//model.makeValue(sDescNode+"["+iRowNo+"]/testgrupcd", "-");
			//model.makeValue(sDescNode+"["+iRowNo+"]/testgrupnm", "-");
			ds_grd_prcplist.setColumn(iRowNo, "choi", "true");
			ds_grd_prcplist.setColumn(iRowNo, "testcd", ds_grd_testcdlist.getColumn(ds_grd_testcdlist.rowposition, "testcd"));
			
			ds_grd_prcplist.setColumn(iRowNo, "testnm", ds_grd_testcdlist.getColumn(ds_grd_testcdlist.rowposition, "testengnm"));
			ds_grd_prcplist.setColumn(iRowNo, "testgrupcd", "-");
			ds_grd_prcplist.setColumn(iRowNo, "testgrupnm", "-");
			
			ds_grd_prcplist.setColumn(iRowNo, "instcd", ds_grd_patinfolist.getColumn(iFindRow, "instcd"));
			ds_grd_prcplist.setColumn(iRowNo, "ptno", ds_grd_patinfolist.getColumn(iFindRow, "ptno"));
			ds_grd_prcplist.setColumn(iRowNo, "dispptno", ds_grd_patinfolist.getColumn(iFindRow, "dispptno"));
			ds_grd_prcplist.setColumn(iRowNo, "pid", ds_grd_patinfolist.getColumn(iFindRow, "pid"));
			ds_grd_prcplist.setColumn(iRowNo, "patnm", ds_grd_patinfolist.getColumn(iFindRow, "patnm"));
			ds_grd_prcplist.setColumn(iRowNo, "spccd", ds_grd_patinfolist.getColumn(iFindRow, "spccd"));
			ds_grd_prcplist.setColumn(iRowNo, "spcnm", ds_grd_patinfolist.getColumn(iFindRow, "spcnm"));
			ds_grd_prcplist.setColumn(iRowNo, "spcseqno", ds_grd_patinfolist.getColumn(iFindRow, "spcseqno"));
			ds_grd_prcplist.setColumn(iRowNo, "csteno", ds_grd_patinfolist.getColumn(iFindRow, "csteno"));
			ds_grd_prcplist.setColumn(iRowNo, "prcpdd", utlf_getCurrentDate());
			ds_grd_prcplist.setColumn(iRowNo, "prcptm", utlf_getCurrentTime());
			
			ds_grd_prcplist.setColumn(iRowNo, "orddrid", "-");
			ds_grd_prcplist.setColumn(iRowNo, "orddrnm", "-");
			ds_grd_prcplist.setColumn(iRowNo, "cnfmdd", "-");
			ds_grd_prcplist.setColumn(iRowNo, "cnfmtm", "-");
			ds_grd_prcplist.setColumn(iRowNo, "cnfmid", "-");
			ds_grd_prcplist.setColumn(iRowNo, "cnfmnm","-");
			ds_grd_prcplist.setColumn(iRowNo, "prcpseqno", "0");
			ds_grd_prcplist.setColumn(iRowNo, "cnfmflagcd", "-");
			ds_grd_prcplist.setColumn(iRowNo, "delflagcd", "-");
			ds_grd_prcplist.setColumn(iRowNo, "orgdelflagcd", "-");
		}
	}
	
	//--------------------------------
	//grd_prcplist.topRow = iRowNo - 17;
}
				
function fExeSaveToExcel()			
{
	grdf_exportExcel(grd_prcplist, "C:\\SMLPJ01100_부가처방.xls 목록");
}
												
function trv_prcpkind_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	fExePrcpKindClick();
}

//조회
function grp_sea_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetPlgyAddPrcpList();
}

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

//한글정렬
function btn_outoch1_onclick(obj:Button,  e:ClickEventInfo)
{
	btn_outoch1.visible = false;						
	btn_outoch2.visible = true;

	ds_hidden.setColumn(0, "sortkind", "Hn");
	fExePrcpKindClick();
	ds_hidden.setColumn(0, "sortkind", "-");
}
//영문정렬
function btn_outoch2_onclick(obj:Button,  e:ClickEventInfo)
{
	 btn_outoch1.visible = true;						
	btn_outoch2.visible = false;
	
	ds_hidden.setColumn(0, "sortkind", "En");
	fExePrcpKindClick();
	ds_hidden.setColumn(0, "sortkind", "-");
}

function grd_patinfolist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	fExePatInfoClick();
}

//처방저장
function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeSave();
}

//처방취소
function btn_prcpcncl_onclick(obj:Button,  e:ClickEventInfo)
{
	fExePrcpCnfm("2");
}

//처방확인
function btn_prcpcnfm_onclick(obj:Button,  e:ClickEventInfo)
{
	fExePrcpCnfm("0");
}

//확인취소
function btn_cnfmcncl_onclick(obj:Button,  e:ClickEventInfo)
{
	fExePrcpCnfm("1");	
}

//EXCEL 저장
function button13_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeSaveToExcel();
}

function grd_testcdlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fExePrcpAdd();
}
]]></Script>
  </Form>
</FDL>