YNU_JEUS/app_home/himed/xpapps/pam/clamuncoxp/xp/SMPIF72000_반송재청구장부(자보).xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPIF72000" position="absolute 0 0 1205 757" titletext="반송재청구장부(자보)" oninit="SMPIF72000_oninit" onload="SMPIF72000_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 1 13 1204 750" id="group4" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Div position="absolute 0 11 1194 71" align="align:center top;" id="group5" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Button position="absolute 1123 20 1179 42" id="button1" class="btn1" text="조회" anchor="top right" onclick="group4_group5_button1_onclick"/>
                    <Shape position="absolute 1105 6 1111 53" linetype="vertical" id="line26" class="line_4" anchor="top right"/>
                    <Static text="~" position="absolute 219 8 234 23" id="caption31" anchor="default"/>
                    <Radio position="absolute 10 7 125 24" id="rdo_termflag" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default" onitemchanged="group4_group5_rdo_termflag_onitemchanged">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn"/>
                          <Column id="datacolumn"/>
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">clamym</Col>
                            <Col id="datacolumn">청구월</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">uncoym</Col>
                            <Col id="datacolumn">미수월</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Radio>
                    <Static text="내원유형 :" position="absolute 575 6 665 23" id="caption67" class="search_name" anchor="default"/>
                    <Static text="손보사명 :" position="absolute 365 7 455 24" id="caption63" class="search_name" anchor="default"/>
                    <Static text="완료여부 :" position="absolute 817 6 907 23" id="caption22" class="search_name" anchor="default"/>
                    <Static text="심사자 :" position="absolute 11 35 86 52" id="caption38" class="search_name" anchor="default"/>
                    <Static text="진료과 :" position="absolute 275 35 350 52" id="caption39" class="search_name" anchor="default"/>
                    <Static text="환자단위조회 :" position="absolute 575 35 687 52" id="caption40" class="search_name" anchor="default"/>
                    <Combo position="absolute 90 34 180 53" id="cmb_judgrid" class="combo_search" innerdataset="@ds_init_judgrid_judgridlist" datacolumn="judgrnm" codecolumn="judgrid" anchor="default"/>
                    <Combo position="absolute 355 34 495 53" id="cmb_orddeptcd" class="combo_search" innerdataset="@ds_init_orddeptcd_orddeptcdlist" datacolumn="nm" codecolumn="cd" anchor="default"/>
                    <Radio position="absolute 655 5 790 22" id="rdo_ioflag" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn"/>
                          <Column id="datacolumn"/>
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">A</Col>
                            <Col id="datacolumn">전체</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">I</Col>
                            <Col id="datacolumn">입원</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">O</Col>
                            <Col id="datacolumn">외래</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Radio>
                    <Radio position="absolute 902 5 1063 22" id="rdo_endyn" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn"/>
                          <Column id="datacolumn"/>
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">A</Col>
                            <Col id="datacolumn">전체</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">Y</Col>
                            <Col id="datacolumn">완료</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">N</Col>
                            <Col id="datacolumn">미완료</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Radio>
                    <Edit position="absolute 681 33 771 52" id="ipt_patunitsrch" class="input_search" anchor="default" onkeydown="group4_group5_ipt_patunitsrch_onkeydown"/>
                    <Combo position="absolute 449 5 539 24" id="combo1" class="combo_search" innerdataset="@ds_init_U0001list" datacolumn="nm" codecolumn="cd" anchor="default"/>
                    <Button id="btn_srchchoicd" taborder="1" onclick="group4_group5_btn_srchchoicd_onclick" class="icon_search" position="absolute 772 32 792 52" anchor="default"/>
                    <cp_monthCal id="ipt_fromdd" titletext="monthCalendar" taborder="2" text="cp_monthCal00" scrollbars="none" position="absolute 140 4 215 24" anchor="default"/>
                    <cp_monthCal id="ipt_todd" titletext="monthCalendar" taborder="3" text="cp_monthCal00" scrollbars="none" position="absolute 231 5 306 25" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Button position="absolute 815 77 857 96" id="button26" class="btn2" visible="false" text="저장" anchor="top right"/>
              <Button position="absolute 966 77 1019 96" id="button3" class="btn2" text="행카피" anchor="top right" onclick="group4_button3_onclick"/>
              <Button position="absolute 1020 77 1114 96" id="button4" class="btn7" text="Open Excel" anchor="top right" onclick="group4_button4_onclick"/>
              <Button position="absolute 912 77 965 96" id="button5" class="btn2" text="열카피" anchor="top right" onclick="group4_button5_onclick"/>
              <Shape position="absolute 0 96 1195 102" linetype="horizontal" id="line27" class="line_1" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
              <Static text="반송(전체)" position="absolute 0 80 89 101" id="cap_title" class="tit_2" anchor="default"/>
              <Grid position="absolute 0 101 1195 731" id="grd_sendreclambookspec" class="datagrid2" binddataset="ds_main_list01_gridsendreclambookspec" anchor="all" oncellclick="group4_grd_sendreclambookspec_oncellclick" onkeydown="group4_grd_sendreclambookspec_onkeydown" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="23"/>
                      <Column size="60"/>
                      <Column size="88"/>
                      <Column size="40"/>
                      <Column size="60"/>
                      <Column size="40"/>
                      <Column size="125"/>
                      <Column size="50"/>
                      <Column size="75"/>
                      <Column size="50"/>
                      <Column size="85"/>
                      <Column size="50"/>
                      <Column size="157"/>
                      <Column size="0"/>
                      <Column size="80"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="0"/>
                      <Column size="101"/>
                      <Column size="0"/>
                      <Column size="80"/>
                      <Column size="58"/>
                      <Column size="68"/>
                      <Column size="81"/>
                      <Column size="109"/>
                      <Column size="60"/>
                      <Column size="80"/>
                      <Column size="258"/>
                    </Columns>
                    <Rows>
                      <Row size="32" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1" text="청구월"/>
                      <Cell col="2" text="청구구분"/>
                      <Cell col="3" text="청구&#10;차수"/>
                      <Cell col="4" text="미수월"/>
                      <Cell col="5" text="내원&#10;유형"/>
                      <Cell col="6" text="손보사명"/>
                      <Cell col="7" text="명일련"/>
                      <Cell col="8" text="등록번호"/>
                      <Cell col="9" text="수진자"/>
                      <Cell col="10" text="진료과"/>
                      <Cell col="11" text="심사자"/>
                      <Cell col="12" text="사유"/>
                      <Cell col="13" text="사유설명"/>
                      <Cell col="14" text="청구액"/>
                      <Cell col="15" text="재청구여부"/>
                      <Cell col="16" text="부제기사유"/>
                      <Cell col="17" text="부제기사유메모"/>
                      <Cell col="18" text="보완청구액 - &#10;원청구액"/>
                      <Cell col="19" text="차액발생&#10;사유"/>
                      <Cell col="20" text="보왕청구&#10;연월"/>
                      <Cell col="21" text="청구&#10;차수"/>
                      <Cell col="22" text="보완&#10;심사자"/>
                      <Cell col="23" text="보완청구&#10;일자"/>
                      <Cell col="24" text="청구액"/>
                      <Cell col="25" text="재반송&#10;여부"/>
                      <Cell col="26" text="자보실삭감액"/>
                      <Cell col="27" text="비고"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" expr="currow+1"/>
                      <Cell col="1" displaytype="date" text="bind:clamym" mask="yyyy-MM"/>
                      <Cell col="2" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:clamflag" combodataset="ds_init_P0121list" combocodecol="cdid" combodatacol="cdnm"/>
                      <Cell col="3" text="bind:clamdg"/>
                      <Cell col="4" displaytype="date" text="bind:uncoym" mask="yyyy-MM"/>
                      <Cell col="5" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:ioflag" combodataset="ds_cmb_ioflag" combocodecol="value" combodatacol="label"/>
                      <Cell col="6" displaytype="combo" edittype="combo" text="bind:insucmpymark" combodataset="ds_init_U0001list" combocodecol="cd" combodatacol="nm"/>
                      <Cell col="7" text="bind:docuseqno"/>
                      <Cell col="8" text="bind:pid"/>
                      <Cell col="9" text="bind:patnm"/>
                      <Cell col="10" displaytype="combo" edittype="combo" text="bind:orddeptcd" combodataset="ds_init_orddeptcd_orddeptcdlist" combocodecol="cd" combodatacol="nm"/>
                      <Cell col="11" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:judgrid" combodataset="ds_init_judgrid_judgridlist" combocodecol="judgrid" combodatacol="judgrnm"/>
                      <Cell col="12" displaytype="combo" edittype="combo" text="bind:sendresncd" combodataset="ds_init_P0242list" combocodecol="cdid" combodatacol="cdnm"/>
                      <Cell col="13" text="bind:reteresnrem"/>
                      <Cell col="14" displaytype="number" text="bind:clamamt"/>
                      <Cell col="15" text="bind:reclamyn"/>
                      <Cell col="16" text="bind:abdresncd"/>
                      <Cell col="17" text="bind:abdresnmemo"/>
                      <Cell col="18" displaytype="number" text="bind:sendamt"/>
                      <Cell col="19" text="bind:sendresncd"/>
                      <Cell col="20" displaytype="date" text="bind:reclamym" mask="yyyy-MM"/>
                      <Cell col="21" text="bind:reclamdg"/>
                      <Cell col="22" text="bind:rejudgrid"/>
                      <Cell col="23" displaytype="date" text="bind:acptdd" mask="yyyy-MM-dd"/>
                      <Cell col="24" displaytype="number" text="bind:clamamt"/>
                      <Cell col="25" text="bind:reclamyn"/>
                      <Cell col="26" displaytype="number" text="bind:orgcutamt"/>
                      <Cell col="27" displaytype="text" edittype="text" text="bind:rem"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 858 77 911 96" id="button10" class="btn2" text="셀카피" anchor="top right" onclick="group4_button10_onclick"/>
              <Button position="absolute 1115 77 1195 96" id="button12" class="btn7" text="엑셀저장" anchor="top right" onclick="group4_button12_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption6" text="반송재청구장부(자보)" class="tit_1" position="absolute 1 0 249 23"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="termflag" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="insukind" type="STRING" size="256"/>
          <Column id="reteflag" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="acptno" type="STRING" size="256"/>
          <Column id="judgrid" type="STRING" size="256"/>
          <Column id="endyn" type="STRING" size="256"/>
          <Column id="ordfildcd" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="patunitsrch1" type="STRING" size="256"/>
          <Column id="patunitsrch2" type="STRING" size="256"/>
          <Column id="insucmpymark" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="termflag">clamym</Col>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="insukind">00</Col>
            <Col id="reteflag">1</Col>
            <Col id="ioflag">A</Col>
            <Col id="acptno"/>
            <Col id="judgrid"/>
            <Col id="endyn"/>
            <Col id="ordfildcd"/>
            <Col id="orddeptcd"/>
            <Col id="patunitsrch1"/>
            <Col id="patunitsrch2"/>
            <Col id="insucmpymark"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_list01_gridsendreclambookspec" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamym" type="STRING" size="256" sumtext="청구월"/>
          <Column id="clamflag" type="STRING" size="256" sumtext="청구형태"/>
          <Column id="clamdg" type="STRING" size="256" sumtext="청구차수"/>
          <Column id="uncoym" type="STRING" size="256" sumtext="미수월"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="내원유형"/>
          <Column id="insucmpymark" type="STRING" size="256" sumtext="보험사기호"/>
          <Column id="docuseqno" type="STRING" size="256" sumtext="명일련"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="patnm" type="STRING" size="256" sumtext="수진자"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
          <Column id="judgrid" type="STRING" size="256" sumtext="심사자"/>
          <Column id="sendresncd" type="STRING" size="256" sumtext="사유"/>
          <Column id="reteresnrem" type="STRING" size="256" sumtext="사유"/>
          <Column id="clamamt" type="STRING" size="256" sumtext="청구액"/>
          <Column id="reclamyn" type="STRING" size="256" sumtext="재청구여부"/>
          <Column id="abdresncd" type="STRING" size="256" sumtext="부제기사유"/>
          <Column id="abdresnmemo" type="STRING" size="256" sumtext="부제기사유메모"/>
          <Column id="sendamt" type="STRING" size="256" sumtext="보완청구액"/>
          <Column id="sendresncd" type="STRING" size="256" sumtext="반송사유코드"/>
          <Column id="reclamym" type="STRING" size="256" sumtext="재청구년월"/>
          <Column id="reclamdg" type="STRING" size="256" sumtext="재청구차수"/>
          <Column id="rejudgrid" type="STRING" size="256" sumtext="보완심사자"/>
          <Column id="acptdd" type="STRING" size="256" sumtext="보완청구일자"/>
          <Column id="clamamt" type="STRING" size="256" sumtext="청구액"/>
          <Column id="reclamyn" type="STRING" size="256" sumtext="재청구여부"/>
          <Column id="orgcutamt" type="STRING" size="256" sumtext="실삭감액"/>
          <Column id="rem" type="STRING" size="256" sumtext="비고"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_U0001list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="cd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_judgrid_judgridlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="judgrid" type="STRING" size="256" sumtext="심사자ID"/>
          <Column id="judgrnm" type="STRING" size="256" sumtext="심사자명"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_orddeptcd_orddeptcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="cd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0114list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0242list" 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_P0121list" 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_ioflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">입원</Col>
            <Col id="value">I</Col>
          </Row>
          <Row>
            <Col id="label">외래</Col>
            <Col id="value">O</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_sppmc02500_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchcond" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group4.group5.rdo_termflag" propid="value" datasetid="ds_send" columnid="termflag"/>
      <BindItem id="item3" compid="group4.group5.combo1" propid="value" datasetid="ds_send" columnid="insucmpymark"/>
      <BindItem id="item4" compid="group4.group5.ipt_patunitsrch" propid="value" datasetid="ds_send" columnid="patunitsrch1"/>
      <BindItem id="item1" compid="group4.group5.rdo_ioflag" propid="value" datasetid="ds_send" columnid="ioflag"/>
      <BindItem id="item2" compid="group4.group5.rdo_endyn" propid="value" datasetid="ds_send" columnid="endyn"/>
      <BindItem id="item5" compid="group4.group5.cmb_judgrid" propid="value" datasetid="ds_send" columnid="judgrid"/>
      <BindItem id="item6" compid="group4.group5.cmb_orddeptcd" propid="value" datasetid="ds_send" columnid="orddeptcd"/>
    </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 col = "N";
function SMPIF72000_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPIF72000_onload(obj:Form, e:LoadEventInfo)
{	
	group4.group5.ipt_fromdd.setCallEvent("fn_cp_monthCal00");
	group4.group5.ipt_todd.setCallEvent("fn_cp_monthCal01");
	
	ds_send.setColumn(0, "fromdd", String(utlf_getCurrentDate()).substr(0,6));
	ds_send.setColumn(0, "todd", String(utlf_getCurrentDate()).substr(0,6));
	
	group4.group5.ipt_fromdd.setFocus();
	
	var oParam = {};
		oParam.id          = "TRPIF70305";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetInsuComp";
		oParam.inds        = "";
		oParam.outds       = "ds_init_U0001list=U0001";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIF70305";

	tranf_submit(oParam);

	var arrParam = [{dsNm: "ds_init_P0114list", cdGrpId: "P0114"}
				   ,{dsNm: "ds_init_P0242list", cdGrpId: "P0242"}
				   ,{dsNm: "ds_init_P0121list", cdGrpId: "P0121"}]
				   
	appf_getCodeList(arrParam);
	
	dsf_createDsRow("ds_req", [{ col: "clamym", type: "string", size: 256, val: ds_send.getColumn(0, "fromdd")}
							,  { col: "clamtoym", type: "string", size: 256, val: ""}
							,  { col: "ioflag", type: "string", size: 256, val: ds_send.getColumn(0, "ioflag")}
							,  { col: "insukind", type: "string", size: 256, val: ""}
							,  { col: "judgid", type: "string", size: 256, val: ""}
							,  { col: "ordflag", type: "string", size: 256, val: ""}
							,  { col: "scrnid", type: "string", size: 256, val: frmf_getScreenID()}]);
							
	var oParam = {};
		oParam.id          = "TRPID20201";
		oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
		oParam.method      = "reqGetInitComCd";
		oParam.inds        = "req=ds_req";
		oParam.outds       = "ds_init_judgrid_judgridlist=judgrid ds_init_orddeptcd_orddeptcdlist=orddeptcd";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPID20201";

	tranf_submit(oParam);
}

function fn_cp_monthCal00()
{
	var month = group4.group5.ipt_fromdd.getData();
	
	ds_send.setColumn(0, "fromdd", month);
	ds_send.setColumn(0, "todd", month);
	
	group4.group5.ipt_todd.setData(month);
}

function fn_cp_monthCal01()
{
	var month = group4.group5.ipt_todd.getData();
	
	ds_send.setColumn(0, "todd", month);
}

function group4_group5_rdo_termflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	ds_send.setColumn(0, "fromdd", "");
	ds_send.setColumn(0, "todd", "");
	
	group4.group5.ipt_fromdd.setData("");
	group4.group5.ipt_todd.setData("");
}

function group4_group5_ipt_patunitsrch_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		if(String(obj.value).length > 1)
		{
			ds_send.setColumn(0, "patunitsrch1", obj.value);
			
			fPatTypeSrch();
		}
	}
}

function group4_group5_btn_srchchoicd_onclick(obj:Button,  e:ClickEventInfo)
{
	fPatTypeSrch();
}

function fPatTypeSrch()
{
	var ipt_pid = ds_send.getColumn(0, "patunitsrch1");
	
	if (ipt_pid) 
	{
		if(ipt_pid.isNumber()) 
		{
			ds_hidden_sppmc02500_cond.setColumn(0, "srchcond", "1");
			ds_hidden_sppmc02500_cond.setColumn(0, "pid", ipt_pid);
		} 
		else 
		{
			ds_hidden_sppmc02500_cond.setColumn(0, "srchcond", "2");
			ds_hidden_sppmc02500_cond.setColumn(0, "hngnm", ipt_pid);
		}
	} 
	else 
	{
		ds_hidden_sppmc02500_cond.clearData();
		ds_hidden_sppmc02500_cond.addRow();
	}
	
	var objArg = new Object();
		objArg.arg_ds_send= ds_hidden_sppmc02500_cond;
		
	frmf_modal("SPPMC02500", "SPPMC02500", objArg, "", "", "", "", "", "", "", "", "", "M");

	if (!utlf_isNull(ipt_pid))
	{
		if(ipt_pid.isNumber()) 
		{
			var srch_pid = ds_patinfolist.getColumn(0, "pid");
			ds_send.setColumn(0, "patunitsrch1", srch_pid);
		} 
		else 
		{
			var srch_pid = ds_patinfolist.getColumn(0, "hngnm");
			ds_send.setColumn(0, "patunitsrch1", srch_pid);
		}
	} 
	else 
	{
		var srch_pid = ds_patinfolist.getColumn(0, "pid");

		ds_send.setColumn(0, "patunitsrch1", srch_pid);
	}

	fGetInAftJudgTrgtManList();
}
	
function fGetInAftJudgTrgtManList()
{
	var patunitsrch1 = ds_send.getColumn(0, "patunitsrch1");

	ds_send.setColumn(0, "patunitsrch1", patunitsrch1);
	
	if (utlf_isNull(patunitsrch1))
	{
		ds_send.setColumn(0, "patunitsrch2", "");
	}
	else if (patunitsrch1.isNumber()) 
	{
		ds_send.setColumn(0, "patunitsrch2", "pidSrch");
	} 
	else 
	{
		if (patunitsrch1.length > 1) 
		{
			ds_send.setColumn(0, "patunitsrch2", "nmSrch");
		} 
		else 
		{	
			ds_send.setColumn(0, "patunitsrch2", "");
			
			sysf_messageBox("환자단위조회시 검색할 환자이름은 2글자 이상", "C001");	///환자단위조회시 검색할 환자이름은 2글자 이상 입력하십시오.
			return;
		}
	}
}

function group4_group5_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var oParam = {};
		oParam.id          = "TRPIF72001";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetSendReClamBookSpecJabo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_list01_gridsendreclambookspec=gridsendreclambookspec";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIF72001";

	tranf_submit(oParam);
}

function group4_button10_onclick(obj:Button,  e:ClickEventInfo)
{
	col = "N";
	group4.grd_sendreclambookspec.selecttype = "multiarea";
}

function group4_button5_onclick(obj:Button,  e:ClickEventInfo)
{
	col = "Y";
	group4.grd_sendreclambookspec.selecttype = "multiarea";
}

function group4_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	col = "N";
	group4.grd_sendreclambookspec.selecttype = "multirow";
}

function group4_button4_onclick(obj:Button,  e:ClickEventInfo)
{
	system.execShell("excel");
}

function group4_button12_onclick(obj:Button,  e:ClickEventInfo)
{
	var today = new Date();
						
	var yy = today.getYear()+"";
	var mm = today.getMonth()+1;
	var dd = today.getDate();
	
	var title = "";

	if(mm < 10) 
	{ 
		mm = "0" + mm; 
	}
	else 
	{ 
		mm = mm + ""; 
	}
	
	if(dd < 10) 
	{ 
		dd = "0" + dd; 
	}  
	else 
	{ 
		dd = dd + ""; 
	}

	var tmp = yy + mm + dd;
	
	var title = "반송재청구장부(자보)_"+tmp;
	
	if (ds_main_list01_gridsendreclambookspec.rowcount < 1)
	{
		return;
	}
	else
	{
		grdf_exportExcel(group4.grd_sendreclambookspec, title, "see");
	}
}

function group4_grd_sendreclambookspec_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	var lv_nAreaStartRow;
	var lv_nAreaEndRow;
	var lv_nAreaStartCol;
	var lv_nAreaEndCol;

	if(col == "Y")
	{
		lv_nAreaStartRow = 0;
		lv_nAreaEndRow   = parseInt(obj.rowcount-1);
		lv_nAreaStartCol = parseInt(obj.currentcol);
		lv_nAreaEndCol   = parseInt(obj.currentcol);
		
		grdf_initGridStyle(obj);
		
		for(var nRow = lv_nAreaStartRow; nRow <= lv_nAreaEndRow; nRow++) 
		{
			for(var nCell = lv_nAreaStartCol; nCell <= lv_nAreaEndCol; nCell++) 
			{
				obj.setCellProperty("body",nCell,"background","#FFE7E5");
				obj.setCellProperty("body",nCell,"background2","#FFE7E5");
			}
		}
	}
	else
	{
		grdf_initGridStyle(obj);		
	}
}

function group4_grd_sendreclambookspec_onkeydown(obj:Grid, e:KeyEventInfo)
{
	if(col == "Y")
	{
		var CONST_SEPARATOR = "	";	//컬럼별 구분자
		var lv_oBindDs = eval(obj.binddataset);
		var lv_sColID;
		var lv_sVal;
		var lv_sClipboard = "";
		var lv_nAreaStartRow;
		var lv_nAreaEndRow;
		var lv_nAreaStartCol;
		var lv_nAreaEndCol;
	   
		if(obj.selecttype == "multiarea") 
		{
			lv_nAreaStartRow = 0;
			lv_nAreaEndRow   = parseInt(obj.rowcount-1);
			lv_nAreaStartCol = parseInt(obj.currentcol);
			lv_nAreaEndCol   = parseInt(obj.currentcol);
		} 
		
		for(var nRow = lv_nAreaStartRow; nRow <= lv_nAreaEndRow; nRow++) 
		{
			for(var nCell = lv_nAreaStartCol; nCell <= lv_nAreaEndCol; nCell++) 
			{
				lv_sColID = obj.getCellProperty("body",nCell,"text");
				lv_sVal = obj.getCellValue(nRow,nCell);
				lv_sClipboard = lv_sClipboard + lv_sVal + CONST_SEPARATOR;
			}

			lv_sClipboard = lv_sClipboard.substr(0,lv_sClipboard.length-1);
			lv_sClipboard = lv_sClipboard +String.fromCharCode(10);
		}

		lv_sClipboard = lv_sClipboard.substr(0,lv_sClipboard.length-1);
		
		iv_sClipboard = lv_sClipboard;	
		
		system.setClipboard("CF_TEXT",lv_sClipboard);
	}
	else
	{
		if (e.ctrlKey == true && e.keycode == 67 )
		{
			grdf_clipboardCopy(obj, "PAM");
		}
	}
}
]]></Script>
  </Form>
</FDL>