YNU_JEUS/app_home/himed/xpapps/pam/rcptteamstatsxp/xp/SPPAS00790_원외삭감내역조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPAS00790" position="absolute 0 0 1110 777" titletext="원외처방 삭감내역 조회" oninit="SPPAS00790_oninit" onload="SPPAS00790_onload">
    <Layouts>
      <Layout>
        <Grid position="absolute 0 91 1100 753" align="align:center middle;" id="grd_outcutlist" binddataset="ds_main_outcut_outcutlist" anchor="all" autosizingtype="row">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="79"/>
                <Column size="125"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="100"/>
                <Column size="200"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="350"/>
              </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="진료월"/>
                <Cell col="5" text="추가징수액"/>
                <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="사유"/>
              </Band>
              <Band id="body">
                <Cell displaytype="combo" edittype="combo" style="align:center middle;" text="bind:insukind" combodataset="ds_init_insukind" combocodecol="cd" combodatacol="nm"/>
                <Cell col="1" text="bind:orddeptnm"/>
                <Cell col="2" text="bind:patnm"/>
                <Cell col="3" text="bind:pid"/>
                <Cell col="4" displaytype="date" edittype="none" text="bind:clamym" mask="yyyy-MM" calendardisplaynulltype="none"/>
                <Cell col="5" displaytype="number" text="bind:insubramt" mask="9,999"/>
                <Cell col="6" displaytype="date" text="bind:orddd" mask="yyyy-MM-dd" calendardisplaynulltype="none"/>
                <Cell col="7" text="bind:judgrnm"/>
                <Cell col="8" text="bind:calcscorcd"/>
                <Cell col="9" text="bind:hngnm"/>
                <Cell col="10" displaytype="number" text="bind:druglimitamt" mask="9,999"/>
                <Cell col="11" displaytype="number" text="bind:adjtoneqty" mask="9,999"/>
                <Cell col="12" displaytype="number" text="bind:adjtdayqty" mask="9,999"/>
                <Cell col="13" displaytype="number" text="bind:adjttotqty" mask="9,999"/>
                <Cell col="14" displaytype="number" text="bind:adjtamt" mask="9,999"/>
                <Cell col="15" style="align:left top;" text="bind:abdresnmemo" wordwrap="char" autosizerow="limitmin"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Div position="absolute 0 23 1100 60" id="group2" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Button position="absolute 1025 8 1081 30" id="btn_search" class="btn1" text="조회" anchor="top right" onclick="group2_btn_search_onclick"/>
              <Shape position="absolute 1012 8 1018 30" linetype="vertical" id="line1" class="line_4" visible="true" anchor="top right"/>
              <Static text="일자 :" position="absolute 10 10 101 27" id="caption4" class="search_name"/>
              <Calendar position="absolute 72 8 162 27" id="input1" class="input_essential" dateformat="yyyy-MM-dd" value="null" autoselect="true" autoskip="true"/>
              <Calendar position="absolute 185 8 275 27" id="input2" class="input_essential" dateformat="yyyy-MM-dd" value="null" autoselect="true" autoskip="true"/>
              <Static text="~" position="absolute 167 8 187 28" id="caption1"/>
              <Edit position="absolute 404 8 489 27" id="input3" class="input_essential" onkeydown="group2_input3_onkeydown"/>
              <Static text="환자번호 :" position="absolute 320 10 420 27" id="caption3" class="search_name"/>
              <Button position="absolute 493 10 509 26" id="button3" class="icon_search" text="" onclick="group2_button3_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static text="원외처방 삭감내역" position="absolute 0 70 140 91" id="caption2" class="tit_2"/>
        <Button position="absolute 1020 67 1100 86" id="button2" class="btn7" text="엑셀저장" anchor="top right" onclick="button2_onclick"/>
        <Button position="absolute 1057 754 1099 773" id="button1" class="btn2" text="닫기" anchor="right bottom" onclick="button1_onclick"/>
        <Shape position="absolute 0 86 1100 92" linetype="horizontal" id="line2" class="line_1" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
        <Static id="caption60" text="원외처방 삭감내역 조회" class="tit_1" position="absolute 0 0 255 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="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="srchpid" type="STRING" size="256"/>
          <Column id="sendflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_outcut_outcutlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과"/>
          <Column id="patnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
          <Column id="clamym" type="STRING" size="256" sumtext="진료월"/>
          <Column id="abdresnmemo" type="STRING" size="256" sumtext="사유"/>
          <Column id="calcscorcd" type="STRING" size="256" sumtext="수가코드"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="druglimitamt" type="STRING" size="256" sumtext="단가"/>
          <Column id="adjtoneqty" type="STRING" size="256" sumtext="수량"/>
          <Column id="adjtdayqty" type="STRING" size="256" sumtext="일투여량"/>
          <Column id="adjttotqty" type="STRING" size="256" sumtext="총투여량"/>
          <Column id="adjtamt" type="STRING" size="256" sumtext="금액"/>
          <Column id="insubramt" type="STRING" size="256" sumtext="추가징수액"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
          <Column id="judgrnm" type="STRING" size="256" sumtext="심사자"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_insukind" 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_send_data" 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="srchcond" 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="group2.input1" propid="value" datasetid="ds_send" columnid="fromdd"/>
      <BindItem id="item1" compid="group2.input2" propid="value" datasetid="ds_send" columnid="todd"/>
      <BindItem id="item2" compid="group2.input3" propid="value" datasetid="ds_send" columnid="srchpid"/>
    </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";
function SPPAS00790_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPPAS00790_onload(obj:Form, e:LoadEventInfo)
{
	var oParam = {};
		oParam.id          = "TRPAS00791";
		oParam.service     = "rcptteamstatsapp.rcptTeamPatStats";
		oParam.method      = "reqGetInsuKind";
		oParam.inds        = "";
		oParam.outds       = "ds_init_insukind=insukind";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPAS00791";

	tranf_submit(oParam);
	
	ds_send.setColumn(0, "fromdd", utlf_getCurrentDate());
	ds_send.setColumn(0, "todd", utlf_getCurrentDate());
}

function group2_input3_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
    ds_send.setColumn(0, "srchpid", obj.value);
		
		group2.btn_search.click();
	}
}

function group2_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	var oParam = {};
		oParam.id          = "TRPAS00790";
		oParam.service     = "rcptteamstatsapp.rcptTeamPatStats";
		oParam.method      = "reqGetOutCutList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_outcut_outcutlist=outcutlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPAS00790";

	tranf_submit(oParam);
	
	var cnt = ds_main_outcut_outcutlist.rowcount
	
	if ( cnt < 1 ) 
	{
		sysf_messageBox("조회된 내역이 없습니다.", "I");
	} 
	else
	{
		for(var i = 0; i < ds_main_outcut_outcutlist.rowcount; i++)
		{
			var insu = ds_main_outcut_outcutlist.getColumn(i, "insukind");
			var insu_up = ds_main_outcut_outcutlist.getColumn(i, "insukind");
			var orddeptnm = ds_main_outcut_outcutlist.getColumn(i, "orddeptnm");
			var orddeptnm_up = ds_main_outcut_outcutlist.getColumn(i, "orddeptnm");
			var pid = ds_main_outcut_outcutlist.getColumn(i, "pid");
			var pid_up = ds_main_outcut_outcutlist.getColumn(i, "pid");
			var clamym = ds_main_outcut_outcutlist.getColumn(i, "clamym");
			var clamym_up = ds_main_outcut_outcutlist.getColumn(i, "clamym");
			var insubramt = ds_main_outcut_outcutlist.getColumn(i, "insubramt");
			var insubramt_up = ds_main_outcut_outcutlist.getColumn(i, "insubramt");
			
			if ( insu == insu_up && orddeptnm == orddeptnm_up && pid == pid_up && clamym == clamym_up && insubramt == insubramt_up)
			{
				//grd_outcutlist.mergeRow(i) = true;
				//grd_outcutlist.mergeRow(i-1) = true;
			}
			else 
			{
				//grd_outcutlist.mergeRow(i) = false;
			}
			
		}
	}
}

function group2_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	var ptbs_pid = ds_send.getColumn(0, "srchpid");
						
	if (utlf_isNull(ptbs_pid))
	{
		ds_send_data.clearData();
		ds_send_data.addRow();
	} 
	else 
	{
		ds_send_data.clearData();
		ds_send_data.addRow();
		
		ds_send_data.setColumn(0, "pid", ds_send.getColumn(0, "srchpid"));
		ds_send_data.setColumn(0, "srchcond", "1");
	}
	 
	var objArg = new Object();
		objArg.arg_ds_send = ds_send_data;

	frmf_modal("SPPMC02500", "SPPMC02500", objArg, "", "", "", "", "", "", "", "", "", "M");
	
	if ( frmf_getParameter("SPPMC02500_popupendflag") == "ok" ) 
	{
		ds_send.setColumn(0, "srchpid", ds_patinfolist.getColumn(0, "pid"));
	 }
	 group2.btn_search.click();
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	if(ds_main_outcut_outcutlist.rowcount == 0)
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");
	}
	else
	{
        grdf_exportExcel(grd_outcutlist, "excel", "SheetName", true, "", "user", false);
	}
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}
]]></Script>
  </Form>
</FDL>