YNU_JEUS/app_home/himed/xpapps/pam/aftjudgxp/xp/SMPID26100_불완전상병명세서조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPID26100" position="absolute 0 0 1195 741" titletext="불완전상병 조회" oninit="SMPID26100_oninit" onload="SMPID26100_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 13 1195 706" id="group2" anchor="all">
          <Layouts>
            <Layout>
              <Div position="absolute 0 11 1190 93" align="align:center top;" id="group4" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Static text="청구년월" position="absolute 5 7 81 24" id="caption5" class="search_name" anchor="default"/>
                    <Combo position="absolute 162 7 212 26" id="cmb_clamdgfrom" class="combo_search" innerdataset="@ds_init_clamdglist" datacolumn="clamdgnm" codecolumn="clamdgcd" anchor="default" onitemchanged="group2_group4_cmb_clamdgfrom_onitemchanged"/>
                    <Static text="진료과" position="absolute 234 32 299 49" id="caption6" class="search_name" anchor="default"/>
                    <Combo position="absolute 315 32 400 51" id="combo2" class="combo_search" innerdataset="@ds_init_tmp_orddeptcdlist" datacolumn="nm" codecolumn="cd" anchor="default"/>
                    <Shape position="absolute 1108 35 1114 77" linetype="vertical" id="line2" class="line_4" anchor="top right"/>
                    <Button position="absolute 1125 42 1181 64" id="button1" class="btn1" taborder="2" text="조회" anchor="top right" onclick="group2_group4_button1_onclick"/>
                    <Static text="내원유형" position="absolute 5 32 81 49" id="caption9" class="search_name" anchor="default"/>
                    <Combo position="absolute 85 32 160 51" id="rdo_ioflag" class="combo_search" codecolumn="value" datacolumn="label" anchor="default" innerdataset="@ds_rdo_ioflag" onitemchanged="group2_group4_rdo_ioflag_onitemchanged"/>
                    <Static text="청구구분" position="absolute 234 7 310 24" id="caption11" class="search_name" anchor="default"/>
                    <Combo position="absolute 315 7 400 26" id="cmb_clamflag" class="combo_search" innerdataset="@ds_init_P0155list" datacolumn="cdnm" codecolumn="cdid" anchor="default"/>
                    <Static text="보험유형" position="absolute 429 55 505 72" id="caption13" class="search_name" anchor="default"/>
                    <Edit readonly="true" position="absolute 613 55 633 74" id="opt_insukind" class="output_search" anchor="default"/>
                    <Combo position="absolute 513 55 608 74" id="cmb_insukind" class="combo_search" innerdataset="@ds_init_P0008list" datacolumn="cdnm" codecolumn="cdid" anchor="default"/>
                    <Static text="상병조회선택" position="absolute 5 57 107 74" id="caption3" class="search_name" anchor="default"/>
                    <Combo position="absolute 515 7 585 26" id="cmb_judgrid" class="combo_default" innerdataset="@ds_init_U0001list" datacolumn="cdnm" codecolumn="cdid" anchor="default"/>
                    <Static text="심사자  " position="absolute 430 7 516 24" id="caption17" class="search_name" anchor="default"/>
                    <Radio position="absolute 107 53 392 76" id="rdo_delgb" columncount="3" codecolumn="value" datacolumn="label" anchor="default" innerdataset="@ds_rdo_delgb" onitemchanged="group2_group4_rdo_delgb_onitemchanged"/>
                    <Edit position="absolute 742 8 785 27" id="ipt_fromdiagcd" taborder="5" anchor="default" onkeydown="group2_group4_ipt_fromdiagcd_onkeydown" ontextchanged="group2_group4_ipt_fromdiagcd_ontextchanged" inputmode="upper"/>
                    <Edit position="absolute 800 8 843 27" id="ipt_todiagcd" taborder="5" anchor="default" onkeydown="group2_group4_ipt_todiagcd_onkeydown" inputmode="upper"/>
                    <Static text="상병코드" position="absolute 660 9 736 26" id="caption8" class="search_name" anchor="default"/>
                    <Combo position="absolute 514 30 599 49" id="cmb_judgendyn" class="combo_search" innerdataset="@ds_init_P0151list" datacolumn="cdnm" codecolumn="cdid" anchor="default"/>
                    <Static text="심사상태" position="absolute 429 30 505 47" id="caption10" class="search_name" anchor="default"/>
                    <Static text="~" position="absolute 787 11 802 26" id="caption14" anchor="default"/>
                    <cp_monthCal id="ipt_clamymfrom" titletext="monthCalendar" taborder="6" scrollbars="none" position="absolute 85 6 159 31" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Static text="환자 리스트" position="absolute 1 103 101 124" id="caption12" class="tit_2" anchor="default"/>
              <Button position="absolute 1121 136 1185 155" id="button2" class="btn2" text="엑셀저장" anchor="default"/>
              <Grid position="absolute 0 120 1190 685" id="grd_outjudg" class="datagrid2" binddataset="ds_main_calcorderlist" anchor="all" autofittype="col" oncelldblclick="group2_grd_outjudg_oncelldblclick" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="21"/>
                      <Column size="30"/>
                      <Column size="60"/>
                      <Column size="45"/>
                      <Column size="44"/>
                      <Column size="22"/>
                      <Column size="30"/>
                      <Column size="51"/>
                      <Column size="22"/>
                      <Column size="25"/>
                      <Column size="128"/>
                      <Column size="66"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="58"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="55"/>
                      <Column size="109"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="36"/>
                      <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="33" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1" text="순번"/>
                      <Cell col="2" text="등록번호"/>
                      <Cell col="3" text="성명"/>
                      <Cell col="4" text="나&#10;이"/>
                      <Cell col="5" text="성&#10;별"/>
                      <Cell col="6" text="내원&#10;유형"/>
                      <Cell col="7" text="청구월"/>
                      <Cell col="8" text="유&#10;형"/>
                      <Cell col="9" text="보&#10;조"/>
                      <Cell col="10" text="청구과"/>
                      <Cell col="11" text="불완전&#10;상병"/>
                      <Cell col="12" text="주상병명"/>
                      <Cell col="13" text="R/O"/>
                      <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="종료일"/>
                      <Cell col="22" text="처방의"/>
                      <Cell col="23" text="심사&#10;결정"/>
                      <Cell col="24" text="심사자"/>
                      <Cell col="25" text="진료과"/>
                      <Cell col="26" text="진료의"/>
                      <Cell col="27" text="구분"/>
                      <Cell col="28" text="차수"/>
                      <Cell col="29" text="원외처방번호"/>
                      <Cell col="30" text="caption1"/>
                      <Cell col="31" text="caption2"/>
                      <Cell col="32" text="caption3"/>
                      <Cell col="33" text="caption4"/>
                      <Cell col="34" text="caption5"/>
                      <Cell col="35" text="caption6"/>
                      <Cell col="36" text="caption10"/>
                      <Cell col="37" text="caption7"/>
                      <Cell col="38" text="caption8"/>
                      <Cell col="39" text="caption9"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head"/>
                      <Cell col="1" style="align:center middle;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:rowno"/>
                      <Cell col="2" displaytype="text" edittype="text" style="align:center middle;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:pid"/>
                      <Cell col="3" style="align:center middle;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:hngnm"/>
                      <Cell col="4" style="align:center middle;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:age"/>
                      <Cell col="5" style="align:center middle;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:gndr"/>
                      <Cell col="6" displaytype="combo" edittype="combo" style="align:center middle;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:ioflag" combodataset="ds_rdo_ioflag" combocodecol="value" combodatacol="label" enable="false"/>
                      <Cell col="7" displaytype="date" style="align:center middle;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:clamym" mask="yyyy-MM"/>
                      <Cell col="8" style="align:center middle;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:insukind"/>
                      <Cell col="9" style="align:left middle;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:suppkind"/>
                      <Cell col="10" style="align:left middle;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:clamdeptcd"/>
                      <Cell col="11" style="align:left middle;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:diagcd2"/>
                      <Cell col="12" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:diagnm2"/>
                      <Cell col="13" displaytype="checkbox" edittype="checkbox" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:diagkindcd"/>
                      <Cell col="14" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:diagcd"/>
                      <Cell col="15" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:diagnm"/>
                      <Cell col="16" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:spclspec" enable="false"/>
                      <Cell col="17" displaytype="checkbox" edittype="checkbox" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:chk"/>
                      <Cell col="18" displaytype="combo" edittype="combo" style="align:center;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:judgendyn" combodataset="ds_init_P0151list" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                      <Cell col="19" displaytype="date" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:indd" mask="yyyy-MM-dd"/>
                      <Cell col="20" displaytype="date" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:ordfromdd" mask="yyyy-MM-dd"/>
                      <Cell col="21" displaytype="date" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:ordtodd" mask="yyyy-MM-dd"/>
                      <Cell col="22" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:clamdrid"/>
                      <Cell col="23" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:judgyn"/>
                      <Cell col="24" style="align:left middle;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:judgrnm"/>
                      <Cell col="25" style="align:left middle;background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:orddeptcd"/>
                      <Cell col="26" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:orddrnm"/>
                      <Cell col="27" displaytype="combo" edittype="combo" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:clamflagcd" enable="false"/>
                      <Cell col="28" style="background:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');background2:EXPR(diagcnt &gt; '1' ? '##00ffff' : '#ffffff');" text="bind:clamdg"/>
                      <Cell col="29" text="bind:edicdflag"/>
                      <Cell col="30" text="bind:pidsn"/>
                      <Cell col="31" text="bind:mpsno"/>
                      <Cell col="32" text="bind:mpsflag"/>
                      <Cell col="33" text="bind:workflag"/>
                      <Cell col="34" text="bind:clamdeptcode"/>
                      <Cell col="35" text="bind:cretfromdd"/>
                      <Cell col="36" text="bind:crettodd"/>
                      <Cell col="37" text="bind:execdd"/>
                      <Cell col="38" displaytype="checkbox" edittype="checkbox" text="bind:chk2"/>
                      <Cell col="39" text="bind:diagcnt"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static text="~" position="absolute 10 175 25 195" id="caption2" visible="false" anchor="default"/>
              <Combo position="absolute 25 195 75 214" id="cmb_clamdgto" class="combo_search" visible="false" innerdataset="ds_init_cmb_clamdgto" datacolumn="clamdgnm" codecolumn="clamdgcd" anchor="default" onitemchanged="group2_cmb_clamdgto_onitemchanged"/>
              <Button position="absolute 1111 99 1191 118" id="btn_excelsave" class="btn7" text="엑셀저장" anchor="top right" onclick="group2_btn_excelsave_onclick"/>
              <Button position="absolute 1024 99 1110 118" id="button8" class="btn2" text="심사화면보기" anchor="top right" onclick="group2_button8_onclick"/>
              <cp_monthCal id="ipt_clamymto" titletext="monthCalendar" taborder="1" scrollbars="none" position="absolute 25 171 99 191" visible="false"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 695 1190 740" id="group3" anchor="left right bottom">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 5 1185 41" id="roundrect1" type="roundrectangle" anchor="left right bottom"/>
              <Static text="청구년월 :" position="absolute 11 16 96 33" id="caption4" class="search_name" anchor="default"/>
              <Edit position="absolute 176 14 196 33" id="input2" anchor="default"/>
              <Combo position="absolute 292 14 372 33" id="combo1" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_combo1_onitemchanged" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">A</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">I</Col>
                      <Col id="datacolumn">입원</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">O</Col>
                      <Col id="datacolumn">외래</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Static text="내원유형 :" position="absolute 210 16 298 33" id="caption7" class="search_name" anchor="default"/>
              <Static text="불완전상병 :" position="absolute 391 15 486 32" id="caption18" class="search_name" anchor="default"/>
              <Edit position="absolute 488 14 538 33" id="input3" taborder="5" onkeydown="group3_input3_onkeydown" ontextchanged="group3_input3_ontextchanged" anchor="default" inputmode="upper"/>
              <Edit position="absolute 679 14 734 32" id="input4" taborder="5" onkeydown="group3_input4_onkeydown" ontextchanged="group3_input4_ontextchanged" anchor="default" inputmode="upper"/>
              <Static text="일괄변경할상병 :" position="absolute 552 15 673 32" id="caption19" class="search_name" anchor="default"/>
              <Button position="absolute 1075 13 1179 35" id="button3" class="btn4" text="일괄변경실행" anchor="right bottom" onclick="group3_button3_onclick"/>
              <Calendar id="input1" taborder="6" position="absolute 94 11 175 34" dateformat="yyyy-MM" value="null" editformat="yyyy-MM" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption1" text="불완전상병 조회" class="tit_1" position="absolute 0 0 224 23"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamflag" type="STRING" size="256"/>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamymfrom" type="STRING" size="256"/>
          <Column id="clamdgfrom" type="STRING" size="256"/>
          <Column id="clamymto" type="STRING" size="256"/>
          <Column id="clamdgto" type="STRING" size="256"/>
          <Column id="insukind" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="clamdeptid" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="code" type="STRING" size="256"/>
          <Column id="patunitsrch" type="STRING" size="256"/>
          <Column id="cutonly" type="STRING" size="256"/>
          <Column id="codecond" type="STRING" size="256"/>
          <Column id="cancer" type="STRING" size="256"/>
          <Column id="large" type="STRING" size="256"/>
          <Column id="middle" type="STRING" size="256"/>
          <Column id="small" type="STRING" size="256"/>
          <Column id="judgrid" type="STRING" size="256"/>
          <Column id="edicd" type="STRING" size="256"/>
          <Column id="trustinstcd" type="STRING" size="256"/>
          <Column id="clamcutlist" type="STRING" size="256"/>
          <Column id="spclcd" type="STRING" size="256"/>
          <Column id="mpsflag" type="STRING" size="256"/>
          <Column id="judgrid" type="STRING" size="256"/>
          <Column id="workflag" type="STRING" size="256"/>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamdg" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="pidsn" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="diagcd" type="STRING" size="256"/>
          <Column id="diagnm" type="STRING" size="256"/>
          <Column id="delgb" type="STRING" size="256"/>
          <Column id="fromdiagcd" type="STRING" size="256"/>
          <Column id="todiagcd" type="STRING" size="256"/>
          <Column id="judgendyn" type="STRING" size="256"/>
          <Column id="fromdiagcd2" type="STRING" size="256"/>
          <Column id="todiagcd2" type="STRING" size="256"/>
          <Column id="ordflag" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="scrnid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="spclcd">JX999</Col>
            <Col id="mpsflag">A</Col>
            <Col id="delgb">D</Col>
            <Col id="ordflag">J</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_clamdglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamdgnm" type="STRING" size="256"/>
          <Column id="clamdgcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0155list" 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>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_U0001list" 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>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_rdo_ioflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">전체</Col>
            <Col id="value">A</Col>
          </Row>
          <Row>
            <Col id="label">입원</Col>
            <Col id="value">I</Col>
          </Row>
          <Row>
            <Col id="label">외래</Col>
            <Col id="value">O</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_tmp_orddeptcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="nm" type="STRING" size="256" sumtext="진료과명칭"/>
          <Column id="deptengabbr" type="STRING" size="256" sumtext="영문약어"/>
          <Column id="reqfild" type="STRING" size="256" sumtext="청구진료분야"/>
          <Column id="reqdeptno" type="STRING" size="256" sumtext="청구과코드"/>
          <Column id="orddeptflag" type="STRING" size="256" sumtext="진료과구분"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0151list" 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>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_rdo_delgb" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">불완전상병</Col>
            <Col id="value">A</Col>
          </Row>
          <Row>
            <Col id="label">종료상병</Col>
            <Col id="value">D</Col>
          </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>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_diag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamdg" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="todiagcd" type="STRING" size="256"/>
          <Column id="fromdiagcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_UserInfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="userId" type="STRING" size="256"/>
          <Column id="userNm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_calcorderlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="rowno" type="STRING" size="256" sumtext="순번"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="성명"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="내원유형"/>
          <Column id="clamym" type="STRING" size="256" sumtext="청구월"/>
          <Column id="clamflagcd" type="STRING" size="256" sumtext="구분"/>
          <Column id="clamdg" type="STRING" size="256" sumtext="차수"/>
          <Column id="insukind" type="STRING" size="256" sumtext="유형"/>
          <Column id="suppkind" type="STRING" size="256" sumtext="보조"/>
          <Column id="clamdeptcd" type="STRING" size="256" sumtext="청구과"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
          <Column id="orddrnm" type="STRING" size="256" sumtext="진료의"/>
          <Column id="a" type="STRING" size="256" sumtext="주상병"/>
          <Column id="diagnm" type="STRING" size="256" sumtext="주상병명"/>
          <Column id="diagcd" type="STRING" size="256" sumtext="주상병"/>
          <Column id="acptno" type="STRING" size="256" sumtext="접수번호"/>
          <Column id="docuseqno" type="STRING" size="256" sumtext="명일련"/>
          <Column id="edilnno" type="STRING" size="256" sumtext="줄번호"/>
          <Column id="snglcalcscorcd" type="STRING" size="256" sumtext="처방코드"/>
          <Column id="edicd" type="STRING" size="256" sumtext="EDI코드"/>
          <Column id="calchngnm" type="STRING" size="256" sumtext="한글명"/>
          <Column id="unitcost" type="STRING" size="256" sumtext="단가"/>
          <Column id="drugqty" type="STRING" size="256" sumtext="수량"/>
          <Column id="tims" type="STRING" size="256" sumtext="횟수"/>
          <Column id="dayno" type="STRING" size="256" sumtext="일수"/>
          <Column id="totdrugqty" type="STRING" size="256" sumtext="총투여량"/>
          <Column id="amt" type="STRING" size="256" sumtext="금액"/>
          <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
          <Column id="cretfromdd" type="STRING" size="256" sumtext="유형시작일"/>
          <Column id="crettodd" type="STRING" size="256" sumtext="종료일"/>
          <Column id="clamdrid" type="STRING" size="256" sumtext="처방의"/>
          <Column id="judgyn" type="STRING" size="256" sumtext="심사결정"/>
          <Column id="cutdrugqty" type="STRING" size="256" sumtext="삭감투여량"/>
          <Column id="cuttims" type="STRING" size="256" sumtext="삭감횟수"/>
          <Column id="cutdayno" type="STRING" size="256" sumtext="삭감일수"/>
          <Column id="totcutqty" type="STRING" size="256" sumtext="총투삭감량"/>
          <Column id="oprcp" type="STRING" size="256" sumtext="원내외"/>
          <Column id="payflag" type="STRING" size="256" sumtext="급비구분"/>
          <Column id="judgrnm" type="STRING" size="256" sumtext="심사자"/>
          <Column id="edicdflag" type="STRING" size="256" sumtext="EDI코드구분"/>
          <Column id="clodseqno" type="STRING" size="256" sumtext="사후심사처방일련번호"/>
          <Column id="spclspec" type="STRING" size="256" sumtext="특정내역"/>
          <Column id="spclcd" type="STRING" size="256" sumtext="특정코드"/>
          <Column id="pidsn" type="STRING" size="256" sumtext="등록번호순번"/>
          <Column id="mpsno" type="STRING" size="256" sumtext="원외처방전번호"/>
          <Column id="mpsflag" type="STRING" size="256" sumtext="원외처방구분"/>
          <Column id="orddd" type="STRING" size="256" sumtext="처방일"/>
          <Column id="age" type="STRING" size="256" sumtext="나이"/>
          <Column id="execdd" type="STRING" size="256" sumtext="실시일자"/>
          <Column id="judgendyn" type="STRING" size="256" sumtext="심사상태"/>
          <Column id="workflag" type="STRING" size="256" sumtext="심사상태"/>
          <Column id="clamdeptcode" type="STRING" size="256" sumtext="심사상태"/>
          <Column id="ordfromdd" type="STRING" size="256" sumtext="ordfromdd"/>
          <Column id="ordtodd" type="STRING" size="256" sumtext="ordfromdd"/>
          <Column id="a" type="STRING" size="256" sumtext="ordfromdd"/>
          <Column id="gndr" type="STRING" size="256" sumtext="성별"/>
          <Column id="diagcnt" type="STRING" size="256" sumtext="성별"/>
          <Column id="diagkindcd" type="STRING" size="256" sumtext="성별"/>
          <Column id="diagcd2" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_tmp_orddeptcdlist2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="nm" type="STRING" size="256" sumtext="진료과명칭"/>
          <Column id="deptengabbr" type="STRING" size="256" sumtext="영문약어"/>
          <Column id="reqfild" type="STRING" size="256" sumtext="청구진료분야"/>
          <Column id="reqdeptno" type="STRING" size="256" sumtext="청구과코드"/>
          <Column id="orddeptflag" type="STRING" size="256" sumtext="진료과구분"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_tmp_orddridlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256" sumtext="진료의사코드"/>
          <Column id="nm" type="STRING" size="256" sumtext="진료의사명칭"/>
          <Column id="dp" type="STRING" size="256" sumtext="부서코드"/>
          <Column id="sp" type="STRING" size="256" sumtext="선택진료여부"/>
          <Column id="reqdp" type="STRING" size="256" sumtext="청구과코드"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_tmp_orddridlist2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256" sumtext="진료의사코드"/>
          <Column id="nm" type="STRING" size="256" sumtext="진료의사명칭"/>
          <Column id="dp" type="STRING" size="256" sumtext="부서코드"/>
          <Column id="sp" type="STRING" size="256" sumtext="선택진료여부"/>
          <Column id="reqdp" type="STRING" size="256" sumtext="청구과코드"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_judgrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="judgrid" type="STRING" size="256" sumtext="심사자ID"/>
          <Column id="judgrnm" type="STRING" size="256" sumtext="심사자명"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_suppkind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256" sumtext="보조유형"/>
          <Column id="nm" type="STRING" size="256" sumtext="보조유형명"/>
          <Column id="up" type="STRING" size="256" sumtext="상위코드"/>
          <Column id="io" type="STRING" size="256" sumtext="외래입원구분"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_item3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="judgidyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_clamdept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamdgnm" type="STRING" size="256"/>
          <Column id="clamdgcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_aftjudgerr" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING" size="256" sumtext="오류내역"/>
          <Column id="cd" type="STRING" size="256" sumtext="코드"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_uuee" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="scrnid" type="STRING" size="256" sumtext="화면(xrw)의 ID"/>
          <Column id="compsnm" type="STRING" size="256" sumtext="Grid ID 정보"/>
          <Column id="compscnts" type="STRING" size="256" sumtext="Grid의 칼럼명"/>
          <Column id="compsrefcnts" type="STRING" size="256" sumtext="Grid의 reference명"/>
          <Column id="compssizecnts" type="STRING" size="256" sumtext="Grid의 칼럼Size"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_sppiz00400" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="basedd" type="STRING" size="256"/>
          <Column id="diagcd" type="STRING" size="256"/>
          <Column id="diagnm" type="STRING" size="256"/>
          <Column id="selectedrdodiagkind" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_targetdiag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="diagcd" type="STRING" size="256"/>
          <Column id="diagcdref" type="STRING" size="256"/>
          <Column id="diagnmref" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_send_afjudg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="workflag" type="STRING" size="256"/>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamdg" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="pidsn" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_smpid20300" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="workflag" type="STRING" size="256"/>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamdg" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="pidsn" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_smpid20500" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="workflag" type="STRING" size="256"/>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamdg" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="pidsn" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_rslt_sppiz00400" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="diagfromdd" type="STRING" size="256"/>
          <Column id="diagtodd" type="STRING" size="256"/>
          <Column id="diagcd" type="STRING" size="256"/>
          <Column id="diaghngnm" type="STRING" size="256"/>
          <Column id="diagengnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.group4.ipt_clamymfrom" propid="text" datasetid="ds_send" columnid="clamymfrom"/>
      <BindItem id="item1" compid="group2.group4.cmb_clamdgfrom" propid="value" datasetid="ds_send" columnid="clamdgfrom"/>
      <BindItem id="item2" compid="group2.group4.cmb_clamflag" propid="value" datasetid="ds_send" columnid=""/>
      <BindItem id="item3" compid="group2.group4.cmb_judgrid" propid="value" datasetid="ds_send" columnid="judgrid"/>
      <BindItem id="item4" compid="group2.group4.ipt_fromdiagcd" propid="value" datasetid="ds_send" columnid="fromdiagcd"/>
      <BindItem id="item5" compid="group2.group4.ipt_todiagcd" propid="value" datasetid="ds_send" columnid="todiagcd"/>
      <BindItem id="item6" compid="group2.group4.rdo_ioflag" propid="value" datasetid="ds_send" columnid="ioflag"/>
      <BindItem id="item7" compid="group2.group4.combo2" propid="value" datasetid="ds_send" columnid=""/>
      <BindItem id="item8" compid="group2.group4.cmb_judgendyn" propid="value" datasetid="ds_send" columnid=""/>
      <BindItem id="item9" compid="group2.group4.rdo_delgb" propid="value" datasetid="ds_send" columnid=""/>
      <BindItem id="item10" compid="group2.group4.cmb_insukind" propid="value" datasetid="ds_send" columnid="insukind"/>
      <BindItem id="item11" compid="group2.group4.opt_insukind" propid="value" datasetid="ds_send" columnid="insukind"/>
      <BindItem id="item12" compid="group2.ipt_clamymto" propid="text" datasetid="ds_send" columnid="clamymto"/>
      <BindItem id="item13" compid="group2.cmb_clamdgto" propid="value" datasetid="ds_send" columnid="clamdgto"/>
      <BindItem id="item15" compid="group3.input2" propid="value" datasetid="ds_send_diag" columnid="clamdg"/>
      <BindItem id="item16" compid="group3.combo1" propid="value" datasetid="ds_send_diag" columnid="ioflag"/>
      <BindItem id="item17" compid="group3.input3" propid="value" datasetid="ds_send_diag" columnid="fromdiagcd"/>
      <BindItem id="item18" compid="group3.input4" propid="value" datasetid="ds_send_diag" columnid="todiagcd"/>
      <BindItem id="item14" compid="group3.input1" propid="value" datasetid="ds_send_diag" columnid="clamym"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "pam_pamcomnxp::PAM001.xjs";
include "pam_pamcomnxp::PAM.xjs";
include "pam_aftjudgstatxp::SMPIS01700.xjs";
include "pam_bfjudgxp::pam_grd.xjs";
function SMPID26100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPID26100_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(group2.grd_outjudg);
	grdf_setRowTypeIcon(group2.grd_outjudg, 0);
	fInitialize();
}

function fInitialize()
{
	ds_main_calcorderlist.clearData();

	ds_send.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
	
	var oParam = {};
		oParam.id          = "TRPIB00603";
		oParam.service     = "insubasecdmngtapp.JudgCmt";
		oParam.method      = "reqGetJudgRidList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_init_U0001list=U0001 ds_init_UserInfo=UserInfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIB00603";

	tranf_submit(oParam);
	
	var arrParam = [{dsNm: "ds_init_P0008list", cdGrpId: "P0008"}
				   ,{dsNm: "ds_init_P0155list", cdGrpId: "P0155"}
				   ,{dsNm: "ds_init_P0151list", cdGrpId: "P0151"}]
	appf_getCodeList(arrParam);	
	
	pamGetDeptCDDrIDList(); 

	group2.group4.rdo_ioflag.value = "A";
	
	var today = new Date();
	var baseyear = today.getDateFormat("YYYY");	
	var basemonth = today.getDateFormat("MM");
	var currentym = baseyear + basemonth;  
	
	ds_send.setColumn(0, "clamymfrom", currentym);
	ds_send.setColumn(0, "clamymto", currentym);
	
	group2.group4.ipt_clamymfrom.setCallEvent("fn_Cal");

	var clamym = group2.group4.ipt_clamymfrom.getData();
	var clamtoym = group2.ipt_clamymto.getData();
	
	var ioflag = ds_send.getColumn(0, "ioflag");
	var insukind = ds_send.getColumn(0, "insukind");
		
	pidfGetClamdg(clamym, clamtoym, ioflag, insukind, "ds_init_clamdglist");

	fGetOrdDept();
	fGetClamDept();
	
	frmf_addComboItem("group2.group4.cmb_insukind","보험+급여","T","below");
	
	group2.group4.cmb_insukind.value = "T";
	group2.group4.cmb_clamdgfrom.index = 0;
}

function fn_Cal()
{
	var clamymfrom = ds_send.getColumn(0, "clamymfrom");
	var clamymto = ds_send.getColumn(0, "clamymto");
	
	if(clamymfrom > clamtoym)
	{
		sysf_messageBox("종료일은 시작일보다 클 수 ", "I004");
		ds_send.setColumn(0, "clamymto", "");
	}
	
	var clamym = group2.group4.ipt_clamymfrom.getData();
	ds_send.setColumn(0, "clamym", clamym);
	ds_send.setColumn(0, "clamymfrom", clamym);
	ds_send.setColumn(0, "clamymto", clamym);

 	var clamtoym = ds_send.getColumn(0, "clamymto");
 	var ioflag = ds_send.getColumn(0, "ioflag");
 	var insukind = ds_send.getColumn(0, "insukind");
 	
 	pidfGetClamdg(clamym, clamtoym, ioflag, insukind, "ds_init_clamdglist");
 	frmf_addComboItem("group2.group4.cmb_clamdgfrom","전체","","above");
 	
 	group2.group4.cmb_clamdgfrom.value = "";
 	
 	fChkClamym();
}

function fGetOrdDept()
{
	var oParam = {};
		oParam.id          = "TRPID20309";
		oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
		oParam.method      = "reqGetDeptCDDrID";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_init_tmp_orddeptcdlist=orddeptcd ds_init_tmp_orddeptcdlist2=orddeptcd2 ds_init_tmp_orddridlist=orddrid ds_init_tmp_orddridlist2=orddrid2";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPID20309";

	tranf_submit(oParam);
}

function fGetClamDept()
{
	var oParam = {};
		oParam.id          = "TRPID20201";
		oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
		oParam.method      = "reqGetInitComCd";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_init_judgrid=judgrid ds_init_suppkind=suppkind ds_init_tmp_orddridlist=orddrid ds_init_tmp_orddridlist2=orddrid2 ds_init_clamdept=clamdept ds_init_tmp_orddeptcdlist=orddeptcd ds_init_tmp_orddeptcdlist2=orddeptcd2 ds_init_item3=item3 ds_init_clamdept=clamdg ds_init_aftjudgerr=aftjudgerr ds_init_uuee=uuee";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPID20201";

	tranf_submit(oParam);	
}

function fChkClamym()
{
	var fromym = ds_send.getColumn(0, "clamymfrom");
	var toym = ds_send.getColumn(0, "clamymto");
	
	if ( fromym != toym )
	{
		group2.group4.cmb_clamdgfrom.value = "";
		group2.cmb_clamdgto.value = "";
		group2.group4.cmb_clamdgfrom.enable = false;
		group2.cmb_clamdgto.enable = false;
	}
	else
	{
		group2.group4.cmb_clamdgfrom.enable = true;
		group2.cmb_clamdgto.enable = true;		
		group2.group4.cmb_clamdgfrom.index = 0;
		group2.cmb_clamdgto.index = 0;
	}
}
//조회
function group2_group4_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	if (utlf_isNull(group2.group4.cmb_clamdgfrom.value))
	{
		sysf_messageBox("청구차수는  필수입니다. ", "");
		group2.group4.cmb_clamdgfrom.setFocus();
		return ;
	}
	
	if (group2.group4.rdo_ioflag.value == "A")
	{
		sysf_messageBox("내원유형 선택은 필수입니다. ", "");	
		group2.group4.rdo_ioflag.setFocus();
		return ;
	}
	fSearch();
}

function fSearch()
{
	var chk_clamymfrom = ds_send.getColumn(0, "clamymfrom");
	var chk_clamymto = ds_send.getColumn(0, "clamymto");
	var ipt_code = ds_send.getColumn(0, "code");
	
	chk_clamymfrom = String(chk_clamymfrom).substr(0,6);
	chk_clamymto = String(chk_clamymto).substr(0,6);
	
	ds_send.setColumn(0, "clamymfrom", chk_clamymfrom);
	ds_send.setColumn(0, "clamymto", chk_clamymto);
	
	if (utlf_isNull(chk_clamymfrom) || utlf_isNull(chk_clamymto))
	{
		sysf_messageBox("청구년월은 ", "I003");
		return;
	}
	
	ds_main_calcorderlist.clearData();
	
	var oParam = {};
		oParam.id          = "TRPIS00600";
		oParam.service     = "aftjudgstatapp.DiagClam";
		oParam.method      = "reqGetNotEndDiagList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_calcorderlist=clamcutlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIS00600";

	tranf_submit(oParam);
	
	ds_main_calcorderlist.updatecontrol = false;
		
	for(var i = 0; i < ds_main_calcorderlist.rowcount; i++)
	{
		ds_main_calcorderlist.setColumn(i, "rowno", i+1);
		ds_main_calcorderlist.setColumn(i, "diagcd2", ds_main_calcorderlist.getColumn(i, "diagcd"));
		ds_main_calcorderlist.setColumn(i, "diagcd", "");
	}
	
	ds_main_calcorderlist.updatecontrol = true;
		
	if(ds_main_calcorderlist.lookup("diagcnt", "diagcnt > '1'", "diagcnt") > "1")
	{
		sysf_messageBox("주상병이 중복인 환자가 있습니다","I");
	}
}
function group2_group4_cmb_clamdgfrom_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	ds_send.setColumn(0, "clamdgto", ds_send.getColumn(0, "clamdgfrom"));
}

function group2_grd_outjudg_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	ds_send_diag.setColumn(0, "clamym", ds_main_calcorderlist.getColumn(e.row, "clamym"));
	ds_send_diag.setColumn(0, "clamdg", ds_main_calcorderlist.getColumn(e.row, "clamdg"));
	ds_send_diag.setColumn(0, "ioflag", ds_main_calcorderlist.getColumn(e.row, "ioflag"));
	ds_send_diag.setColumn(0, "fromdiagcd", ds_main_calcorderlist.getColumn(e.row, "diagcd2"));
	ds_send_diag.setColumn(0, "todiagcd", "");
}

function fSearchDiageCode()
{
	var diagcd = ds_hidden_targetdiag.getColumn(0, "diagcd");

	if (diagcd) 
	{
		ds_hidden_sppiz00400.clearData();
		ds_hidden_sppiz00400.addRow();
		ds_hidden_sppiz00400.setColumn(0, "basedd", utlf_getCurrentDate());
		ds_hidden_sppiz00400.setColumn(0, "diagcd", diagcd);
		ds_hidden_sppiz00400.setColumn(0, "diagnm", "");
		ds_hidden_sppiz00400.setColumn(0, "selectedrdodiagkind", "1");
		
		var oParam = {};
			oParam.id          = "TRPID20306";
			oParam.service     = "aftjudgapp.InAftJudg";
			oParam.method      = "reqGetSickAndWounded";
			oParam.inds        = "req=ds_hidden_sppiz00400";
			oParam.outds       = "ds_hidden_sppiz00400=cond ds_rslt_sppiz00400=rslt";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPID20306";

		tranf_submit(oParam);
		
		var rsltList = ds_rslt_sppiz00400.rowcount;
		
		if (rsltList == 1) 
		{
			fSetDiagCdNm();
		} 
		else 
		{
			fSearchSPPIZ00400();
		}
	} 
	else 
	{
		fSearchSPPIZ00400();
	}
}

function fSearchSPPIZ00400()
{
	var diagcd = ds_hidden_targetdiag.getColumn(0, "diagcd");
	
	var objArg = new Object();

	objArg.sDiagcd = diagcd;
	objArg.sSelectedrdodiagkind = 3;
	objArg.sSingleFlag = "M";

	var objDs = frmf_modal("SPPIZ00400", "SPPIZ00400", objArg);

	ds_rslt_sppiz00400.copyData(objDs);

	
	group2.group4.button1.setFocus();
}

function fSetDiagCdNm(target_ipt_diagcd, target_ipt_diagnm) 
{
	var diagcd = ds_rslt_sppiz00400.getColumn(0, "diagcd");
	var diaghngnm = ds_rslt_sppiz00400.getColumn(0, "diaghngnm");
	var diagengnm = ds_rslt_sppiz00400.getColumn(0, "diagengnm");
	
	var target_diagcd = ds_hidden_targetdiag.getColumn(0, "diagcdref");
	var target_diagnm = ds_hidden_targetdiag.getColumn(0, "diagnmref");
	
	eval(target_diagcd).setColumn(0, "diagcd", diagcd);
	eval(target_diagnm).setColumn(0, "diagnm", diaghngnm);
}

function fChangeRow()
{
	if(utlf_isNull(ds_send_diag.getColumn(0, "clamym")))
	{
		sysf_messageBox("청구년월입력은 필수입니다. ", "");
		group3.input1.setFocus();
		return false;
	}
	if(utlf_isNull(ds_send_diag.getColumn(0, "clamdg")))
	{
		sysf_messageBox("청구차수입력입력은 필수입니다. ", "");
		group3.input2.setFocus();
		return false;
	}
	if(utlf_isNull(ds_send_diag.getColumn(0, "ioflag")))
	{
		sysf_messageBox("청구차수입력입력은 필수입니다. ", "");	
		group3.combo1.setFocus();
		return false;
	}
	if(utlf_isNull(ds_send_diag.getColumn(0, "fromdiagcd")))
	{
		sysf_messageBox("불완전상병 입력은 필수입니다. ", "");
		group3.input3.setFocus();
		return false;
	}
	if(utlf_isNull(ds_send_diag.getColumn(0, "todiagcd")))
	{
		sysf_messageBox("불완전상병 입력은 필수입니다. ", "");
		group3.input4.setFocus();
		return false;
	}
}

function group2_group4_rdo_ioflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fGetOrdDept();
	fGetClamDept();
}

function group2_group4_rdo_delgb_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	group2_group4_button1_onclick();
}

function group2_group4_ipt_fromdiagcd_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		ds_hidden_targetdiag.setColumn(0, "diagcd", obj.value);
		ds_hidden_targetdiag.setColumn(0, "diagcdref", "ds_send");
		ds_hidden_targetdiag.setColumn(0, "diagnmref", "ds_send");
		
		fSearchDiageCode();
		
		ds_send.setColumn(0, "fromdiagcd", ds_rslt_sppiz00400.getColumn(0, "diagcd"));
		ds_send.setColumn(0, "todiagcd", obj.value);
	}
}

function group2_group4_ipt_fromdiagcd_ontextchanged(obj:Edit,  e:TextChangedEventInfo)
{
	group2.group4.ipt_todiagcd.value = group2.group4.ipt_fromdiagcd.value;
}

function group2_group4_ipt_todiagcd_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		ds_hidden_targetdiag.setColumn(0, "diagcd", obj.value);
		ds_hidden_targetdiag.setColumn(0, "diagcdref", "ds_send");
		ds_hidden_targetdiag.setColumn(0, "diagnmref", "ds_send");
		
		fSearchDiageCode();
		
		ds_send.setColumn(0, "todiagcd", ds_rslt_sppiz00400.getColumn(0, "diagcd"));
	}
}

function group2_btn_excelsave_onclick(obj:Button,  e:ClickEventInfo)
{
	if (ds_main_calcorderlist.rowcount > 0) 
	{
		grdf_exportExcel(group2.grd_outjudg, "exportExcel", "see");
	}
	else 
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");		///엑셀저장할 내역이 없습니다.
	}
}

function group2_button8_onclick(obj:Button,  e:ClickEventInfo)
{
	var row =  ds_main_calcorderlist.rowposition;
	
	if(row > -1)
	{
		if(ds_main_calcorderlist.getColumn(row, "ioflag") == "I")
		{
			var preDocuWindow = frmf_getChildWindow("SMPID20300");
		} 
		else 
		{
			var preDocuWindow = frmf_getChildWindow("SMPID20500");
		}
		
		if(preDocuWindow == null)
		{	
			ds_send_send_afjudg.setColumn(0, "workflag", "12");
			ds_send_send_afjudg.setColumn(0, "clamym", ds_main_calcorderlist.getColumn(row, "clamym"));
			ds_send_send_afjudg.setColumn(0, "clamdg", ds_main_calcorderlist.getColumn(row, "clamdg"));
			ds_send_send_afjudg.setColumn(0, "pid", ds_main_calcorderlist.getColumn(row, "pid"));
			ds_send_send_afjudg.setColumn(0, "pidsn", ds_main_calcorderlist.getColumn(row, "pidsn"));
			ds_send_send_afjudg.setColumn(0, "ioflag", ds_main_calcorderlist.getColumn(row, "ioflag"));
			
			if(ds_main_calcorderlist.getColumn(row, "ioflag") == "I")
			{
				frmf_open("SMPID20300", "SMPID20300", {objDs:ds_send_send_afjudg}, "", "", "", "", "", "", "", "", "", "M");
			}
			else
			{
				frmf_open("SMPID20500", "SMPID20500", {objDs:ds_send_send_afjudg}, "", "", "", "", "", "", "", "", "", "M");
			}
		}
		else 
		{
			if(ds_main_calcorderlist.getColumn(row, "ioflag") == "I")
			{
				ds_hidden_smpid20300.setColumn(0, "workflag", "12");
				ds_hidden_smpid20300.setColumn(0, "clamym", ds_main_calcorderlist.getColumn(row, "clamym"));
				ds_hidden_smpid20300.setColumn(0, "clamdg", ds_main_calcorderlist.getColumn(row, "clamdg"));
				ds_hidden_smpid20300.setColumn(0, "pid", ds_main_calcorderlist.getColumn(row, "pid"));
				ds_hidden_smpid20300.setColumn(0, "pidsn", ds_main_calcorderlist.getColumn(row, "pidsn"));
				ds_hidden_smpid20300.setColumn(0, "ioflag", ds_main_calcorderlist.getColumn(row, "ioflag"));
				
				preDocuWindow.lf_fActivatePreDocuWindow();
				frmf_setFocusPop("SMPID20300");
			}
			else 
			{
				ds_hidden_smpid20500.setColumn(0, "workflag", "12");
				ds_hidden_smpid20500.setColumn(0, "clamym", ds_main_calcorderlist.getColumn(row, "clamym"));
				ds_hidden_smpid20500.setColumn(0, "clamdg", ds_main_calcorderlist.getColumn(row, "clamdg"));
				ds_hidden_smpid20500.setColumn(0, "pid", ds_main_calcorderlist.getColumn(row, "pid"));
				ds_hidden_smpid20500.setColumn(0, "pidsn", ds_main_calcorderlist.getColumn(row, "pidsn"));
				ds_hidden_smpid20500.setColumn(0, "ioflag", ds_main_calcorderlist.getColumn(row, "ioflag"));
				preDocuWindow.lf_fActivatePreDocuWindow();
				frmf_setFocusPop("SMPID20500");
			}
		}
	}
}

function group2_cmb_clamdgto_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	ds_send.setColumn(0, "clamdgfrom", ds_send.getColumn(0, "clamdgto"));
}

function group3_combo1_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fGetOrdDept();
	fGetClamDept();
}

function group3_input3_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		ds_hidden_targetdiag.setColumn(0, "diagcd", obj.value);
		ds_hidden_targetdiag.setColumn(0, "diagcdref", "ds_send");
		ds_hidden_targetdiag.setColumn(0, "diagnmref", "ds_send");
		
		fSearchDiageCode();
		
		ds_send_diag.setColumn(0, "fromdiagcd", ds_rslt_sppiz00400.getColumn(0, "diagcd"));
	}
}

function group3_input3_ontextchanged(obj:Edit,  e:TextChangedEventInfo)
{
	group2.group4.ipt_todiagcd.value = group2.group4.ipt_fromdiagcd.value;
}

function group3_input4_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		ds_hidden_targetdiag.setColumn(0, "diagcd", obj.value);
		ds_hidden_targetdiag.setColumn(0, "diagcdref", "ds_send");
		ds_hidden_targetdiag.setColumn(0, "diagnmref", "ds_send");
		
		fSearchDiageCode();
		
		ds_send_diag.setColumn(0, "todiagcd", ds_rslt_sppiz00400.getColumn(0, "diagcd"));
	}
}

function group3_input4_ontextchanged(obj:Edit,  e:TextChangedEventInfo)
{
	group2.group4.ipt_todiagcd.value = group2.group4.ipt_fromdiagcd.value;
}

function group3_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	if ( fChangeRow() != false )
	{
		if ( sysf_messageBox(group3.input3.value + " 불완전상병을 " + group3.input4.value +" 으로","Q002")==6 ) 
		{
				var oParam = {};
					oParam.id          = "TRPIS00600";
					oParam.service     = "aftjudgstatapp.DiagClam";
					oParam.method      = "reqExeNotEndDiagList";
					oParam.inds        = "req=ds_send_diag";
					oParam.outds       = "ds_main_calcorderlist=clamcutlist";
					oParam.async       = false;
					//oParam.callback    = "cf_TRPIS00600";

				tranf_submit(oParam);
		}
	}
}
]]></Script>
  </Form>
</FDL>