YNU_JEUS/app_home/himed/xpapps/pam/aftjudgxp/xp/SMPID23200_명세서처방복사.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPID23200" position="absolute 0 0 1241 805" titletext="명세서처방복사" oninit="model1_oninit" onload="SMPID23200_onload">
    <Layouts>
      <Layout>
        <Div id="Div00" taborder="1" class="div_SA" position="absolute 363 27 1232 94" anchor="left top right">
          <Layouts>
            <Layout>
              <Combo id="cmb_ioflag" taborder="8" class="combo_search" position="absolute 580 10 657 30" anchor="default" positiontype="position" innerdataset="@ds_init_IOFLAGlist" codecolumn="cdid" datacolumn="cdnm" onitemchanged="Div00_cmb_ioflag_onitemchanged"/>
              <Static id="caption1" text="내원형태" class="search_name" position="absolute 506 10 580 30" anchor="default" positiontype="position"/>
              <Combo id="cmb_insukind" taborder="9" class="combo_search" position="absolute 357 10 482 30" anchor="default" positiontype="position" innerdataset="@ds_init_P0008" codecolumn="cdid" datacolumn="cdnm"/>
              <Combo id="cmb_suppkind" taborder="10" class="combo_search" position="absolute 357 35 482 55" anchor="default" positiontype="position" innerdataset="@ds_init_P0010" codecolumn="cdid" datacolumn="cdnm"/>
              <Static id="caption8" text="보조유형" class="search_name" position="absolute 283 35 357 55" anchor="default" positiontype="position"/>
              <Static id="caption32" text="보험유형" class="search_name" position="absolute 283 10 357 30" anchor="default" positiontype="position"/>
              <Combo id="cmb_clamdg" taborder="11" position="absolute 208 10 275 30" anchor="default" positiontype="position" innerdataset="@ds_init_clamdg" codecolumn="clamdgcd" datacolumn="clamdgnm"/>
              <cp_monthCal id="cp_monthCal01" titletext="monthCalendar" taborder="12" text="cp_monthCal00" scrollbars="none" position="absolute 130 10 205 30" anchor="default" class="input_essential"/>
              <Combo id="cmb_orddeptcd" taborder="13" class="combo_search" position="absolute 130 35 275 55" anchor="default" positiontype="position" innerdataset="@ds_init_orddeptcd" codecolumn="cd" datacolumn="nm"/>
              <Static id="caption2" text="진료과" class="search_name" position="absolute 57 35 118 55" anchor="default" positiontype="position"/>
              <Static id="caption30" text="청구년월" class="search_name" position="absolute 57 10 131 30" anchor="default" positiontype="position"/>
              <Static id="caption7" text="TO" class="tit_2" position="absolute 8 10 53 30" style="align:left middle;" anchor="default" positiontype="position"/>
              <Button id="btn_select" taborder="7" text="조회" onclick="btn_select_onclick" class="btn1" position="absolute 801 10 857 30" anchor="top right" positiontype="position"/>
            </Layout>
          </Layouts>
        </Div>
        <Div id="group1" taborder="2" style="align:center top;" class="div_SA" position="absolute 0 27 353 94" positiontype="position">
          <Layouts>
            <Layout>
              <Static id="caption4" text="청구년월" class="search_name" position="absolute 71 10 145 30" anchor="default" positiontype="position"/>
              <Edit id="input3" taborder="14" class="input_essential" position="absolute 223 10 248 30" style="align:center middle;" anchor="default" imemode="hangul" enable="false" positiontype="position"/>
              <Static id="caption5" text="등록번호" class="search_name" position="absolute 71 35 145 55" anchor="default" positiontype="position"/>
              <Edit id="input4" taborder="15" position="absolute 145 35 220 55" style="align:center middle;" anchor="default" imemode="hangul" enable="false" positiontype="position"/>
              <Edit id="input5" taborder="16" position="absolute 251 35 331 55" style="align:center middle;" anchor="default" imemode="hangul" enable="false" positiontype="position"/>
              <Static id="caption6" text="FROM" class="tit_2" position="absolute 8 10 70 30" style="align:left middle;" anchor="default" positiontype="position"/>
              <Edit id="input6" taborder="17" position="absolute 223 35 248 55" style="align:center middle;" anchor="default" imemode="hangul" enable="false" positiontype="position"/>
              <cp_monthCal id="cp_monthCal00" titletext="monthCalendar" taborder="18" text="cp_monthCal00" scrollbars="none" class="input_essential" position="absolute 251 10 326 30" anchor="default" visible="false"/>
              <Edit id="input00" taborder="19" imemode="hangul" enable="false" position="absolute 145 10 220 30" style="align:center middle;"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="cap_judgtrgtman" text="이동/복사 대상 명세서 선택 (TO)" class="tit_2" position="absolute 0 104 230 124" style="align:left middle;" positiontype="position"/>
        <Static id="caption14" text="기본정보가 틀린 경우 진료과, 진료개시일의 정보는 변경될 수 있습니다." class="tit_2" position="absolute 244 104 692 124" style="color:blue;align:middle;" positiontype="position"/>
        <Grid id="grd_clbsmast" class="datagrid2" taborder="3" useinputpanel="false" autofittype="col" position="absolute 0 124 1232 308" anchor="left top right" binddataset="ds_grid_grd_clbsmast" positiontype="position" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="31"/>
                <Column size="30"/>
                <Column size="45"/>
                <Column size="52"/>
                <Column size="68"/>
                <Column size="36"/>
                <Column size="95"/>
                <Column size="69"/>
                <Column size="26"/>
                <Column size="69"/>
                <Column size="30"/>
                <Column size="31"/>
                <Column size="74"/>
                <Column size="77"/>
                <Column size="117"/>
                <Column size="68"/>
                <Column size="80"/>
                <Column size="87"/>
                <Column size="35"/>
              </Columns>
              <Rows>
                <Row size="35" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="FR&#10;OM"/>
                <Cell col="1" text="TO"/>
                <Cell col="2" text="입외&#10;구분"/>
                <Cell col="3" text="명일련"/>
                <Cell col="4" text="청구년월"/>
                <Cell col="5" text="차수"/>
                <Cell col="6" text="청구구분"/>
                <Cell col="7" colspan="2" text="등록번호"/>
                <Cell col="9" text="환자명"/>
                <Cell col="10" text="보험&#10;유형"/>
                <Cell col="11" text="보조&#10;유형"/>
                <Cell col="12" text="진료개시일"/>
                <Cell col="13" text="진료종료일"/>
                <Cell col="14" text="진료과"/>
                <Cell col="15" text="주치의"/>
                <Cell col="16" text="심사상태"/>
                <Cell col="17" text="청구상태"/>
                <Cell col="18" text="잠금"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" text="bind:fromchk"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:tochk"/>
                <Cell col="2" displaytype="combo" edittype="none" style="align:center middle;" text="bind:ioflag" combodataset="ds_init_IOFLAGlist" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="3" style="align:center middle;" text="bind:docuseqno"/>
                <Cell col="4" displaytype="date" style="align:center middle;" text="bind:clamym" mask="yyyy-MM" calendardisplaynulltype="none"/>
                <Cell col="5" displaytype="text" style="align:center middle;" text="bind:clamdg"/>
                <Cell col="6" displaytype="combo" edittype="none" style="align:center middle;" text="bind:clamflagcd" combodataset="ds_init_P0155" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="7" style="align:center middle;" text="bind:pid"/>
                <Cell col="8" style="align:center middle;" text="bind:pidsn"/>
                <Cell col="9" style="align:center middle;" text="bind:patnm"/>
                <Cell col="10" displaytype="normal" edittype="none" style="align:center middle;" text="bind:insukind"/>
                <Cell col="11" displaytype="normal" edittype="none" style="align:center middle;" text="bind:suppkind"/>
                <Cell col="12" displaytype="date" style="align:center middle;" text="bind:ordfromdd" mask="yyyy-MM-dd" calendardisplaynulltype="none"/>
                <Cell col="13" displaytype="date" style="align:center middle;" text="bind:ordtodd" mask="yyyy-MM-dd" calendardisplaynulltype="none"/>
                <Cell col="14" displaytype="combo" edittype="none" style="align:center middle;" text="bind:orddeptcd" combodataset="ds_init_orddeptcd" combocodecol="cd" combodatacol="nm"/>
                <Cell col="15" displaytype="combo" edittype="none" style="align:center middle;" text="bind:orddrid" combodataset="ds_init_orddrid" combocodecol="cd" combodatacol="nm"/>
                <Cell col="16" displaytype="combo" edittype="none" style="align:center middle;" text="bind:judgendyn" combodataset="ds_init_P0151" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="17" displaytype="combo" edittype="none" style="align:center middle;" text="bind:clamendyn" combodataset="ds_init_P0430" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="18" style="align:center middle;" text="bind:lockyn"/>
                <Cell col="19"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_init" taborder="4" text="초기화" onlbuttonup="btn_init_onlbuttonup" class="btn4" position="absolute 1163 101 1232 121" anchor="top right" positiontype="position" onclick="btn_init_onclick"/>
        <Static id="caption3" text="상병,처방 선택 (FROM)" class="tit_2" position="absolute 0 318 170 338" style="align:left middle;" positiontype="position"/>
        <Static id="caption15" text="명세서단위 특정내역 중복 제외되지 않음" class="tit_2" position="absolute 189 318 459 338" style="color:blue;align:left middle;" positiontype="position"/>
        <CheckBox id="chk_mclsp" taborder="6" text="명세서단위 특정내역 포함" truevalue="Y" position="absolute 462 318 632 338" positiontype="position"/>
        <CheckBox id="chk_mx999" taborder="7" text="청구메모 포함" truevalue="Y" position="absolute 635 318 737 338" positiontype="position"/>
        <Combo id="cmb_adjtresncd" taborder="8" class="combo_default" position="absolute 938 318 1072 338" positiontype="position" innerdataset="@ds_init_P0127" codecolumn="cdid" datacolumn="cdid_cdnm"/>
        <Static id="caption16" text="조정사유" class="search_name" position="absolute 864 321 938 338" positiontype="position"/>
        <Radio id="rdo_jobflag" taborder="9" columncount="4" rowcount="0" codecolumn="value" datacolumn="label" position="absolute 1075 318 1173 338" anchor="default" positiontype="position" innerdataset="@ds_init_jobflag" onitemchanged="rdo_jobflag_onitemchanged"/>
        <Button id="btn_copy" taborder="10" text="이동" onclick="btn_copy_onclick" class="btn4" position="absolute 1176 318 1232 338" anchor="top right" positiontype="position"/>
        <Static id="caption9" text="상병" class="search_name" position="absolute 0 348 45 368" style="align:left middle;" positiontype="position"/>
        <Static id="caption12" text="상병은 이동시에도 원데이타가 삭제되지 않습니다." class="tit_2" position="absolute 55 349 378 369" style="color:blue;align:left middle;" positiontype="position"/>
        <Button id="btn_cldi_check" taborder="11" text="선택" onclick="btn_cldi_check_onclick" class="btn2" position="absolute 437 345 481 365" positiontype="position"/>
        <Button id="btn_cldi_nocheck" taborder="12" text="취소" onclick="btn_cldi_nocheck_onclick" class="btn2" position="absolute 484 345 528 365" positiontype="position"/>
        <Grid id="grd_cldi" taborder="13" useinputpanel="false" autofittype="col" position="absolute 0 368 528 598" anchor="left top" onmouseleave="grd_cldi_onmouseleave" binddataset="ds_grid_grd_cldi" scrollbars="autoboth" positiontype="position" onbuttondown="grd_cldi_onbuttondown" onrbuttondown="grd_cldi_onrbuttondown" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="30"/>
                <Column size="31"/>
                <Column size="30"/>
                <Column size="62"/>
                <Column size="253"/>
                <Column size="70"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="선택"/>
                <Cell col="1" text="R/O"/>
                <Cell col="2" text="순번"/>
                <Cell col="3" text="상병코드"/>
                <Cell col="4" text="상병명"/>
                <Cell col="5" text="진료개시일"/>
                <Cell col="6"/>
                <Cell col="7"/>
                <Cell col="8"/>
                <Cell col="9"/>
                <Cell col="10"/>
                <Cell col="11"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:fromchk"/>
                <Cell col="1" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:diagkindcd"/>
                <Cell col="2" text="bind:diagseq"/>
                <Cell col="3" style="align:center middle;" text="bind:diagcd"/>
                <Cell col="4" style="align:left middle;" text="bind:diagnm"/>
                <Cell col="5" displaytype="date" text="bind:ordfromdd" mask="yyyy-MM-dd"/>
                <Cell col="6" style="align:center middle;" text="bind:clamym"/>
                <Cell col="7" text="bind:clamdg"/>
                <Cell col="8" text="bind:pid"/>
                <Cell col="9" text="bind:pidsn"/>
                <Cell col="10" text="bind:workflag"/>
                <Cell col="11" text="bind:seqno"/>
                <Cell col="12"/>
                <Cell col="13"/>
                <Cell col="14"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_clop_check" taborder="14" text="선택" onclick="btn_clop_check_onclick" class="btn2" position="absolute 437 606 481 626" positiontype="position"/>
        <Button id="btn_clop_nocheck" taborder="15" text="취소" onclick="btn_clop_nocheck_onclick" class="btn2" position="absolute 484 606 528 626" positiontype="position"/>
        <Static id="caption10" text="원외처방" class="search_name" position="absolute 0 609 74 629" positiontype="position"/>
        <Grid id="grd_clop" taborder="16" useinputpanel="false" position="absolute 0 628 528 774" anchor="left top bottom" onmouseleave="grd_clop_onmouseleave" binddataset="ds_grid_grd_clop" scrollbars="autoboth" positiontype="position" onbuttondown="grd_clop_onbuttondown" onrbuttondown="grd_clop_onrbuttondown" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="30"/>
                <Column size="94"/>
                <Column size="27"/>
                <Column size="76"/>
                <Column size="68"/>
                <Column size="149"/>
                <Column size="44"/>
                <Column size="37"/>
                <Column size="37"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="선택"/>
                <Cell col="1" text="투약번호"/>
                <Cell col="2" text="줄"/>
                <Cell col="3" text="수가코드"/>
                <Cell col="4" text="EDI코드"/>
                <Cell col="5" text="한글명"/>
                <Cell col="6" text="1회량"/>
                <Cell col="7" text="횟수"/>
                <Cell col="8" text="일수"/>
                <Cell col="9"/>
                <Cell col="10"/>
                <Cell col="11"/>
                <Cell col="12"/>
                <Cell col="13"/>
                <Cell col="14"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:fromchk"/>
                <Cell col="1" style="align:center middle;" text="bind:mpsno"/>
                <Cell col="2" style="align:center middle;" text="bind:edilnno"/>
                <Cell col="3" text="bind:snglcalcscorcd"/>
                <Cell col="4" style="align:center middle;" text="bind:edicd"/>
                <Cell col="5" text="bind:hngnm"/>
                <Cell col="6" style="align:center middle;" text="bind:edidrugqty"/>
                <Cell col="7" style="align:center middle;" text="bind:drugtims"/>
                <Cell col="8" style="align:center middle;" text="bind:edidrugdayno"/>
                <Cell col="9" text="bind:clamym"/>
                <Cell col="10" text="bind:clamdg"/>
                <Cell col="11" text="bind:pid"/>
                <Cell col="12" text="bind:pidsn"/>
                <Cell col="13" text="bind:workflag"/>
                <Cell col="14" text="bind:seqno"/>
                <Cell col="15"/>
                <Cell col="16"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption13" text="처방작업후에는 명세서는 미심으로 변경됩니다." class="tit_2" position="absolute 596 348 911 368" style="color:blue;align:left middle;" positiontype="position"/>
        <Grid id="grd_clod" taborder="17" useinputpanel="false" position="absolute 538 368 1232 774" anchor="all" onmouseleave="grd_clod_onmouseleave" binddataset="ds_grid_grd_clod" positiontype="position" onbuttondown="grd_clod_onbuttondown" onrbuttondown="grd_clod_onrbuttondown" cellsizingtype="col" autofittype="none">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="31"/>
                <Column size="35"/>
                <Column size="22"/>
                <Column size="22"/>
                <Column size="19"/>
                <Column size="84"/>
                <Column size="72"/>
                <Column size="200"/>
                <Column size="39"/>
                <Column size="30"/>
                <Column size="31"/>
                <Column size="70"/>
                <Column size="79"/>
                <Column size="82"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="선택"/>
                <Cell col="1" text="줄"/>
                <Cell col="2" text="항"/>
                <Cell col="3" text="목"/>
                <Cell col="4" text="G"/>
                <Cell col="5" text="그룹코드"/>
                <Cell col="6" text="수가코드"/>
                <Cell col="7" text="한글명"/>
                <Cell col="8" text="1회량"/>
                <Cell col="9" text="횟수"/>
                <Cell col="10" text="일수"/>
                <Cell col="11" text="금액"/>
                <Cell col="12" text="EDI코드"/>
                <Cell col="13" text="개시일"/>
                <Cell col="14"/>
                <Cell col="15"/>
                <Cell col="16"/>
                <Cell col="17"/>
                <Cell col="18"/>
                <Cell col="19"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:fromchk"/>
                <Cell col="1" style="align:center middle;" text="bind:edilnno"/>
                <Cell col="2" style="align:center middle;" text="bind:ediitem1"/>
                <Cell col="3" style="align:center middle;" text="bind:ediitem2"/>
                <Cell col="4" style="align:center middle;" text="bind:groupyn"/>
                <Cell col="5" text="bind:grupcalcscorcd"/>
                <Cell col="6" text="bind:snglcalcscorcd"/>
                <Cell col="7" style="align:left middle;" text="bind:hngnm"/>
                <Cell col="8" style="align:center middle;" text="bind:edidrugqty"/>
                <Cell col="9" style="align:center middle;" text="bind:tims"/>
                <Cell col="10" style="align:center middle;" text="bind:edidayno"/>
                <Cell col="11" style="align:right middle;" text="bind:ediamt" mask="#,###"/>
                <Cell col="12" text="bind:edicd"/>
                <Cell col="13" style="align:center middle;" text="bind:ordfromdd"/>
                <Cell col="14" text="bind:clamym"/>
                <Cell col="15" text="bind:clamdg"/>
                <Cell col="16" text="bind:pid"/>
                <Cell col="17" text="bind:pidsn"/>
                <Cell col="18" text="bind:workflag"/>
                <Cell col="19" text="bind:seqno"/>
                <Cell col="20"/>
                <Cell col="21"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_clod_check" taborder="18" text="선택" onclick="btn_clod_check_onclick" class="btn2" position="absolute 1141 345 1185 365" anchor="top right" positiontype="position"/>
        <Button id="btn_clod_nocheck" taborder="19" text="취소" onclick="btn_clod_nocheck_onclick" class="btn2" position="absolute 1188 345 1232 365" anchor="top right" positiontype="position"/>
        <Static id="caption11" text="처방" class="search_name" position="absolute 545 348 590 368" positiontype="position"/>
        <Static id="caption00" text="명세서처방복사" class="tit_1" position="absolute 0 0 177 26"/>
        <Button id="btn_close" taborder="20" text="닫기" class="btn4" position="absolute 1176 775 1232 795" anchor="top right" onclick="btn_close_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grid_grd_clbsmast" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromchk" type="STRING"/>
          <Column id="tochk" type="STRING"/>
          <Column id="ioflag" type="STRING"/>
          <Column id="docuseqno" type="STRING"/>
          <Column id="clamym" type="STRING"/>
          <Column id="clamdg" type="STRING"/>
          <Column id="clamflagcd" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="pidsn" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="insukind" type="STRING"/>
          <Column id="suppkind" type="STRING"/>
          <Column id="ordfromdd" type="STRING"/>
          <Column id="ordtodd" type="STRING"/>
          <Column id="orddeptcd" type="STRING"/>
          <Column id="orddrid" type="STRING"/>
          <Column id="judgendyn" type="STRING"/>
          <Column id="clamendyn" type="STRING"/>
          <Column id="lockyn" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grid_grd_cldi" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromchk" type="STRING"/>
          <Column id="diagkindcd" type="STRING"/>
          <Column id="diagseq" type="STRING"/>
          <Column id="diagcd" type="STRING"/>
          <Column id="diagnm" type="STRING"/>
          <Column id="ordfromdd" type="STRING"/>
          <Column id="clamym" type="STRING"/>
          <Column id="clamdg" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="pidsn" type="STRING"/>
          <Column id="workflag" type="STRING"/>
          <Column id="seqno" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grid_grd_clop" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromchk" type="STRING"/>
          <Column id="mpsno" type="STRING"/>
          <Column id="edilnno" type="STRING"/>
          <Column id="snglcalcscorcd" type="STRING"/>
          <Column id="edicd" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="edidrugqty" type="STRING"/>
          <Column id="drugtims" type="STRING"/>
          <Column id="edidrugdayno" type="STRING"/>
          <Column id="clamym" type="STRING"/>
          <Column id="clamdg" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="pidsn" type="STRING"/>
          <Column id="workflag" type="STRING"/>
          <Column id="seqno" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grid_grd_clod" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromchk" type="STRING"/>
          <Column id="edilnno" type="STRING"/>
          <Column id="ediitem1" type="STRING"/>
          <Column id="ediitem2" type="STRING"/>
          <Column id="groupyn" type="STRING"/>
          <Column id="grupcalcscorcd" type="STRING"/>
          <Column id="snglcalcscorcd" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="edidrugqty" type="STRING"/>
          <Column id="tims" type="STRING"/>
          <Column id="edidayno" type="STRING"/>
          <Column id="ediamt" type="STRING"/>
          <Column id="edicd" type="STRING"/>
          <Column id="ordfromdd" type="STRING"/>
          <Column id="clamym" type="STRING"/>
          <Column id="clamdg" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="pidsn" type="STRING"/>
          <Column id="workflag" type="STRING"/>
          <Column id="seqno" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0008" 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_P0010" 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_P0155" 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_P0430" 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_P0151" 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_P0127" 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"/>
          <Column id="cdid_cdnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_IOFLAGlist" 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>
        <Rows>
          <Row>
            <Col id="cdid">O</Col>
            <Col id="cdnm">외래</Col>
          </Row>
          <Row>
            <Col id="cdid">I</Col>
            <Col id="cdnm">입원</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_orddeptcd" 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"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_orddeptcd2" 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"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_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"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_orddrid2" 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"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_jobflag" 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">M</Col>
          </Row>
          <Row>
            <Col id="label">복사</Col>
            <Col id="value">C</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamdg" type="STRING" size="256"/>
          <Column id="pidsn" type="STRING" size="256"/>
          <Column id="patnm" type="STRING" size="256"/>
          <Column id="insukind" type="STRING" size="256"/>
          <Column id="suppkind" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_clamdg" 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_cond_TRPID20407" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="insukind" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cond_TXPID20602_clbs" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="jobflag" type="STRING" size="256"/>
          <Column id="mclspyn" type="STRING" size="256"/>
          <Column id="mx999yn" type="STRING" size="256"/>
          <Column id="adjtresncd" type="STRING" size="256"/>
          <Column id="f_clamym" type="STRING" size="256"/>
          <Column id="f_clamdg" type="STRING" size="256"/>
          <Column id="f_pid" type="STRING" size="256"/>
          <Column id="f_pidsn" type="STRING" size="256"/>
          <Column id="t_clamym" type="STRING" size="256"/>
          <Column id="t_clamdg" type="STRING" size="256"/>
          <Column id="t_pid" type="STRING" size="256"/>
          <Column id="t_pidsn" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cond_TXPID20602_cldi" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamdg" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="pidsn" type="STRING" size="256"/>
          <Column id="workflag" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cond_TXPID20602_clop" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamdg" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="pidsn" type="STRING" size="256"/>
          <Column id="workflag" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cond_TXPID20602_clod" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamdg" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="pidsn" type="STRING" size="256"/>
          <Column id="workflag" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
 
include "com_commonxp::comm_main.xjs";
include "pam_aftjudgxp::SMPID20000.xjs"; // 사후심사 공통관련 함수

function lf_Initialize() {
	
	rdo_jobflag.value = "M";// 이동/복사 중 이동이 기본
	chk_mclsp.value = "";	// 명세서단위 특정내역
	chk_mx999.value = "";	// 청구메모
	
	// 조회조건 기본값 설정
	if( !utlf_isNull( ds_temp_patinfo.getColumn(0, "clamym") ) ) {
		ds_cond_TRPID20407.clearData();
		var aRow = ds_cond_TRPID20407.addRow();
		Div00.cp_monthCal01.setData(ds_temp_patinfo.getColumn(0, "clamym"));
		ds_cond_TRPID20407.setColumn(aRow, "ioflag",	ds_temp_patinfo.getColumn(0, "ioflag"));
		ds_cond_TRPID20407.setColumn(aRow, "insukind",	ds_temp_patinfo.getColumn(0, "insukind"));
		
		//청구차수 조회
		lf_GetClamdg();
		
		//FROM 상병, 원외처방, 처방 데이터 조회
		lf_GetClodList();
	}
	
	ds_grid_grd_clbsmast.clearData();
	
	
	
}

function lf_GetClamdg() {
	ds_cond_TRPID20407.setColumn(0,"clamym",Div00.cp_monthCal01.getData())
	
	tranf_submit({
		id: "TRPID20407"
		, service: "aftjudgapp.InAftJudgTrgtMan"
		, method : "reqGetClamdg"
		, inds   : "req=ds_cond_TRPID20407"
		, outds  : "ds_init_clamdg=clamdg"
		, async  : false
	});
	
	if( !utlf_isNull(ds_temp_patinfo.getColumn(0, "clamdg") ) ) {
		Div00.cmb_clamdg.value = ds_temp_patinfo.getColumn(0, "clamdg");
	}
}


function lf_grid_stop_clop(obj:Grid) {
	for(i = 0;  i < 3;  i++) {
		obj.setFormatColProperty(i, "band", "left");
	}
}

function lf_grid_stop_clod(obj:Grid) {
	for(i = 0;  i < 2;  i++) {
		obj.setFormatColProperty(i, "band", "left");
	}
}

function lf_GetDocuList() {
	if( utlf_isNull(group1.input4.value ) ) {
		sysf_messageBox("등록번호는", "I003");	// 필수입력입니다.
		return;
	}
	
	if( utlf_isNull(group1.input00.value ) ) {
		sysf_messageBox("청구년월은", "I003");	// 필수입력입니다.
		return;
	}
	
	if( utlf_isNull(group1.input3.value ) ) {
		sysf_messageBox("청구차수는", "I003");	// 필수입력입니다.
		return;
	}
	
	var sInDs = dsf_createDsRow("ds_cond_TRPID20603"
		, [{col: "m_clamym"	, val: ds_temp_patinfo.getColumn(0, "clamym") }	
		,  {col: "m_clamdg"	, val: ds_temp_patinfo.getColumn(0, "clamdg") }	
		,  {col: "m_pid"	, val: ds_temp_patinfo.getColumn(0, "pid") }
		,  {col: "m_pidsn"	, val: ds_temp_patinfo.getColumn(0, "pidsn") }
		,  {col: "clamym"	, val: Div00.cp_monthCal01.getData() } 	
		,  {col: "clamdg"	, val: Div00.cmb_clamdg.value }	
		,  {col: "ioflag"	, val: Div00.cmb_ioflag.value }	
		,  {col: "insukind"	, val: Div00.cmb_insukind.value }	
		,  {col: "suppkind"	, val: Div00.cmb_suppkind.value }	
		,  {col: "orddeptcd", val: Div00.cmb_orddeptcd.value }	
	]);
	
	tranf_submit({
		id: "TRPID20603"
		, service: "aftjudgapp.DocuManage"
		, method: "reqGetDocuMngListClodCopy" 
		, inds:  "req=ds_cond_TRPID20603"
		, outds:  "ds_grid_grd_clbsmast=clbs"
	});
	
	ds_grid_grd_clbsmast.addColumn("tochk", "STRING");
	var rowCnt = ds_grid_grd_clbsmast.rowcount;
	
	ds_grid_grd_clbsmast.updatecontrol = false;
	for( i = 0 ; i < rowCnt ; i++) {
		if( ds_grid_grd_clbsmast.getColumn(i, "fromchk") == "Y") {
			ds_grid_grd_clbsmast.setColumn(i, "fromchk", 1);
		}
		else {
			ds_grid_grd_clbsmast.setColumn(i, "fromchk", 0);
		}
	}
	ds_grid_grd_clbsmast.updatecontrol = true;
	
	Div00.cp_monthCal01.setCallEvent("lf_GetClamdg");
}

function lf_GetClodList() {
	if( utlf_isNull(ds_temp_patinfo.getColumn(0, "pid") ) ) {
		return;
	}
	ds_grid_grd_cldi.clearData();
	ds_grid_grd_clop.clearData();
	ds_grid_grd_clod.clearData();
	
	var sInDs = dsf_createDsRow("ds_cond_TRPID20604"
		, [{col: "clamym"	, val: ds_temp_patinfo.getColumn(0, "clamym") }	
		,  {col: "clamdg"	, val: ds_temp_patinfo.getColumn(0, "clamdg")}	
		,  {col: "pid"		, val: ds_temp_patinfo.getColumn(0, "pid")}
		,  {col: "pidsn"	, val: ds_temp_patinfo.getColumn(0, "pidsn")}
	]);
	
	tranf_submit({
		id: "TRPID20604"
		, service: "aftjudgapp.DocuManage"
		, method: "reqGetDocuMngCldiClodList" 
		, inds:  "req=ds_cond_TRPID20604"
		, outds:  "ds_grid_grd_cldi=cldi ds_grid_grd_clop=clop ds_grid_grd_clod=clod"
	});
	
	ds_grid_grd_cldi.addColumn("fromchk", "STRING");
	ds_grid_grd_clop.addColumn("fromchk", "STRING");
	ds_grid_grd_clod.addColumn("fromchk", "STRING");
}				

function lf_SetGridCheckYN(obj:Grid, flag) { 
	//flag : 1, 0
	var nodelist;
	if(obj.name == "grd_cldi") { //상병
		for( i = 0 ; i < obj.rowcount ; i++) {
			ds_grid_grd_cldi.setColumn(i, "fromchk", flag);
		}
	}
	else if(obj.name == "grd_clop") { //원외처방
		for( i = 0 ; i < obj.rowcount ; i++) {
			ds_grid_grd_clop.setColumn(i, "fromchk", flag);
		}

	}
	else if(obj.name == "grd_clod") { //처방
		for( i = 0 ; i < obj.rowcount ; i++) {
			ds_grid_grd_clod.setColumn(i, "fromchk", flag);
		}
		
	}
	else {
		return;
	}

}

function lf_Validcheck() {
	
	var clbs_from_cnt = 0;
	var clbs_to_cnt = 0;
	
	var cldi_cnt = 0;
	var clop_cnt = 0;
	var clod_cnt = 0;
	
	var from_pid = "";
	var from_clamym = "";
	var from_ioflag = "";
	var from_insukind = "";
	var from_suppkind = "";
	var from_orddeptcd = "";

	var to_pid = "";
	var to_clamym = "";
	var to_ioflag = "";
	var to_insukind = "";
	var to_suppkind = "";
	var to_orddeptcd = "";


	// 명세서 선택 사항 체크
	for( i = 0 ; i < ds_grid_grd_clbsmast.rowcount; i++) {
		if( ds_grid_grd_clbsmast.getColumn(i, "fromchk") == 1 ) {
			if( ds_grid_grd_clbsmast.getColumn(i, "tochk") == 1 ) {	
				sysf_messageBox("송수신명세서를 동시에 선택", "E001"); //할 수 없습니다.	
				return false;
			} 
			
			//이동시 from 명세서의 송신상태 체크
			if( rdo_jobflag.value == "M" ) { //이동
				if( ds_grid_grd_clbsmast.getColumn(i, "lockyn") == "Y" ) {
					sysf_messageBox("이동시 잠금설정된 원명세서는 선택", "E001"); //할 수 없습니다.	
					return false;
				} 
				
				if( ds_grid_grd_clbsmast.getColumn(i, "clamendyn") != "A"
				 && ds_grid_grd_clbsmast.getColumn(i, "clamendyn") != "M") {	
					sysf_messageBox("이동시 송신된 원명세서는 선택", "E001"); //할 수 없습니다.	
					return false;
				} 
			} 
			
			clbs_from_cnt ++;
			
			from_pid		= ds_grid_grd_clbsmast.getColumn(i, "pid");
			from_clamym		= ds_grid_grd_clbsmast.getColumn(i, "clamym");
			from_ioflag		= ds_grid_grd_clbsmast.getColumn(i, "ioflag");
			from_insukind	= ds_grid_grd_clbsmast.getColumn(i, "insukind");
			from_suppkind	= ds_grid_grd_clbsmast.getColumn(i, "suppkind");
			from_orddeptcd	= ds_grid_grd_clbsmast.getColumn(i, "orddeptcd");
			
		} 
		
		
		if( ds_grid_grd_clbsmast.getColumn(i, "tochk") == 1 ) {
			if( ds_grid_grd_clbsmast.getColumn(i, "lockyn") == "Y") {
				sysf_messageBox("잠금설정된 명세서는 선택", "E001");	//할 수 없습니다.	
				return false;
			} 
			
			if( ds_grid_grd_clbsmast.getColumn(i, "clamendyn") != "A" 
			 && ds_grid_grd_clbsmast.getColumn(i, "clamendyn") != "M") {
				sysf_messageBox("송신된 명세서는 선택", "E001"); //할 수 없습니다.	
				return false;
			} 
			
			clbs_to_cnt++;
			
			to_pid		= ds_grid_grd_clbsmast.getColumn(i, "pid"); 
			to_clamym	= ds_grid_grd_clbsmast.getColumn(i, "clamym"); 
			to_ioflag	= ds_grid_grd_clbsmast.getColumn(i, "ioflag"); 
			to_insukind	= ds_grid_grd_clbsmast.getColumn(i, "insukind"); 
			to_suppkind	= ds_grid_grd_clbsmast.getColumn(i, "suppkind"); 
			to_orddeptcd= ds_grid_grd_clbsmast.getColumn(i, "orddeptcd"); 

			
		}
	} 

	if ( clbs_from_cnt > 1 ) {
		sysf_messageBox("송신(FROM) 명세서를 동시에 선택", "E001"); //할 수 없습니다.	
		return false;
	}

	if ( clbs_to_cnt > 1 ) {
		sysf_messageBox("수신(TO) 명세서를 동시에 선택", "E001");//할 수 없습니다.	
		return false;
	}

	if ( clbs_from_cnt == 0 ) {
		sysf_messageBox("선택된 송신(FROM) 명세서가 ", "I004"); //없습니다.
		return false;
	}

	if ( clbs_to_cnt == 0 ) {
		sysf_messageBox("선택된 수신(TO) 명세서가 ", "I004"); //없습니다.
		return false;
	}

	// 상병 선택 사항 체크
	for(i = 0 ; i < ds_grid_grd_cldi.rowcount; i++ ) {
		if( ds_grid_grd_cldi.getColumn(i, "fromchk") == 1 ) {
			cldi_cnt++;
		}
	}
	
	// 원외처방 선택 사항 체크
	for ( i = 0; i < ds_grid_grd_clop.rowcount; i++) {
		if(ds_grid_grd_clop.getColumn(i, "fromchk") == 1 ) {
			clop_cnt++;
		}
	}
	// 처방 선택 사항 체크
	for ( i = 0; i < ds_grid_grd_clod.rowcount; i++) {
		if(ds_grid_grd_clod.getColumn(i, "fromchk") == 1 ) {
			clod_cnt++;
		}
	}

	
	if(cldi_cnt == 0 && clop_cnt == 0 && clod_cnt == 0
	&& chk_mclsp.value == "Y" && chk_mx999.value == "Y") {
		//명세서단위 특정내역, 청구메모 선택여부	
		messageBox("이동/복사 대상으로 선택된 처방/상병이 ", "I004"); //없습니다.
		return false;
	}
	
	if( (clod_cnt != 0 || clop_cnt != 0) 
	&& utlf_isNull(cmb_adjtresncd.value) ){
		sysf_messageBox("선택된 조정사유가", "I004"); //없습니다.
		return false;
	}
	

	var msg = "";
	// 혹시 모를 등록번호 체크
	if ( from_pid != to_pid ) {
		sysf_messageBox("등록번호가", "E004"); //일치하지 않습니다.
		return false;
	}
	// 청구년월 체크
	if ( from_clamym != to_clamym ) {
		msg = sysf_messageBox("청구년월이 일치하지 않습니다. 무시하고 작업", "S001"); //하시려면 예(Yes)\n아니면 아니오(No)
		if (msg != 6) {	// 6: yes
			return false;
		}						
	}
	// 입외구분 체크
	if ( from_ioflag != to_ioflag ) {
		msg = sysf_messageBox("입원, 외래 유형이 일치하지 않습니다. 무시하고 작업", "S001"); //하시려면 예(Yes)\n아니면 아니오(No)
		if (msg != 6) {	// 6: yes
			return false;
		}						
	}
	// 보험유형 체크
	if ( from_insukind != to_insukind ) {
		msg = sysf_messageBox("보험유형이 일치하지 않습니다. 무시하고 작업", "S001"); //하시려면 예(Yes)\n아니면 아니오(No)
		if (msg != 6) {	// 6: yes
			return false;
		}						
	}
	// 보조유형 체크
	if ( from_suppkind != to_suppkind ) {
		msg = sysf_messageBox("보조유형이 일치하지 않습니다. 무시하고 작업", "S001"); //하시려면 예(Yes)\n아니면 아니오(No)
		if (msg != 6) {	// 6: yes
			return false;
		}						
	}
	// 진료과 체크
	if ( from_orddeptcd != to_orddeptcd ) {
		msg = sysf_messageBox("진료과가 일치하지 않습니다. 무시하고 작업", "S001"); //하시려면 예(Yes)\n아니면 아니오(No)
		if (msg != 6) {	// 6: yes
			return false;
		}						
	}

	var smsg = "";
	// 사용자 최종확인
	if(rdo_jobflag.value == "M") {
		smsg = " ** 이동 - 원명세서에서는 삭제됩니다. ** " + "\n\n";
	}
	else if(rdo_jobflag.value == "C") {
		smsg = " ** 복사 - 처방을 똑같이 복사합니다. ** " + "\n\n";
	}
	else {
		sysf_messageBox("이동/복사 구분을", "C002"); //선택하십시오!
		return false;
	}
	
	smsg = smsg + "상병 - " + cldi_cnt + " 건" + "\n"
				+ "처방 - " + clod_cnt + " 건" + "\n"
				+ "원외 - " + clop_cnt + " 건" + "\n\n";
				
	
	if(rdo_jobflag.value == "M") {
		smsg = smsg + "선택된 내역을 이동";
	}
	else if(rdo_jobflag.value == "C") {
		smsg = smsg + "선택된 내역을 복사";
	}
	else {
		sysf_messageBox("이동/복사 구분을", "C002"); //선택하십시오!
		return false;
	}
	
	msg = sysf_messageBox(smsg, "S001"); //하시려면 예(Yes)\n아니면 아니오(No)
	if(msg != 6) {
		return false;
	}
	
	return true;
}

function lf_SetDocuMake() {
	
	ds_cond_TXPID20602_clbs.clearData();
	ds_cond_TXPID20602_cldi.clearData();
	ds_cond_TXPID20602_clod.clearData();
	ds_cond_TXPID20602_clop.clearData();
	
	var cnt = 0;
	for( i = 0 ; i < ds_grid_grd_clbsmast.rowcount; i++) {
		if( ds_grid_grd_clbsmast.getColumn(i, "tochk") == 1 ) {
			cnt++;
		}
	}//End for
	
	if(cnt > 0) {
		for( i = 0 ; i < cnt ; i++) {
			var clbs_aRow	= ds_cond_TXPID20602_clbs.addRow();
			
			
			// 작업유형(이동/복사)
			ds_cond_TXPID20602_clbs.setColumn(clbs_aRow, "jobflag", rdo_jobflag.value );
			// 명세서단위 특정내역
			ds_cond_TXPID20602_clbs.setColumn(clbs_aRow, "mclspyn", chk_mclsp.value );
			// 청구메모
			ds_cond_TXPID20602_clbs.setColumn(clbs_aRow, "mx999yn", chk_mx999.value );
			// 심사조정사유
			ds_cond_TXPID20602_clbs.setColumn(clbs_aRow, "adjtresncd", cmb_adjtresncd.value );
			
			// clbs from
			ds_cond_TXPID20602_clbs.setColumn(clbs_aRow, "f_clamym",ds_temp_patinfo.getColumn(0, "clamym") );
			ds_cond_TXPID20602_clbs.setColumn(clbs_aRow, "f_clamdg",ds_temp_patinfo.getColumn(0, "clamdg") );
			ds_cond_TXPID20602_clbs.setColumn(clbs_aRow, "f_pid",	ds_temp_patinfo.getColumn(0, "pid") );
			ds_cond_TXPID20602_clbs.setColumn(clbs_aRow, "f_pidsn",	ds_temp_patinfo.getColumn(0, "pidsn") );
			
			// clbs to
			var frow = ds_grid_grd_clbsmast.findRowExpr("tochk == 1");
			ds_cond_TXPID20602_clbs.setColumn(clbs_aRow, "t_clamym",ds_grid_grd_clbsmast.getColumn(frow, "clamym") );
			ds_cond_TXPID20602_clbs.setColumn(clbs_aRow, "t_clamdg",ds_grid_grd_clbsmast.getColumn(frow, "clamdg") );
			ds_cond_TXPID20602_clbs.setColumn(clbs_aRow, "t_pid",	ds_grid_grd_clbsmast.getColumn(frow, "pid") );
			ds_cond_TXPID20602_clbs.setColumn(clbs_aRow, "t_pidsn",	ds_grid_grd_clbsmast.getColumn(frow, "pidsn") );
		}
		
	}
	
	for(i = 0 ; i < ds_grid_grd_cldi.rowcount; i++) {
		if( ds_grid_grd_cldi.getColumn(i, "fromchk") == 1 ) {
			var aRow = ds_cond_TXPID20602_cldi.addRow();
			ds_cond_TXPID20602_cldi.setColumn(aRow, "clamym",	ds_grid_grd_cldi.getColumn(i, "clamym") );
			ds_cond_TXPID20602_cldi.setColumn(aRow, "clamdg",	ds_grid_grd_cldi.getColumn(i, "clamdg") );
			ds_cond_TXPID20602_cldi.setColumn(aRow, "pid",		ds_grid_grd_cldi.getColumn(i, "pid") );
			ds_cond_TXPID20602_cldi.setColumn(aRow, "pidsn",	ds_grid_grd_cldi.getColumn(i, "pidsn") );
			ds_cond_TXPID20602_cldi.setColumn(aRow, "workflag",	ds_grid_grd_cldi.getColumn(i, "workflag") );
			ds_cond_TXPID20602_cldi.setColumn(aRow, "seqno",	ds_grid_grd_cldi.getColumn(i, "seqno") );
		}
	}

	
	// clop 원외처방
	for(i = 0 ; i < ds_grid_grd_clop.rowcount ; i++) {
		if( ds_grid_grd_clop.getColumn(i, "fromchk") == 1 ) {
			var aRow = ds_cond_TXPID20602_clop.addRow();
			ds_cond_TXPID20602_clop.setColumn(aRow, "clamym",	ds_grid_grd_clop.getColumn(i, "clamym") );
			ds_cond_TXPID20602_clop.setColumn(aRow, "clamdg",	ds_grid_grd_clop.getColumn(i, "clamdg") );
			ds_cond_TXPID20602_clop.setColumn(aRow, "pid",		ds_grid_grd_clop.getColumn(i, "pid") );
			ds_cond_TXPID20602_clop.setColumn(aRow, "pidsn",	ds_grid_grd_clop.getColumn(i, "pidsn") );
			ds_cond_TXPID20602_clop.setColumn(aRow, "workflag",	ds_grid_grd_clop.getColumn(i, "workflag") );
			ds_cond_TXPID20602_clop.setColumn(aRow, "seqno",	ds_grid_grd_clop.getColumn(i, "seqno") );
		}
	}
	
	
	
	// clod 처방
	for(i = 0 ; i < ds_grid_grd_clod.rowcount; i++) {
		if( ds_grid_grd_clod.getColumn(i, "fromchk") == 1 ) {
			var aRow = ds_cond_TXPID20602_clod.addRow();
			ds_cond_TXPID20602_clod.setColumn(aRow, "clamym",	ds_grid_grd_clod.getColumn(i, "clamym") );
			ds_cond_TXPID20602_clod.setColumn(aRow, "clamdg",	ds_grid_grd_clod.getColumn(i, "clamdg") );
			ds_cond_TXPID20602_clod.setColumn(aRow, "pid",		ds_grid_grd_clod.getColumn(i, "pid") );
			ds_cond_TXPID20602_clod.setColumn(aRow, "pidsn",	ds_grid_grd_clod.getColumn(i, "pidsn") );
			ds_cond_TXPID20602_clod.setColumn(aRow, "workflag",	ds_grid_grd_clod.getColumn(i, "workflag") );
			ds_cond_TXPID20602_clod.setColumn(aRow, "seqno",	ds_grid_grd_clod.getColumn(i, "seqno") );
		}
	}
	
	tranf_submit({
		id: "TXPID20602"
		, service: "aftjudgapp.DocuManage"
		, method: "reqExeDocuManageClodCopy"
		, inds:  "clbs=ds_cond_TXPID20602_clbs cldi=ds_cond_TXPID20602_cldi clop=ds_cond_TXPID20602_clop clod=ds_cond_TXPID20602_clod"
		, callback: "cbf_TXPID20602"
		, async: false
	});

	return true;
}

function pmn_popupMenu_onmenuclick_cldi(obj:PopupMenu, e:MenuClickEventInfo) {
	if( e.id == "sel" ) { //선택
		ds_grid_grd_cldi.setColumn(ds_grid_grd_cldi.rowposition, "fromchk", 1);
	}
	else if(e.id == "del") { //삭제
		ds_grid_grd_cldi.setColumn(ds_grid_grd_cldi.rowposition, "fromchk", 0);
	}
	else{
		return;
	}
}

function pmn_popupMenu_onmenuclick_clop(obj:PopupMenu, e:MenuClickEventInfo) {
	if( e.id == "sel" ) { //선택
		ds_grid_grd_clop.setColumn(ds_grid_grd_clop.rowposition, "fromchk", 1);
	}
	else if(e.id == "del") { //삭제
		ds_grid_grd_clop.setColumn(ds_grid_grd_clop.rowposition, "fromchk", 0);
	}
	else{
		return;
	}
}

function pmn_popupMenu_onmenuclick_clod(obj:PopupMenu, e:MenuClickEventInfo) {
	if( e.id == "sel" ) { //선택
		ds_grid_grd_clod.setColumn(ds_grid_grd_clod.rowposition, "fromchk", 1);
	}
	else if(e.id == "del") { //삭제
		ds_grid_grd_clod.setColumn(ds_grid_grd_clod.rowposition, "fromchk", 0);
	}
	else{
		return;
	}
}

function SMPID23200_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);  // 화면공통
	
	//그리드 컬럼 고정
	lf_grid_stop_clod(grd_clod);
	lf_grid_stop_clop(grd_clop);
	
	//마우스 우클릭 이벤트 세팅
	frmf_createPopupMenu("pmn_popupMenu", "pmn_popupMenu_onmenuclick_cldi", [{id: "sel", level: "1", title: "선택"}
																			,{id: "del", level: "1", title: "삭제"}]);
	frmf_createPopupMenu("pmn_popupMenu", "pmn_popupMenu_onmenuclick_clop", [{id: "sel", level: "1", title: "선택"}
																			,{id: "del", level: "1", title: "삭제"}]);
	frmf_createPopupMenu("pmn_popupMenu", "pmn_popupMenu_onmenuclick_clod", [{id: "sel", level: "1", title: "선택"}
																			,{id: "del", level: "1", title: "삭제"}]);

	
	// 공통코드를 조회한다.
	appf_getCodeList( [{cdGrpId: "P0008", dsNm: "ds_init_P0008"}	// 보험유형
					,  {cdGrpId: "P0010", dsNm: "ds_init_P0010"}	// 보조유형
					,  {cdGrpId: "P0155", dsNm: "ds_init_P0155"}	// 청구구분
					,  {cdGrpId: "P0430", dsNm: "ds_init_P0430"}	// 청구상태
					,  {cdGrpId: "P0151", dsNm: "ds_init_P0151"}	// 심사상태
					,  {cdGrpId: "P0127", dsNm: "ds_init_P0127"}	// 심사조정사유
	]);
	
	ds_init_P0010.insertRow(0);
	ds_init_P0010.setColumn(0,"cdid","");
	ds_init_P0010.setColumn(0,"cdnm","");
	
	ds_init_P0008.insertRow(0);
	ds_init_P0008.setColumn(0,"cdid","");
	ds_init_P0008.setColumn(0,"cdnm","");
	
	var rowCnt = ds_init_P0127.rowcount;
	ds_init_P0127.addColumn("cdid_cdnm", "STRING");
	for( i = 0 ; i < rowCnt ; i++) {
		var str = "[" + ds_init_P0127.getColumn(i, "cdid") + "] " + ds_init_P0127.getColumn(i, "cdnm");
		ds_init_P0127.setColumn(i, "cdid_cdnm", str );
	}
	
	if( frmf_checkOpener() ) {
	// 팝업으로 호출되었으면... 등록번호가 있는 경우 조회를 바로 한다.
		ds_temp_patinfo.copyData(objDs);

		var pid		= ds_temp_patinfo.getColumn(0, "pid");
		var ioflag	= ds_temp_patinfo.getColumn(0, "ioflag");
		var clamym	= ds_temp_patinfo.getColumn(0, "clamym");
		var clamdg	= ds_temp_patinfo.getColumn(0, "clamdg");
		var pidsn	= ds_temp_patinfo.getColumn(0, "pidsn");
		var patnm	= ds_temp_patinfo.getColumn(0, "patnm");
		var insukind= ds_temp_patinfo.getColumn(0, "insukind");
		var suppkind= ds_temp_patinfo.getColumn(0, "suppkind");
		var orddeptcd=ds_temp_patinfo.getColumn(0, "orddeptcd");
		
		//TRPID20309
		var sInDs = dsf_createDsRow("ds_cond_TRPID20309"
			,  {col: "ioflag"	, val: ioflag}	
		);
			
		tranf_submit({
			id: "TRPID20309"
			, service: "aftjudgapp.InAftJudgTrgtMan"  
			, method: "reqGetDeptCDDrID" 
			, inds:  "req=ds_cond_TRPID20309"
			, outds:  "ds_init_orddeptcd=orddeptcd ds_init_orddeptcd2=orddeptcd2 ds_init_orddrid=orddrid ds_init_orddrid2=orddrid2"
		});

		
		if( !utlf_isNull(pid) ) {
			//FROM
			group1.input4.value		= pid;
			group1.input6.value		= pidsn;
			group1.input5.value		= patnm;
			group1.input00.value	= clamym;
			group1.input3.value		= clamdg;
			
			//To
			Div00.cp_monthCal01.setData(clamym);
			Div00.cmb_clamdg.value		= clamdg;
			Div00.cmb_insukind.value	= insukind;
			Div00.cmb_ioflag.value		= ioflag;
			Div00.cmb_orddeptcd.value	= orddeptcd;
			Div00.cmb_suppkind.value	= suppkind;
		
		}
	}	

		
	lf_Initialize(); // 초기화
	
	
	if( !utlf_isNull(ds_temp_patinfo.getColumn(0, "clamym") ) ) {
		// 명세서 리스트 조회
		lf_GetDocuList();
	}
	
	//그리드 정렬
	grdf_setGridSort(grd_clbsmast);
	grdf_setGridSort(grd_cldi);
	grdf_setGridSort(grd_clod);
	grdf_setGridSort(grd_clop);
	
}

function btn_select_onclick(obj:Button, e:ClickEventInfo)
{
	lf_GetDocuList();
}

function btn_init_onclick(obj:Button, e:ClickEventInfo)
{
	lf_Initialize(); // 초기화					
}

function btn_copy_onclick(obj:Button, e:ClickEventInfo)
{

	// 작업전 유효성 검사
	if ( !lf_Validcheck() ) { // 유효하지 않으면 false 리턴
		return;
	}
	
	// 실제저장
	if( !lf_SetDocuMake() ) {
		return;
	}
	
	//저장이 완료되면 처방이동상태 확인위해 처방 다시 조회
	lf_GetClodList();
					
}

function btn_cldi_check_onclick(obj:Button, e:ClickEventInfo)
{
	lf_SetGridCheckYN(grd_cldi, 1);
}

function btn_cldi_nocheck_onclick(obj:Button, e:ClickEventInfo)
{
	lf_SetGridCheckYN(grd_cldi, 0);
}

function btn_clop_check_onclick(obj:Button, e:ClickEventInfo)
{
	lf_SetGridCheckYN(grd_clop, 1);
}

function btn_clop_nocheck_onclick(obj:Button, e:ClickEventInfo)
{
	lf_SetGridCheckYN(grd_clop, 0);
}

function btn_clod_check_onclick(obj:Button, e:ClickEventInfo)
{
	lf_SetGridCheckYN(grd_clod, 1);
}

function btn_clod_nocheck_onclick(obj:Button, e:ClickEventInfo)
{
	lf_SetGridCheckYN(grd_clod, 0);
}

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

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

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

function rdo_jobflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	switch(obj.value) {
		case "M": //이동
			btn_copy.text = "이동";
			break;
		case "C": //복사
			btn_copy.text = "복사";
			break;
		default: //기본값은 이동
			btn_copy.text = "이동";
			break;
	}
}

function cbf_TXPID20602(sSvcId, nErrorCode, sErrorMsg) {
	if(nErrorCode < 0) {
		sysf_messageBox("저장을", "E009"); //실패하였습니다.
	}
	else {
		sysf_messageBox("요청 작업이", "I001"); //처리되었습니다.
	}
}

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

function Menu00_onmenuclick(obj:Menu, e:MenuClickEventInfo)
{
	
}

function Div00_cmb_ioflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	
	ds_cond_TRPID20407.setColumn(0, "ioflag",	obj.value);
	lf_GetClamdg();
}
]]></Script>
  </Form>
</FDL>