YNU_JEUS/app_home/himed/xpapps/pam/aftjudgxp/xp/SPPID31000_KDRG상세정보.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPID31000" position="absolute 0 0 800 550" titletext="KDRG상세정보" onload="SPPID31000_onload" oninit="SPPID31000_oninit">
    <Layouts>
      <Layout>
        <Div id="group1" scrollbars="autoboth" position="absolute 0 20 790 540" style="">
          <Layouts>
            <Layout>
              <Static id="caption1" class="tit_2" position="absolute 1 74 95 95" style="" text="적용내역" anchor="default"/>
              <Shape id="line1" class="line_10" linetype="horizontal" position="absolute 0 88 778 99" style="" anchor="default"/>
              <Div id="group2" position="absolute 0 4 365 62" style="align: top;" anchor="default" class="div_SA" taborder="65">
                <Layouts>
                  <Layout>
                    <Static id="caption2" class="search_name" position="absolute 90 7 175 24" style="" text="등록번호" anchor="default"/>
                    <Edit id="input1" enable="false" position="absolute 170 7 245 26" style="align:center ;" anchor="default"/>
                    <Edit id="input2" enable="false" position="absolute 250 6 328 25" style="align:center ;" anchor="default"/>
                    <Static id="caption3" class="tit_2" position="absolute 4 7 79 28" style="" text="기본정보" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Div id="group3" position="absolute 372 4 780 62" style="align: top;" anchor="default" class="div_SA" taborder="64">
                <Layouts>
                  <Layout>
                    <Combo innerdataset="@ds_init_P0010list" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="combo1" class="combo_search" enable="false" taborder="3" position="absolute 277 33 397 52" style="" anchor="default"/>
                    <Static id="caption4" class="search_name" position="absolute 192 8 278 25" style="" text="보험유형" anchor="default"/>
                    <Static id="caption5" class="search_name" position="absolute 5 35 85 52" style="" text="진료과" anchor="default"/>
                    <Combo innerdataset="@ds_init_P0008list" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="combo2" class="combo_search" enable="false" taborder="2" position="absolute 277 7 397 26" style="" anchor="default"/>
                    <Combo innerdataset="ds_init_orddeptcd2_orddeptcdlist" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="combo3" class="combo_search" enable="false" taborder="1" position="absolute 76 34 185 53" style="" anchor="default"/>
                    <Static id="caption6" class="search_name" position="absolute 192 34 278 51" style="" text="보조유형" anchor="default"/>
                    <Static id="caption7" class="search_name" position="absolute 6 9 86 26" style="" text="입원일" anchor="default"/>
                    <MaskEdit id="input3" class="input_default" enable="false" taborder="0" mask="yyyy-MM-dd" position="absolute 75 8 184 27" style=":disabled {align:left middle;}" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Static id="caption8" class="tit_2" position="absolute 0 382 170 403" style="" text="분류결과" anchor="default"/>
              <Shape id="line2" class="line_10" linetype="horizontal" position="absolute 0 396 778 407" style="" anchor="default"/>
              <Button id="button3" class="btn4" position="absolute 719 485 775 507" style="" text="종료" onclick="group1_button3_onclick" anchor="default" taborder="63"/>
              <Static id="caption9" class="search_name" position="absolute 11 407 130 424" style="" text="DRG번호" anchor="default"/>
              <Edit id="input4" class="input_default" enable="False" position="absolute 140 406 215 445" style="" anchor="default" taborder="6"/>
              <Static id="caption10" class="search_name" position="absolute 10 452 79 469" style="" text="MDC" anchor="default"/>
              <Edit id="input6" class="input_default" enable="False" position="absolute 139 451 214 470" style="" anchor="default" taborder="4"/>
              <Static id="caption11" class="search_name" position="absolute 11 105 130 122" style="" text="진료개시일" anchor="default"/>
              <MaskEdit id="input7" class="input_default" enable="True" visible="true" mask="yyyy-MM-dd" position="absolute 140 105 220 124" style="align:left middle;" anchor="default" taborder="8"/>
              <Static id="caption12" class="search_name" position="absolute 291 105 375 122" style="" text="입원일수" anchor="default"/>
              <MaskEdit id="input8" class="input_default" enable="True" visible="true" mask="###" position="absolute 390 105 440 124" style="align:left middle;" anchor="default" taborder="9"/>
              <Static id="caption13" class="search_name" position="absolute 501 105 585 122" style="" text="진료결과" anchor="default"/>
              <Combo innerdataset="@ds_init_P0110list" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="combo7" class="combo_search" enable="True" visible="true" position="absolute 600 105 690 124" style="" anchor="default" taborder="10"/>
              <Static id="caption14" class="search_name" position="absolute 11 133 130 150" style="" text="진단" anchor="default"/>
              <Edit id="input9" class="input_default" enable="True" visible="true" position="absolute 140 133 190 152" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="6" taborder="11"/>
              <Edit id="input10" class="input_default" enable="True" visible="true" position="absolute 196 133 246 152" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="6" taborder="12"/>
              <Edit id="input11" class="input_default" enable="True" visible="true" position="absolute 252 133 302 152" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="6" taborder="13"/>
              <Edit id="input12" class="input_default" enable="True" visible="true" position="absolute 308 133 358 152" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="6" taborder="14"/>
              <Edit id="input13" class="input_default" enable="True" visible="true" position="absolute 364 133 414 152" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="6" taborder="15"/>
              <Edit id="input14" class="input_default" enable="True" visible="true" position="absolute 420 133 470 152" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="6" taborder="16"/>
              <Edit id="input15" class="input_default" enable="True" visible="true" position="absolute 477 133 527 152" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="6" taborder="17"/>
              <Edit id="input16" class="input_default" enable="True" visible="true" position="absolute 533 133 583 152" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="6" taborder="18"/>
              <Edit id="input17" class="input_default" enable="True" visible="true" position="absolute 589 133 639 152" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="6" taborder="19"/>
              <Edit id="input18" class="input_default" enable="True" visible="true" position="absolute 645 133 695 152" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="6" taborder="20"/>
              <Static id="caption15" class="search_name" position="absolute 11 161 130 178" style="" text="수술처치" anchor="default"/>
              <Edit id="input19" class="input_default" enable="True" visible="true" position="absolute 140 161 190 180" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="21"/>
              <Edit id="input20" class="input_default" enable="True" visible="true" position="absolute 196 161 246 180" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="22"/>
              <Edit id="input21" class="input_default" enable="True" visible="true" position="absolute 252 161 302 180" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="23"/>
              <Edit id="input22" class="input_default" enable="True" visible="true" position="absolute 308 161 358 180" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="24"/>
              <Edit id="input23" class="input_default" enable="True" visible="true" position="absolute 364 161 414 180" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="25"/>
              <Edit id="input24" class="input_default" enable="True" visible="true" position="absolute 420 161 470 180" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="26"/>
              <Edit id="input25" class="input_default" enable="True" visible="true" position="absolute 477 161 527 180" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="27"/>
              <Edit id="input26" class="input_default" enable="True" visible="true" position="absolute 533 161 583 180" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="28"/>
              <Edit id="input27" class="input_default" enable="True" visible="true" position="absolute 589 161 639 180" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="29"/>
              <Edit id="input28" class="input_default" enable="True" visible="true" position="absolute 645 161 695 180" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="30"/>
              <Static id="caption16" class="search_name" position="absolute 11 189 130 206" style="" text="검사" anchor="default"/>
              <Edit id="input29" class="input_default" enable="True" position="absolute 140 189 190 208" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="31"/>
              <Edit id="input30" class="input_default" enable="True" position="absolute 196 189 246 208" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="32"/>
              <Edit id="input31" class="input_default" enable="True" position="absolute 252 189 302 208" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="33"/>
              <Edit id="input32" class="input_default" enable="True" position="absolute 308 189 358 208" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="34"/>
              <Edit id="input33" class="input_default" enable="True" position="absolute 364 189 414 208" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="35"/>
              <Static id="caption17" class="search_name" position="absolute 11 216 130 233" style="" text="방사선" anchor="default"/>
              <Edit id="input34" class="input_default" enable="True" position="absolute 140 216 190 235" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="36"/>
              <Edit id="input35" class="input_default" enable="True" position="absolute 196 216 246 235" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="37"/>
              <Edit id="input36" class="input_default" enable="True" position="absolute 252 216 302 235" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="38"/>
              <Edit id="input37" class="input_default" enable="True" position="absolute 308 216 358 235" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="39"/>
              <Edit id="input38" class="input_default" enable="True" position="absolute 364 216 414 235" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="40"/>
              <Static id="caption18" class="search_name" position="absolute 11 243 130 260" style="" text="주사및혈액제제" anchor="default"/>
              <Edit id="input39" class="input_default" enable="True" position="absolute 140 243 190 262" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="41"/>
              <Edit id="input40" class="input_default" enable="True" position="absolute 196 243 246 262" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="42"/>
              <Edit id="input41" class="input_default" enable="True" position="absolute 252 243 302 262" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="43"/>
              <Edit id="input42" class="input_default" enable="True" position="absolute 308 243 358 262" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="44"/>
              <Edit id="input43" class="input_default" enable="True" position="absolute 364 243 414 262" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="45"/>
              <Static id="caption19" class="search_name" position="absolute 11 271 130 288" style="" text="마취및호흡치료" anchor="default"/>
              <Edit id="input44" class="input_default" enable="True" position="absolute 140 271 190 290" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="46"/>
              <Edit id="input45" class="input_default" enable="True" position="absolute 196 271 246 290" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="47"/>
              <Edit id="input46" class="input_default" enable="True" position="absolute 252 271 302 290" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="48"/>
              <Edit id="input47" class="input_default" enable="True" position="absolute 308 271 358 290" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="49"/>
              <Edit id="input48" class="input_default" enable="True" position="absolute 364 271 414 290" style="" anchor="default" inputmode="upper" imemode="alpha" maxlength="5" taborder="50"/>
              <Static id="caption20" class="search_name" position="absolute 11 356 130 373" style="" text="입원시체중(g)" anchor="default"/>
              <Edit id="input49" class="input_default" position="absolute 140 356 190 375" style="" anchor="default" taborder="59" maxlength="5"/>
              <Static id="caption21" class="search_name" position="absolute 270 356 415 373" style="" text="인공호흡시간(hour)" anchor="default"/>
              <Edit id="input50" class="input_default" position="absolute 424 356 474 375" style="" anchor="default" taborder="60" maxlength="5"/>
              <Button id="button4" class="btn4" position="absolute 675 68 779 90" style="" text="DRG번호생성" onclick="group1_button4_onclick" anchor="default" taborder="62"/>
              <Static id="caption22" class="search_name" position="absolute 11 328 130 345" style="" text="부가코드" anchor="default"/>
              <Combo innerdataset="@ds_init_PK015list" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="cmb_detailcd1" position="absolute 140 328 245 347" style="" anchor="default" taborder="54"/>
              <Combo innerdataset="@ds_init_PK015list" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="cmb_detailcd2" position="absolute 250 329 355 348" style="" anchor="default" taborder="55"/>
              <Combo innerdataset="@ds_init_PK015list" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="cmb_detailcd3" position="absolute 360 329 465 348" style="" anchor="default" taborder="56"/>
              <Combo innerdataset="@ds_init_PK015list" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="cmb_detailcd4" position="absolute 470 329 575 348" style="" anchor="default" taborder="57"/>
              <Combo innerdataset="@ds_init_PK015list" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="cmb_detailcd5" position="absolute 580 329 685 348" style="" anchor="default" taborder="58"/>
              <Static id="caption23" class="search_name" position="absolute 10 299 177 316" style="" text="알콜및약물중독재활치료" anchor="default"/>
              <Combo innerdataset="@ds_init_PK016list" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="cmb_ncvcd" position="absolute 195 300 300 319" style="" anchor="default" taborder="51"/>
              <Static id="caption24" class="search_name" position="absolute 230 450 299 467" style="" text="ADRG" anchor="default"/>
              <Edit id="input51" class="input_default" enable="False" position="absolute 310 450 385 469" style="" anchor="default" taborder="2"/>
              <Edit id="input52" class="input_default" enable="False" position="absolute 484 450 559 469" style="" anchor="default" taborder="1"/>
              <Static id="caption25" class="search_name" position="absolute 410 450 479 467" style="" text="PCCL" anchor="default"/>
              <Edit id="input53" class="input_default" enable="False" position="absolute 670 450 745 469" style="" anchor="default" taborder="0"/>
              <Static id="caption26" class="search_name" position="absolute 580 450 670 467" style="" text="Version" anchor="default"/>
              <Static id="caption66" class="search_name" position="absolute 536 358 681 375" style="" text="야간,공휴가산" anchor="default"/>
              <TextArea id="textarea1" enable="False" position="absolute 221 406 770 445" style="" anchor="default" taborder="5"/>
              <Static id="caption28" class="search_name" position="absolute 360 300 484 317" style="" text="산부인과가산 유무" anchor="default"/>
              <CheckBox id="bool1" truevalue="Y" falsevalue="N" position="absolute 495 300 515 315" style="" text="" anchor="left bottom" taborder="52"/>
              <Button id="button2" class="btn4" enable="False" visible="false" position="absolute 605 485 661 507" style="" text="배포" onclick="group1_button2_onclick" anchor="default" taborder="7"/>
              <CheckBox id="bool2" truevalue="Y" falsevalue="N" position="absolute 645 360 665 375" style="" text="" anchor="left bottom" taborder="61"/>
              <CheckBox id="bool3" truevalue="Y" falsevalue="N" position="absolute 635 300 655 315" style="" text="" anchor="left bottom" onchanged="group1_bool3_onchanged" taborder="53"/>
              <Static id="caption31" class="search_name" position="absolute 530 300 635 317" style="" text="로봇수술유무" anchor="default"/>
              <Static id="caption32" class="search_name" position="absolute 10 475 100 492" style="" text="대분류" anchor="default"/>
              <Edit id="input5" class="input_default" enable="False" position="absolute 139 475 214 494" style="" anchor="default" taborder="3"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="cap_title" text="KDRG 상세정보" class="tit_1" position="absolute 0 0 195 23"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_drginfo" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="seqno" type="STRING" size="256"/>
          <Column id="ordfromdd" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="histstat" type="STRING" size="256"/>
          <Column id="proccorpcd" type="STRING" size="256"/>
          <Column id="rrgstno1" type="STRING" size="256"/>
          <Column id="rrgstno2" type="STRING" size="256"/>
          <Column id="chosindayno" type="STRING" size="256"/>
          <Column id="ordrsltcd" type="STRING" size="256"/>
          <Column id="age" type="STRING" size="256"/>
          <Column id="diagcd1" type="STRING" size="256"/>
          <Column id="diagcd2" type="STRING" size="256"/>
          <Column id="diagcd3" type="STRING" size="256"/>
          <Column id="diagcd4" type="STRING" size="256"/>
          <Column id="diagcd5" type="STRING" size="256"/>
          <Column id="diagcd6" type="STRING" size="256"/>
          <Column id="diagcd7" type="STRING" size="256"/>
          <Column id="diagcd8" type="STRING" size="256"/>
          <Column id="diagcd9" type="STRING" size="256"/>
          <Column id="diagcd10" type="STRING" size="256"/>
          <Column id="opcd1" type="STRING" size="256"/>
          <Column id="opcd2" type="STRING" size="256"/>
          <Column id="opcd3" type="STRING" size="256"/>
          <Column id="opcd4" type="STRING" size="256"/>
          <Column id="opcd5" type="STRING" size="256"/>
          <Column id="opcd6" type="STRING" size="256"/>
          <Column id="opcd7" type="STRING" size="256"/>
          <Column id="opcd8" type="STRING" size="256"/>
          <Column id="opcd9" type="STRING" size="256"/>
          <Column id="opcd10" type="STRING" size="256"/>
          <Column id="excd1" type="STRING" size="256"/>
          <Column id="excd2" type="STRING" size="256"/>
          <Column id="excd3" type="STRING" size="256"/>
          <Column id="excd4" type="STRING" size="256"/>
          <Column id="excd5" type="STRING" size="256"/>
          <Column id="rgcd1" type="STRING" size="256"/>
          <Column id="rgcd2" type="STRING" size="256"/>
          <Column id="rgcd3" type="STRING" size="256"/>
          <Column id="rgcd4" type="STRING" size="256"/>
          <Column id="rgcd5" type="STRING" size="256"/>
          <Column id="ibcd1" type="STRING" size="256"/>
          <Column id="ibcd2" type="STRING" size="256"/>
          <Column id="ibcd3" type="STRING" size="256"/>
          <Column id="ibcd4" type="STRING" size="256"/>
          <Column id="ibcd5" type="STRING" size="256"/>
          <Column id="arcd1" type="STRING" size="256"/>
          <Column id="arcd2" type="STRING" size="256"/>
          <Column id="arcd3" type="STRING" size="256"/>
          <Column id="arcd4" type="STRING" size="256"/>
          <Column id="arcd5" type="STRING" size="256"/>
          <Column id="ncvcd" type="STRING" size="256"/>
          <Column id="detailcd1" type="STRING" size="256"/>
          <Column id="detailcd2" type="STRING" size="256"/>
          <Column id="detailcd3" type="STRING" size="256"/>
          <Column id="detailcd4" type="STRING" size="256"/>
          <Column id="detailcd5" type="STRING" size="256"/>
          <Column id="bw" type="STRING" size="256"/>
          <Column id="vtl" type="STRING" size="256"/>
          <Column id="mdcno" type="STRING" size="256"/>
          <Column id="pccl" type="STRING" size="256"/>
          <Column id="drgno" type="STRING" size="256"/>
          <Column id="version" type="STRING" size="256"/>
          <Column id="adrg" type="STRING" size="256"/>
          <Column id="drgnm" type="STRING" size="256"/>
          <Column id="nightflag" type="STRING" size="256"/>
          <Column id="totalamt" type="STRING" size="256"/>
          <Column id="nopyamt" type="STRING" size="256"/>
          <Column id="allownbamt" type="STRING" size="256"/>
          <Column id="payamt" type="STRING" size="256"/>
          <Column id="specamt" type="STRING" size="256"/>
          <Column id="totownbamt" type="STRING" size="256"/>
          <Column id="payownbamt" type="STRING" size="256"/>
          <Column id="payinsubamt" type="STRING" size="256"/>
          <Column id="drgnopyamt" type="STRING" size="256"/>
          <Column id="drgpayamt" type="STRING" size="256"/>
          <Column id="drgeatamt" type="STRING" size="256"/>
          <Column id="drggsaddamt" type="STRING" size="256"/>
          <Column id="drgtotalamt" type="STRING" size="256"/>
          <Column id="drgownbamt" type="STRING" size="256"/>
          <Column id="drginsubamt" type="STRING" size="256"/>
          <Column id="drggapamt" type="STRING" size="256"/>
          <Column id="grupgbn" type="STRING" size="256"/>
          <Column id="tdrgno" type="STRING" size="256"/>
          <Column id="tdrgnm" type="STRING" size="256"/>
          <Column id="insukind" type="STRING" size="256"/>
          <Column id="suppkind" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="drgeatownbamt" type="STRING" size="256"/>
          <Column id="drgeatinsubamt" type="STRING" size="256"/>
          <Column id="drggsaddownbamt" type="STRING" size="256"/>
          <Column id="drggsaddinsubamt" type="STRING" size="256"/>
          <Column id="drgpaydiscamt" type="STRING" size="256"/>
          <Column id="drgnopydiscamt" type="STRING" size="256"/>
          <Column id="drgspecdiscamt" type="STRING" size="256"/>
          <Column id="drgeatdiscamt" type="STRING" size="256"/>
          <Column id="drggsadddiscamt" type="STRING" size="256"/>
          <Column id="drgnm" type="STRING" size="256"/>
          <Column id="drgallownbamt" type="STRING" size="256"/>
          <Column id="drgoverpayinsubamt" type="STRING" size="256"/>
          <Column id="drgoverpayamt" type="STRING" size="256"/>
          <Column id="drgoverpayownbamt" type="STRING" size="256"/>
          <Column id="accnopyamt" type="STRING" size="256"/>
          <Column id="obgaaddyn" type="STRING" size="256"/>
          <Column id="drgaccpayamt" type="STRING" size="256"/>
          <Column id="drgaccpayownbamt" type="STRING" size="256"/>
          <Column id="drgaccpayinsubamt" type="STRING" size="256"/>
          <Column id="drgaccpaydiscamt" type="STRING" size="256"/>
          <Column id="drgpayownbamt" type="STRING" size="256"/>
          <Column id="accnopygapamt" type="STRING" size="256"/>
          <Column id="robotyn" type="STRING" size="256"/>
          <Column id="drgtype" type="STRING" size="256"/>
          <Column id="dschnotiyn" type="STRING" size="256"/>
          <Column id="drggbn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="seqno"/>
            <Col id="ordfromdd"/>
            <Col id="indd"/>
            <Col id="pid"/>
            <Col id="instcd"/>
            <Col id="histstat"/>
            <Col id="proccorpcd"/>
            <Col id="rrgstno1"/>
            <Col id="rrgstno2"/>
            <Col id="chosindayno"/>
            <Col id="ordrsltcd"/>
            <Col id="age"/>
            <Col id="diagcd1"/>
            <Col id="diagcd2"/>
            <Col id="diagcd3"/>
            <Col id="diagcd4"/>
            <Col id="diagcd5"/>
            <Col id="diagcd6"/>
            <Col id="diagcd7"/>
            <Col id="diagcd8"/>
            <Col id="diagcd9"/>
            <Col id="diagcd10"/>
            <Col id="opcd1"/>
            <Col id="opcd2"/>
            <Col id="opcd3"/>
            <Col id="opcd4"/>
            <Col id="opcd5"/>
            <Col id="opcd6"/>
            <Col id="opcd7"/>
            <Col id="opcd8"/>
            <Col id="opcd9"/>
            <Col id="opcd10"/>
            <Col id="excd1"/>
            <Col id="excd2"/>
            <Col id="excd3"/>
            <Col id="excd4"/>
            <Col id="excd5"/>
            <Col id="rgcd1"/>
            <Col id="rgcd2"/>
            <Col id="rgcd3"/>
            <Col id="rgcd4"/>
            <Col id="rgcd5"/>
            <Col id="ibcd1"/>
            <Col id="ibcd2"/>
            <Col id="ibcd3"/>
            <Col id="ibcd4"/>
            <Col id="ibcd5"/>
            <Col id="arcd1"/>
            <Col id="arcd2"/>
            <Col id="arcd3"/>
            <Col id="arcd4"/>
            <Col id="arcd5"/>
            <Col id="ncvcd"/>
            <Col id="detailcd1"/>
            <Col id="detailcd2"/>
            <Col id="detailcd3"/>
            <Col id="detailcd4"/>
            <Col id="detailcd5"/>
            <Col id="bw"/>
            <Col id="vtl"/>
            <Col id="mdcno"/>
            <Col id="pccl"/>
            <Col id="drgno"/>
            <Col id="version"/>
            <Col id="adrg"/>
            <Col id="drgnm"/>
            <Col id="nightflag"/>
            <Col id="totalamt"/>
            <Col id="nopyamt"/>
            <Col id="allownbamt"/>
            <Col id="payamt"/>
            <Col id="specamt"/>
            <Col id="totownbamt"/>
            <Col id="payownbamt"/>
            <Col id="payinsubamt"/>
            <Col id="drgnopyamt"/>
            <Col id="drgpayamt"/>
            <Col id="drgeatamt"/>
            <Col id="drggsaddamt"/>
            <Col id="drgtotalamt"/>
            <Col id="drgownbamt"/>
            <Col id="drginsubamt"/>
            <Col id="drggapamt"/>
            <Col id="grupgbn"/>
            <Col id="tdrgno"/>
            <Col id="tdrgnm"/>
            <Col id="insukind"/>
            <Col id="suppkind"/>
            <Col id="hngnm"/>
            <Col id="orddeptcd"/>
            <Col id="drgeatownbamt"/>
            <Col id="drgeatinsubamt"/>
            <Col id="drggsaddownbamt"/>
            <Col id="drggsaddinsubamt"/>
            <Col id="drgpaydiscamt"/>
            <Col id="drgnopydiscamt"/>
            <Col id="drgspecdiscamt"/>
            <Col id="drgeatdiscamt"/>
            <Col id="drggsadddiscamt"/>
            <Col id="drgnm"/>
            <Col id="drgallownbamt"/>
            <Col id="drgoverpayinsubamt"/>
            <Col id="drgoverpayamt"/>
            <Col id="drgoverpayownbamt"/>
            <Col id="accnopyamt"/>
            <Col id="obgaaddyn"/>
            <Col id="drgaccpayamt"/>
            <Col id="drgaccpayownbamt"/>
            <Col id="drgaccpayinsubamt"/>
            <Col id="drgaccpaydiscamt"/>
            <Col id="drgpayownbamt"/>
            <Col id="accnopygapamt"/>
            <Col id="robotyn"/>
            <Col id="drgtype"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0008list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_orddeptcd2_orddeptcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="cd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0010list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0110list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_PK015list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_PK016list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_drginfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="pidsn" type="STRING" size="256"/>
          <Column id="clamdg" type="STRING" size="256"/>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="ordrsltcd" type="STRING" size="256"/>
          <Column id="ordfromdd" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="drgmstat" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_PK054list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_PK055list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_filelist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_attachfile" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_tmp_attach" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="filenm" type="STRING" size="256"/>
          <Column id="filesize" type="INT" size="256"/>
          <Column id="filetype" type="STRING" size="256"/>
          <Column id="filedata" type="BLOB" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.group2.input1" propid="value" datasetid="ds_main_drginfo" columnid="pid"/>
      <BindItem id="item1" compid="group1.group2.input2" propid="value" datasetid="ds_main_drginfo" columnid="hngnm"/>
      <BindItem id="item2" compid="group1.group3.combo1" propid="value" datasetid="ds_main_drginfo" columnid="suppkind"/>
      <BindItem id="item3" compid="group1.group3.combo2" propid="value" datasetid="ds_main_drginfo" columnid="insukind"/>
      <BindItem id="item4" compid="group1.group3.combo3" propid="value" datasetid="ds_main_drginfo" columnid="orddeptcd"/>
      <BindItem id="item5" compid="group1.group3.input3" propid="value" datasetid="ds_main_drginfo" columnid="indd"/>
      <BindItem id="item6" compid="group1.input4" propid="value" datasetid="ds_main_drginfo" columnid="drgno"/>
      <BindItem id="item7" compid="group1.input6" propid="value" datasetid="ds_main_drginfo" columnid="mdcno"/>
      <BindItem id="item8" compid="group1.input7" propid="value" datasetid="ds_main_drginfo" columnid="ordfromdd"/>
      <BindItem id="item9" compid="group1.input8" propid="value" datasetid="ds_main_drginfo" columnid="chosindayno"/>
      <BindItem id="item10" compid="group1.combo7" propid="value" datasetid="ds_main_drginfo" columnid="ordrsltcd"/>
      <BindItem id="item11" compid="group1.input9" propid="value" datasetid="ds_main_drginfo" columnid="diagcd1"/>
      <BindItem id="item12" compid="group1.input10" propid="value" datasetid="ds_main_drginfo" columnid="diagcd2"/>
      <BindItem id="item13" compid="group1.input11" propid="value" datasetid="ds_main_drginfo" columnid="diagcd3"/>
      <BindItem id="item14" compid="group1.input12" propid="value" datasetid="ds_main_drginfo" columnid="diagcd4"/>
      <BindItem id="item15" compid="group1.input13" propid="value" datasetid="ds_main_drginfo" columnid="diagcd5"/>
      <BindItem id="item16" compid="group1.input14" propid="value" datasetid="ds_main_drginfo" columnid="diagcd6"/>
      <BindItem id="item17" compid="group1.input15" propid="value" datasetid="ds_main_drginfo" columnid="diagcd7"/>
      <BindItem id="item18" compid="group1.input16" propid="value" datasetid="ds_main_drginfo" columnid="diagcd8"/>
      <BindItem id="item19" compid="group1.input17" propid="value" datasetid="ds_main_drginfo" columnid="diagcd9"/>
      <BindItem id="item20" compid="group1.input18" propid="value" datasetid="ds_main_drginfo" columnid="diagcd10"/>
      <BindItem id="item21" compid="group1.input19" propid="value" datasetid="ds_main_drginfo" columnid="opcd1"/>
      <BindItem id="item22" compid="group1.input20" propid="value" datasetid="ds_main_drginfo" columnid="opcd2"/>
      <BindItem id="item23" compid="group1.input21" propid="value" datasetid="ds_main_drginfo" columnid="opcd3"/>
      <BindItem id="item24" compid="group1.input22" propid="value" datasetid="ds_main_drginfo" columnid="opcd4"/>
      <BindItem id="item25" compid="group1.input23" propid="value" datasetid="ds_main_drginfo" columnid="opcd5"/>
      <BindItem id="item26" compid="group1.input24" propid="value" datasetid="ds_main_drginfo" columnid="opcd6"/>
      <BindItem id="item27" compid="group1.input25" propid="value" datasetid="ds_main_drginfo" columnid="opcd7"/>
      <BindItem id="item28" compid="group1.input26" propid="value" datasetid="ds_main_drginfo" columnid="opcd8"/>
      <BindItem id="item29" compid="group1.input27" propid="value" datasetid="ds_main_drginfo" columnid="opcd9"/>
      <BindItem id="item30" compid="group1.input28" propid="value" datasetid="ds_main_drginfo" columnid="opcd10"/>
      <BindItem id="item31" compid="group1.input29" propid="value" datasetid="ds_main_drginfo" columnid="excd1"/>
      <BindItem id="item32" compid="group1.input30" propid="value" datasetid="ds_main_drginfo" columnid="excd2"/>
      <BindItem id="item33" compid="group1.input31" propid="value" datasetid="ds_main_drginfo" columnid="excd3"/>
      <BindItem id="item34" compid="group1.input32" propid="value" datasetid="ds_main_drginfo" columnid="excd4"/>
      <BindItem id="item35" compid="group1.input33" propid="value" datasetid="ds_main_drginfo" columnid="excd5"/>
      <BindItem id="item36" compid="group1.input34" propid="value" datasetid="ds_main_drginfo" columnid="rgcd1"/>
      <BindItem id="item37" compid="group1.input35" propid="value" datasetid="ds_main_drginfo" columnid="rgcd2"/>
      <BindItem id="item38" compid="group1.input36" propid="value" datasetid="ds_main_drginfo" columnid="rgcd3"/>
      <BindItem id="item39" compid="group1.input37" propid="value" datasetid="ds_main_drginfo" columnid="rgcd4"/>
      <BindItem id="item40" compid="group1.input38" propid="value" datasetid="ds_main_drginfo" columnid="rgcd5"/>
      <BindItem id="item41" compid="group1.input39" propid="value" datasetid="ds_main_drginfo" columnid="ibcd1"/>
      <BindItem id="item42" compid="group1.input40" propid="value" datasetid="ds_main_drginfo" columnid="ibcd2"/>
      <BindItem id="item43" compid="group1.input41" propid="value" datasetid="ds_main_drginfo" columnid="ibcd3"/>
      <BindItem id="item44" compid="group1.input42" propid="value" datasetid="ds_main_drginfo" columnid="ibcd4"/>
      <BindItem id="item45" compid="group1.input43" propid="value" datasetid="ds_main_drginfo" columnid="ibcd5"/>
      <BindItem id="item46" compid="group1.input44" propid="value" datasetid="ds_main_drginfo" columnid="arcd1"/>
      <BindItem id="item47" compid="group1.input45" propid="value" datasetid="ds_main_drginfo" columnid="arcd2"/>
      <BindItem id="item48" compid="group1.input46" propid="value" datasetid="ds_main_drginfo" columnid="arcd3"/>
      <BindItem id="item49" compid="group1.input47" propid="value" datasetid="ds_main_drginfo" columnid="arcd4"/>
      <BindItem id="item50" compid="group1.input48" propid="value" datasetid="ds_main_drginfo" columnid="arcd5"/>
      <BindItem id="item51" compid="group1.input49" propid="value" datasetid="ds_main_drginfo" columnid="bw"/>
      <BindItem id="item52" compid="group1.input50" propid="value" datasetid="ds_main_drginfo" columnid="vtl"/>
      <BindItem id="item53" compid="group1.cmb_detailcd1" propid="value" datasetid="ds_main_drginfo" columnid="detailcd1"/>
      <BindItem id="item54" compid="group1.cmb_detailcd2" propid="value" datasetid="ds_main_drginfo" columnid="detailcd2"/>
      <BindItem id="item55" compid="group1.cmb_detailcd3" propid="value" datasetid="ds_main_drginfo" columnid="detailcd3"/>
      <BindItem id="item56" compid="group1.cmb_detailcd4" propid="value" datasetid="ds_main_drginfo" columnid="detailcd4"/>
      <BindItem id="item57" compid="group1.cmb_detailcd5" propid="value" datasetid="ds_main_drginfo" columnid="detailcd5"/>
      <BindItem id="item58" compid="group1.cmb_ncvcd" propid="value" datasetid="ds_main_drginfo" columnid="ncvcd"/>
      <BindItem id="item59" compid="group1.input51" propid="value" datasetid="ds_main_drginfo" columnid="adrg"/>
      <BindItem id="item60" compid="group1.input52" propid="value" datasetid="ds_main_drginfo" columnid="pccl"/>
      <BindItem id="item61" compid="group1.input53" propid="value" datasetid="ds_main_drginfo" columnid="version"/>
      <BindItem id="item62" compid="group1.textarea1" propid="value" datasetid="ds_main_drginfo" columnid="drgnm"/>
      <BindItem id="item63" compid="group1.bool1" propid="value" datasetid="ds_main_drginfo" columnid="obgaaddyn"/>
      <BindItem id="item64" compid="group1.bool2" propid="value" datasetid="ds_main_drginfo" columnid="nightflag"/>
      <BindItem id="item65" compid="group1.bool3" propid="value" datasetid="ds_main_drginfo" columnid="robotyn"/>
      <BindItem id="item66" compid="group1.input5" propid="value" datasetid="ds_main_drginfo" columnid="drgtype"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "pam_pamcomnxp::PAM001.xjs";
 
var fldr =  "";
var infile = "";
var outfile = "";
var hngnm = "";

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

function SPPID31000_onload(obj:Form, e:LoadEventInfo) 
{
	var arrParam = [{dsNm: "ds_init_P0008list", cdGrpId: "P0008"}
				   ,{dsNm: "ds_init_P0010list", cdGrpId: "P0010"}
				   ,{dsNm: "ds_init_P0110list", cdGrpId: "P0110"}]
				   
	appf_getCodeList(arrParam);	
	
	var arrParam = new Array();
	arrParam = [ {dsNm: "ds_init_PK015list", cdGrpId: "PK015", showValue: false}
				,{dsNm: "ds_init_PK016list", cdGrpId: "PK016", showValue: false}
				,{dsNm: "ds_init_PK054list", cdGrpId: "PK054", showValue: false}
				,{dsNm: "ds_init_PK055list", cdGrpId: "PK055", showValue: false}];
	pamfGetCodeList(arrParam, false, ""); 
	
	ds_init_PK015list.insertRow(0);
	ds_init_P0110list.insertRow(0);
	ds_init_PK016list.insertRow(0);
	
	dsf_createDsRow("ds_req", [{col:"ioflag", type:"STRING", size:256 , val : "I"}]);
                                                       
	var oParam = {};
		oParam.id          = "TRPID20309";
		oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
		oParam.method      = "reqGetDeptCDDrID";
		oParam.inds        = "req=ds_req";
		oParam.outds       = "ds_init_orddeptcd2_orddeptcdlist=orddeptcd2";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPID20309";

	tranf_submit(oParam);
	
	fInitialize();
}

function fInitialize() 
{
	var pid = opener.frmf_getParameter("pid");
	var pidsn = opener.frmf_getParameter("pidsn");
	var clamdg = opener.frmf_getParameter("clamdg");
	var clamym = opener.frmf_getParameter("clamym");
	var ordrsltcd = opener.frmf_getParameter("ordrsltcd");

	ds_send_drginfo.setColumn(0, "pid", pid);
	ds_send_drginfo.setColumn(0, "pidsn", pidsn);
	ds_send_drginfo.setColumn(0, "clamdg", clamdg);
	ds_send_drginfo.setColumn(0, "clamym", clamym);
	ds_send_drginfo.setColumn(0, "ordrsltcd", ordrsltcd);
	
	fGetdrgDetail();
}

function fGetdrgDetail() 
{
	var oParam = {};
		oParam.id          = "TRPID28000";
		oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
		oParam.method      = "reqGetKDrgMastrInfo";
		oParam.inds        = "req=ds_send_drginfo";
		oParam.outds       = "ds_main_drginfo=drginfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPID28000";

	tranf_submit(oParam);

	var dschnotiyn = ds_main_drginfo.getColumn(0, "dschnotiyn");
	var ordrslt = ds_main_drginfo.getColumn(0, "ordrsltcd");
	
	if(dschnotiyn == "Y")
	{
		if(utlf_isNull(ordrslt) || ordrslt == "-" || ordrslt == "1")
		{
			if(ordrslt != "4")
			{
				ds_main_drginfo.setColumn(0, "ordrsltcd","9");
			}
		}
	}
	else
	{
		if(utlf_isNull(ordrslt)|| ordrslt == "-")
		{
			ds_main_drginfo.setColumn(0, "ordrsltcd","1");
		}
	}

	fGetdrgChk();

}

function fGetdrgChk() 
{
	var chosindayno = parseInt(ds_main_drginfo.getColumn(0, "chosindayno"));
	var insukind = ds_main_drginfo.getColumn(0, "insukind");
	var diagcd1 = String(ds_main_drginfo.getColumn(0, "diagcd1"));
	var opcd1 = String(ds_main_drginfo.getColumn(0, "opcd1"));
	var drggbn = ds_main_drginfo.getColumn(0, "drggbn");
	var drgmstat = ds_send_drginfo.getColumn(0, "drgmstat");
	hngnm = ds_main_drginfo.getColumn(0, "hngnm");

	if (diagcd1.length > 0 && opcd1.length > 0)
	{
	} 
	else 
	{
		sysf_messageBox("KDRG 진단이나 수술처치가 없습니다.","E");
	}

	if (drggbn == "Y") 
	{
		group1.button4.visible = false;
	}
	else 
	{
		group1.button4.visible = true;
	}

}

function fSleep(filenm) 
{
	var now = new Date();
	var exitTime = now.getTime() + 5000;
		
	while (true) 
	{
		now = new Date();
		
		var vfile = new VirtualFile(fldr+filenm, VirtualFile.openRead);
		if (VirtualFile.isExist(fldr+filenm) && vfile.getFileSize() > 0) 
		{ 
			vfile.close(); 
			break; 
		}
		
		vfile.close();
		
		if (now.getTime() > exitTime) 
		{ 
			break; 
		}
	}
}

function group1_button3_onclick(obj:Button, e:ClickEventInfo)
{
	this.close();
}

function group1_button4_onclick(obj:Button, e:ClickEventInfo)
{
	fldr =  system.convertRealPath("%MYDOCUMENT%") + "\KU20\\" + ds_init_PK054list.lookupExpr("cdid=='06'","cdnm") +"\\"//"//KDRG";
	infile = ds_init_PK054list.lookupExpr("cdid=='02'","cdnm");//"kdrg33.in";
	outfile = ds_init_PK054list.lookupExpr("cdid=='03'","cdnm");//"kdrg33.out";
	var exefile = ds_init_PK054list.lookupExpr("cdid=='04'","cdnm");//"kdrg33.exe";
	var updfileyn = ds_init_PK054list.lookupExpr("cdid=='05'","cdnm");//"번호생성프로그램 사용 유무
	var age = utlf_transNullToEmpty(ds_main_drginfo.getColumn(0,"age"));// 1세미만환자는 체중과 시간은 필수입력 체크 
	var bw = utlf_transNullToEmpty(ds_main_drginfo.getColumn(0,"bw"));
	var vtl = utlf_transNullToEmpty(ds_main_drginfo.getColumn(0,"vtl"));
	var nofile = "";
	
	if (age < "1" ) 
	{
		if (bw.length == 0 &&  vtl.length == 0 )
		{
			sysf_messageBox("1세미만 환자입니다. 입원체중, 호홉시간은 ","I003");
			return false;
		}
	}
	
	fExistFolder(fldr);
	
	var files = new Array();
	var filecnt = ds_init_PK055list.rowcount;

	for (var i = 0; i < filecnt; i++)
	{
		files.push(ds_init_PK055list.getColumn(i,"cdnm"));
	}

	var updfilechk = true;
	
	for (var i = 0; i < files.length; i++) 
	{
		var updfilesize = ds_init_PK055list.lookupExpr("cdnm=='"+files[i]+"'","dispseq");
		var updfilepath = utlf_transNullToEmpty(ds_init_PK055list.lookupExpr("cdnm=='"+files[i]+"'","detldesc"));
		
		var vfile = new VirtualFile(fldr+files[i], VirtualFile.openRead);
		if (vfile.getFileSize() > 0)
		{
			if (updfileyn == "Y")
			{
				var nowfilesize = vfile.getFileSize();
				
				if (updfilesize != nowfilesize && updfilepath.length > 0 )
				{
					var req = dsf_createDsRow("ds_send_downfile", [{col:"attfilepath", type:"STRING", size:256, val:updfilepath}
																,  {col:"filepathcolnm", type:"STRING", size:256, val:"attfilepath"}]);
                                
					var oParam = {};
						oParam.id          = "TXPIJ03208";
						oParam.service     = "bfjudgapp.DRGJudgList";
						oParam.method      = "reqExeKDrgdDownload";
						oParam.inds        = "req="+req;
						oParam.outds       = "ds_filelist=filelist";
						oParam.async       = false;

					tranf_submit(oParam);
					
					vfile.close();
					
					dsf_readFileFromDs(fldr+files[i], ds_filelist, 0, "attfilecnts"); // 파일저장

					updfilechk = false;
				}
			}
		} 
		else 
		{
			if (updfileyn == "Y") 
			{
				var req = dsf_createDsRow("ds_send_downfile", [{col:"attfilepath", type:"STRING", size:256, val:updfilepath}
															,  {col:"filepathcolnm", type:"STRING", size:256, val:"attfilepath"}]);
                                
				var oParam = {};
					oParam.id          = "TXPIJ03208";
					oParam.service     = "bfjudgapp.DRGJudgList";
					oParam.method      = "reqExeKDrgdDownload";
					oParam.inds        = "req="+req;
					oParam.outds       = "ds_filelist=filelist";
					oParam.async       = false;

				tranf_submit(oParam);
				
				vfile.close();
				
				dsf_readFileFromDs(fldr+files[i], ds_filelist, 0, "attfilecnts"); // 파일저장

				updfilechk = false;
			} 
			else 
			{
				nofile += files[i]+"의 구성요서가 없습니다.! 다운로드 하세요.\n";
			}
		}
		vfile.close();
	}
	
	if (!updfilechk) 
	{ 
		alert("파일이 업데이트 되었습니다. 다시 시도 해주세요." );
		return false; 
	}
	
	if (nofile.length>0 && updfileyn == "Y") 
	{
		alert(nofile);
		return false;
	}
	else 
	{
		if (VirtualFile.isExist(fldr + infile)){ VirtualFile.delete(fldr + infile);  }
		if (VirtualFile.isExist(fldr + outfile)){ VirtualFile.delete(fldr + outfile); }
	
		dsf_setDefaultVal(ds_main_drginfo, "ordrsltcd:1,infilenm:kdrg34.in");
		
		var oParam = {};
			oParam.id          = "TXPID31000";
			oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
			oParam.method      = "reqExeDrgMakeInFile";
			oParam.inds        = "req=ds_main_drginfo";
			oParam.outds       = "ds_attachfile=attachfile";
			oParam.async       = false;
			//oParam.callback    = "cf_TXPID31000";

		tranf_submit(oParam);
		
		dsf_setDefaultVal(ds_send_drginfo, "infilenm:"+infile);

		dsf_readFileFromDs(fldr + infile, ds_attachfile, 0, "filedata"); // 파일저장
											
		fSleep(infile);

		if (VirtualFile.isExist(fldr + infile)) 
		{
			var gBatfileExe      = "@ECHO OFF\r\nCD " + fldr + "\r\n"+ exefile;
			var objExtCommon = new ExtCommon();
			var gBatfilenm = "KDRG.bat";
			var sFileContent = objExtCommon.writeFile( fldr + gBatfilenm ,gBatfileExe, 932);
			var rtn = objExtCommon.executeProcess(fldr + gBatfilenm);

			fSleep(outfile);
			
			var vfile = new VirtualFile(fldr+outfile, VirtualFile.openRead);
			
			if (vfile.getFileSize() > 0) 
			{
				ds_tmp_attach.clearData();
				ds_tmp_attach.addRow();
				
				var objFileinfo = dsf_writeFileToDs(vfile, ds_tmp_attach, 0, "filedata");            
					ds_tmp_attach.setColumn(0, "filenm",   objFileinfo.filename);
					ds_tmp_attach.setColumn(0, "filesize", objFileinfo.filesize);
					ds_tmp_attach.setColumn(0, "filetype", objFileinfo.filetype);
		
				var oParam = {};
					oParam.id          = "TXPIJ03202";
					oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
					oParam.method      = "reqExeDrgMakeOutFile";
					oParam.inds        = "attach=ds_tmp_attach req=ds_send_drginfo";
					oParam.outds       = "ds_main_drginfo=drginfo";
					oParam.async       = false;
					oParam.callback    = "cf_TXPIJ03202";

				tranf_submit(oParam);

			} 
			else 
			{
				sysf_messageBox("out 파일이 존재 하지 않습니다.","E");
			}
			vfile.close();
		} 
		else 
		{
			sysf_messageBox("in 파일이 존재 하지 않습니다.","E");
		}
	}
}

function cf_TXPIJ03202(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) 
    {  
		sysf_messageBox("KDRG번호생성을","E009");
	}
    else 
    {
		sysf_messageBox("KDRG번호생성이","I002");
		//생성파일 삭제
		if (VirtualFile.isExist(fldr + infile)){ VirtualFile.delete(fldr + infile);  }
		if (VirtualFile.isExist(fldr + outfile)){ VirtualFile.delete(fldr + outfile); }
    }
    
    ds_main_drginfo.setColumn(0,"hngnm", hngnm);
}

function fExistFolder(foldernm)
{
	var objExtCommon = new ExtCommon();
	
	if(utlf_isNull(foldernm))
	{
		return;
	}

	var folderDept = foldernm.split("\\");
	var currentPos = folderDept[0];
	
	for(var i =1; i<folderDept.length ; i++)
	{
		if(utlf_isNull(folderDept[i]))
		{
			break;
		}
		
		currentPos += ("\\" + folderDept[i]);
		objExtCommon.checkDirectory(currentPos, 1);
	}
}


function group1_bool3_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
{
	if(obj.value ==  "Y")
	{
		group1.bool1.enable = false;
		group1.bool2.enable = false;
		
		group1.bool1.value = "N";
		group1.bool2.value = "N";
	}
	else
	{
		group1.bool1.enable = true;
		group1.bool2.enable = true;
	}
}
]]></Script>
  </Form>
</FDL>