YNU_JEUS/app_home/himed/xpapps/sts/stspamxp/xp/SPSTP01100_통합수익집계.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPSTP01100" position="absolute 0 0 1199 784" titletext="수익집계" oninit="SPSTP01100_oninit" onload="SPSTP01100_onload">
    <Layouts>
      <Layout>
        <Button position="absolute 1145 74 1195 93" id="btn_excel" class="btn7" taborder="30" text="엑셀" anchor="top right" onclick="btn_excel_onclick"/>
        <Button position="absolute 1145 74 1195 93" id="btn_excel2" class="btn7" visible="false" text="엑셀" anchor="top right" onclick="btn_excel2_onclick"/>
        <Grid position="absolute 0 98 1195 773" id="grd_main" binddataset="ds_main_gridlist_gridinfo" oncelldblclick="grd_main_oncelldblclick" anchor="all">
          <Formats>
            <Format id="default"/>
          </Formats>
        </Grid>
        <Grid position="absolute 605 98 1195 773" id="grd_ptlist" visible="false" anchor="top right bottom" autoenter="select" cellsizingtype="col" binddataset="ds_main_ptlist_gridinfo">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="30"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Div id="grp_sea" taborder="31" position="absolute 0 23 1195 63" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout width="1195" height="40"/>
          </Layouts>
        </Div>
        <Shape position="absolute 1110 29 1116 56" linetype="vertical" id="line13" anchor="top right"/>
        <Static text="조회기간 :" position="absolute 9 34 95 51" id="caption21" class="search_name"/>
        <Button position="absolute 1124 32 1180 52" id="btn_search" class="btn1" taborder="3" text="조회" anchor="top right" onclick="btn_search_onclick"/>
        <Static text="수익집계" position="absolute 0 0 143 24" align="align:center middle;" id="cap_title" class="tit_1"/>
        <Static text="~" position="absolute 191 36 206 51" id="caption6"/>
        <Calendar position="absolute 89 33 187 52" align="align:center middle;" id="ipt_fromdd" class="input_search" taborder="1" autoselect="true" autoskip="true"/>
        <Calendar position="absolute 204 33 302 52" align="align:center middle;" id="ipt_todd" class="input_search" taborder="1" autoselect="true"/>
        <Static text="조회 결과" position="absolute 0 77 90 99" id="caption1" class="tit_2"/>
        <Shape position="absolute 0 93 1195 99" linetype="horizontal" id="line1" class="line_10" anchor="left top right"/>
        <Static text="집계코드 :" position="absolute 494 35 580 52" id="cap_jipcode" class="search_name" visible="false"/>
        <Combo position="absolute 579 33 679 52" id="cmb_jipcode" class="input_search" visible="false" innerdataset="@ds_init_P0108list_P0108" datacolumn="cdnm" codecolumn="cdid"/>
        <Button position="absolute 85 409 127 428" id="btn_errclose" class="btn2" visible="false" text="닫기" onclick="btn_errclose_onclick" anchor="left bottom"/>
        <Static text="오류 내역" position="absolute 0 412 80 433" id="cap_err" class="tit_2" visible="false" anchor="left bottom"/>
        <Grid position="absolute 0 433 1195 773" id="grd_err" visible="false" autoenter="select" cellsizingtype="col" anchor="left right bottom" binddataset="ds_main_errlist_gridinfo">
          <Formats>
            <Format id="default">
              <Columns/>
              <Band id="head"/>
              <Band id="body"/>
            </Format>
          </Formats>
        </Grid>
        <Shape position="absolute 0 428 1195 434" linetype="horizontal" id="line_err" class="line_10" visible="false" anchor="left right bottom"/>
        <Button position="absolute 1115 409 1195 428" id="btn_errxls" class="btn7" visible="false" text="엑셀저장" anchor="right bottom" onclick="btn_errxls_onclick"/>
        <Static text="환자목록" position="absolute 605 77 680 98" id="caption2" class="tit_2" visible="false" anchor="top right"/>
        <Button position="absolute 685 74 727 93" id="btn_ptclose" class="btn2" visible="false" text="닫기" onclick="btn_ptclose_onclick" anchor="top right"/>
        <CheckBox position="absolute 689 33 772 53" id="chk_drflag" visible="false" text="의사별 합계" truevalue="Y" onclick="chk_drflag_onclick"/>
        <CheckBox position="absolute 325 62 430 82" id="chk_deptsum" visible="false" text="진료과별 합계" truevalue="Y" onclick="chk_deptsum_onclick"/>
        <CheckBox position="absolute 325 92 460 112" id="chk_specflag" visible="false" text="선택진료비 제외 내역" truevalue="Y" onclick="chk_specflag_onclick"/>
        <Static text="입원/외래 :" position="absolute 321 35 416 52" id="cap_brate" class="search_name" visible="false"/>
        <Combo position="absolute 410 33 470 53" id="cmb_brate" class="input_search" visible="false" codecolumn="codecolumn" datacolumn="datacolumn">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">T</Col>
                <Col id="datacolumn">전체</Col>
              </Row>
              <Row>
                <Col id="codecolumn">I</Col>
                <Col id="datacolumn">입원</Col>
              </Row>
              <Row>
                <Col id="codecolumn">O</Col>
                <Col id="datacolumn">외래</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Button position="absolute 943 32 1023 54" id="btn_file" class="btn4" text="파일생성" anchor="top right" onclick="btn_file_onclick"/>
        <Button position="absolute 1024 32 1104 54" id="btn_log" class="btn4" text="생성로그" anchor="top right" onclick="btn_log_onclick"/>
        <CheckBox position="absolute 590 55 730 75" id="chk_uscm" visible="false" text="개인별 등록 수가 적용" truevalue="Y" onclick="chk_uscm_onclick"/>
        <Combo position="absolute 735 55 835 74" id="cmb_uscm" class="combo_search" visible="false" innerdataset="@ds_hidden_uscmlist_uscminfo" datacolumn="listnm" codecolumn="listid"/>
        <CheckBox position="absolute 500 55 585 75" id="chk_deptflag" visible="false" text="진료과 포함" truevalue="Y" onclick="chk_deptflag_onclick"/>
        <CheckBox position="absolute 325 120 410 140" id="chk_roomdeptflag" visible="false" text="진료과 포함" truevalue="Y" onclick="chk_roomdeptflag_onclick"/>
        <Static text="등록번호 :" position="absolute 321 10 416 27" id="cap_pid" class="search_name" visible="false"/>
        <Edit position="absolute 412 9 492 28" id="ipt_pid" class="input_search" visible="false" autoselect="true" onkeyup="ipt_pid_onkeyup"/>
        <CheckBox position="absolute 864 33 932 53" id="chk_hiflag" text="건진제외" truevalue="Y" onclick="chk_hiflag_onclick" anchor="top right"/>
        <CheckBox position="absolute 781 33 856 53" id="chk_ptflag" visible="false" text="환자 내역" truevalue="Y" onclick="chk_ptflag_onclick"/>
        <CheckBox position="absolute 711 12 854 35" id="chk_specshow" visible="false" text="선택 진료비 별도 표시" truevalue="Y" onclick="chk_specshow_onclick"/>
        <CheckBox position="absolute 325 150 500 170" id="chk_esdflag" visible="false" text="영상의학과, 핵의학과만 조회" truevalue="Y" onclick="chk_esdflag_onclick"/>
        <CheckBox position="absolute 845 55 940 75" id="chk_grupflag" visible="false" text="그룹수가 조회" truevalue="Y" onclick="chk_grupflag_onclick"/>
        <Shape id="line3" class="line_10" position="absolute 605 93 1195 99" anchor="top right"/>
        <CheckBox id="chk_u18yn" taborder="32" text="만18세이하" truevalue="Y" visible="false" position="absolute 949 55 1044 75" onclick="chk_u18yn_onclick"/>
        <Static id="cap_cdgubnflag" text="진단서 구분 :" class="search_name" visible="false" position="absolute 513 34 608 51"/>
        <Combo id="cmb_cdgubnflag" taborder="33" codecolumn="codecolumn" datacolumn="datacolumn" class="input_search" visible="false" position="absolute 619 33 719 52">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" size="256"/>
              <Column id="datacolumn" size="256"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">T</Col>
                <Col id="datacolumn">전체</Col>
              </Row>
              <Row>
                <Col id="codecolumn">A</Col>
                <Col id="datacolumn">진단서(소견서)</Col>
              </Row>
              <Row>
                <Col id="codecolumn">B</Col>
                <Col id="datacolumn">병사용진단서</Col>
              </Row>
              <Row>
                <Col id="codecolumn">03</Col>
                <Col id="datacolumn">진료확인서</Col>
              </Row>
              <Row>
                <Col id="codecolumn">04</Col>
                <Col id="datacolumn">입퇴원확인서</Col>
              </Row>
              <Row>
                <Col id="codecolumn">05</Col>
                <Col id="datacolumn">상해진단서</Col>
              </Row>
              <Row>
                <Col id="codecolumn">06</Col>
                <Col id="datacolumn">출생증명서</Col>
              </Row>
              <Row>
                <Col id="codecolumn">07</Col>
                <Col id="datacolumn">사망진단서</Col>
              </Row>
              <Row>
                <Col id="codecolumn">08</Col>
                <Col id="datacolumn">장애진단서</Col>
              </Row>
              <Row>
                <Col id="codecolumn">09</Col>
                <Col id="datacolumn">후유장애진단서</Col>
              </Row>
              <Row>
                <Col id="codecolumn">99</Col>
                <Col id="datacolumn">기타</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
      </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="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="srchflag" type="STRING" size="256"/>
          <Column id="jipcode" type="STRING" size="256"/>
          <Column id="dayflag" type="STRING" size="256"/>
          <Column id="readdrid" type="STRING" size="256"/>
          <Column id="brateflag" type="STRING" size="256"/>
          <Column id="batchflag" type="STRING" size="256"/>
          <Column id="uscmflag" type="STRING" size="256"/>
          <Column id="uscmid" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hiflag" type="STRING" size="256"/>
          <Column id="cdgubnflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="srchflag"/>
            <Col id="jipcode"/>
            <Col id="dayflag"/>
            <Col id="readdrid"/>
            <Col id="brateflag">T</Col>
            <Col id="batchflag">E</Col>
            <Col id="uscmflag"/>
            <Col id="uscmid"/>
            <Col id="pid"/>
            <Col id="hiflag"/>
            <Col id="cdgubnflag">T</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_gridlist_gridinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_ptlist_gridinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_errlist_gridinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_P0108list_P0108" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_uscmlist_uscminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="drflag" type="STRING" size="256"/>
          <Column id="deptsum" type="STRING" size="256"/>
          <Column id="specflag" type="STRING" size="256"/>
          <Column id="deptflag" type="STRING" size="256"/>
          <Column id="roomdeptflag" type="STRING" size="256"/>
          <Column id="ptflag" type="STRING" size="256"/>
          <Column id="specshow" type="STRING" size="256"/>
          <Column id="esdflag" type="STRING" size="256"/>
          <Column id="grupflag" type="STRING" size="256"/>
          <Column id="u18yn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="drflag"/>
            <Col id="deptsum"/>
            <Col id="specflag"/>
            <Col id="deptflag"/>
            <Col id="roomdeptflag"/>
            <Col id="ptflag"/>
            <Col id="specshow"/>
            <Col id="esdflag"/>
            <Col id="grupflag"/>
            <Col id="u18yn"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_header" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_gridlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd"/>
      <BindItem id="item1" compid="ipt_todd" propid="value" datasetid="ds_send" columnid="todd"/>
      <BindItem id="item2" compid="ipt_pid" propid="value" datasetid="ds_send" columnid="pid"/>
      <BindItem id="item3" compid="cmb_brate" propid="value" datasetid="ds_send" columnid="brateflag"/>
      <BindItem id="item4" compid="cmb_jipcode" propid="value" datasetid="ds_send" columnid="jipcode"/>
      <BindItem id="item5" compid="chk_drflag" propid="value" datasetid="ds_hidden" columnid="drflag"/>
      <BindItem id="item6" compid="chk_ptflag" propid="value" datasetid="ds_hidden" columnid="ptflag"/>
      <BindItem id="item7" compid="chk_hiflag" propid="value" datasetid="ds_send" columnid="hiflag"/>
      <BindItem id="item8" compid="chk_specshow" propid="value" datasetid="ds_hidden" columnid="specshow"/>
      <BindItem id="item9" compid="chk_grupflag" propid="value" datasetid="ds_hidden" columnid="grupflag"/>
      <BindItem id="item10" compid="chk_u18yn" propid="value" datasetid="ds_hidden" columnid="u18yn"/>
      <BindItem id="item11" compid="chk_uscm" propid="value" datasetid="ds_send" columnid="uscmflag"/>
      <BindItem id="item12" compid="chk_deptflag" propid="value" datasetid="ds_hidden" columnid="deptflag"/>
      <BindItem id="item13" compid="chk_deptsum" propid="value" datasetid="ds_hidden" columnid="deptsum"/>
      <BindItem id="item14" compid="chk_specflag" propid="value" datasetid="ds_hidden" columnid="specflag"/>
      <BindItem id="item15" compid="chk_roomdeptflag" propid="value" datasetid="ds_hidden" columnid="roomdeptflag"/>
      <BindItem id="item16" compid="chk_esdflag" propid="value" datasetid="ds_hidden" columnid="esdflag"/>
      <BindItem id="item17" compid="cmb_uscm" propid="value" datasetid="ds_send" columnid="uscmid"/>
      <BindItem id="item18" compid="cmb_cdgubnflag" propid="value" datasetid="ds_send" columnid="cdgubnflag"/>
    </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 "com_batchinfoxp::ZSB001.xjs";
var FLAG = "";
var FLAGNM = "";
var SPECFLAG = "";
var PT_ROW = 0;
// grd_main 더블 클릭 시 위치 수정하기 위한 변수 선언함 2019-04-05 이아영.
var grd_main_h;
var grd_main_b;
function SPSTP01100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPSTP01100_onload(obj:Form, e:LoadEventInfo)
{
	grd_main_h = grd_main.position.height;
	grd_main_b = grd_main.position.bottom;
	
	chk_deptsum.position.top = 32;
	chk_deptsum.position.height = 20;
	chk_specflag.position.top = 32;
	chk_specflag.position.height = 20;
	chk_uscm.position.top = 32;
	chk_uscm.position.height = 20;
	cmb_uscm.position.top = 31;
	cmb_uscm.position.height = 20;
	chk_deptflag.position.top = 32;
	chk_deptflag.position.height = 20;
	cap_pid.position.top = 32;
	cap_pid.position.height = 20;
	ipt_pid.position.top = 31;
	ipt_pid.position.height = 20;
	chk_roomdeptflag.position.top = 32;
	chk_roomdeptflag.position.height = 20;
	chk_specshow.position.top = 32;
	chk_specshow.position.height = 20;
	chk_esdflag.position.top = 32;
	chk_esdflag.position.height= 20;
	chk_grupflag.position.top = 32;
	chk_grupflag.position.height = 20;
	cap_cdgubnflag.position.top = 32;
	cap_cdgubnflag.position.height = 20;
	cmb_cdgubnflag.position.top = 31;
	cmb_cdgubnflag.position.height = 20;
	chk_u18yn.position.left = 865
	chk_u18yn.position.top = 32;
	chk_u18yn.position.height = 20;
	
	ds_send.setColumn(0, "fromdd", utlf_getCurrentDate().toDate().getAddDate(-1).getDateFormat());
	ds_send.setColumn(0, "todd", utlf_getCurrentDate().toDate().getAddDate(-1).getDateFormat());
	
	FLAG = frmf_getMenuParam();
	ds_send.setColumn(0, "srchflag", FLAG);

	var titlesize = 143;
	if (FLAG == "11") 
	{
		FLAGNM = "진료과별 의사별 수익 집계";
		titlesize = 200;
	} 
	else if (FLAG == "12D") 
	{
		FLAGNM = "진료과별 의사별 급비 항목별 수익 집계";
		titlesize = 300;
		chk_deptsum.visible = true;
	}
	else if (FLAG == "12") 
	{
		FLAGNM = "급비 항목별 수익 집계";
		titlesize = 200;
		cap_brate.visible = true;
		cmb_brate.visible = true;
	}
	else if (FLAG == "13") 
	{
		FLAGNM = "수익 명세서";
		cap_brate.visible = true;
		cmb_brate.visible = true;
	} 
	else if (FLAG == "14") 
	{
		FLAGNM = "과별 보험 유형별 수익 명세서";
		cap_brate.visible = true;
		cmb_brate.visible = true;
		chk_specshow.visible = true;
		titlesize = 300;
	} 
	else if (FLAG == "15") 
	{
		FLAGNM = "과별 수가 종류별 수익 명세서";
		cap_brate.visible = true;
		cmb_brate.visible = true;
		titlesize = 300;
	} 
	else if (FLAG == "16") 
	{
		FLAGNM = "선택 진료비 의사별 일자별 수익 집계";
		chk_specflag.visible = true;
		chk_hiflag.visible   = false;
		titlesize = 300;
	}
	else if (FLAG == "17") 
	{
		FLAGNM = "선택 진료 수당 집계";
		cap_jipcode.visible = true;
		cmb_jipcode.visible = true;
		chk_drflag.visible = true;
		cap_brate.visible = true;
		cmb_brate.visible = true;
		chk_ptflag.visible = true;
		titlesize = 300;
		
		pamfGetCodeList([{ dsNm: "ds_init_P0108list_P0108", cdGrpId: "P0108" }]);
		
		ds_send.setColumn(0, "jipcode", "B");
	}
	else if (FLAG == "18") 
	{
		FLAGNM = "병동별 수익 집계";
		chk_roomdeptflag.visible = true;
		chk_hiflag.visible = false;
		titlesize = 200;
	}
	else if (FLAG == "26") 
	{
		FLAGNM = "어린이병원 수익 집계";
		chk_hiflag.visible = false;
		chk_u18yn.visible = true;
		titlesize = 300;
	}
	else if (FLAG == "20") 
	{
		FLAGNM = "수가 코드별 수익 집계";
		cap_brate.visible = true;
		cmb_brate.visible = true;
		
		chk_uscm.visible = true;
		cmb_uscm.visible = true;
		
		chk_deptflag.visible = true;
		chk_hiflag.visible = false;
		
		chk_grupflag.visible = true;
		
		titlesize = 300;
		
		var oParam = {};
			oParam.id          = "TRSTP01903";
			oParam.service     = "stspamapp.StsPam";
			oParam.method      = "reqGetUscmTitle";
			oParam.outds 	   = "ds_hidden_uscmlist_uscminfo=uscm";
			oParam.async       = false;
			//oParam.callback    = "cf_TRSTP01903";

		tranf_submit(oParam);
		
		cmb_uscm.index = 0;		
	}
	else if (FLAG == "14S") 
	{
		FLAGNM = "보험 유형별 수익 집계";
		cap_brate.visible = true;
		cmb_brate.visible = true;
		titlesize = 300;
	}
	else if (FLAG == "14SI") 
	{
		FLAGNM = "선택 진료비 보험 유형별 수익 집계";
		titlesize = 300;
	} 
	else if (FLAG == "18R") 
	{
		FLAGNM = "병동별 병실별 수익 집계";
		chk_hiflag.visible = false;
		titlesize = 300;
	} 
	else if (FLAG == "21Day") 
	{
		FLAGNM = "진료과별 일자별 수익 집계";
		titlesize = 300;
	} 
	else if (FLAG == "23") 
	{
		FLAGNM = "센터별 진료과별 급비항목별 수익 집계";
		titlesize = 300;
	} 
	else if (FLAG == "P") 
	{
		cap_pid.visible = true;
		ipt_pid.visible = true;
		FLAGNM = "환자별 수익 집계";
		titlesize = 300;
	}
	else if (FLAG == "ES") 
	{
		chk_hiflag.visible  = false;
		chk_esdflag.visible = true;
		FLAGNM = "선택 진료 가상 수익 집계";
		titlesize = 300;
	}
	else if (FLAG == "PR") 
	{
		chk_uscm.visible = true;
		cmb_uscm.visible = true;
		
		var oParam = {};
			oParam.id          = "TRSTP01903";
			oParam.service     = "stspamapp.StsPam";
			oParam.method      = "reqGetUscmTitle";
			oParam.outds 	   = "ds_hidden_uscmlist_uscminfo=uscm";
			oParam.async       = false;
			//oParam.callback    = "cf_TRSTP01903";

		tranf_submit(oParam);
		
		cmb_uscm.index = 0;
		FLAGNM = "과내 검사 판독의 및 처방의별 수익 집계";
		titlesize = 300;
	} 
	else if (FLAG == "RE")
	{
		chk_hiflag.visible = false;
		FLAGNM = "영상의학과 선택진료 판독의 기준 수익 집계";
		titlesize = 300;
	} 
	else if (FLAG == "25") 
	{
		FLAGNM = "진단서 내역";
		cap_brate.visible = true;
		cmb_brate.visible = true;
		cap_cdgubnflag.visible = true;
		cmb_cdgubnflag.visible = true;
	} 
	else if (FLAG == "dent") 
	{
		chk_hiflag.visible = false;
		FLAGNM = "구강악안면외과 수익 집계";
		titlesize = 300;
	}
	
	cap_title.text = FLAGNM;
	cap_title.position.width = titlesize;
}

function ipt_pid_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		btn_search.click();
	}
}

function chk_drflag_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(obj.value == "Y" && chk_ptflag.value == "Y")
	{
		ds_hidden.setColumn(0, "ptflag", "");
	}
	else if(obj.value == "Y" && chk_ptflag.value != "Y")
	{	
	}
	else
	{
		ds_hidden.setColumn(0, "drflag", "");
	}
}

function chk_ptflag_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(obj.value == "Y" && chk_drflag.value == "Y")
	{
		ds_hidden.setColumn(0, "drflag", "");
	}
	else if(obj.value == "Y" && chk_drflag.value != "Y")
	{	
	}
	else
	{
		ds_hidden.setColumn(0, "ptflag", "");
	}
}

function chk_specshow_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(obj.value == "Y")
	{
	}
	else
	{
		ds_hidden.setColumn(0, "specshow", "");
	}
}

function chk_hiflag_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(obj.value == "Y")
	{
	}
	else
	{
		ds_send.setColumn(0, "hiflag", "");
	}
}

function chk_grupflag_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if (obj.value == "Y")
	{
		ds_hidden.setColumn(0, "deptflag", "");
	}
	else
	{
		ds_hidden.setColumn(0, "grupflag", "");
	}
}

function chk_u18yn_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if (obj.value == "Y")
	{
		ds_hidden.setColumn(0, "deptflag", "");
	}
	else
	{
		ds_hidden.setColumn(0, "u18yn", "");
	}
}

function chk_uscm_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(obj.value == "Y")
	{
	}
	else
	{
		ds_send.setColumn(0, "uscmflag", "");
	}
}

function chk_deptflag_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if (obj.value == "Y")
	{
		ds_hidden.setColumn(0, "grupflag", "");
	}
	else
	{
		ds_hidden.setColumn(0, "deptflag", "");
	}
}

function chk_deptsum_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(obj.value == "Y")
	{
	}
	else
	{
		ds_hidden.setColumn(0, "deptsum", "");
	}
}

function chk_specflag_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(obj.value == "Y")
	{
	}
	else
	{
		ds_hidden.setColumn(0, "specflag", "");
	}
}

function chk_roomdeptflag_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if (FLAG == "18")
	{
		if (obj.value == "Y")
		{
			chk_hiflag.visible = true;
		}
		else 
		{
			chk_hiflag.visible = false;
			ds_hidden.setColumn(0, "roomdeptflag", "");
		}
	}
	else
	{
		if (obj.value == "Y")
		{
		}
		else 
		{
			ds_hidden.setColumn(0, "roomdeptflag", "");
		}
	}
}

function chk_esdflag_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(obj.value == "Y")
	{
	}
	else
	{
		ds_hidden.setColumn(0, "esdflag", "");
	}
}

function btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	if (String(FLAG).length < 1) 
	{
		return;
	}
	
	fSetErrControl(false);
	fSetPtControl(false);
	
	SPECFLAG = "";
	
	if (ds_hidden.getColumn(0, "drflag") == "Y" || ds_hidden.getColumn(0, "deptsum") == "Y") 
	{		
		ds_send.setColumn(0, "srchflag", FLAG + "S");
	}
	else if (ds_hidden.getColumn(0, "specflag") == "Y") 
	{		
		SPECFLAG = "Y";
		
		ds_send.setColumn(0, "srchflag", FLAG + "E");		
	} 
	else if (ds_hidden.getColumn(0, "deptflag") == "Y") 
	{
		ds_send.setColumn(0, "srchflag", "22");		
	}
	else if (ds_hidden.getColumn(0, "roomdeptflag") == "Y") 
	{		
		ds_send.setColumn(0, "srchflag", FLAG + "D");		
	} 
	else if (ds_hidden.getColumn(0, "ptflag") == "Y") 
	{		
		ds_send.setColumn(0, "srchflag", FLAG + "P");
	} 
	else if (ds_hidden.getColumn(0, "specshow") == "Y") 
	{
		ds_send.setColumn(0, "srchflag", FLAG + "spec");
	}
	else if (ds_hidden.getColumn(0, "esdflag") == "Y") 
	{
		ds_send.setColumn(0, "srchflag", FLAG + "D");
	}
	else if (ds_hidden.getColumn(0, "grupflag") == "Y")  
	{
		ds_send.setColumn(0, "srchflag", "24");
	}
	else if (ds_hidden.getColumn(0, "u18yn") == "Y") // 어린이병원 수익에서 18세 이하 추출 시
	{
		ds_send.setColumn(0, "srchflag", "27");
	}
	else 
	{
		ds_send.setColumn(0, "srchflag", FLAG);
	}
	
	ds_send.setColumn(0, "dayflag", (ds_send.getColumn(0, "fromdd") == ds_send.getColumn(0, "todd")) ? "Y" : "N");
	
	if (FLAG == "P" && utlf_isNull(ds_send.getColumn(0, "pid")) && ds_send.getColumn(0, "dayflag") != "Y") 
	{
		sysf_messageBox("모든 환자 조회는 하루만 조회할 수 있습니다.", "E999");
		return;
	}
	
	fSetDynamicGrid(grd_main, "ds_main_gridlist_gridinfo", "TRSTP01802");
	
	if (ds_main_gridlist_gridinfo.getColumn(0, "errflag") == "Y") 
	{
		grd_main.setCellProperty("Body", 0, "background", "yellow");
		grd_main.setCellProperty("Body", 0, "background2", "yellow");
		grd_main.setCellProperty("Body", 0, "color", "red");
		grd_main.setCellProperty("Body", 0, "font", "arial,9,bold");
	}
	else 
	{
		if (FLAG == "P") 
		{
			return;
		}
		
		var cnt = ds_main_gridlist_gridinfo.rowcount;
		var dept = "";
		for (var i = 0; i < cnt; i++) 
		{
			if(ds_main_gridlist_gridinfo.getColumnInfo("earndeptnm"))
			{
				dept = ds_main_gridlist_gridinfo.getColumn(i, "earndeptnm");
				
				if(utlf_isNull(dept))
				{
					if(ds_main_gridlist_gridinfo.getColumnInfo("wardnm"))
					{
						dept = ds_main_gridlist_gridinfo.getColumn(i, "wardnm");
					}
				}
			}
			
			var drname = ""
			var hngnm  = "";
			var insunm = "";
			if(ds_main_gridlist_gridinfo.getColumnInfo("earndrname"))
			{
				drname  = ds_main_gridlist_gridinfo.getColumn(i, "earndrname");
			}
			if(ds_main_gridlist_gridinfo.getColumnInfo("hngnm"))
			{
				hngnm  = ds_main_gridlist_gridinfo.getColumn(i, "hngnm");
			}
			if(ds_main_gridlist_gridinfo.getColumnInfo("insukindnm"))
			{
				insunm  = ds_main_gridlist_gridinfo.getColumn(i, "insukindnm");
			}
			var row = i;
			
			if (dept == "소계" || dept == "합계" || drname == "계" || hngnm == "합계" || insunm == "합계") 
			{				
				var color = (dept == "소계"  || drname == "계") ? "#ffffc8" : "#ffffa0";
				dsf_makeValue(ds_main_gridlist_gridinfo, "bgColor", "string", color, row);
				dsf_makeValue(ds_main_gridlist_gridinfo, "fontStyle", "string", "arial,9,bold", row);
			}
			
			if (FLAG == "18R" || FLAG == "13") 
			{
				var sinfo = String(ds_main_gridlist_gridinfo.getColumn(i, "suminfo")).split(",");
				var slv = sinfo[0];
				var scol = sinfo[1];
				
				if (slv > 0) 
				{				
					if (slv == 3) 
					{
						color = "#ffffe6";
					} 
					else if (slv == 2) 
					{
						color = "#ffffc8";
					} 
					else if (slv == 1) 
					{
						color = "#ffffa0";
					}
					
					dsf_makeValue(ds_main_gridlist_gridinfo, "bgColor", "string", color, row);
					if (scol > 0) 
					{
						dsf_makeValue(ds_main_gridlist_gridinfo, "fontStyle", "string", "arial,9,bold", row);
					}
					dsf_makeValue(ds_main_gridlist_gridinfo, "fontStyle", "string", "arial,9,bold", row);
				}
			}
		}
		
		if (cnt > 1 && ( FLAG == "21Day" || FLAG == "23" )) 
		{
			dsf_makeValue(ds_main_gridlist_gridinfo, "bgColor", "string", "#ffffa0", row);
			dsf_makeValue(ds_main_gridlist_gridinfo, "fontStyle", "string", "arial,9,bold", row);
		}
	}
}

function fSetErrControl(show)
{
	cap_err.visible = btn_errclose.visible = line_err.visible = btn_errxls.visible = grd_err.visible = show;
	
	if(show)
	{
		grd_main.position.height = parseInt(cap_err.position.top-20)
		grd_main.position.bottom = parseInt(cap_err.position.top-20)
	}
	else
	{
		grd_main.position.height = grd_main_h;
		grd_main.position.bottom = grd_main_b;
	}
}

function fSetPtControl(show) 
{
	var val = grp_sea.position.width;
	var pos = parseInt(grd_ptlist.position.left-10);
	if (!show) 
	{
		if (PT_ROW >= 0) 
		{
			dsf_makeValue(ds_main_gridlist_gridinfo, "bgColor", "string", "#ffffff", PT_ROW);
			dsf_makeValue(ds_main_gridlist_gridinfo, "fontStyle", "string", "", PT_ROW);
			PT_ROW = 0;
		}
		
		grd_main.position.width = val;
		line1.position.width = val;
		btn_excel.position.right = btn_excel2.position.right;
		btn_excel.position.left = btn_excel2.position.left;
		btn_excel.position.width = 50;
	}
	else
	{
		grd_main.position.width = pos;
		line1.position.width = pos;
		btn_excel.position.right = parseInt(pos-50);
		btn_excel.position.width = 50;
	}
	
	caption2.visible = show;
	grd_ptlist.visible = show;
	btn_excel2.visible = show;
	btn_ptclose.visible = show;
}

function fSetDynamicGrid(grd, ref, sid)
{
	ds_temp_header.clearData();
	ds_temp_gridlist.clearData();
	
	eval(ref).clearData();
	
	var cols = grd.getFormatColCount();
	for (var i = cols; i >= 0; i--) 
	{
		grd.deleteContentsCol(i);
	}
	
	var oParam = {};
		oParam.id          = sid;
		oParam.service     = "stspamapp.StsPam";
		oParam.method 	   = (sid == "TRSTP01802") ? "reqGetPaasMagm" : "reqGetPaasMagmErrlog";
		oParam.inds        = "req=ds_send";
		oParam.outds 	   = "ds_temp_header=header ds_temp_gridlist=gridinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRSTP01802";

	tranf_submit(oParam);
	
	var attr = ds_temp_header.getColumn(0, "attr");
	if (utlf_isNull(attr) || String(attr).length < 1) 
	{
		if(grd.getCellCount("Head")>0)
		{
			grd.setCellProperty("Head", 0, "text", "");
		}
		return;
	}
	
	var gridCaption 		= ds_temp_header.getColumn(0, "caption");
	var titleArr            = gridCaption.split("|");  								// '|'로 입력된 Head값 처리를 위해 변경함 kimdo3, 2017-03-25
	var refarr 				= new Array(); 	
	var k = 0;
	
	for(var i = 0; i < titleArr.length; i++) 
	{
		grd.appendContentsRow("head");
		
 		var s_titleArr = titleArr[i].split("^");
		
		for(var j = 0; j < s_titleArr.length; j++)
		{
			// 0 번째 컬럼은 이미 생성, 하나 줄여서 컬럼 생성해야하므로 j > 0 보다 큰 조건을 줌
			if(i == 0 && j > 0)
			{
				grd.appendContentsCol();
			}
 			refarr[k] = s_titleArr[j];
			k++;
 		}
	}
	// head Text 지정
	for(var i = 0; i < refarr.length; i++)
	{
		grd.setCellProperty("head", i, "text", refarr[i]);
	}
	
	grd.appendContentsRow("body");
	
	// Column Bind setting
	var attrArr = String(attr).split("^");
	var col = "";
	var type = "";
	var font = "";
	var align = "";
	var chk_Font = new Array(); 	
	var cnt = 0;
	for(var i = 0; i < attrArr.length; i++)
	{
		var dataType = String(attrArr[i]).replace("; ", ",");
		var s_dataType = dataType.split(",");
		
		for(var j = 0; j < s_dataType.length; j++)
		{
			if(String(s_dataType[j]).indexOf("ref") == 0)
			{
				col = String(s_dataType[j]).replace("ref:", "");
				grd.setCellProperty("Body", i, "text", "bind:"+col);
			}
			
			if(String(s_dataType[j]).indexOf("type") == 0)
			{
				type = String(s_dataType[j]).replace("type:", "");
				
				if(type == "Number")
				{
					grd.setCellProperty("Body", i, "displaytype", "number");
				}
				else
				{
					grd.setCellProperty("Body", i, "displaytype", "text");
				}
			}
			
			if(String(s_dataType[j]).indexOf("visibility") == 0)
			{
				visibility = String(s_dataType[j]).replace("visibility:", "");
				visibility = visibility.replace(";", "");
				if(visibility == "hidden")
				{
					grd.setCellProperty("Head", i, "size", 0);
				}
			}
			
			if(String(s_dataType[j]).indexOf("text-align") == 0)
			{
				align = String(s_dataType[j]).replace("text-align:", "");
				align = align.replace(";", "");
				grd.setCellProperty("Body", i, "align", align+" middle");
			}
			
			//Grid Background Setting
			grd.setCellProperty("Body", i, "background", "BIND(bgColor)");
			grd.setCellProperty("Body", i, "background2", "BIND(bgColor)");

			if(String(s_dataType[j]).indexOf("font-weight") == 0)
			{
				chk_Font[cnt] = i;
				cnt++;
			}
		}
	}
 		
	var width = ds_temp_header.getColumn(0, "width");
	var widthArr = String(width).split("^");
	// 컬럼 사이즈 조절을 위한 for문
	for(var i = 0; i < widthArr.length; i++)
	{
		grd.setFormatColProperty(i, "size", widthArr[i]);
	}
	
	//Grid Font Setting
	cnt = 0;
	for(var k = 0; k < grd_main.getCellCount("body"); k++)
	{
		if(k == chk_Font[cnt]) 
		{
			grd.setCellProperty("Body", k, "font", "arial,9,bold");
			cnt++;
		}
		else 
		{
			grd.setCellProperty("Body", k, "font", "BIND(fontStyle)");
		}
	}
	
	//Grid Merge Setting
	grdTitleMerge(grd);
	
	eval(ref).copyData(ds_temp_gridlist);
}

function btn_file_onclick(obj:Button,  e:ClickEventInfo)
{
	SPECFLAG = "";
					
	if (ds_hidden.getColumn(0, "drflag") == "Y" || ds_hidden.getColumn(0, "deptsum") == "Y") 
	{
		ds_send.setColumn(0, "srchflag", FLAG + "S");
		
	} 
	else if (ds_hidden.getColumn(0, "specflag") == "Y") 
	{		
		SPECFLAG = "Y";
		
		ds_send.setColumn(0, "srchflag", FLAG + "E");
	} 
	else if (ds_hidden.getColumn(0, "deptflag") == "Y") 
	{		
		ds_send.setColumn(0, "srchflag", "22");		
	}
	else if (ds_hidden.getColumn(0, "roomdeptflag") == "Y") 
	{
		ds_send.setColumn(0, "srchflag", FLAG + "D");
	} 
	else if (ds_hidden.getColumn(0, "ptflag") == "Y") 
	{
		ds_send.setColumn(0, "srchflag", FLAG + "P");
	}
	else if (ds_hidden.getColumn(0, "specshow") == "Y") 
	{
		ds_send.setColumn(0, "srchflag", FLAG + "spec");
	} 
	else if (ds_hidden.getColumn(0, "esdflag") == "Y") 
	{
		ds_send.setColumn(0, "srchflag", FLAG + "D");
	}  
	else if (ds_hidden.getColumn(0, "grupflag") == "Y") 
	{
		ds_send.setColumn(0, "srchflag", "24");
	} 
	else if (ds_hidden.getColumn(0, "deptflag") == "Y") // 어린이병원 수익에서 18세 이하 추출 시
	{		
		ds_send.setColumn(0, "srchflag", "27");
	}
	else 
	{
		ds_send.setColumn(0, "srchflag", FLAG);
	}
	
	ds_send.setColumn(0, "dayflag", (ds_send.getColumn(0, "fromdd") == ds_send.setColumn(0, "todd")) ? "Y" : "N");
	dsf_makeValue(ds_send, "accflag", "string", ds_send.getColumn(0, "brateflag"));
	var oParam = {};
		oParam.id          = "TXSTP01804";
		oParam.service     = "stspamapp.StsPam";
		oParam.method      = "reqExePamFileBatch";
		oParam.inds        = "req=ds_send";
		oParam.async       = false;
		//oParam.callback    = "cf_TXSTP01804";

	tranf_submit(oParam);

	btn_log.click();
}

function btn_log_onclick(obj:Button,  e:ClickEventInfo)
{
	var todd = utlf_getCurrentDate();
	todd = todd.toDate().getAddDate(1, "D").getDateFormat();

	var objArg = new Object();
		objArg.todd = todd;	
		objArg.execrid = sysf_getUserId();
		objArg.prgmid = "StsPamFileBatch";
		
	frmf_open("SPZSB00301", "SPZSB00301", objArg, "","","","","","","","","","M");
}

function btn_ptclose_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetPtControl(false);
}

function grd_main_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	if (ds_main_gridlist_gridinfo.rowposition < 0)
	{
		return;
	}
	
	if (ds_main_gridlist_gridinfo.getColumn(0, "errflag") == "Y")
	{ // 오류 항목 조회
		fSetErrControl(true);
		fSetDynamicGrid(grd_err, "ds_main_errlist_gridinfo", "TRSTP01817");
	}
	
	// 선택진료비 의사별 일자별 수입집계
	if (FLAG == "16" && SPECFLAG != "Y") 
	{
		ds_send.setColumn(0, "srchflag", "16D");
		fGetPtList();
	}
	
	// 어린이병원 수입집계
	if (FLAG == "26") 
	{		
		if (ds_hidden.getColumn(0, "u18yn") == "Y") 
		{
			ds_send.setColumn(0, "srchflag", "27D");
		}
		else 
		{
			ds_send.setColumn(0, "srchflag", "26");
		}
		
		fGetPtList();
	}
}

function fGetPtList() 
{
	var fromdd = ds_send.getColumn(0, "fromdd");
	var todd = ds_send.getColumn(0, "todd");
	
	fSetPtControl(true);
	
	if (ds_main_gridlist_gridinfo.rowcount > 0)
	{
		var row = ds_main_gridlist_gridinfo.rowposition;
		
		var dRow = row ;
		
		if (row >= 0) 
		{
			dsf_makeValue(ds_main_gridlist_gridinfo, "bgColor", "string", "#ffffff", row);
			dsf_makeValue(ds_main_gridlist_gridinfo, "fontStyle", "string", "", row);
		}
		dsf_makeValue(ds_main_gridlist_gridinfo, "bgColor", "string", "#ffd2d2", row);
		dsf_makeValue(ds_main_gridlist_gridinfo, "fontStyle", "string", "arial,9,bold", row);
		
		PT_ROW = row;	
	}
	
	// 조회구분에 따른 조건변경 by 조중래 20170821
	// 16D : 의사별 환자별 선택진료비 집계, 26D : 어린이병원 의사별 환자별 수익집계, 27D : 18세 이하 의사별 환자별 수익집계
	if (ds_send.setColumn(0, "srchflag") == "26D" || ds_send.getColumn(0, "srchflag") == "27D") 
	{
		ds_send.setColumn(0, "readdrid", ds_main_gridlist_gridinfo.getColumn(dRow, "earndrid"));
	} 
	else 
	{
		ds_send.setColumn(0, "readdrid", ds_main_gridlist_gridinfo.getColumn(dRow, "readdrid"));
	}
	
	fSetDynamicGrid(grd_ptlist, "ds_main_ptlist_gridinfo", "TRSTP01802");
	
	var cnt = ds_main_ptlist_gridinfo.rowcount;
	var prevPid = "";
	var flag = true;
	
	for (var i = 0; i < cnt; i++) 
	{
		var pid = ds_main_ptlist_gridinfo.getColumn(i, "pid");
		if (utlf_isNull(pid))
		{
			break;
		}
		
		if (pid != prevPid)
		{
			flag = !flag;
			prevPid = pid;
		}
		dsf_makeValue(ds_main_gridlist_gridinfo, "bgColor", "string",   flag ? "#f4f4f4" : "#ffffff", i);
	}
}

function grdTitleMerge(grid)
{
	var headCols = grid.getCellCount("body");
	var headCells = grid.getCellCount("head"); 
		
	var headArrR1 = new Array();
	var headArrR2 = new Array();
	var headArrR3 = new Array();
	
	var headArrR2No = new Array();
	var headArrR3No = new Array();
	
	var headArrR2NoIdx = 0;
	var headArrR3NoIdx = 0;
	
	var headArrMer12No = "";
	var headArrMer13No = "";
	
	var headArrMer12NoIdx = 0;
	var headArrMer13NoIdx = 0;
	
	var mergeScol = 0;
	var mergeEcol = 0;
	var index = 0;
	var calindex = 0;
	var calindex1 = 0;
	var calindex11 = 0;
		
	grid.splitContentsCell("head",0,0,3,headCols,true);
	
	for(var i=0; i<headCells;i++)
	{
		if( parseInt(i/headCols)==0 )
		{
			headArrR1[i%headCols] = grid.getCellText(-1,i);
		}
		if( parseInt(i/headCols)==1 )
		{
			headArrR2[i%headCols] = grid.getCellText(-1,i);
		}
		if( parseInt(i/headCols)==2 )
		{
			headArrR3[i%headCols] = grid.getCellText(-1,i);
		}
	}//for(var i=0; i<headCells;i++) 끝
		
	//로우 병합
	for(var i = 0; i < headCols; i++)
	{
		if(headArrR1[i]==headArrR2[i])
		{
			index = i;
			calindex++;
			grid.mergeContentsCell("head",0,i,1,i,index,false);
			headArrMer12No+=i+"^";
			headArrMer12NoIdx++;
		}
		else
		{
			headArrR2No[headArrR2NoIdx]=i;
			headArrR2NoIdx++;
		}
		if(headArrR2[i]==headArrR3[i])
		{
			index = eval(i)+eval(headCols)-calindex;
			grid.mergeContentsCell("head",1,i,2,i,index,false);
			calindex1++;
			if(headArrR2[i]==headArrR1[i])
			{
				index = eval(i)+eval(headCols)-calindex;
				grid.mergeContentsCell("head",0,i,2,i,i,false);
				calindex11++;
				headArrMer13No+=i+"^";
				headArrMer13NoIdx++;
			}
		}
		else
		{
			headArrR3No[headArrR3NoIdx]=i;
			headArrR3NoIdx++;
		}
	}//for(var i=0; i<headCols; i++) 끝
	
	//배치가 바뀌어 재분배
	var headCells2 = grid.getCellCount("head"); 	
	var headArr1 = new Array();
	var headArr2 = new Array();
	var headArr3 = new Array();
	var headArr3idx = 0;
	var headArr2idx = 0;
	
	for(var i=0; i<headCells2;i++)
	{	
		if( parseInt(i/headCols)==0 )
		{
			headArr1[i%headCols] = grid.getCellText(-1,i);
		}
		else if( eval(i)< headCols*2-eval(calindex))
		{
			headArr2[headArr2idx] = grid.getCellText(-1,i);
			headArr2idx++;
		}
		else
		{
			headArr3[headArr3idx] = grid.getCellText(-1,i);
			headArr3idx++;
		}
	}//for(var i=0; i<headCells;i++) 끝
	
	//컬럼 병합
	var tmp1 = "";
	var tmp1idx = 0;
	var tmp2 = "";
	var tmp2idx = 0;
	var col = 0;
	var index = 0;
	var calcolindex = 0;
	for(var i=0; i<headArr1.length;i++)
	{			
		if(i==0)
		{
			tmp1 = headArr1[0];
			tmp1idx = 0;
		}
		else
		{
			tmp2 = headArr1[i];
			tmp2idx = i;
		}
		idx = i-calcolindex-1;
		if(tmp1==tmp2)
		{
			grid.mergeContentsCell("head",0,tmp1idx,0,tmp2idx,idx,false);
			calcolindex++;
		}
		else
		{
			tmp1 = headArr1[i];
			tmp1idx = i;
		}
	}//for(var i=0; headArr1.legnth();i++) 끝
		
	var tmp1 = "!";
	var tmp2 = "!";
	var tmp2idx = 0;	
	var calcolindex1 = 0;
	var idx = 0;
	for(var i=0; i<headArr2.length;i++)
	{
		if(i==0)
		{
			tmp1 = headArr2[0];
			tmp1idx = 0;
		}
		else
		{
			tmp2 = headArr2[i];
			tmp2idx = headArrR2No[i];
		}
		var cnt12R = biggerCnt(headArrR2No[i],headArrMer12No);
		idx = (headCols+headArrR2No[i]) - calcolindex - eval(calindex) + cnt12R - eval(calcolindex1)-1;
		
		if(tmp1==tmp2)
		{
			grid.mergeContentsCell("head",1,tmp1idx,1,tmp2idx,idx,false);
			calcolindex1++;
		}
		else
		{
			tmp1 = headArr2[i];
			tmp1idx = headArrR2No[i];
		}
	}//for(var i=0; headArr2.legnth();i++) 끝

	var tmp1 = "!";
	var tmp2 = "!";
	var tmp2idx = 0;
	var calcolindex11 = 0;
	for(var i=0; i<headArr3.length; i++)
	{
		if(i==0)
		{
			tmp1 = headArr3[0];
			tmp1idx = 0;
		}
		else
		{
			tmp2 = headArr3[i];
			tmp2idx = headArrR3No[i];
		}
		var cnt13R = biggerCnt(headArrR3No[i],headArrMer13No);
		idx = (headCols*2+headArrR3No[i]) - calcolindex - calcolindex1 - calcolindex11 - calindex - calindex1 + cnt13R;
		if(tmp1==tmp2)
		{
			grid.mergeContentsCell("head",2,tmp1idx,2,tmp2idx,idx,false);
			calcolindex11++;
		}
		else
		{
			tmp1 = headArr3[i];
			tmp1idx = headArrR3No[i];
		}
	}		
}


function biggerCnt(num,idxArr)
{
	var rtn=0;
	var arr = new Array();
	var idxA = new String(idxArr);
	arr = idxA.substr(0,idxA.length-1).split("^");
	for(var i=0; i<arr.length; i++)
	{
		if(num<arr[i])
		{
			rtn++;
		}
	}
	return rtn;
}

function btn_excel2_onclick(obj:Button,  e:ClickEventInfo)
{
	var fromdd = ds_send.getColumn(0, "fromdd");
	var todd = ds_send.getColumn(0, "todd");
	
	grdf_exportExcel(grd_ptlist, cap_title.value + "(환자목록)_" + fromdd + "-" + todd, "Sheet1", "true", "", "");


    sysf_messageBox("엑셀 저장이 완료되었습니다.", "I999");
}

function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	var fromdd = ds_send.getColumn(0, "fromdd");
	var todd = ds_send.getColumn(0, "todd");
	
	grdf_exportExcel(grd_main, FLAGNM + "_" + fromdd + "-" + todd, "Sheet1", "true", "", "");

    sysf_messageBox("엑셀 저장이 완료되었습니다.", "I999");
}

function btn_errxls_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_err, "Sheet1", "sheet1", "true", "", "");
    sysf_messageBox("엑셀 저장이 완료되었습니다.", "I999");
}

function btn_errclose_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetErrControl(false);
}
]]></Script>
  </Form>
</FDL>