YNU_JEUS/app_home/himed/xpapps/pam/aftjudgxp/xp/SPPID29000_타병원처방관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPID29000" position="absolute 0 0 1194 640" titletext="타병원처방관리" oninit="SPPID29000_oninit" onload="SPPID29000_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 1 18 1191 610" id="grp_biz" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout width="1190" height="592">
              <Grid position="absolute 0 78 1185 592" id="grd_drgclist" class="datagrid3" binddataset="ds_baselist_cnstcd" anchor="all" onrbuttondown="grp_biz_grd_drgclist_onrbuttondown" selecttype="multirow" cellsizingtype="col" autoenter="select" ontextchanged="grp_biz_grd_drgclist_ontextchanged" onenterdown="grp_biz_grd_drgclist_onenterdown">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="24"/>
                      <Column size="75"/>
                      <Column size="70"/>
                      <Column size="104"/>
                      <Column size="88"/>
                      <Column size="164"/>
                      <Column size="75"/>
                      <Column size="114"/>
                      <Column size="30"/>
                      <Column size="30"/>
                      <Column size="40"/>
                      <Column size="30"/>
                      <Column size="40"/>
                      <Column size="58"/>
                      <Column size="60"/>
                      <Column size="39"/>
                      <Column size="61"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="30"/>
                      <Column size="30"/>
                      <Column size="30"/>
                      <Column size="50"/>
                    </Columns>
                    <Rows>
                      <Row size="37" 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="EDI코드"/>
                      <Cell col="5" text="EDI명"/>
                      <Cell col="6" text="변경일자"/>
                      <Cell col="7" text="항목"/>
                      <Cell col="8" text="행위&#10;재료"/>
                      <Cell col="9" text="코드&#10;구분"/>
                      <Cell col="10" text="EDI&#10;투여량"/>
                      <Cell col="11" text="EDI&#13;&#10;횟수"/>
                      <Cell col="12" text="EDI&#10;일수"/>
                      <Cell col="13" text="EDI&#10;단가"/>
                      <Cell col="14" text="EDI&#10;금액"/>
                      <Cell col="15" text="의사&#10;면허&#10;구분"/>
                      <Cell col="16" text="의사&#10;면허&#10;번호"/>
                      <Cell col="17" text="clamym"/>
                      <Cell col="18" text="clamdg"/>
                      <Cell col="19" text="pid"/>
                      <Cell col="20" text="pidsn"/>
                      <Cell col="21" text="orddeptcd"/>
                      <Cell col="22" text="orddrid"/>
                      <Cell col="23" text="totdrugqty"/>
                      <Cell col="24" text="seqno"/>
                      <Cell col="25" text="일수"/>
                      <Cell col="26" text="&#10;횟수"/>
                      <Cell col="27" text="금액"/>
                      <Cell col="28" text="1회량"/>
                      <Cell col="29" text="산정&#13;&#10;의미"/>
                      <Cell col="30" text="산정의미"/>
                      <Cell col="31" text="estmcls"/>
                      <Cell col="32" text="단가"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head"/>
                      <Cell col="1" displaytype="date" edittype="date" text="bind:orddd" mask="yyyy-MM-dd"/>
                      <Cell col="2" displaytype="text" edittype="text" text="bind:instcdgbnm"/>
                      <Cell col="3" displaytype="combo" edittype="combo" text="bind:cutcd" combodataset="ds_init_COM_P0553list" combocodecol="cdid" combodatacol="cdnm"/>
                      <Cell col="4" displaytype="text" edittype="text" editfilter="upper,number,char" text="bind:edicd" editimemode="alpha"/>
                      <Cell col="5" displaytype="text" edittype="text" text="bind:cutcmt"/>
                      <Cell col="6" displaytype="date" edittype="date" text="bind:updtdd" mask="yyyy-MM-dd"/>
                      <Cell col="7" displaytype="combo" edittype="combo" text="bind:item" combodataset="ds_init_COM_P0091list" combocodecol="cdid" combodatacol="cdnm" combodisplayrowcount="100"/>
                      <Cell col="8" displaytype="combo" edittype="combo" text="bind:matractflag" combodataset="ds_cmb_matractflag" combocodecol="value" combodatacol="label" combodisplayrowcount="100"/>
                      <Cell col="9" displaytype="combo" edittype="combo" text="bind:edicdflag" combodataset="ds_init_COM_P0131list" combocodecol="cdid" combodatacol="cdnm" combodisplayrowcount="100"/>
                      <Cell col="10" displaytype="number" edittype="normal" text="bind:edidrugqty" mask="#,##0.0#" editautoselect="true"/>
                      <Cell col="11" displaytype="number" edittype="normal" style="align:right;" text="bind:tims" editautoselect="true"/>
                      <Cell col="12" displaytype="number" edittype="normal" text="bind:edidayno" editautoselect="true"/>
                      <Cell col="13" displaytype="number" edittype="normal" text="bind:ediunitcost" editautoselect="true"/>
                      <Cell col="14" displaytype="number" edittype="normal" text="bind:ediamt" editautoselect="true"/>
                      <Cell col="15" displaytype="text" edittype="text" text="bind:licnsflag"/>
                      <Cell col="16" displaytype="text" edittype="text" text="bind:licnsno"/>
                      <Cell col="17" displaytype="none" edittype="none" text="bind:clamym"/>
                      <Cell col="18" text="bind:clamdg"/>
                      <Cell col="19" text="bind:pid"/>
                      <Cell col="20" text="bind:pidsn"/>
                      <Cell col="21" text="bind:orddeptcd"/>
                      <Cell col="22" text="bind:orddrid"/>
                      <Cell col="23" text="bind:totdrugqty"/>
                      <Cell col="24" text="bind:seqno"/>
                      <Cell col="25" displaytype="number" edittype="normal" text="bind:dayno"/>
                      <Cell col="26" displaytype="number" edittype="normal" text="bind:editims" editautoselect="true"/>
                      <Cell col="27" displaytype="number" edittype="normal" text="bind:amt"/>
                      <Cell col="28" displaytype="number" edittype="normal" text="bind:drugqty" mask="#,##0.0#" editautoselect="true"/>
                      <Cell col="29" text="bind:estmcd"/>
                      <Cell col="30" edittype="normal" text="bind:estmmncd"/>
                      <Cell col="31" text="bind:estmcls"/>
                      <Cell col="32" displaytype="number" edittype="normal" text="bind:unitcost"/>
                    </Band>
                  </Format>
                  <Format id="format_copy"/>
                </Formats>
              </Grid>
              <Static text="타병원처방 리스트" position="absolute 0 57 136 78" id="cap_judgtrgtman" class="tit_2" anchor="default"/>
              <Div position="absolute 0 6 1185 46" align="align:center top;" id="group1" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout width="1185" height="40">
                    <Button position="absolute 1120 9 1176 31" id="btn_select" class="btn1" taborder="32" text="조회" anchor="top right" onclick="grp_biz_group1_btn_select_onclick"/>
                    <Shape position="absolute 1102 4 1108 37" linetype="vertical" id="line3" class="line_4" anchor="top right"/>
                    <Static id="caption1" text="등록번호 :" class="search_name" position="absolute 11 11 101 28" style="align:center middle;"/>
                    <Edit id="ipt_pid" taborder="33" onkeydown="ipt_pid_onkeydown" class="input_default" position="absolute 104 9 183 28" onkeypress="ipt_pid_onkeypress" style="align:right middle;" readonly="true" enable="false"/>
                    <Static id="caption00" text="청구년월 :" class="search_name" position="absolute 349 11 439 28" style="align:center middle;"/>
                    <MaskEdit id="ipt_pid00" taborder="34" onkeydown="ipt_pid_onkeydown" class="input_default" position="absolute 442 9 503 28" onkeypress="ipt_pid_onkeypress" mask="####-##" type="string" readonly="true"/>
                    <Static id="caption02" text="청구차수 :" class="search_name" position="absolute 514 11 604 28" style="align:center middle;"/>
                    <Edit id="ipt_pid01" taborder="35" onkeydown="ipt_pid_onkeydown" class="input_default" position="absolute 607 9 643 28" onkeypress="ipt_pid_onkeypress" readonly="true"/>
                    <Static id="caption03" text="환자명 :" class="search_name" position="absolute 195 11 255 28" style="align:center middle;"/>
                    <Edit id="ipt_pid02" taborder="36" readonly="true" onkeydown="ipt_pid_onkeydown" class="input_default" enable="false" position="absolute 255 9 334 28" style="align:right middle;" onkeypress="ipt_pid_onkeypress"/>
                  </Layout>
                </Layouts>
              </Div>
              <Button position="absolute 962 54 1034 73" id="btn_excelsave" class="btn7" text="엑셀저장" anchor="top right" onclick="grp_biz_btn_excelsave_onclick"/>
              <Button position="absolute 1143 54 1185 73" id="button1" class="btn5" text="저장" anchor="top right" onclick="grp_biz_button1_onclick"/>
              <Button position="absolute 1035 54 1088 73" id="button2" class="btn2" text="행삭제" anchor="top right" onclick="grp_biz_button2_onclick"/>
              <Button position="absolute 1089 54 1142 73" id="button3" class="btn2" text="행추가" anchor="top right" onclick="grp_biz_button3_onclick"/>
              <Static text="기관구분 :" position="absolute 162 56 257 73" id="caption30" class="search_name" anchor="default"/>
              <Combo position="absolute 240 54 402 73" id="combo1" innerdataset="@ds_init_COM_P0553list" datacolumn="cdnm" codecolumn="cdid" anchor="default"/>
              <Div position="absolute 352 141 871 552" id="group2" visible="false" anchor="default" style="background:white;border:2 solid #808080ff ;">
                <Layouts>
                  <Layout>
                    <Grid position="absolute 2 2 512 382" id="datagrid1" visible="true" binddataset="ds_ediulist_ediu" anchor="default" autofittype="col" oncelldblclick="grp_biz_group2_datagrid1_oncelldblclick" cellsizingtype="col">
                      <Formats>
                        <Format id="default">
                          <Columns>
                            <Column size="81"/>
                            <Column size="339"/>
                            <Column size="65"/>
                          </Columns>
                          <Rows>
                            <Row size="24" band="head"/>
                            <Row size="24"/>
                          </Rows>
                          <Band id="head">
                            <Cell text="EDICD"/>
                            <Cell col="1" text="EDI명"/>
                            <Cell col="2" text="단가"/>
                          </Band>
                          <Band id="body">
                            <Cell text="bind:edicd"/>
                            <Cell col="1" text="bind:cdnm"/>
                            <Cell col="2" displaytype="number" text="bind:unitcost"/>
                          </Band>
                        </Format>
                      </Formats>
                    </Grid>
                    <Button position="absolute 456 383 512 405" id="button4" class="btn4" text="닫기" anchor="default" onclick="grp_biz_group2_button4_onclick"/>
                  </Layout>
                </Layouts>
              </Div>
              <Static text="진료일 :" position="absolute 422 56 517 73" id="caption1" class="search_name" anchor="default"/>
              <Calendar position="absolute 488 54 586 73" id="input1" mask="yyyy-mm-dd" anchor="default" dateformat="yyyy-MM-dd" value="null"/>
              <Static text="기관기호 :" position="absolute 610 56 705 73" id="caption2" class="search_name" anchor="default"/>
              <Edit position="absolute 690 54 805 73" id="input2" anchor="default"/>
              <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 0 73 1185 79" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
              <Button id="button00" taborder="1" text="타병원 처방 조회" class="btn4" position="absolute 831 54 961 73" anchor="top right" onclick="grp_biz_button00_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Button position="absolute 1131 612 1187 634" id="btn_cancel" class="btn4" text="종료" anchor="right bottom" onclick="btn_cancel_onclick"/>
        <Static id="cap_title" text="타병원처방관리" class="tit_1" position="absolute 1 0 209 23"/>
        <PopupMenu id="pmn_menu1" position="absolute 1225 83 1293 133" innerdataset="@ds_menu" levelcolumn="level" idcolumn="func" captioncolumn="label" onmenuclick="pmn_menu1_onmenuclick" onmouseleave="pmn_menu1_onmouseleave"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_base" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cutcd" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="instcdgbnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cutcd">0</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_COM_P0553list" 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_baselist_cnstcd" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_baselist_cnstcd_oncolumnchanged">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256" sumtext="확인코드"/>
          <Column id="clamym" type="STRING" size="256" sumtext="구분"/>
          <Column id="clamdg" type="STRING" size="256" sumtext="진료과목명"/>
          <Column id="pid" type="STRING" size="256" sumtext="세부진료과목명"/>
          <Column id="pidsn" type="STRING" size="256" sumtext="영문과목명"/>
          <Column id="workflag" type="STRING" size="256" sumtext="등록자"/>
          <Column id="seqno" type="STRING" size="256" sumtext="등록일"/>
          <Column id="grupcalcscorcd" type="STRING" size="256" sumtext="수정자"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="수정일"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="수정일"/>
          <Column id="matractflag" type="STRING" size="256" sumtext="수정일"/>
          <Column id="item" type="STRING" size="256" sumtext="수정일"/>
          <Column id="payflag" type="STRING" size="256" sumtext="수정일"/>
          <Column id="unitcost" type="BIGDECIMAL" size="256" sumtext="수정일"/>
          <Column id="drugqty" type="FLOAT" size="256" sumtext="수정일"/>
          <Column id="edidrugqty" type="FLOAT" size="256" sumtext="수정일"/>
          <Column id="tims" type="BIGDECIMAL" size="256" sumtext="수정일"/>
          <Column id="dayno" type="BIGDECIMAL" size="256" sumtext="수정일"/>
          <Column id="totdrugqty" type="FLOAT" size="256" sumtext="수정일"/>
          <Column id="amt" type="BIGDECIMAL" size="256" sumtext="수정일"/>
          <Column id="basecd" type="STRING" size="256" sumtext="수정일"/>
          <Column id="updtdd" type="STRING" size="256" sumtext="수정일"/>
          <Column id="orddd" type="STRING" size="256" sumtext="수정일"/>
          <Column id="ordfromdd" type="STRING" size="256" sumtext="수정일"/>
          <Column id="ordtodd" type="STRING" size="256" sumtext="수정일"/>
          <Column id="adjtresncd" type="STRING" size="256" sumtext="수정일"/>
          <Column id="ediitem" type="STRING" size="256" sumtext="수정일"/>
          <Column id="edicdflag" type="STRING" size="256" sumtext="수정일"/>
          <Column id="edicd" type="STRING" size="256" sumtext="수정일"/>
          <Column id="ediunitcost" type="BIGDECIMAL" size="256" sumtext="수정일"/>
          <Column id="ediamt" type="BIGDECIMAL" size="256" sumtext="수정일"/>
          <Column id="cutcd" type="STRING" size="256" sumtext="수정일"/>
          <Column id="cutcmt" type="STRING" size="256" sumtext="수정일"/>
          <Column id="edidayno" type="STRING" size="256" sumtext="수정일"/>
          <Column id="cutdetlcd" type="STRING" size="256" sumtext="수정일"/>
          <Column id="licnsflag" type="STRING" size="256" sumtext="수정일"/>
          <Column id="licnsno" type="STRING" size="256" sumtext="수정일"/>
          <Column id="item1" type="STRING" size="256" sumtext="수정일"/>
          <Column id="item2" type="STRING" size="256" sumtext="수정일"/>
          <Column id="instcdgbnm" type="STRING" size="256" sumtext="수정일"/>
          <Column id="editims" type="BIGDECIMAL" size="256"/>
          <Column id="rowstat" type="STRING" size="256"/>
          <Column id="estmcd" type="STRING" size="256"/>
          <Column id="estmmncd" type="STRING" size="256"/>
          <Column id="estmcls" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_COM_P0091list" 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_cmb_matractflag" 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">1</Col>
          </Row>
          <Row>
            <Col id="label">가O</Col>
            <Col id="value">2</Col>
          </Row>
          <Row>
            <Col id="label">가X</Col>
            <Col id="value">3</Col>
          </Row>
          <Row>
            <Col id="label">약</Col>
            <Col id="value">4</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_COM_P0131list" 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_menu" 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="func" type="STRING" size="256"/>
          <Column id="level" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">행 추가</Col>
            <Col id="func">fSpclGridInsertRow</Col>
          </Row>
          <Row>
            <Col id="label">-</Col>
            <Col id="func">-</Col>
          </Row>
          <Row>
            <Col id="label">행 삭제</Col>
            <Col id="func">fSpclGridDeleteRow</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_PK110list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cnstcdlist" type="STRING" size="256"/>
          <Column id="gbn" type="STRING" size="256"/>
          <Column id="insukind" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="clamdg" type="STRING" size="256"/>
          <Column id="pidsn" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="ordfromdd" type="STRING" size="256"/>
          <Column id="ordtodd" type="STRING" size="256"/>
          <Column id="patnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cnstcdlist"/>
            <Col id="gbn"/>
            <Col id="insukind"/>
            <Col id="instcd">031</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_cnstcdlist_cnstcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcdgubn" type="STRING" size="256" sumtext="확인코드"/>
          <Column id="insuaddrate" type="STRING" size="256" sumtext="구분"/>
          <Column id="fromdd" type="STRING" size="256" sumtext="진료과목명"/>
          <Column id="todd" type="STRING" size="256" sumtext="세부진료과목명"/>
          <Column id="procaddrate" type="STRING" size="256" sumtext="영문과목명"/>
          <Column id="inducsaddrate" type="STRING" size="256" sumtext="등록자"/>
          <Column id="autmbaddrate" type="STRING" size="256" sumtext="등록일"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_ediulist_ediu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="edicd" type="STRING" size="256" sumtext="확인코드"/>
          <Column id="cdnm" type="STRING" size="256" sumtext="구분"/>
          <Column id="unitcost" type="STRING" size="256" sumtext="단가"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_ediu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="edicd" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_tmp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_oscl_tmp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_ord_tmp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="255"/>
          <Column id="orddd" type="STRING" size="255"/>
          <Column id="cretno" type="BIGDECIMAL" size="255"/>
          <Column id="acptseqno" type="BIGDECIMAL" size="255"/>
          <Column id="orddeptcd" type="STRING" size="255"/>
          <Column id="orddrid" type="STRING" size="255"/>
          <Column id="insukindcd" type="STRING" size="255"/>
          <Column id="insukindnm" type="STRING" size="255"/>
          <Column id="suppkindnm" type="STRING" size="255"/>
          <Column id="dschjudgprcsstat" type="STRING" size="255"/>
          <Column id="orddrnm" type="STRING" size="255"/>
          <Column id="instcdgubn" type="STRING" size="255"/>
          <Column id="proccorpcd" type="STRING" size="255"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.input2" propid="value" datasetid="ds_base" columnid="instcdgbnm"/>
      <BindItem id="item1" compid="grp_biz.input1" propid="value" datasetid="ds_base" columnid="orddd"/>
      <BindItem id="item2" compid="grp_biz.combo1" propid="value" datasetid="ds_base" columnid="cutcd"/>
      <BindItem id="item3" compid="grp_biz.group1.ipt_pid" propid="value" datasetid="ds_send" columnid="pid"/>
      <BindItem id="item4" compid="grp_biz.group1.ipt_pid00" propid="value" datasetid="ds_send" columnid="clamym"/>
      <BindItem id="item5" compid="grp_biz.group1.ipt_pid01" propid="value" datasetid="ds_send" columnid="clamdg"/>
      <BindItem id="item6" compid="grp_biz.group1.ipt_pid02" propid="value" datasetid="ds_send" columnid="patnm"/>
    </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";

var gToday = new Date();
var gBaseyear  = gToday.getDateFormat("YYYY");
var gBasemonth = gToday.getDateFormat("MM");
var gBaseday   = gToday.getDateFormat("DD");
var gCurrentdd  = gBaseyear + gBasemonth + gBaseday;
var gCurrentym  = gBaseyear + gBasemonth;
var addrate = 0;
var insukind = "";
				
function SPPID29000_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPPID29000_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grp_biz.grd_drgclist);
	grdf_setRowTypeIcon(grp_biz.grd_drgclist, 0);
	
	fInitialize();
}

function fInitialize()
{
	
	var arrParam = new Array();
		arrParam = [{dsNm: "ds_init_PK110list", cdGrpId: "PK110", showValue: false}];
		
	pamfGetCodeList(arrParam, true, "");
	
	var arrParam = [ {dsNm: "ds_init_COM_P0553list", cdGrpId: "P0553"}
					,{dsNm: "ds_init_COM_P0131list", cdGrpId: "P0131"}
					,{dsNm: "ds_init_COM_P0091list", cdGrpId: "P0091"}]
				   
	appf_getCodeList(arrParam);	

	if (frmf_isPopup()) 
	{
		ds_tmp.copyData(arg_ds_send)
		
		ds_send.setColumn(0, "clamym", ds_tmp.getColumn(0, "clamym"));
		ds_send.setColumn(0, "clamdg", ds_tmp.getColumn(0, "clamdg"));
		ds_send.setColumn(0, "pid", ds_tmp.getColumn(0, "pid"));
		ds_send.setColumn(0, "pidsn", ds_tmp.getColumn(0, "pidsn"));
		ds_send.setColumn(0, "insukind", ds_tmp.getColumn(0, "insukindcd"));
		ds_send.setColumn(0, "orddeptcd", ds_tmp.getColumn(0, "orddeptcd"));
		ds_send.setColumn(0, "orddrid", ds_tmp.getColumn(0, "orddrid"));
		ds_send.setColumn(0, "ordfromdd", ds_tmp.getColumn(0, "ordfromdd"));
		ds_send.setColumn(0, "ordtodd", ds_tmp.getColumn(0, "ordtodd"));
		ds_send.setColumn(0, "patnm", ds_tmp.getColumn(0, "patnm"));
	}
	
	insukind = ds_send.getColumn(0, "insukind");
	
	ds_base.setColumn(0, "orddd", utlf_getCurrentDate());
	
	var oParam = {};
		oParam.id          = "TRPID28000";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetInstAddrateList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_cnstcdlist_cnstcd=cnstcd";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPID28000";

	tranf_submit(oParam);

	grp_biz_group1_btn_select_onclick();
}

function grp_biz_group1_btn_select_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetDocuList();
}

function fGetDocuList()
{
	var chk = true;
	
	if (chk == true) 
	{
		var oParam = {};
			oParam.id          = "TRPID29000";
			oParam.service     = "aftjudgapp.InAftJudg";
			oParam.method      = "reqGetInstAddClodList";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "ds_baselist_cnstcd=cnstcd";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPID29000";

		tranf_submit(oParam);		
	}
}

function grp_biz_grd_drgclist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	pmn_menu1.trackPopup(e.screenX,e.screenY);
}

function pmn_menu1_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{
	eval(e.id +"();");
}

function pmn_menu1_onmouseleave(obj:PopupMenu, e:MenuMouseEventInfo)
{
	obj.closePopup();
}

function fSpclGridInsertRow()
{
	if (utlf_isNull(grp_biz.input2.value)){
		sysf_messageBox("기관기호먼저 입력","I008");
		grp_biz.input2.setFocus();
		return -1;
	}
	
	var row = ds_baselist_cnstcd.addRow();
	
	ds_baselist_cnstcd.setColumn(row, "clamym", ds_send.getColumn(0, "clamym"));
	ds_baselist_cnstcd.setColumn(row, "clamdg", ds_send.getColumn(0, "clamdg"));
	ds_baselist_cnstcd.setColumn(row, "pid", ds_send.getColumn(0, "pid"));
	ds_baselist_cnstcd.setColumn(row, "pidsn", ds_send.getColumn(0, "pidsn"));
	ds_baselist_cnstcd.setColumn(row, "orddeptcd", ds_send.getColumn(0, "orddeptcd"));
	ds_baselist_cnstcd.setColumn(row, "orddrid", ds_send.getColumn(0, "orddrid"));
	ds_baselist_cnstcd.setColumn(row, "rowstat", "I");
	ds_baselist_cnstcd.setColumn(row, "cutcd", ds_base.getColumn(0, "cutcd"));
	ds_baselist_cnstcd.setColumn(row, "orddd", ds_base.getColumn(0, "orddd"));
	ds_baselist_cnstcd.setColumn(row, "instcdgbnm", ds_base.getColumn(0, "instcdgbnm"));
	ds_baselist_cnstcd.setColumn(row, "tims", "1");
	ds_baselist_cnstcd.setColumn(row, "drugqty", "1");
	ds_baselist_cnstcd.setColumn(row, "dayno", "1");
	ds_baselist_cnstcd.setColumn(row, "totdrugqty", "1");
	ds_baselist_cnstcd.setColumn(row, "updtdd", grp_biz.input1.value);
	ds_baselist_cnstcd.setColumn(row, "estmcls", "-");
	ds_baselist_cnstcd.setColumn(row, "estmmncd", "0000");

	return row;
}

function fSpclGridDeleteRow()
{
	var rows = grdf_getSelectedRows(grp_biz.grd_drgclist);
	var sel  = -1;
	var arrRow = new Array();
	for (var i = 0; i < rows.length; i++) 
	{
		sel = rows[i];
		arrRow[0] = sel; 
		grdf_setStatus(grp_biz.grd_drgclist, "D", arrRow);
	}
}

function grp_biz_btn_excelsave_onclick(obj:Button,  e:ClickEventInfo)
{
	if(ds_baselist_cnstcd.rowcount == 0)
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");
	}
	else
	{
		grdf_exportExcel(grp_biz.grd_drgclist, "타병원처방관리", "see");
	}
}

function ds_baselist_cnstcd_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "matractflag" || e.columnid == "cutcd" || e.columnid == "drugqty" || e.columnid == "tims" || e.columnid == "dayno")
	{
		fSetTotDrugQtyAmt();
	} else if(e.columnid == "edicd")
	{
		fGetEdicdlist();
	} else if ( e.columnid == "edidrugqty" || e.columnid == "edidayno" || e.columnid == "editims" || e.columnid == "ediunitcost"  )
	{
		var edidrugqty = ds_baselist_cnstcd.getColumn(ds_baselist_cnstcd.rowposition, "edidrugqty");
		var editims = parseInt(ds_baselist_cnstcd.getColumn(ds_baselist_cnstcd.rowposition, "editims"));
		var edidayno = parseInt(ds_baselist_cnstcd.getColumn(ds_baselist_cnstcd.rowposition, "edidayno"));
		var ediunitcost = parseInt(ds_baselist_cnstcd.getColumn(ds_baselist_cnstcd.rowposition, "ediunitcost"));
		
		ds_baselist_cnstcd.setColumn(ds_baselist_cnstcd.rowposition, "ediamt", (edidrugqty) * editims * edidayno * ediunitcost);
		
	}
}

function fSetTotDrugQtyAmt()
{
	var gbn = ds_baselist_cnstcd.getColumn(ds_baselist_cnstcd.rowposition, "cutcd");
	var orddd = ds_baselist_cnstcd.getColumn(ds_baselist_cnstcd.rowposition, "orddd");
	
	if(utlf_isNull(gbn) || utlf_isNull(orddd))
	{
		sysf_messageBox("구분 또는 진료일은 필수입력","I003");
		return;
	}
	
	var colnm = "";
	
	if (String(insukind).substr(0, 1) == "1")
	{
		colnm = "insuaddrate";
	} 
	else if (String(insukind).substr(0, 1) == "2") 
	{
		colnm = "procaddrate";
	} 
	else if (String(insukind).substr(0, 1) == "3") 
	{
		colnm = "autmbaddrate";
	} 
	else if (String(insukind).substr(0, 1) == "4") 
	{
		colnm = "inducsaddrate";
	}
	
	addrate = ds_baselist_cnstcd.getColumn(ds_baselist_cnstcd.rowposition, "matractflag") == "2" ? ds_main_cnstcdlist_cnstcd.lookupExpr("instcdgubn=='"+gbn+"' && fromdd<='"+orddd+"' && todd>='"+orddd+"'", colnm) : 0;
	
	var drugqty = parseInt(ds_baselist_cnstcd.getColumn(ds_baselist_cnstcd.rowposition, "drugqty"));
	var tims = parseInt(ds_baselist_cnstcd.getColumn(ds_baselist_cnstcd.rowposition, "tims"));
	var dayno = parseInt(ds_baselist_cnstcd.getColumn(ds_baselist_cnstcd.rowposition, "dayno"));
	var unitcost = parseInt(ds_baselist_cnstcd.getColumn(ds_baselist_cnstcd.rowposition, "unitcost"));
	
	ds_baselist_cnstcd.setColumn(ds_baselist_cnstcd.rowposition, "edidrugqty", drugqty+(drugqty*(addrate/100)));
	ds_baselist_cnstcd.setColumn(ds_baselist_cnstcd.rowposition, "editims", tims);
	ds_baselist_cnstcd.setColumn(ds_baselist_cnstcd.rowposition, "edidayno", dayno);
	ds_baselist_cnstcd.setColumn(ds_baselist_cnstcd.rowposition, "ediunitcost", unitcost);
	ds_baselist_cnstcd.setColumn(ds_baselist_cnstcd.rowposition, "totdrugqty", drugqty * tims * dayno);
	ds_baselist_cnstcd.setColumn(ds_baselist_cnstcd.rowposition, "amt", drugqty * tims * dayno * unitcost);
	ds_baselist_cnstcd.setColumn(ds_baselist_cnstcd.rowposition, "ediamt", (drugqty+(drugqty*(addrate/100))) * tims * dayno * unitcost);
}

function fGetEdicdlist()
{
	var edicd = ds_baselist_cnstcd.getColumn(ds_baselist_cnstcd.rowposition, "edicd");
	var orddd = ds_baselist_cnstcd.getColumn(ds_baselist_cnstcd.rowposition, "orddd");

	if (utlf_isNull(orddd))
	{
		sysf_messageBox("진료일은 필수입력","I003");
		return;
	}
	
	if (utlf_isNull(edicd))
	{
		sysf_messageBox("EDI코드는 필수입력","I003");
		return;
	}

	ds_send_ediu.setColumn(0, "edicd", edicd);
	ds_send_ediu.setColumn(0, "orddd", orddd);

	var oParam = {};
		oParam.id          = "TRPID29001";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetEdiuList";
		oParam.inds        = "req=ds_send_ediu";
		oParam.outds       = "ds_ediulist_ediu=ediu";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPID29001";

	tranf_submit(oParam);

	grp_biz.group2.visible = true;
}

function grp_biz_group2_button4_onclick(obj:Button,  e:ClickEventInfo)
{
	grp_biz.group2.visible = false;
}

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

function grp_biz_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var updtdata = grdf_getGridUpdateData(grp_biz.grd_drgclist);
	
	if (updtdata.rowcount == 0) 
	{
		sysf_messageBox("변경된 데이터가","I004");
		return;
	}
	
	var cutcd = grp_biz.grd_drgclist.getBindCellIndex("body","cutcd");
	var edicd = grp_biz.grd_drgclist.getBindCellIndex("body","edicd");
	var orddd = grp_biz.grd_drgclist.getBindCellIndex("body","orddd");
	var item = grp_biz.grd_drgclist.getBindCellIndex("body","item");
	var matractflag = grp_biz.grd_drgclist.getBindCellIndex("body","matractflag");
	var edicdflag = grp_biz.grd_drgclist.getBindCellIndex("body","edicdflag");
	var drugqty = grp_biz.grd_drgclist.getBindCellIndex("body","drugqty");
	var tims = grp_biz.grd_drgclist.getBindCellIndex("body","tims");
	var dayno = grp_biz.grd_drgclist.getBindCellIndex("body","dayno");
	var instcdgbnm = grp_biz.grd_drgclist.getBindCellIndex("body","instcdgbnm");
	var unitcost = grp_biz.grd_drgclist.getBindCellIndex("body","unitcost");

// 	if(!frmf_chkMdtGrid(grp_biz.grd_drgclist,[cutcd,edicd,orddd,item,matractflag,edicdflag,drugqty,tims,dayno,instcdgbnm,unitcost],
// 					["기관구분","EDI코드","진료일","항목","행위재료","코드구분","1회량","횟수","일수","기관명","단가"]))
// 	{
// 		return;
// 	}
	var chk = 0; 
	for (var i=0; i < ds_baselist_cnstcd.rowcount; i++) {
		if (ds_baselist_cnstcd.getRowType(i) != 8) {
			if (utlf_isNull(ds_baselist_cnstcd.getColumn(i,"cutcd"))
			 || utlf_isNull(ds_baselist_cnstcd.getColumn(i,"edicd"))
			 || utlf_isNull(ds_baselist_cnstcd.getColumn(i,"item"))
			 || utlf_isNull(ds_baselist_cnstcd.getColumn(i,"matractflag"))
			 || utlf_isNull(ds_baselist_cnstcd.getColumn(i,"edicdflag"))
			 || utlf_isNull(ds_baselist_cnstcd.getColumn(i,"drugqty"))
			 || utlf_isNull(ds_baselist_cnstcd.getColumn(i,"tims"))		
			 || utlf_isNull(ds_baselist_cnstcd.getColumn(i,"dayno"))	
			 || utlf_isNull(ds_baselist_cnstcd.getColumn(i,"instcdgbnm"))
			 || utlf_isNull(ds_baselist_cnstcd.getColumn(i,"unitcost"))
			) {
				chk++;
			}
			
			if (ds_baselist_cnstcd.getColumn(i,"matractflag")=="2") {
				ds_baselist_cnstcd.enableevent = false;
				ds_baselist_cnstcd.setColumn(i,"matractflag","3");
				ds_baselist_cnstcd.enableevent = true;
			}
			
		}
	} 
	
	if (chk > 0){
		sysf_messageBox("", "I003")
		return ;
	}
	
	if (sysf_messageBox("저장", "S001") == 6) 
	{
		var oParam = {};
			oParam.id          = "TXPID28000";
			oParam.service     = "aftjudgapp.InAftJudg";
			oParam.method      = "reqExeInstAddClodList";
			oParam.inds        = "req=ds_baselist_cnstcd:U";
			oParam.outds       = "ds_baselist_cnstcd=cnstcd";
			oParam.async       = false;
			oParam.callback    = "cf_TXPID28000";

		tranf_submit(oParam);
	}
}

function cf_TXPID28000(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) 
    {
		return;
	}
	else
	{
		sysf_messageBox("저장이","I002");
	}
}

function grp_biz_group2_datagrid1_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var cdnm = ds_ediulist_ediu.getColumn(e.row, "cdnm");
	var edicd = ds_ediulist_ediu.getColumn(e.row, "edicd");
	var unitcost = ds_ediulist_ediu.getColumn(e.row, "unitcost");
	var cdflag = ds_ediulist_ediu.getColumn(e.row, "cdflag");
	
	ds_baselist_cnstcd.setColumn(ds_baselist_cnstcd.rowposition, "cutcmt", cdnm);
	ds_baselist_cnstcd.setColumn(ds_baselist_cnstcd.rowposition, "edicd", edicd);
	ds_baselist_cnstcd.setColumn(ds_baselist_cnstcd.rowposition, "unitcost", unitcost);
	ds_baselist_cnstcd.setColumn(ds_baselist_cnstcd.rowposition, "edicdflag", cdflag);
	
	fSetTotDrugQtyAmt();
	
	grp_biz.group2.visible = false;
}

function grp_biz_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	fSpclGridDeleteRow();
}

function grp_biz_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	if (utlf_isNull(grp_biz.input2.value)){
		sysf_messageBox("기관기호먼저 입력","I008");
		grp_biz.input2.setFocus();
		return;
	}
	
	ds_baselist_cnstcd.enableevent = false;
	fSpclGridInsertRow();
	ds_baselist_cnstcd.enableevent = true;
}

function grp_biz_button00_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_oscl_tmp.clearData();
	var objArg = new Object();
	objArg.arg_ds_temp = ds_send;
	var rtnds = frmf_modal("SPPID29100", "SPPID29100", objArg, "", "", "", "", "", "", "", "", "", "M");

	ds_base.setColumn(0,"cutcd",ds_ord_tmp.getColumn(0,"instcdgubn") ) 
	ds_base.setColumn(0,"orddd",ds_ord_tmp.getColumn(0,"orddd") ) 
	ds_base.setColumn(0,"instcdgbnm",ds_ord_tmp.getColumn(0,"proccorpcd") ) 


	ds_baselist_cnstcd.enableevent = false;
	var irow = -1;
	for (var i=0; i < ds_oscl_tmp.rowcount; i++) {
		irow = fSpclGridInsertRow();
		ds_baselist_cnstcd.rowposition = irow; 
		ds_baselist_cnstcd.copyRow(irow, ds_oscl_tmp, i, "edicd=basecd,cutcmt=hngnm,item=snglcalcscorcls,matractflag=matractflag,edicdflag=edicdflag,unitcost=appunitcost,tims=calctims,dayno=calcdays,editims=calctims,edidayno=calcdays,orddd=execdd,drugqty=ordqty,updtdd=execdd,estmcd=estmcd,estmmncd=estmmeancd,estmcls=estmcls");
		if (!utlf_isNull(ds_oscl_tmp.getColumn(i,"estmcd")) && ds_oscl_tmp.getColumn(i,"estmcd") != "000" && ds_oscl_tmp.getColumn(i,"estmcd") != "-") {
			ds_baselist_cnstcd.setColumn(irow, "edicd" , ds_oscl_tmp.getColumn(i,"basecd")+ ds_oscl_tmp.getColumn(i,"estmcd").trim());
		}
		fSetTotDrugQtyAmt();
	}
	ds_baselist_cnstcd.enableevent = true;
}

function grp_biz_grd_drgclist_onenterdown(obj:Grid, e:GridEditEventInfo)
{
	
}
]]></Script>
  </Form>
</FDL>