YNU_JEUS/app_home/himed/xpapps/pam/clamuncoxp/xp/SMPIF50300_의사별원외정산내역조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPIF50300" position="absolute 0 0 576 752" titletext="Untitle" oninit="SMPIF50300_oninit" onload="SMPIF50300_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 1 13 566 745" id="group3" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Static text="삭감현황" position="absolute 0 76 111 98" id="caption7" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 92 564 98" linetype="horizontal" id="line8" class="line_1" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
              <Button position="absolute 484 73 564 92" id="button12" class="btn7" text="엑셀저장" anchor="top right" onclick="group3_button12_onclick"/>
              <Grid position="absolute 0 97 564 731" id="grddrinfo" class="datagrid1" scrollbars="autoboth" binddataset="ds_main_list01_gridoprcdrinfo" anchor="all" autofittype="col" oncellclick="group3_grddrinfo_oncellclick" onkeydown="group3_grddrinfo_onkeydown" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="24"/>
                      <Column size="182"/>
                      <Column size="81"/>
                      <Column size="80"/>
                      <Column size="70"/>
                      <Column size="105"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24" band="head"/>
                      <Row size="44"/>
                    </Rows>
                    <Band id="head">
                      <Cell rowspan="2" taborder="undefined"/>
                      <Cell col="1" rowspan="2" text="진료과" taborder="undefined"/>
                      <Cell col="2" rowspan="2" text="진료의ID" taborder="undefined"/>
                      <Cell col="3" rowspan="2" text="진료의" taborder="undefined"/>
                      <Cell col="4" rowspan="2" text="청구년월" taborder="undefined"/>
                      <Cell col="5" rowspan="2" text="정산금액" taborder="undefined"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" expr="currow+1"/>
                      <Cell col="1" text="bind:orddeptcd"/>
                      <Cell col="2" text="bind:orddrid"/>
                      <Cell col="3" text="bind:orddrnm"/>
                      <Cell col="4" displaytype="date" text="bind:clamym" mask="yyyy-MM"/>
                      <Cell col="5" displaytype="number" text="bind:cadecidifamt"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 389 73 483 92" id="button7" class="btn7" text="Open Excel" anchor="top right" onclick="group3_button7_onclick"/>
              <Button position="absolute 279 73 332 92" id="button10" class="btn2" text="열카피" anchor="top right" onclick="group3_button10_onclick"/>
              <Button position="absolute 334 73 387 92" id="button11" class="btn2" text="행카피" anchor="top right" onclick="group3_button11_onclick"/>
              <Button position="absolute 224 73 277 92" id="button13" class="btn2" text="셀카피" anchor="top right" onclick="group3_button13_onclick"/>
              <Div position="absolute 0 11 563 66" align="align:center top;" id="group2" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Button position="absolute 480 17 536 39" id="btn_srch" class="btn1" taborder="3" text="조회" anchor="top right" onclick="group3_group2_btn_srch_onclick"/>
                    <Shape position="absolute 464 7 470 48" linetype="vertical" id="line43" class="line_4" anchor="top right"/>
                    <Static text="~" position="absolute 239 17 254 32" id="caption2" anchor="default"/>
                    <Calendar position="absolute 151 15 236 34" id="ipt_fromdd" class="input_search" taborder="1" anchor="default" onkillfocus="group3_group2_ipt_fromdd_onkillfocus"/>
                    <Calendar position="absolute 252 15 337 34" id="ipt_todd" class="input_search" taborder="2" anchor="default"/>
                    <Static text="원외정산 도착일자 :" position="absolute 10 17 153 34" id="caption4" class="search_name" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
            </Layout>
          </Layouts>
        </Div>
        <Static text="의사별 원외정산내역 조회" position="absolute 1 0 217 23" id="caption6" class="tit_1"/>
      </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"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_list01_gridoprcdrinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="주치의"/>
          <Column id="orddrnm" type="STRING" size="256" sumtext="주치의이름"/>
          <Column id="clamym" type="STRING" size="256" sumtext="청구월"/>
          <Column id="cadecidifamt" type="STRING" size="256" sumtext="정산금액"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.group2.ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd"/>
      <BindItem id="item1" compid="group3.group2.ipt_todd" propid="value" datasetid="ds_send" columnid="todd"/>
    </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 SMPIF50300_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPIF50300_onload(obj:Form, e:LoadEventInfo)
{
	
}

function group3_group2_btn_srch_onclick(obj:Button,  e:ClickEventInfo)
{
	if(utlf_isNull(ds_send.getColumn(0, "fromdd")) || utlf_isNull(ds_send.getColumn(0, "todd")))
	{
		sysf_messageBox("도착 시작일과 종료일을","C001");
		
		group3.group2.ipt_fromdd.setFocus();
		
		return false;
	}
	
	ds_main_list01_gridoprcdrinfo.clearData();
	
	var oParam = {};
		oParam.id          = "TRPIF50300";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetOprcDrInfo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_list01_gridoprcdrinfo=gridoprcdrinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIF50300";

	tranf_submit(oParam);
}

function group3_button13_onclick(obj:Button,  e:ClickEventInfo)
{
	col = "N";
	group3.grddrinfo.selecttype = "multiarea";
}

function group3_button10_onclick(obj:Button,  e:ClickEventInfo)
{
	col = "Y";
	group3.grddrinfo.selecttype = "multiarea";
}

function group3_button11_onclick(obj:Button,  e:ClickEventInfo)
{
	col = "N";
	group3.grddrinfo.selecttype = "multirow";
}

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

function group3_button12_onclick(obj:Button,  e:ClickEventInfo)
{
	var today = new Date();
											
	var yy = today.getYear()+"";
	var mm = today.getMonth()+1;
	var dd = today.getDate();
	
	if(mm < 10) { mm = "0"+mm; } 	else { mm = mm+""; }
	if(dd < 10) { dd = "0" + dd; }  else { dd = dd + ""; }
	
	var tmp = yy+mm+dd;
	
	if(ds_main_list01_gridoprcdrinfo.rowcount == 0)
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");		///엑셀저장할 내역이 없습니다.
	}
	else
	{
		grdf_exportExcel(group3.grddrinfo, "원외처방개인별심결내역및지급내역조회_"+tmp, "see");
	}
}

function group3_grddrinfo_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 group3_grddrinfo_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");
		}
	}
}

function group3_group2_ipt_fromdd_onkillfocus(obj:Calendar, e:KillFocusEventInfo)
{
	ds_send.setColumn(0, "todd", obj.value);
}
]]></Script>
  </Form>
</FDL>