YNU_JEUS/app_home/himed/xpapps/pam/clamuncoxp/xp/SMPIF10300_일괄접수정보생성관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPIF10300" position="absolute 0 0 1203 788" titletext="일괄접수정보조회" oninit="SMPIF10300_oninit" onload="SMPIF10300_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 1 13 1196 757" id="group3" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Static text="일괄접수정보생성내역" position="absolute 0 54 155 75" id="caption1" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 70 1194 76" linetype="horizontal" id="line1" class="line_1" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
              <Div position="absolute 0 11 1194 46" align="align:center top;" id="group4" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Button position="absolute 1122 7 1178 29" id="button15" class="btn1" taborder="4" text="조회" anchor="top right" onclick="group3_group4_button15_onclick"/>
                    <Shape position="absolute 1103 7 1109 29" linetype="vertical" id="line2" class="line_4" anchor="top right"/>
                    <Static text="접수일자 :" position="absolute 24 9 110 26" id="caption9" class="search_name" anchor="default"/>
                    <Static text="청구유형 :" position="absolute 375 9 461 26" id="caption3" class="search_name" anchor="default"/>
                    <Combo position="absolute 686 7 806 26" id="combo4" class="combo_search" taborder="3" visible="false" innerdataset="@ds_init_P0103list" datacolumn="cdnm" codecolumn="cdid" anchor="default" onitemchanged="group3_group4_combo4_onitemchanged"/>
                    <Static text="~" position="absolute 219 10 234 25" id="caption7" anchor="default"/>
                    <Calendar position="absolute 115 8 215 27" id="ipt_fromacptym" class="input_search" taborder="1" anchor="default" dateformat="yyyy-MM-dd" value="null" onkeyup="group3_group4_ipt_fromacptym_onkeyup" onkillfocus="group3_group4_ipt_fromacptym_onkillfocus"/>
                    <Calendar position="absolute 233 8 333 27" id="ipt_toacptym" class="input_search" taborder="2" anchor="default" dateformat="yyyy-MM-dd" value="null" onkeyup="group3_group4_ipt_toacptym_onkeyup"/>
                    <Radio position="absolute 457 9 703 24" id="rdo_clamtypecd" class="radio_search" taborder="3" columncount="-1" codecolumn="codecolumn" datacolumn="datacolumn" rowcount="-1" anchor="default" onitemchanged="group3_group4_rdo_clamtypecd_onitemchanged">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn"/>
                          <Column id="datacolumn"/>
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">
                            </Col>
                            <Col id="datacolumn">전체</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">1</Col>
                            <Col id="datacolumn">요양급여</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">4</Col>
                            <Col id="datacolumn">의료급여</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">6</Col>
                            <Col id="datacolumn">산재</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Radio>
                  </Layout>
                </Layouts>
              </Div>
              <Button position="absolute 920 18 962 37" id="button1" class="btn2" visible="false" text="삭제" anchor="default"/>
              <Button position="absolute 1114 51 1194 70" id="button2" class="btn7" text="엑셀저장" anchor="top right" onclick="group3_button2_onclick"/>
              <Grid position="absolute 0 75 1194 743" id="grduncoinfo" binddataset="ds_main_list01_griduncoinfo" anchor="all" oncellclick="group3_grduncoinfo_oncellclick" onkeydown="group3_grduncoinfo_onkeydown" cellsizingtype="col" cellmovingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="0"/>
                      <Column size="22"/>
                      <Column size="35"/>
                      <Column size="84"/>
                      <Column size="75"/>
                      <Column size="65"/>
                      <Column size="75"/>
                      <Column size="90"/>
                      <Column size="99"/>
                      <Column size="80"/>
                      <Column size="85"/>
                      <Column size="115"/>
                      <Column size="115"/>
                      <Column size="115"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1"/>
                      <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="지원금"/>
                      <Cell col="16" text="장애인의료비"/>
                      <Cell col="17" text="대불금"/>
                      <Cell col="18" text="청구번호"/>
                    </Band>
                    <Band id="body">
                      <Cell displaytype="checkbox" edittype="checkbox" text="bind:chkbox"/>
                      <Cell col="1" celltype="head" expr="currow+1"/>
                      <Cell col="2" text="bind:uncoyn"/>
                      <Cell col="3" text="bind:clamtypecd" enable="false"/>
                      <Cell col="4" text="bind:clamflag" enable="false"/>
                      <Cell col="5" text="bind:ioflag"/>
                      <Cell col="6" displaytype="date" text="bind:ordym" mask="yyyy-MM"/>
                      <Cell col="7" text="bind:ordfildcd"/>
                      <Cell col="8" text="bind:acptno"/>
                      <Cell col="9" displaytype="date" text="bind:acptdd" mask="yyyy-MM-dd"/>
                      <Cell col="10" displaytype="number" text="bind:cnt"/>
                      <Cell col="11" displaytype="number" text="bind:medcaretotamt"/>
                      <Cell col="12" displaytype="number" text="bind:ownbamt"/>
                      <Cell col="13" displaytype="number" text="bind:insuclamamt"/>
                      <Cell col="14" displaytype="number" text="bind:ownbmaxexamt"/>
                      <Cell col="15" displaytype="number" text="bind:suppamt"/>
                      <Cell col="16" displaytype="number" text="bind:handcaprfund"/>
                      <Cell col="17" displaytype="number" text="bind:subtamt"/>
                      <Cell col="18" text="bind:clamno"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 20 145 260 164" id="button115" class="btn2" visible="false" text="[인풋박스]접수일자로 포커스이동" anchor="default" onclick="group3_button115_onclick"/>
              <Button position="absolute 30 155 270 174" id="button4" class="btn2" visible="false" text="[인풋박스]환자유형으로 포커스이동" anchor="default" onclick="group3_button4_onclick"/>
              <Button position="absolute 963 18 1101 37" id="button5" class="btn2" enable="false" visible="false" text="접수미수배치작업확인" anchor="default" onclick="group3_button5_onclick"/>
              <Button position="absolute 909 51 962 70" id="button10" class="btn2" text="열카피" anchor="top right" onclick="group3_button10_onclick"/>
              <Button position="absolute 964 51 1017 70" id="button11" class="btn2" text="행카피" anchor="top right" onclick="group3_button11_onclick"/>
              <Button position="absolute 854 51 907 70" id="button13" class="btn2" text="셀카피" anchor="top right" onclick="group3_button13_onclick"/>
              <Button position="absolute 1019 51 1113 70" id="button7" class="btn7" text="Open Excel" anchor="top right" onclick="group3_button7_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 1 755 1196 782" id="group2" scrollbars="autoboth" anchor="left right bottom">
          <Layouts>
            <Layout>
              <Button position="absolute 915 5 1019 27" id="button42" class="btn4" enable="false" visible="false" text="접수미수생성" anchor="right bottom" onclick="group2_button42_onclick"/>
              <Shape position="absolute 0 0 1194 6" linetype="horizontal" id="line32" class="line_6" anchor="left right bottom"/>
              <Button position="absolute 1127 5 1195 27" id="button3" class="btn4" visible="true" text="초기화" anchor="right bottom" onclick="group2_button3_onclick"/>
              <Button position="absolute 1021 5 1125 27" id="button6" class="btn4" enable="false" visible="false" text="접수미수삭제" anchor="right bottom" onclick="group2_button6_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption6" text="일괄접수정보생성조회" class="tit_1" position="absolute 1 0 305 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="fromacptdd" type="STRING" size="256"/>
          <Column id="clamtypecd" type="STRING" size="256"/>
          <Column id="toacptdd" type="STRING" size="256"/>
          <Column id="insukind" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0103list" 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_main_list01_griduncoinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamtypecd" type="STRING" size="256" sumtext="청구유형"/>
          <Column id="chkbox" type="STRING" size="256" sumtext="체크구분"/>
          <Column id="clamflag" type="STRING" size="256" sumtext="청구구분"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="내원형태"/>
          <Column id="ordym" type="STRING" size="256" sumtext="진료년월"/>
          <Column id="ordfildcd" type="STRING" size="256" sumtext="진료분야"/>
          <Column id="acptno" type="STRING" size="256" sumtext="접수번호"/>
          <Column id="acptdd" type="STRING" size="256" sumtext="접수일자"/>
          <Column id="cnt" type="STRING" size="256" sumtext="청구건수"/>
          <Column id="medcaretotamt" type="STRING" size="256" sumtext="요양급여총액"/>
          <Column id="ownbamt" type="STRING" size="256" sumtext="본인부담금"/>
          <Column id="insuclamamt" type="STRING" size="256" sumtext="청구액"/>
          <Column id="uncoyn" type="STRING" size="256" sumtext="미수생성유무"/>
          <Column id="clamno" type="STRING" size="256" sumtext="청구번호"/>
          <Column id="ownbmaxexamt" type="STRING" size="256" sumtext="본인상한초과금"/>
          <Column id="suppamt" type="STRING" size="256" sumtext="지원금"/>
          <Column id="handcaprfund" type="STRING" size="256" sumtext="장애인의료비"/>
          <Column id="subtamt" type="STRING" size="256" sumtext="대불금"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0155list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_P0028list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_P0235list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.group4.ipt_fromacptym" propid="value" datasetid="ds_send" columnid="fromacptdd"/>
      <BindItem id="item1" compid="group3.group4.ipt_toacptym" propid="value" datasetid="ds_send" columnid="toacptdd"/>
      <BindItem id="item2" compid="group3.group4.rdo_clamtypecd" propid="value" datasetid="ds_send" columnid="clamtypecd"/>
      <BindItem id="item3" compid="group3.group4.combo4" propid="value" datasetid="ds_send" columnid="clamtypecd"/>
    </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 SMPIF10300_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPIF10300_onload(obj:Form, e:LoadEventInfo)
{
	CommCode_Load();
	
	ds_main_list01_griduncoinfo.clearData();
	
	group3.group4.rdo_clamtypecd.index = 0;
}

function CommCode_Load()
{	
	var arrParam = [{dsNm: "ds_init_P0103list", cdGrpId: "P0103"}
				   ,{dsNm: "ds_init_P0155list", cdGrpId: "P0155"}
				   ,{dsNm: "ds_init_P0028list", cdGrpId: "P0028"}
				   ,{dsNm: "ds_init_P0235list", cdGrpId: "P0235"}]
				   
	appf_getCodeList(arrParam);	
}

function fInitialize()
{
	ds_send.clearData();
	ds_send.addRow();
	
	group3.group4.rdo_clamtypecd.index = 0;
	
	ds_main_list01_griduncoinfo.clearData();
	
	group3.group4.ipt_fromacptym.setFocus();
}

function group3_group4_button15_onclick(obj:Button,  e:ClickEventInfo)
{
	var oParam = {};
		oParam.id          = "TRPIF10300";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetUncoInfoPkg";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_list01_griduncoinfo=griduncoinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIF10300";

	tranf_submit(oParam);
}

function group3_button115_onclick(obj:Button,  e:ClickEventInfo)
{
	group3.group4.ipt_toacptym.setFocus();
}

function group3_group4_ipt_fromacptym_onkeyup(obj:Calendar, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		group3_button115_onclick();
	}
}

function group3_group4_ipt_fromacptym_onkillfocus(obj:Calendar, e:KillFocusEventInfo)
{
	ds_send.setColumn(0, "toacptdd", obj.value);
}

function group3_group4_ipt_toacptym_onkeyup(obj:Calendar, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		group3_button4_onclick();
	}
}

function group3_button4_onclick(obj:Button,  e:ClickEventInfo)
{
	group3.group4.combo4.setFocus();
}

function group3_group4_rdo_clamtypecd_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	var oParam = {};
		oParam.id          = "TRPIF10300";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetUncoInfoPkg";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_list01_griduncoinfo=griduncoinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIF10300";

	tranf_submit(oParam);
}

function group3_group4_combo4_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var oParam = {};
		oParam.id          = "TRPIF10300";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetUncoInfoPkg";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_list01_griduncoinfo=griduncoinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIF10300";

	tranf_submit(oParam);
}

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

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

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

function group3_grduncoinfo_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_grduncoinfo_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_button7_onclick(obj:Button,  e:ClickEventInfo)
{
	system.execShell("excel");
}

function group3_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	if(ds_main_list01_griduncoinfo.rowcount == 0)
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");		///엑셀저장할 내역이 없습니다.
	}
	else
	{
		grdf_exportExcel(group3.grduncoinfo, "", "see");
	}
}

function group2_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	fInitialize();
}

function group3_button5_onclick(obj:Button,  e:ClickEventInfo)
{
	var todd = utlf_getCurrentDate();
	todd = todd.toDate().getAddDate(+1, 'D');
	
	var objArg = new Object();
		objArg.todd = todd;	
		objArg.execrid = sysf_getUserId();
		objArg.prgmid = "AcptUncoCretBatch";
		
	frmf_open("SPZSB00301", "SPZSB00301", objArg, "","","","","","","","","","M");
}
]]></Script>
  </Form>
</FDL>