YNU_JEUS/app_home/himed/xpapps/pam/clamuncoxp/xp/SPPIF30301_개인별상한액.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPIF30301" position="absolute 0 0 1108 690" titletext="개인별상한액" oninit="SPPIF30301_oninit" onload="SPPIF30301_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 1100 658" id="group3" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 26 1100 32" linetype="horizontal" id="line8" class="line_1" style="strokepen:3 solid #33bbbbff;"/>
              <Static text="개인별 상한액" position="absolute 1 10 113 32" id="caption4" class="tit_2"/>
              <Grid position="absolute 0 31 1100 656" id="grd_pifmiunc" class="datagrid2" binddataset="ds_main_pifmiunc" oncellclick="group3_grd_pifmiunc_oncellclick" onkeydown="group3_grd_pifmiunc_onkeydown" cellmovingtype="col" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="21"/>
                      <Column size="35"/>
                      <Column size="35"/>
                      <Column size="35"/>
                      <Column size="84"/>
                      <Column size="80"/>
                      <Column size="75"/>
                      <Column size="80"/>
                      <Column size="70"/>
                      <Column size="55"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="84"/>
                      <Column size="90"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="28" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1" text="체크"/>
                      <Cell col="2" text="반송&#10;여부"/>
                      <Cell col="3" text="입금&#10;여부"/>
                      <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="caption1"/>
                      <Cell col="18"/>
                      <Cell col="19"/>
                      <Cell col="20"/>
                      <Cell col="21"/>
                      <Cell col="22"/>
                      <Cell col="23"/>
                      <Cell col="24"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" expr="expr:currow+1"/>
                      <Cell col="1" displaytype="checkbox" edittype="expr:chkdepo == 'Y' ? 'none' : 'checkbox'" style="controlbackground:EXPR(chkdepo == 'Y' ? 'darkgray' : '');" text="bind:check" expr="expr:check == 'Y' || check == '1' ? 1 : 0"/>
                      <Cell col="2" text="bind:sendyn"/>
                      <Cell col="3" text="bind:depoyn"/>
                      <Cell col="4" displaytype="date" edittype="expr:chkdepo == 'Y' ? 'none' : 'date'" text="bind:depodd" mask="yyyy-MM-dd" calendardisplaynulltype="none"/>
                      <Cell col="5" text="bind:decotretflag"/>
                      <Cell col="6" text="bind:acptno"/>
                      <Cell col="7" text="bind:docuseqno"/>
                      <Cell col="8" text="bind:pid"/>
                      <Cell col="9" text="bind:patnm"/>
                      <Cell col="10" text="bind:orddeptcd" enable="false"/>
                      <Cell col="11" displaytype="number" text="bind:clmcstotamt"/>
                      <Cell col="12" displaytype="number" text="bind:clclamamt"/>
                      <Cell col="13" displaytype="number" text="bind:clownbmaxexamt"/>
                      <Cell col="14" text="bind:judgdg"/>
                      <Cell col="15" displaytype="date" text="bind:rtndd" mask="yyyy-MM-dd" calendardisplay="edit" calendardisplaynulltype="none"/>
                      <Cell col="16" displaytype="combo" edittype="combo" text="bind:rtnyn" combodataset="ds_cmb_rtnyn" combocodecol="value" combodatacol="label" enable="false"/>
                      <Cell col="17" text="bind:jrjudgdeciamt"/>
                      <Cell col="18" text="bind:clamym"/>
                      <Cell col="19" text="bind:clamdg"/>
                      <Cell col="20" text="bind:pidsn"/>
                      <Cell col="21" text="bind:decoseq"/>
                      <Cell col="22" text="bind:instcd"/>
                      <Cell col="23" text="bind:inddepoflag"/>
                      <Cell col="24" text="bind:chkdepo"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 888 7 952 26" id="button1" class="btn2" text="전체선택" onclick="group3_button1_onclick"/>
              <Button position="absolute 954 7 1018 26" id="button2" class="btn2" text="전체해제" onclick="group3_button2_onclick"/>
              <Button position="absolute 1020 7 1100 26" id="button4" class="btn7" text="엑셀저장" onclick="group3_button4_onclick"/>
              <Button position="absolute 612 7 720 26" id="button5" class="btn5" text="입금일자일괄적용" onclick="group3_button5_onclick"/>
              <Calendar position="absolute 511 7 611 26" id="ipt_depodd" enable="false" mask="yyyy-mm-dd"/>
              <Button position="absolute 722 7 775 26" id="button6" class="btn2" text="셀카피" onclick="group3_button6_onclick"/>
              <Button position="absolute 777 7 830 26" id="button7" class="btn2" text="열카피" onclick="group3_button7_onclick"/>
              <Button position="absolute 832 7 885 26" id="button8" class="btn2" text="행카피" onclick="group3_button8_onclick"/>
              <Static text="입금된 금액 :" position="absolute 105 8 190 28" id="caption3"/>
              <Static position="absolute 177 8 236 28" align="align:right middle;" id="cp_insumfix" mask="#,###" style="align:right middle;"/>
              <Static text="입금할 금액 :" position="absolute 247 8 324 28" id="caption1"/>
              <Static position="absolute 318 8 377 28" align="align:right middle;" id="cp_insum" mask="#,###" style="align:right middle;"/>
              <Static text="미수금액 :" position="absolute 389 8 446 28" id="caption2"/>
              <Static position="absolute 445 8 504 28" align="align:right middle;" id="cp_nonsum" mask="#,###" style="align:right middle;"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 655 1100 682" id="group1" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 1044 3 1100 25" id="btn_cancel" class="btn4" text="닫기" anchor="default" onclick="group1_btn_cancel_onclick"/>
              <Button position="absolute 987 3 1043 25" id="button3" class="btn4" text="확인" anchor="default" onclick="group1_button3_onclick"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_pifmiunc" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_main_pifmiunc_oncolumnchanged">
        <ColumnInfo>
          <Column id="check" type="STRING"/>
          <Column id="sendyn" type="STRING"/>
          <Column id="depoyn" type="STRING"/>
          <Column id="depodd" type="STRING"/>
          <Column id="decotretflag" type="STRING"/>
          <Column id="acptno" type="STRING"/>
          <Column id="docuseqno" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="orddeptcd" type="STRING"/>
          <Column id="clmcstotamt" type="STRING"/>
          <Column id="clclamamt" type="STRING"/>
          <Column id="clownbmaxexamt" type="INT"/>
          <Column id="judgdg" type="STRING"/>
          <Column id="rtndd" type="STRING"/>
          <Column id="rtnyn" type="STRING"/>
          <Column id="jrjudgdeciamt" type="STRING"/>
          <Column id="clamym" type="STRING"/>
          <Column id="clamdg" type="STRING"/>
          <Column id="pidsn" type="STRING"/>
          <Column id="decoseq" type="STRING"/>
          <Column id="instcd" type="STRING"/>
          <Column id="inddepoflag" type="STRING"/>
          <Column id="chkdepo" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_tmp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="insuflag" type="STRING" size="256"/>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamdd" type="STRING" size="256"/>
          <Column id="acptno" type="STRING" size="256"/>
          <Column id="judgdg" type="STRING" size="256"/>
          <Column id="opn_row" type="STRING" size="256"/>
          <Column id="openerflag" type="STRING" size="256"/>
          <Column id="rtndd" type="STRING" size="256"/>
          <Column id="inddepoflag" type="STRING" size="256"/>
          <Column id="openflag" type="STRING" size="256"/>
          <Column id="clamno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="insuflag"/>
            <Col id="clamym"/>
            <Col id="clamdd"/>
            <Col id="acptno"/>
            <Col id="judgdg"/>
            <Col id="opn_row"/>
            <Col id="openerflag"/>
            <Col id="rtndd"/>
            <Col id="inddepoflag"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_depoddbatch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="depodd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_rtnyn" 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">Y</Col>
            <Col id="value">Y</Col>
          </Row>
          <Row>
            <Col id="label">N</Col>
            <Col id="value">N</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.ipt_depodd" propid="value" datasetid="ds_temp_depoddbatch" columnid="depodd"/>
    </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 SPPIF30301_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPPIF30301_onload(obj:Form, e:LoadEventInfo)
{
	ds_tmp.copyData(arg_ds_send);
	
	ds_send.setColumn(0, "insuflag", ds_tmp.getColumn(0, "insuflag"));
	ds_send.setColumn(0, "acptno", ds_tmp.getColumn(0, "acptno"));
	ds_send.setColumn(0, "judgdg", ds_tmp.getColumn(0, "judgdg"));
	ds_send.setColumn(0, "opn_row", ds_tmp.getColumn(0, "opn_row"));
	ds_send.setColumn(0, "clamno", ds_tmp.getColumn(0, "clamno"));
	ds_send.setColumn(0, "openerflag", ds_tmp.getColumn(0, "openerflag"));
	ds_send.setColumn(0, "inddepoflag", ds_tmp.getColumn(0, "inddepoflag"));
	ds_send.setColumn(0, "rtndd", ds_tmp.getColumn(0, "rtndd"));

	ds_temp_depoddbatch.setColumn(0, "depodd", ds_send.getColumn(0, "rtndd"));
	
	CommCode_Load();
}

function CommCode_Load()
{
	ds_send.setColumn(0, "openflag", "상한금");
	
	var oParam = {};
		oParam.id          = "TRPIF30305";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetPsnMaxAmtSrch";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_pifmiunc=gridpifmiunc";
		oParam.async       = false;
		oParam.callback    = "cf_TRPIF30305";

	tranf_submit(oParam);
	
	finnonSum();
}

function cf_TRPIF30305(sSvcId, nErrorCode, sErrorMsg)
{
    if(nErrorCode < 0)
    {
		return;
	}
	else
	{
		ds_main_pifmiunc.updatecontrol = false;
		
		for(var i = 0; i < ds_main_pifmiunc.rowcount; i++)
		{
			if(ds_main_pifmiunc.getColumn(i, "chkdepo") != "Y")
			{
				ds_main_pifmiunc.setColumn(i, "check", "Y");
			}
		}
		ds_main_pifmiunc.updatecontrol = true;
	}
}

function finnonSum()
{
	var rows = ds_main_pifmiunc.rowcount;
	var insumfix  = 0;	// 입금된 금액
	var insum  = 0;		// 입금할 금액
	var nonsum = 0 ;		// 미수   금액
		
	for(var i = 0; i < rows; i++) 
	{
		if(ds_main_pifmiunc.getColumn(i, "depoyn") == "Y")
		{
			if(ds_main_pifmiunc.getColumn(i, "check") != "Y")
			{
				insumfix = insumfix + ds_main_pifmiunc.getColumn(i, "clownbmaxexamt");
			}
			else
			{
				if(ds_main_pifmiunc.getColumn(i, "sendyn") != "Y")
				{
					insum = insum + ds_main_pifmiunc.getColumn(i, "clownbmaxexamt");
				}
			}
		}
		else
		{
			nonsum = nonsum + ds_main_pifmiunc.getColumn(i, "clownbmaxexamt");
		}
	}
	
	group3.cp_insumfix.text = insumfix;
	group3.cp_insum.text = insum;
	group3.cp_nonsum.text = nonsum;
}

function group3_button5_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = ds_main_pifmiunc.rowcount;
	
	for(var i = 0; i < rows; i++) 
	{
		if(ds_main_pifmiunc.getColumn(i, "check") == "Y")
		{
			ds_main_pifmiunc.setColumn(i, "depodd", group3.ipt_depodd.value);
		}
	}
}

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

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

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

function group3_grd_pifmiunc_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_grd_pifmiunc_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_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = ds_main_pifmiunc.rowcount;
	
	for(var i = 0; i < rows; i++) 
	{
		if(ds_main_pifmiunc.getColumn(i, "depoyn") == "Y")
		{
			continue;
		}
		else
		{
			ds_main_pifmiunc.setColumn(i, "check", "Y");
			group3.grd_pifmiunc.setCellProperty("Body", 4, "edittype", "date");
		}
	}
	finnonSum();
}

function group3_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = ds_main_pifmiunc.rowcount;
	
	for(var i = 0; i < rows; i++) 
	{
		if(ds_main_pifmiunc.getColumn(i, "check") != "Y")
		{
			continue;
		}
		else
		{
			ds_main_pifmiunc.setColumn(i, "check", "N");
			grdf_setStatus(group3.grd_pifmiunc, "", i); 
			
			ds_main_pifmiunc.setColumn(i, "depoyn", "N");
			ds_main_pifmiunc.setColumn(i, "depodd", "");
			
			group3.grd_pifmiunc.setCellProperty("Body", 4, "edittype", "none");
		}
	}
	finnonSum();
}

function group3_button4_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_pifmiunc.rowcount > 0) 
	{
		grdf_exportExcel(group3.grd_pifmiunc, "개인별상한금관리_"+tmp, "see");
	} 
	else 
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");
	}
}

function group1_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = ds_main_pifmiunc.rowcount;
	var totsum = 0;
	var cnt = 0;
	
	for(var i = 0; i <rows; i++) 
	{
		if(ds_main_pifmiunc.getColumn(i, "check") == "Y")
		{
			cnt++;
			
			if(ds_main_pifmiunc.getColumn(i, "sendyn") != "Y")
			{
				totsum += Number(ds_main_pifmiunc.getColumn(i, "clownbmaxexamt"));
			}
			else
			{
				ds_main_pifmiunc.setColumn(i, "clownbmaxexamt", "0");
			}
		}
	}
	
// 	model.setValue("/root/main/list02/gridpifmidep", '');
// 	model.setValue("/root/main/list02/gridpifmidep", getNodeListCSV(instance1.selectNodes("/root/main/list01/gridpifmiunc[check = 'Y']")));
// 	
// 	opener.model.makeNode("/root/main/list02/gridpifmidep");
// 	opener.model.setValue("/root/main/list02/gridpifmidep",model.getValue("/root/main/list02/gridpifmidep"));

	ds_main_pifmiunc.filterstr = "check == 'Y'";
	
	opener.ds_main_list02_gridpifmidep.clearData();
	opener.ds_main_list02_gridpifmidep.copyData(ds_main_pifmiunc)
	opener.ds_main_list01_gridpifhbsdp.setColumn(ds_send.getColumn(0, "opn_row"), "depoamt", totsum);
	opener.ds_main_list01_gridpifhbsdp.setColumn(ds_send.getColumn(0, "opn_row"), "depocnt", cnt);
	
	ds_main_pifmiunc.filterstr = "";
	
	this.close();
}

function group1_btn_cancel_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function ds_main_pifmiunc_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if( e.columnid == "check" )
	{
		obj.setColumn(e.row, "check", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");

		if(e.newvalue == 0)
		{
			obj.updatecontrol = false;
			obj.setRowType(e.row, "1");
			obj.updatecontrol = true;
			
			obj.setColumn(e.row, "depodd", "");
			obj.setColumn(e.row, "depoyn", "N");
			
			group3.grd_pifmiunc.setCellProperty("Body", 4, "edittype", "none");
		}
		else
		{
			group3.grd_pifmiunc.setCellProperty("Body", 4, "edittype", "date");
			
			obj.setRowType(e.row, "4");
			
			if ( obj.getColumn(e.row, "sendyn") != "Y" ) 
			{
				obj.setColumn(e.row, "depoyn", "Y");
			}
		}
		
		finnonSum();
	}
}
]]></Script>
  </Form>
</FDL>