YNU_JEUS/app_home/himed/xpapps/pam/aftjudgstatxp/xp/SMPIS00600_청구삭감조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPIS00600" position="absolute 0 0 1211 784" titletext="청구삭감 환자조회" onload="SMPIS00600_onload">
    <Layouts>
      <Layout>
        <Static id="caption1" text="청구/삭감 환자조회" class="tit_1" position="absolute 0 3 240 23" positiontype="position"/>
        <Div id="group4" taborder="1" style="align:center top;" class="div_SA" position="absolute 0 25 1211 142" anchor="left top right" align="align:center top;" positiontype="position">
          <Layouts>
            <Layout>
              <cp_patientInfo id="cp_patientInfo00" titletext="New Form" taborder="34" text="cp_patientInfo00" position="absolute 666 85 1038 111" style="background:transparent; " anchor="default" onclick="group4_cp_patientInfo00_onclick"/>
              <cp_monthCal id="cp_monthCal02" titletext="monthCalendar" taborder="33" text="cp_monthCal02" scrollbars="none" position="absolute 241 10 316 30" class="input_essential" anchor="default" onclick="group4_cp_monthCal02_onclick"/>
              <Static id="caption5" text="청구년월" class="search_name" position="absolute 8 10 82 30" anchor="default" positiontype="position"/>
              <Combo id="cmb_clamdgfrom" taborder="5" class="combo_search" position="absolute 175 10 225 30" anchor="default" innerdataset="@DS_INIT_clamdgfrom" codecolumn="clamdgcd" datacolumn="clamdgnm" onitemchanged="cmb_clamdgfrom_onitemchanged" positiontype="position"/>
              <Static id="caption6" text="진료과" class="search_name" position="absolute 666 34 727 54" anchor="default" positiontype="position"/>
              <Combo id="combo2" taborder="6" class="combo_search" position="absolute 752 35 882 55" anchor="default" innerdataset="@DS_INIT_combo2" codecolumn="cd" datacolumn="nm" onitemchanged="combo2_onitemchanged" positiontype="position"/>
              <Shape id="line2" linetype="vertical" class="line_4" position="absolute 1114 5 1114 109" anchor="default" positiontype="position"/>
              <Button id="button1" taborder="7" text="조회" class="btn1" position="absolute 1145 10 1201 30" anchor="top right" onclick="button1_onclick" positiontype="position"/>
              <Static id="caption7" text="진료의" class="search_name" position="absolute 905 35 966 55" anchor="default" positiontype="position"/>
              <Static id="caption9" text="내원유형" class="search_name" position="absolute 441 35 515 55" anchor="default" positiontype="position"/>
              <Combo id="rdo_ioflag" taborder="8" class="combo_search" position="absolute 529 36 643 56" anchor="default" codecolumn="value" datacolumn="label" innerdataset="@DS_INIT_ioflag" onitemchanged="rdo_ioflag_onitemchanged" positiontype="position"/>
              <Edit id="ipt_code" taborder="9" class="input_search" position="absolute 979 60 1070 80" anchor="default" maxlength="10" positiontype="position" onkeydown="group4_ipt_code_onkeydown"/>
              <Combo id="cmb_orddrid" taborder="11" class="combo_search" position="absolute 979 35 1093 55" anchor="default" innerdataset="@DS_INIT_cmb_orddrid" codecolumn="cd" datacolumn="nm" positiontype="position"/>
              <Static id="caption11" text="청구구분" class="search_name" position="absolute 441 10 515 30" anchor="default" positiontype="position"/>
              <Combo id="cmb_clamflag" taborder="12" class="combo_search" position="absolute 529 10 643 30" anchor="default" innerdataset="@DS_INIT_cmb_clamflag" codecolumn="cdid" datacolumn="cdnm" positiontype="position"/>
              <Static id="caption13" text="보험유형" class="search_name" position="absolute 666 10 740 30" anchor="default" positiontype="position"/>
              <Edit id="opt_insukind" taborder="14" readonly="true" class="output_search" position="absolute 752 10 772 30" anchor="default" positiontype="position"/>
              <Combo id="cmb_insukind" taborder="15" class="combo_search" position="absolute 752 10 882 30" anchor="default" innerdataset="@DS_INIT_cmb_insukind" codecolumn="cdid" datacolumn="cdnm" onitemchanged="group4_cmb_insukind_onitemchanged" positiontype="position"/>
              <Combo id="cmb_clamdgto" taborder="17" class="combo_search" position="absolute 319 10 369 30" anchor="default" innerdataset="@DS_INIT_clamdgto" codecolumn="clamdgcd" datacolumn="clamdgnm" onitemchanged="cmb_clamdgto_onitemchanged" positiontype="position"/>
              <Static id="cp_code" text="수가코드" class="search_name" position="absolute 905 60 979 80" anchor="default" positiontype="position"/>
              <Static id="caption8" text="삭감처방만" class="search_name" position="absolute 441 85 528 105" anchor="default" positiontype="position"/>
              <CheckBox id="bool1" taborder="18" position="absolute 529 85 551 105" anchor="default" onclick="group4_bool1_onclick" positiontype="position"/>
              <Radio id="rdo_searchcond" taborder="19" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 97 85 282 105" anchor="default" onitemchanged="rdo_searchcond_onitemchanged" positiontype="position">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn" size="256"/>
                    <Column id="datacolumn" size="256"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">calc</Col>
                      <Col id="datacolumn">코드별</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">cancer</Col>
                      <Col id="datacolumn">항암제</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">kind</Col>
                      <Col id="datacolumn">분류별</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Static id="caption14" text="검색조건" class="search_name" position="absolute 8 86 82 106" anchor="default" positiontype="position"/>
              <Radio id="rdo_cancer" taborder="20" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 281 85 421 105" anchor="default" enable="false" visible="true" positiontype="position">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn" size="256"/>
                    <Column id="datacolumn" size="256"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">A</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">1군</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">2군</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Edit id="ipt_edicd" taborder="21" class="input_search" position="absolute 979 83 1070 103" anchor="default" maxlength="10" positiontype="position" onkeydown="group4_ipt_edicd_onkeydown"/>
              <Static id="cp_edicd" text="EDI코드" class="search_name" position="absolute 905 85 992 105" anchor="default" positiontype="position"/>
              <Combo id="cmb_middle" taborder="22" position="absolute 296 60 410 80" anchor="default" enable="false" visible="true" innerdataset="DS_INIT_cmb_middle" codecolumn="earncls2" datacolumn="earncls2nm" onitemchanged="cmb_middle_onitemchanged" positiontype="position"/>
              <Static id="cp_middle" text="중분류" class="search_name" position="absolute 234 60 295 80" anchor="default" positiontype="position"/>
              <Combo id="cmb_small" taborder="23" position="absolute 529 60 643 80" anchor="default" enable="false" visible="true" innerdataset="DS_INIT_cmb_small" codecolumn="earncls3" datacolumn="earncls3nm" positiontype="position"/>
              <Static id="cp_small" text="소분류" class="search_name" position="absolute 441 60 502 80" anchor="default" positiontype="position"/>
              <Combo id="cmb_large" taborder="24" position="absolute 97 60 211 80" anchor="default" enable="false" visible="true" innerdataset="DS_INIT_cmb_large" codecolumn="earncls1" datacolumn="earncls1nm" onitemchanged="cmb_large_onitemchanged" positiontype="position"/>
              <Static id="cp_large" text="처방대분류" class="search_name" position="absolute 9 60 96 80" anchor="default" positiontype="position"/>
              <Static id="caption15" text="심사자" class="search_name" position="absolute 905 10 966 27" anchor="default" positiontype="position"/>
              <Static id="caption4" text="위탁기관명" class="search_name" position="absolute 666 61 753 81" anchor="default" positiontype="position"/>
              <Combo id="combo3" taborder="25" position="absolute 752 60 882 80" anchor="default" innerdataset="@DS_INIT_combo3" codecolumn="trustinstcd" datacolumn="trustinstnm" positiontype="position"/>
              <Combo id="combo1" taborder="26" position="absolute 979 10 1093 30" anchor="default" innerdataset="@DS_INIT_combo1" codecolumn="cdid" datacolumn="cdnm" positiontype="position"/>
              <Radio id="rdo_year" taborder="27" columncount="4" rowcount="0" codecolumn="value" datacolumn="label" position="absolute 97 35 341 55" anchor="default" innerdataset="@DS_INIT_year" onitemchanged="rdo_year_onitemchanged" positiontype="position"/>
              <Button id="button00" taborder="29" class="icon_search" position="absolute 1073 60 1093 80" onclick="button00_onclick" anchor="default"/>
              <Button id="button02" taborder="30" class="icon_search" position="absolute 1073 83 1093 103" onclick="button02_onclick" anchor="default"/>
              <Static id="caption2" text="~" position="absolute 226 10 241 30" style="align:center middle;" anchor="default" positiontype="position"/>
              <cp_monthCal id="cp_monthCal01" titletext="monthCalendar" taborder="32" text="cp_monthCal00" scrollbars="none" position="absolute 97 10 172 30" class="input_essential" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption12" text="환자 리스트" class="tit_2" position="absolute 0 152 100 172" positiontype="position"/>
        <Button id="button2" taborder="2" text="엑셀저장" class="btn7" position="absolute 1131 149 1211 169" anchor="top right" positiontype="position" onclick="button2_onclick"/>
        <Grid id="grd_outjudg" class="datagrid2" taborder="3" useinputpanel="false" position="absolute 0 172 1211 784" anchor="all" autofittype="none" binddataset="DS_GRID_grd_outjudg" positiontype="position" cellsizingtype="both">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="21"/>
                <Column size="76"/>
                <Column size="59"/>
                <Column size="37"/>
                <Column size="67"/>
                <Column size="40"/>
                <Column size="45"/>
                <Column size="20"/>
                <Column size="23"/>
                <Column size="100"/>
                <Column size="54"/>
                <Column size="66"/>
                <Column size="66"/>
                <Column size="75"/>
                <Column size="48"/>
                <Column size="47"/>
                <Column size="86"/>
                <Column size="86"/>
                <Column size="205"/>
                <Column size="78"/>
                <Column size="54"/>
                <Column size="46"/>
                <Column size="37"/>
                <Column size="56"/>
                <Column size="83"/>
                <Column size="75"/>
                <Column size="75"/>
                <Column size="83"/>
                <Column size="60"/>
                <Column size="36"/>
                <Column size="70"/>
                <Column size="62"/>
                <Column size="67"/>
                <Column size="85"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="31"/>
                <Column size="24"/>
                <Column size="55"/>
              </Columns>
              <Rows>
                <Row size="35" band="head"/>
                <Row size="20"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="등록번호"/>
                <Cell col="2" text="성명"/>
                <Cell col="3" text="내원&#10;유형"/>
                <Cell col="4" text="청구월"/>
                <Cell col="5" text="구분"/>
                <Cell col="6" text="차수"/>
                <Cell col="7" text="유&#10;형"/>
                <Cell col="8" text="보&#10;조"/>
                <Cell col="9" text="청구과"/>
                <Cell col="10" text="진료과"/>
                <Cell col="11" text="진료의"/>
                <Cell col="12" text="주상병"/>
                <Cell col="13" text="접수번호"/>
                <Cell col="14" text="명일련"/>
                <Cell col="15" text="줄번호"/>
                <Cell col="16" text="처방코드"/>
                <Cell col="17" text="EDI코드"/>
                <Cell col="18" text="한글명"/>
                <Cell col="19" text="단가"/>
                <Cell col="20" text="수량"/>
                <Cell col="21" text="횟수"/>
                <Cell col="22" text="일수"/>
                <Cell col="23" text="총투여량"/>
                <Cell col="24" text="금액"/>
                <Cell col="25" text="입원일자"/>
                <Cell col="26" text="유형시작일"/>
                <Cell col="27" text="종료일"/>
                <Cell col="28" text="처방의"/>
                <Cell col="29" text="심사&#10;결정"/>
                <Cell col="30" text="삭감투여량"/>
                <Cell col="31" text="삭감횟수"/>
                <Cell col="32" text="삭감일수"/>
                <Cell col="33" text="총투삭감량"/>
                <Cell col="34" text="조정금액"/>
                <Cell col="35" text="이의신청금액"/>
                <Cell col="36" text="실삭감금액"/>
                <Cell col="37" text="원외"/>
                <Cell col="38" text="급&#10;비"/>
                <Cell col="39" text="심사자"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="bind:pid" expr="expr:currow+1"/>
                <Cell col="1" style="align:center middle;" text="bind:pid"/>
                <Cell col="2" displaytype="normal" edittype="normal" style="align:center middle;" text="bind:hngnm"/>
                <Cell col="3" displaytype="combo" edittype="normal" style="align:center middle;" text="bind:ioflag" combodataset="DS_INIT_ioflag" combocodecol="value" combodatacol="label"/>
                <Cell col="4" displaytype="date" edittype="none" style="align:center middle;" text="bind:clamym" mask="yyyy-MM"/>
                <Cell col="5" displaytype="combo" edittype="normal" style="align:center middle;" text="bind:clamflagcd" combodataset="DS_INIT_cmb_clamflag" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="6" style="align:center middle;" text="bind:clamdg"/>
                <Cell col="7" text="bind:insukind"/>
                <Cell col="8" text="bind:suppkind"/>
                <Cell col="9" displaytype="normal" text="bind:clamdeptcd"/>
                <Cell col="10" text="bind:orddeptcd"/>
                <Cell col="11" style="align:center middle;" text="bind:orddrnm"/>
                <Cell col="12" text="bind:diagcd"/>
                <Cell col="13" style="align:center middle;" text="bind:acptno"/>
                <Cell col="14" style="align:center middle;" text="bind:docuseqno"/>
                <Cell col="15" style="align:center middle;" text="bind:edilnno"/>
                <Cell col="16" text="bind:snglcalcscorcd"/>
                <Cell col="17" text="bind:edicd"/>
                <Cell col="18" text="bind:calchngnm"/>
                <Cell col="19" displaytype="number" style="align:right middle;padding:0 5 0 0;" text="bind:unitcost"/>
                <Cell col="20" displaytype="number" style="align:right middle;padding:0 5 0 0;" text="bind:drugqty"/>
                <Cell col="21" displaytype="number" style="align:right middle;padding:0 5 0 0;" text="bind:tims"/>
                <Cell col="22" displaytype="number" style="align:right middle;padding:0 5 0 0;" text="bind:dayno"/>
                <Cell col="23" displaytype="number" style="align:right middle;padding:0 5 0 0;" text="bind:totdrugqty"/>
                <Cell col="24" displaytype="number" style="align:right middle;padding:0 5 0 0;" text="bind:amt"/>
                <Cell col="25" displaytype="date" style="align:center middle;" text="bind:indd" calendardisplaynulltype="nullmask"/>
                <Cell col="26" displaytype="date" edittype="none" style="align:center middle;" text="bind:cretfromdd" calendardisplay="edit" calendardisplaynulltext=" " calendardisplaynulltype="none"/>
                <Cell col="27" displaytype="date" edittype="none" style="align:center middle;" text="bind:crettodd" calendardisplaynulltext=" " calendardisplaynulltype="none"/>
                <Cell col="28" style="align:center middle;" text="bind:clamdrid"/>
                <Cell col="29" style="align:center middle;" text="bind:judgyn"/>
                <Cell col="30" displaytype="number" style="align:right middle;padding:0 5 0 0;" text="bind:cutdrugqty"/>
                <Cell col="31" displaytype="number" style="align:right middle;padding:0 5 0 0;" text="bind:cuttims"/>
                <Cell col="32" style="align:right middle;padding:0 5 0 0;" text="bind:cutdayno"/>
                <Cell col="33" displaytype="number" style="align:right middle;padding:0 5 0 0;" text="bind:totcutqty"/>
                <Cell col="34" displaytype="number" style="align:right middle;padding:0 5 0 0;" text="bind:adjtamt"/>
                <Cell col="35" displaytype="number" style="align:right middle;padding:0 5 0 0;" text="bind:obtappamt"/>
                <Cell col="36" displaytype="number" style="align:right middle;padding:0 5 0 0;" text="bind:orgreduamt"/>
                <Cell col="37" displaytype="normal" edittype="none" text="bind:oprcp"/>
                <Cell col="38" displaytype="combo" edittype="normal" style="align:center;" text="bind:payflag" combodataset="ds_init_payflag" combocodecol="value" combodatacol="label"/>
                <Cell col="39" text="bind:judgrnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <FileDialog id="fld_input" filter="Worksheet Files (*.xls;*.xlsx)|*.xls;*.xlsx" filterindex="0" defaultextension="false"/>
      <Dataset id="DS_GRID_grd_outjudg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="ioflag" type="STRING"/>
          <Column id="clamym" type="STRING"/>
          <Column id="clamflagcd" type="STRING"/>
          <Column id="clamdg" type="STRING"/>
          <Column id="insukind" type="STRING"/>
          <Column id="suppkind" type="STRING"/>
          <Column id="clamdeptcd" type="STRING"/>
          <Column id="orddeptcd" type="STRING"/>
          <Column id="orddrnm" type="STRING"/>
          <Column id="diagcd" type="STRING"/>
          <Column id="acptno" type="STRING"/>
          <Column id="docuseqno" type="STRING"/>
          <Column id="edilnno" type="STRING"/>
          <Column id="snglcalcscorcd" type="STRING"/>
          <Column id="edicd" type="STRING"/>
          <Column id="calchngnm" type="STRING"/>
          <Column id="unitcost" type="STRING"/>
          <Column id="drugqty" type="STRING"/>
          <Column id="tims" type="STRING"/>
          <Column id="dayno" type="STRING"/>
          <Column id="totdrugqty" type="STRING"/>
          <Column id="amt" type="STRING"/>
          <Column id="indd" type="STRING"/>
          <Column id="cretfromdd" type="STRING"/>
          <Column id="crettodd" type="STRING"/>
          <Column id="clamdrid" type="STRING"/>
          <Column id="judgyn" type="STRING"/>
          <Column id="cutdrugqty" type="STRING"/>
          <Column id="cuttims" type="STRING"/>
          <Column id="cutdayno" type="STRING"/>
          <Column id="totcutqty" type="STRING"/>
          <Column id="adjtamt" type="STRING"/>
          <Column id="obtappamt" type="STRING"/>
          <Column id="orgreduamt" type="STRING"/>
          <Column id="oprcp" type="STRING"/>
          <Column id="payflag" type="STRING"/>
          <Column id="judgrnm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="DS_INIT_combo1" 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_INIT_cmb_large" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="step" type="STRING" size="256"/>
          <Column id="earncls1" type="STRING" size="256"/>
          <Column id="earncls2" type="STRING" size="256"/>
          <Column id="earncls3" type="STRING" size="256"/>
          <Column id="earncls1nm" type="STRING" size="256"/>
          <Column id="earncls2nm" type="STRING" size="256"/>
          <Column id="earncls3nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="DS_INIT_cmb_middle" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="step" type="STRING" size="256"/>
          <Column id="earncls1" type="STRING" size="256"/>
          <Column id="earncls2" type="STRING" size="256"/>
          <Column id="earncls3" type="STRING" size="256"/>
          <Column id="earncls1nm" type="STRING" size="256"/>
          <Column id="earncls2nm" type="STRING" size="256"/>
          <Column id="earncls3nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="DS_INIT_cmb_small" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="step" type="STRING" size="256"/>
          <Column id="earncls1" type="STRING" size="256"/>
          <Column id="earncls2" type="STRING" size="256"/>
          <Column id="earncls3" type="STRING" size="256"/>
          <Column id="earncls1nm" type="STRING" size="256"/>
          <Column id="earncls2nm" type="STRING" size="256"/>
          <Column id="earncls3nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="DS_INIT_combo3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="trustinstcd" type="STRING" size="256"/>
          <Column id="trustinstnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="DS_INIT_cmb_insukind" 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_INIT_cmb_clamflag" 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_INIT_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_year" 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">6개월</Col>
            <Col id="value">sixm</Col>
          </Row>
          <Row>
            <Col id="label">1년</Col>
            <Col id="value">oney</Col>
          </Row>
          <Row>
            <Col id="label">2년</Col>
            <Col id="value">twoy</Col>
          </Row>
          <Row>
            <Col id="label">3년</Col>
            <Col id="value">threey</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="DS_INIT_clamdgfrom" 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>
      </Dataset>
      <Dataset id="DS_INIT_clamdgto" 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>
      </Dataset>
      <Dataset id="DS_INIT_cmb_clamdept" 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_cmb_orddrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="dp" type="STRING" size="256"/>
          <Column id="sp" type="STRING" size="256"/>
          <Column id="reqdp" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <ExportObject id="ExtObj" exporttype="0" exporteventtype="itemrecord"/>
      <Dataset id="ds_init_payflag" 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">0</Col>
          </Row>
          <Row>
            <Col id="label">100</Col>
            <Col id="value">1</Col>
          </Row>
          <Row>
            <Col id="label">일</Col>
            <Col id="value">2</Col>
          </Row>
          <Row>
            <Col id="label">선</Col>
            <Col id="value">8</Col>
          </Row>
          <Row>
            <Col id="label">선</Col>
            <Col id="value">9</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="DS_INIT_combo2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="deptengabbr" type="STRING" size="256"/>
          <Column id="reqfild" type="STRING" size="256"/>
          <Column id="reqdeptno" type="STRING" size="256"/>
          <Column id="orddeptflag" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cond_smpic00200" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="con1_dd" type="STRING" size="256"/>
          <Column id="con2_gsflag" type="STRING" size="256"/>
          <Column id="con3_search1" type="STRING" size="256"/>
          <Column id="con4_search2" type="STRING" size="256"/>
          <Column id="con5_insu" type="STRING" size="256"/>
          <Column id="con6_calcscorcd" type="STRING" size="256"/>
          <Column id="con7_todd" type="STRING" size="256"/>
          <Column id="con8_instcd" type="STRING" size="256"/>
          <Column id="con9_lastupdtdt" type="STRING" size="256"/>
          <Column id="con10_preord_chk" type="STRING" size="256"/>
          <Column id="con_ordinptflag" type="STRING" size="256"/>
          <Column id="con11_edicd" type="STRING" size="256"/>
          <Column id="con12_drugelectric" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <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 "com_basiccodexp::ZBC001.xjs";

// 위탁기관명 flag 값
var vtrustinstcd = "A";
var trustinstcd  = "";

// 화면 초기화
function fInitialize(){	
	// 그리드 초기화	
	DS_GRID_grd_outjudg.clearData();
	
	// 심사자 콤보리스트
	var sInDsName = dsf_createDsRow("ds_cond", [{col: "instcd", val: ""}]);
	var oParam = {};
		oParam.id          = "TRPIB00603";
		oParam.service     = "insubasecdmngtapp.JudgCmt";
		oParam.method      = "reqGetJudgRidList";
		oParam.inds        = "req="+sInDsName;
		oParam.outds       = "DS_INIT_combo1=U0001";
		oParam.async       = false;

	tranf_submit(oParam);
	group4.combo1.index = 0;

	// 수가 수익분류 리스트 세팅
	var sInDsName = dsf_createDsRow("ds_cond", [{col: "group", val: ""}]);	
	var oParam = {};
		oParam.id          = "TRPIS00510";
		oParam.service     = "aftjudgstatapp.CalcOrderList";
		oParam.method      = "reqGetEarnclsList";
		oParam.inds        = "req="+sInDsName;
		oParam.outds       = "DS_INIT_cmb_large=earnclslist";
		oParam.async       = false;

	tranf_submit(oParam);
	
	dsf_copyDs(DS_INIT_cmb_middle, DS_INIT_cmb_large);
	dsf_copyDs(DS_INIT_cmb_small , DS_INIT_cmb_large);	

	DS_INIT_cmb_large.filterstr  = "step == 'L'";
	DS_INIT_cmb_middle.filterstr = "step == 'M'";
	DS_INIT_cmb_small.filterstr  = "step == 'S'";
	
	// 위탁기관명 리스트	
	var oParam = {};
		oParam.id          = "TRPIS00601";
		oParam.service     = "aftjudgstatapp.CalcOrderList";
		oParam.method      = "reqGetTrusTinstcdList";
		oParam.outds       = "DS_INIT_combo3=trust";
		oParam.async       = false;

	tranf_submit(oParam);
	
	// 검색조건 : 코드별
	group4.rdo_searchcond.value = "calc";
	
	// 보험유형, 청구구분 리스트
	appf_getCodeListSubmit([{cdGrpId: "P0008", dsNm: "DS_INIT_cmb_insukind", sortField: "cdnm", sortMehotd: "desc"}
                           ,{cdGrpId: "P0155", dsNm: "DS_INIT_cmb_clamflag", sortField: "cdnm", sortMehotd: "desc"}], false, false, "");	
    
	// 진료과,진료의 콤보 리스트	
	fGetOrdDept();	
	
	// 청구과 콤보 리스트	
	fGetClamDept();		
	
	// combo 전체 세팅: 청구구분
	frmf_addComboItem("group4.cmb_clamflag", "전체", "-");
	group4.cmb_clamflag.index = 0;
	
	// 위탁기관
	group4.combo3.index = 0;
	
	// 보험유형
	frmf_addComboItem("group4.cmb_insukind", "전체", "-");
	group4.cmb_insukind.index = 0;
	
	// 심사자
	group4.combo1.index = 0;	
	
	// 진료의	
	var nRow = DS_INIT_cmb_orddrid.findRow("cd", "-");	
	group4.cmb_orddrid.index = nRow;		
	
	// 대분류
	frmf_addComboItem("group4.cmb_large", "전체", "-");
	group4.cmb_large.index = 0;
	
	// 중분류
	frmf_addComboItem("group4.cmb_middle", "전체", "-");
	group4.cmb_middle.index = 0;
	
	// 소분류
	frmf_addComboItem("group4.cmb_small", "전체", "-");
	group4.cmb_small.index = 0;
	
	// 내원유형
	group4.rdo_ioflag.index = 0;
                          
	if (frmf_checkOpener()){
		try {	// 데이터 셋으로 받는다
			if (args_ds_send.rowcount > 0) {
				ds_send.copyData(args_ds_send);
				var flag      = ds_send.getColumn(0, "openflag");
				var orddeptcd = ds_send.getColumn(0, "orddeptcd");
				var pid       = ds_send.getColumn(0, "patunitsrch");				
				var clamflag  = ds_send.getColumn(0, "clamflag");	
				var insukind  = ds_send.getColumn(0, "insukind");	
				var ioflag    = ds_send.getColumn(0, "ioflag");	
				var codecond  = ds_send.getColumn(0, "codecond");	
				var code      = ds_send.getColumn(0, "code");	
				var orddrid   = ds_send.getColumn(0, "orddrid");	
				var orddeptcd = ds_send.getColumn(0, "orddeptcd");	
			}
		} catch(e) {

		}	
		var curDate   = new Date();
		var currentym = curDate.toFormatString("%Y%m");
		
		//외래사후심사대상자조회에서 팝업호출할 경우
		if( flag == "O" ){			
			var fromDate = curDate.addMonth(-6);
			    fromDate = curDate.toFormatString("%Y%m");	
			// 내원유형:전체
			group4.rdo_ioflag.value               = "A"; 			
			group4.cp_monthCal01.cal_Month.value  = fromDate;
			group4.cp_monthCal02.cal_Month.value  = currentym;
			group4.rdo_year.value                 = "sixm";			
			group4.cp_patientInfo00.edt_pid.value = pid;
			group4.ipt_code.value                 = code;
			group4.bool1.value                    = "true";
			
			pidfGetClamdgfrom();
			pidfGetClamdgto();	
			// 조회
			fSearch();
								
		} else {

			var fromDate = curDate.addMonth(-12);
			fromDate = curDate.toFormatString("%Y%m");				
			
			// 청구구분
			group4.cmb_clamflag.value = clamflag;
			
			// 보험유형
			group4.cmb_insukind.value = insukind;
			group4.opt_insukind.value = insukind;
			
			// 내원유형
			group4.rdo_ioflag.value   = "A";
			
			// 환자번호
			group4.cp_patientInfo00.edt_pid.value = pid;

			// 검색조건
			group4.rdo_searchcond.value = codecond;
			
			vtrustinstcd = "N";		
			group4.cp_monthCal01.cal_Month.value = fromDate;
			group4.cp_monthCal02.cal_Month.value = currentym;
			group4.ipt_code.value                 = code;
			group4.cmb_orddrid.value = orddrid;
			group4.combo2.value = orddeptcd;
			
			group4.rdo_year.value                = "oney";			
		    group4.bool1.value                   = "true";						
			
			pidfGetClamdgfrom();
			pidfGetClamdgto();				
			fSearch();	
		}
	} else {
	
		group4.rdo_ioflag.value = "A"; 
		vtrustinstcd            = "N";		
		// 청구년월, 차수 셋팅 시작
		var objDate = new Date();
		var Month   = objDate.toFormatString("%Y%m");
		
		group4.cp_monthCal01.cal_Month.value = Month;
		group4.cp_monthCal02.cal_Month.value = Month;
		group4.rdo_year.value = "oney";			
		group4.bool1.value    = "true";
		
		pidfGetClamdgfrom();
		pidfGetClamdgto();
		
		// IOFLAG를 파라메터로 받아야 하므로 IOFLAG가 정해진 후 호출 한다						
	}			
}		

// 청구년월 함수
function pidfGetClamdgfrom() 
{							
	if ( group4.cp_monthCal01.cal_Month.value > group4.cp_monthCal02.cal_Month.value ){
		sysf_messageBox("종료일은 시작일보다 클 수 ", "I004");
		group4.cp_monthCal02.cal_Month.value = "";	
	} else {		
		
		var Month  = group4.cp_monthCal01.cal_Month.value;
		var clamym = Month.toFormatString("%Y%m");
		
		var sInDsName = dsf_createDsRow("ds_cond"
					 ,[{col: "clamym", val: clamym}
					 , {col: "ioflag", val: group4.rdo_ioflag.value}]);
		var oParam = {};
			oParam.id          = "TRPID20407";
			oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
			oParam.method      = "reqGetClamdg";
			oParam.inds        = "req="+sInDsName;
			oParam.outds       = "DS_INIT_clamdgfrom=clamdg";
			oParam.async       = false;

		tranf_submit(oParam);
		
		DS_INIT_clamdgto.copyData(DS_INIT_clamdgfrom);

		frmf_addComboItem("group4.cmb_clamdgfrom", "전체", "");
		frmf_addComboItem("group4.cmb_clamdgto"  , "전체", "");
		group4.cmb_clamdgfrom.index = 0;
		group4.cmb_clamdgto.index   = 0;
		
	}				
}

function pidfGetClamdgto() 
{							
	if ( group4.cp_monthCal01.cal_Month.value > group4.cp_monthCal02.cal_Month.value ){
		sysf_messageBox("종료일은 시작일보다 클 수 ", "I004");
		group4.cp_monthCal02.cal_Month.value = "";	
	} else {		
		
		var Month = group4.cp_monthCal02.cal_Month.value;
		var clamym = Month.toFormatString("%Y%m");
		
		var sInDsName = dsf_createDsRow("ds_cond"
					 ,[{col: "clamym", val: clamym}
					 , {col: "ioflag", val: group4.rdo_ioflag.value}]);
	
		var oParam = {};
			oParam.id          = "TRPID20407";
			oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
			oParam.method      = "reqGetClamdg";
			oParam.inds        = "req="+sInDsName;
			oParam.outds       = "DS_INIT_clamdgto=clamdg";
			oParam.async       = false;

		tranf_submit(oParam);
		
		frmf_addComboItem("group4.cmb_clamdgfrom", "전체", "");
		frmf_addComboItem("group4.cmb_clamdgto"  , "전체", "");
		group4.cmb_clamdgfrom.index = 0;
		group4.cmb_clamdgto.index = 0;
		
	}				
}

// 진료과 리스트 가져오기
function fGetOrdDept()
{
	var sInDsName = dsf_createDsRow("ds_cond", [{col: "ioflag", val: group4.rdo_ioflag.value}]);
	var oParam = {};
		oParam.id          = "TRPID20309";
		oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
		oParam.method      = "reqGetDeptCDDrID";
		oParam.inds        = "req="+sInDsName;
		oParam.outds       = "DS_INIT_combo2=orddeptcd DS_INIT_cmb_orddrid=orddrid";
		oParam.async       = false;

	tranf_submit(oParam);
					
	DS_INIT_combo2.addColumn("cdid_cdnm", "STRING");
	for(i = 0 ; i < DS_INIT_combo2.rowcount ; i++ ){
		DS_INIT_combo2.setColumn(i, "cdid_cdnm", "["+DS_INIT_combo2.getColumn(i, "cd")+"]   "+DS_INIT_combo2.getColumn(i, "nm"));
	}
	group4.combo2.datacolumn = "cdid_cdnm";	
	group4.combo2.value = "-";
}

// 청구과 함수
function fGetClamDept()
{
	var sInDsName = dsf_createDsRow("ds_cond", [{col: "ioflag", val: ""}]);
	var oParam = {};
		oParam.id          = "TRPID20201";
		oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
		oParam.method      = "reqGetInitComCd";
		oParam.inds        = "req="+sInDsName;
		oParam.outds       = "DS_INIT_cmb_clamdept=clamdept";
		oParam.async       = false;

	tranf_submit(oParam);
}

// 환자단위 조회
function fPatSrch()
{
	
	var ipt_pid = group4.cp_patientInfo00.edt_pid.value;
	
	if (ipt_pid) {
		if (!isNaN(ipt_pid))
		{
			frmf_setParameter("srchcond", "1");// 검색조건 : 등록번호로 설정
			frmf_setParameter("pid", ipt_pid);			
		}
		else
		{								
			frmf_setParameter("srchcond", "2");// 검색조건 : 등록번호로 설정
			frmf_setParameter("pid", ipt_pid);			
		}							
	} 
	
	// pam/commonweb/xrw/SPPMC02500_환자조회.xrw
	frmf_modal("SPPMC02500", "SPPMC02500");
	/*
	var srch_pid = model.getValue("/root/main/patinfo/patinfolist/pid");
	if (srch_pid) {		// SPPMC02500_환자조회 화면에서 조회한 경우임
		model.removeNodeset("/root/main/patinfo/patinfolist");	// patinfolist가 제거됨 (resetInstanceNode의 경우 값은 지우고 노드는 남아있음)
		model.makeNode("/root/main/patinfo/patinfolist");		// SPPMC02500_환자조회 팝업을 다시 조회할 경우를 위해 다시 노드를 추가함
		model.setValue("/root/send/patunitsrch", srch_pid);
	}
	model.refresh();
	*/
}

// 수가코드 조회
function fGetSnglcalcscorcd() 
{	
	ds_cond_smpic00200.clearData();
	ds_cond_smpic00200.addRow();

	// 처방시작일을 수가조회 기준일자로 설정
	ds_cond_smpic00200.setColumn(0, "con1_dd", group4.cp_monthCal01.cal_Month.value);
	
	// 싱글수가코드
	ds_cond_smpic00200.setColumn(0, "con2_gsflag", "S");
	ds_cond_smpic00200.setColumn(0, "con3_search1", "calcscorcd");
	ds_cond_smpic00200.setColumn(0, "con4_search2", "");
	ds_cond_smpic00200.setColumn(0, "con5_insu", "insu");
	
	// SMPIC00200_수가코드조회
	frmf_setParameter("openflag"      , "calcscorcd");
	frmf_setParameter("calcscorcd_cd" , group4.ipt_code.value);
	frmf_setParameter("con1_dd"       , group4.cp_monthCal01.cal_Month.value);
	
 	var objRetVal = frmf_modal("SMPIC00200", "SMPIC00200", {oP_ds_temp:ds_cond_smpic00200}, "", "", "", "", "", "", "", "", "", "M");
	
	if( !utlf_isNull(objRetVal) ) 
	{
		group4.ipt_code.value = ds_temp_picmmech.getColumn(0, "picmmech_calcscorcd");
		
	}
	else {
		sysf_messageBox("수가조회 화면에서 선택한 결과가", "I004") ; //없습니다.
	}
}		

// 청구년월 차수 기간 체크
function fChkClamym()
{
	var fromym = group4.cp_monthCal01.cal_Month.value;
	var toym   = group4.cp_monthCal02.cal_Month.value;				
	
	if ( fromym != toym ){
		//group4.cmb_clamdgfrom.value = "";
		//group4.cmb_clamdgto.value = "";
		group4.cmb_clamdgfrom.enable = false;
		group4.cmb_clamdgto.enable   = false;
	
	} else {
		group4.cmb_clamdgfrom.enable = true;
		group4.cmb_clamdgto.enable   = true;
		group4.cmb_clamdgfrom.index  = 0;
		group4.cmb_clamdgto.index    = 0;
					
	}
	
	group4.cmb_clamdgfrom.updateToDataset();
	group4.cmb_clamdgto.updateToDataset();
}	

// 조회
function fSearch()
{
	var chk_clamymfrom  = group4.cp_monthCal01.cal_Month.value;
	var chk_clamymto    = group4.cp_monthCal02.cal_Month.value;
	var ipt_patunitsrch = group4.cp_patientInfo00.edt_pid.value;
	var ipt_code        = group4.ipt_code.value;	
	
	if ( utlf_isNull(chk_clamymfrom) || utlf_isNull(chk_clamymto))
	{
		sysf_messageBox("청구년월은 ", "I003");
		group4.cp_monthCal01.cal_Month.setFocus();
		return;
	}
	else if ( utlf_isNull(ipt_patunitsrch) && utlf_isNull(ipt_code))
	{
		if (utlf_isNull(group4.rdo_searchcond.value)) {
			group4.rdo_searchcond.value = "calc";	
		} 
		if( group4.rdo_searchcond.value == "calc")
		{
			if(vtrustinstcd == "N")
			{
				sysf_messageBox("수가코드는 ", "I003");
				group4.ipt_code.setFocus();
				return;
			}
		}
	}
				
	DS_GRID_grd_outjudg.clearData();
	
	var Monthfrom  = group4.cp_monthCal01.cal_Month.value;
	var clamymfrom = Monthfrom.toFormatString("%Y%m");
	var Monthto    = group4.cp_monthCal02.cal_Month.value;
	var clamymto   = Monthto.toFormatString("%Y%m");
	
	if ( vtrustinstcd == "N")
	{
		trustinstcd = "N";
	} else {
		trustinstcd = group4.combo3.value;
	}
	
	if (group4.cmb_insukind.value == "-" || utlf_isNull(group4.cmb_insukind.value)) {
		group4.cmb_insukind.value = "";
	}
	if (group4.cmb_clamflag.value == "-" || utlf_isNull(group4.cmb_clamflag.value)) {
		group4.cmb_clamflag.value = "";
	}
	
	var sInDsName = dsf_createDsRow("ds_cond"
								, [{col: "clamflag"     , val: group4.cmb_clamflag.value}          //청구구분
								,  {col: "clamymfrom"   , val: clamymfrom}                         //청구년월from
								,  {col: "clamymto"     , val: clamymto}                           //청구년월to
								,  {col: "clamdgfrom"   , val: group4.cmb_clamdgfrom.value}        //청구차수from
								,  {col: "clamdgto"     , val: group4.cmb_clamdgto.value}          //청구차수to
								,  {col: "insukind"     , val: group4.cmb_insukind.value}          //보험유형
								,  {col: "ioflag"       , val: group4.rdo_ioflag.value}            //내원유형
								//,  {col: "clamdeptid", val: group4.cmb_clamdept.value} //청구과
								,  {col: "orddeptcd"    , val: group4.combo2.value}                //진료과
								,  {col: "orddrid"      , val: group4.cmb_orddrid.value}           //진료의
								,  {col: "code"         , val: group4.ipt_code.value}              //코드값
								,  {col: "edicd"        , val: group4.ipt_edicd.value}             //EDI코드
								,  {col: "pid"          , val: group4.cp_patientInfo00.edt_pid.value} //환자번호
								,  {col: "judgrid"      , val: String(group4.combo1.value).trim()}                //심사자
								,  {col: "codecond"     , val: group4.rdo_searchcond.value}        //검색조건
								,  {col: "cancer"       , val: group4.rdo_cancer.value}            //항암제
								,  {col: "large"        , val: group4.cmb_large.value}             //대분류
								,  {col: "middle"       , val: group4.cmb_middle.value}            //중분류
								,  {col: "small"        , val: group4.cmb_small.value}             //소분류
								,  {col: "cutonly"      , val: group4.bool1.value}                 //삭감처방만
								,  {col: "trustinstcd"  , val: trustinstcd}                        //위탁기관코드
								]);
	var oParam = {};
		oParam.id          = "TRPIS00600";
		oParam.service     = "aftjudgstatapp.CalcOrderList";
		oParam.method      = "reqGetClamCutList";
		oParam.inds        = "req=ds_cond";
		oParam.outds       = "DS_GRID_grd_outjudg=clamcutlist";
		oParam.async       = false;

	tranf_submit(oParam);
}	

// EDI코드 조회
function fGetEdicd() 
{
	ds_cond_smpic00200.clearData();
	ds_cond_smpic00200.addRow();

	// 처방시작일을 수가조회 기준일자로 설정
	ds_cond_smpic00200.setColumn(0, "con1_dd", group4.cp_monthCal01.cal_Month.value);
	
	// 싱글수가코드
	ds_cond_smpic00200.setColumn(0, "con2_gsflag", "S");
	ds_cond_smpic00200.setColumn(0, "con3_search1", "edicd");
	ds_cond_smpic00200.setColumn(0, "con4_search2", "");
	ds_cond_smpic00200.setColumn(0, "con5_insu", "insu");
	
	// SMPIC00200_수가코드조회
	frmf_setParameter("openflag"      , "edicd");
	frmf_setParameter("calcscorcd_cd" , group4.ipt_edicd.value);
	frmf_setParameter("con1_dd"       , group4.cp_monthCal01.cal_Month.value);
	
 	var objRetVal = frmf_modal("SMPIC00200", "SMPIC00200", {oP_ds_temp:ds_cond_smpic00200}, "", "", "", "", "", "", "", "", "", "M");
	
	trace(ds_temp_picmmech.saveXML());

	if( !utlf_isNull(objRetVal) ) 
	{
		group4.ipt_edicd.value = ds_temp_picmmech.getColumn(0, "picmmech_calcscorcd");
		
	}
	else {
		sysf_messageBox("수가조회 화면에서 선택한 결과가", "I004") ; //없습니다.
	}
}

function fn_Cal()
{
	group4.cp_monthCal02.cal_Month.value = group4.cp_monthCal01.cal_Month.value;
	pidfGetClamdgfrom(); // 청구년월 함수
	fChkClamym();    // 청구년월 차수 기간 체크
}

function fn_Cal1()
{
	pidfGetClamdgto(); // 청구년월 함수
	fChkClamym();    // 청구년월 차수 기간 체크
}
			

//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
// 화면 loading
function SMPIS00600_onload(obj:Form, e:LoadEventInfo)
{	
	// 화면공통
	frmf_initForm(obj);  
	
	// 환자등록번호
	group4.cp_patientInfo00.lf_setDataSearchPatInfo("","0");
	group4.cp_patientInfo00.att_setControlWidth("98","0");
	group4.cp_patientInfo00.att_setVisible("3|4|",false);

	// 월달력 이벤트 호출
	group4.cp_monthCal01.setCallEvent("fn_Cal");
	group4.cp_monthCal02.setCallEvent("fn_Cal1");
	
	// 화면 초기화
	fInitialize();					
				
}
// 처방대분류 값 변할 때
function cmb_large_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var earncls1 = group4.cmb_large.value;
	DS_INIT_cmb_middle.filterstr = "earncls1 =='"+earncls1+"' && step =='M'";	
}

// 처방중분류 값 변할 때 
function cmb_middle_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var earncls1 = group4.cmb_large.value;
	var earncls2 = group4.cmb_middle.value;
	DS_INIT_cmb_small.filterstr = "earncls1 =='"+earncls1+"' && earncls2 =='"+earncls2+"' && step =='S'";	
}

// 환자단위 조회
function button61_onclick(obj:Button,  e:ClickEventInfo)
{
	fPatSrch();
}

// 조회버튼 onclick event
function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fSearch();
}

// 엑셀저장버튼 onclick event
function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	var vFile = fld_input.open("FileSave", FileDialog.SAVE, "%MYDOCUMENT%", "청구삭감환자리스트.xlsx");

    ExtObj.exporttype = ExportTypes.EXCEL;
    ExtObj.exportfilename = vFile.fullpath;
    ExtObj.exportactivemode = "noactive";
    ExtObj.exportsavemode = "save";
    ExtObj.addExportItem(ExportItemTypes.GRID, grd_outjudg, "Sheet1!A1" );
    ExtObj.export();	
}

// 수가코드조회버튼 onclick event
function button00_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetSnglcalcscorcd();
}

// EDI코드조회버튼 onclick event
function button02_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetEdicd();
}

// 청구차수콤보 onitemchanged
function cmb_clamdgfrom_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	group4.cmb_clamdgto.value = group4.cmb_clamdgfrom.value;
	//group4.cmb_clamdgfrom.updateToDataset();
}

function cmb_clamdgto_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	group4.cmb_clamdgfrom.value = group4.cmb_clamdgto.value;
	//group4.cmb_clamdgto.updateToDataset();
}

//진료과콤보 onitemchanged
function combo2_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var orddeptcd = group4.combo2.value;
	
	if ( orddeptcd )
	{
		DS_INIT_cmb_orddrid.filterstr = "dp =='"+orddeptcd+"'";		
		group4.cmb_orddrid.enable = true;
		frmf_addComboItem("group4.cmb_orddrid", "전체" , ""); 	
		group4.cmb_orddrid.value = "";
	} else {
		group4.cmb_orddrid.enable = false;
	}
	
// 	group4.cmb_orddrid.value = "";
// 	group4.cmb_orddrid.updateToDataset();
}

function rdo_ioflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fGetOrdDept();	// 진료과,진료의 콤보 리스트
	fGetClamDept(); // 청구과 콤보 리스트
}

function ipt_patunitsrch_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		if( group4.ipt_patunitsrch.getLength() > 1)
		{
			// setInputNodeCurText();	// (tfHelper.js) 현재 인풋값 노드 반영 추가 변환 필요
			if (isNaN(group4.ipt_patunitsrch.value))
			{
				fPatSrch();
			} else {
				fSearch();
			}
		}
	}	
}


function rdo_searchcond_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	group4.ipt_code.value = "";
	group4.rdo_cancer.value = "";
	
	var choice = group4.rdo_searchcond.value;
	
	if ( choice == "calc")
	{
		group4.cp_code.enable = true;
		group4.ipt_code.enable = true;
		group4.cp_edicd.enable = true;
		group4.ipt_edicd.enable = true;
		group4.rdo_cancer.enable = false;
		group4.cp_large.enable = false;
		group4.cp_middle.enable = false;
		group4.cp_small.enable = false;
		group4.cmb_large.enable = false;
		group4.cmb_middle.enable = false;
		group4.cmb_small.enable = false;
	
	} else if ( choice == "cancer"){
	
		group4.rdo_cancer.index = 0;
		group4.cp_code.enable = false;
		group4.ipt_code.enable = false;
		group4.cp_edicd.enable = false;
		group4.ipt_edicd.enable = false;
		group4.rdo_cancer.enable = true;
		group4.cp_large.enable = false;
		group4.cp_middle.enable = false;
		group4.cp_small.enable = false;
		group4.cmb_large.enable = false;
		group4.cmb_middle.enable = false;
		group4.cmb_small.enable = false;
	
	} else if ( choice == "kind"){
	
		group4.cp_code.enable = false;
		group4.ipt_code.enable = false;
		group4.cp_edicd.enable = false;
		group4.ipt_edicd.enable = false;
		group4.rdo_cancer.enable = false;
		group4.cp_large.enable = true;
		group4.cp_middle.enable = true;
		group4.cp_small.enable = true;
		group4.cmb_large.enable = true;
		group4.cmb_middle.enable = true;
		group4.cmb_small.enable = true;
	
	} 
}

function ipt_edicd_ontextchanged(obj:Edit,  e:TextChangedEventInfo)
{
	//group4.ipt_edicd.value = '':
}

function rdo_year_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	var choice = group4.rdo_year.value;
	var curDate = new Date();
	var fromDate
	var currentym = curDate.toFormatString("%Y%m");
	
	if ( choice == "sixm" )
	{
		fromDate = curDate.addMonth(-6);
	} else if ( choice == "oney" ){
	
		fromDate = curDate.addMonth(-12);
		
	} else if ( choice == "twoy" ){
	
		fromDate = curDate.addMonth(-24);
	
	} else if ( choice == "threey" ){
	
		fromDate = curDate.addMonth(-36);
		
	} 
	
	fromDate = curDate.toFormatString("%Y%m");
	
	group4.cp_monthCal01.cal_Month.value = fromDate;
	group4.cp_monthCal02.cal_Month.value = currentym;
	group4.cp_monthCal01.cal_Month.updateToDataset();
	group4.cp_monthCal02.cal_Month.updateToDataset();
	
}

function group4_cmb_insukind_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	group4.opt_insukind.value = group4.cmb_insukind.value;
}

function group4_ipt_code_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if( e.keycode == 13 )
	{
		// 수가코드 조회
		fGetSnglcalcscorcd();
	}
}

function group4_ipt_edicd_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if( e.keycode == 13 )
	{
		// EDI코드 조회
		fGetEdicd();
	}
}
]]></Script>
  </Form>
</FDL>