YNU_JEUS/app_home/himed/xpapps/pam/clamuncoxp/xp/SPPIF30401_지급보류관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPIF30401" position="absolute 0 0 1107 673" titletext="지급보류관리" oninit="SPPIF30401_oninit" onload="SPPIF30401_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 1100 640" 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 137 32" id="caption4" class="tit_2"/>
              <Grid position="absolute 0 31 1100 636" id="grd_pifmmiun" class="datagrid2" binddataset="ds_main_pifmmiun" cellmovingtype="col" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="25"/>
                      <Column size="34"/>
                      <Column size="40"/>
                      <Column size="50"/>
                      <Column size="60"/>
                      <Column size="50"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="70"/>
                      <Column size="110"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="60"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="29" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1" text="선택"/>
                      <Cell col="2" text="입금&#10;여부"/>
                      <Cell col="3" text="명일련"/>
                      <Cell col="4" text="등록번호"/>
                      <Cell col="5" text="수진자"/>
                      <Cell col="6" text="청구액"/>
                      <Cell col="7" text="심결&#10;장애인기금"/>
                      <Cell col="8" text="장애인전환금"/>
                      <Cell col="9" text="기관삭감액"/>
                      <Cell col="10" text="심사결정액"/>
                      <Cell col="11" text="심결입금&#10;기관기호"/>
                      <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="심결구분"/>
                      <Cell col="19" text="caption1"/>
                      <Cell col="20"/>
                      <Cell col="21"/>
                      <Cell col="22"/>
                      <Cell col="23"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head"/>
                      <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:choice" expr="expr:choice == 'Y' || choice == '1' ? 1 : 0"/>
                      <Cell col="2" text="bind:depoyn"/>
                      <Cell col="3" text="bind:docuseqno"/>
                      <Cell col="4" text="bind:pid"/>
                      <Cell col="5" text="bind:patnm"/>
                      <Cell col="6" displaytype="number" edittype="normal" style="align:right middle;" text="bind:clamamt"/>
                      <Cell col="7" displaytype="number" edittype="normal" style="align:right middle;" text="bind:jrhandicaprfund"/>
                      <Cell col="8" displaytype="number" edittype="normal" style="align:right middle;background:EXPR(!utlf_isNull(handicapcvrtamt) ? '#ffff00' : '#ffffff');background2:EXPR(!utlf_isNull(handicapcvrtamt) ? '#ffff00' : '#ffffff');" text="bind:handicapcvrtamt"/>
                      <Cell col="9" displaytype="number" edittype="normal" style="align:right middle;background:EXPR(!utlf_isNull(instreductamt)? '#ffff00' : '#ffffff');background2:EXPR(!utlf_isNull(instreductamt)? '#ffff00' : '#ffffff');" text="bind:instreductamt"/>
                      <Cell col="10" displaytype="none" edittype="none" text="bind:jrjudgdeciamt"/>
                      <Cell col="11" text="bind:jrprocinstmark"/>
                      <Cell col="12" text="bind:jrprocinstmarknm"/>
                      <Cell col="13" displaytype="number" edittype="normal" style="align:right middle;" text="bind:remainamt"/>
                      <Cell col="14" displaytype="number" edittype="normal" style="align:right middle;" text="bind:handicapdepoamt"/>
                      <Cell col="15" displaytype="number" edittype="normal" style="align:right middle;" text="bind:subtamt"/>
                      <Cell col="16" displaytype="number" edittype="normal" style="align:right middle;" text="bind:subtdepoamt"/>
                      <Cell col="17" displaytype="number" edittype="normal" style="align:right middle;" text="bind:jrdepoamt"/>
                      <Cell col="18" displaytype="combo" edittype="combo" text="bind:decotretflag"/>
                      <Cell col="19" text="bind:clamym"/>
                      <Cell col="20" text="bind:clamdg"/>
                      <Cell col="21" text="bind:pidsn"/>
                      <Cell col="22" text="bind:decoseq"/>
                      <Cell col="23" text="bind:inddepoflag"/>
                    </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"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 639 1100 666" id="group1" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 1044 3 1100 25" id="btn_cancel" class="btn4" text="닫기" onclick="group1_btn_cancel_onclick" anchor="default"/>
              <Button position="absolute 943 4 985 23" id="button3" class="btn5" text="저장" onclick="group1_button3_onclick" anchor="default"/>
              <Static text="명일련 추가" position="absolute 15 4 115 21" id="caption1" class="search_name" anchor="default"/>
              <Button position="absolute 888 4 941 23" id="button5" class="btn5" text="행삭제" onclick="group1_button5_onclick" anchor="default"/>
              <Button position="absolute 987 3 1043 25" id="button6" class="btn4" text="확인" onclick="group1_button6_onclick" anchor="default"/>
              <Static text="(명일련 추가 후 추가할 데이터가 맞으면 저장버튼을, 틀리면 체크박스 체크 후 행삭제 버튼을 클릭하세요.)" position="absolute 225 5 801 25" id="caption2" style="color:#ff6600ff;" anchor="default"/>
              <Edit id="ipt_docuseqno" taborder="1" class="input_search" position="absolute 109 0 210 24" onkeyup="group1_ipt_docuseqno_onkeyup" onkeydown="group1_ipt_docuseqno_onkeydown" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Button position="absolute 1020 7 1100 26" id="button4" class="btn7" text="엑셀저장" onclick="button4_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_pifmmiun" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_main_pifmmiun_oncolumnchanged">
        <ColumnInfo>
          <Column id="choice" type="STRING"/>
          <Column id="depoyn" type="STRING"/>
          <Column id="docuseqno" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="clamamt" type="STRING"/>
          <Column id="jrhandicaprfund" type="STRING"/>
          <Column id="handicapcvrtamt" type="STRING"/>
          <Column id="instreductamt" type="STRING"/>
          <Column id="jrjudgdeciamt" type="STRING"/>
          <Column id="jrprocinstmark" type="STRING"/>
          <Column id="jrprocinstmarknm" type="STRING"/>
          <Column id="remainamt" type="STRING"/>
          <Column id="handicapdepoamt" type="STRING"/>
          <Column id="subtamt" type="STRING"/>
          <Column id="subtdepoamt" type="STRING"/>
          <Column id="jrdepoamt" type="STRING"/>
          <Column id="decotretflag" type="STRING"/>
          <Column id="clamym" type="STRING"/>
          <Column id="clamdg" type="STRING"/>
          <Column id="pidsn" type="STRING"/>
          <Column id="decoseq" type="STRING"/>
          <Column id="inddepoflag" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0407list" 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="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="clamno" type="STRING" size="256"/>
          <Column id="cpcd" type="STRING" size="256"/>
          <Column id="assocd" type="STRING" size="256"/>
          <Column id="docuseqno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="clamym"/>
            <Col id="clamdd"/>
            <Col id="acptno"/>
            <Col id="judgdg"/>
            <Col id="clamno"/>
            <Col id="cpcd"/>
            <Col id="assocd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_tmp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="docuseqno" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.ipt_docuseqno" propid="value" datasetid="ds_send_send01" columnid="acptno"/>
    </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";

function SPPIF30401_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPPIF30401_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(group3.grd_pifmmiun);
	grdf_setRowTypeIcon(group3.grd_pifmmiun, 0);
	
	ds_tmp.copyData(arg_ds_send);
	
	ds_send.setColumn(0, "acptno", ds_tmp.getColumn(0, "acptno"));
	ds_send.setColumn(0, "judgdg", ds_tmp.getColumn(0, "judgdg"));
	ds_send.setColumn(0, "clamno", ds_tmp.getColumn(0, "clamno"));
	ds_send.setColumn(0, "assocd", ds_tmp.getColumn(0, "assocd"));
	ds_send.setColumn(0, "cpcd", ds_tmp.getColumn(0, "cpcd"));
	
	var arrParam = [{dsNm: "ds_init_P0407list", cdGrpId: "P0407"}]
				   
	appf_getCodeList(arrParam);	
	
	pamGetDeptCDDrIDList();
	
	CommCode_Load();
}

function CommCode_Load()
{
	var oParam = {};
		oParam.id          = "TRPIF30408";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetPayReteSpec";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_pifmmiun=gridpifmmiun";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIF30408";

	tranf_submit(oParam);

	var rows = ds_main_pifmmiun.rowcount;
	
	if(rows > 0) 
	{
		for(var i = 0; i < rows; i++) 
		{
			if(ds_main_pifmmiun.getColumn(i, "choice") == "Y")
			{
				group3.grd_pifmmiun.setCellProperty("Body", 0, "edittype", "none");
				group3.grd_pifmmiun.setCellProperty("Body", 8, "edittype", "nomal");
				group3.grd_pifmmiun.setCellProperty("Body", 9, "edittype" ,"nomal");
			}
			else 
			{
				group3.grd_pifmmiun.setCellProperty("Body", 8, "edittype", "none");
				group3.grd_pifmmiun.setCellProperty("Body", 9, "edittype" ,"none");
			}
			
		}
	}
	
// 	grd_pifmmiun.colStyle(8,"data","background-color") = "#ffff00";
// 	grd_pifmmiun.colStyle(9,"data","background-color") = "#ffff00";
}

function group3_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = ds_main_pifmmiun.rowcount;
	
	for(var i = 0; i < rows; i++) 
	{
		if(ds_main_pifmmiun.getColumn(i, "choice") == "Y")
		{
			continue;
		}
		else
		{
			ds_main_pifmmiun.setColumn(i, "choice", "Y");
			group3.grd_pifmmiun.setCellProperty("Body", 8, "edittype", "nomal");
			group3.grd_pifmmiun.setCellProperty("Body", 9, "edittype" ,"nomal");
			
			grdf_setStatus(group3.grd_pifmmiun, "U", i); 
			
		}
	}
}

function group3_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = ds_main_pifmmiun.rowcount;
	
	for(var i = 0; i < rows; i++) 
	{
		if(ds_main_pifmmiun.getColumn(i, "choice") == "N" || ds_main_pifmmiun.getRowType(i) == "2")
		{
			continue;
		}
		else 
		{
			ds_main_pifmmiun.setColumn(i, "choice", "N");
			grdf_setStatus(group3.grd_pifmmiun, "U", i); 
			
			ds_main_pifmmiun.setColumn(i, "handicapcvrtamt", "0");
			ds_main_pifmmiun.setColumn(i, "instreductamt", "0");
			
			group3.grd_pifmmiun.setCellProperty("Body", 8, "edittype", "none");
			group3.grd_pifmmiun.setCellProperty("Body", 9, "edittype" ,"none");
		}
	}
}

function 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_pifmmiun.rowcount > 0) 
	{
		grdf_exportExcel(group3.grd_pifmmiun, "지급보류관리_"+tmp, "see");
	} 
	else 
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");
	}
}

function group1_button5_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = ds_main_pifmmiun.rowcount;
	
	for(var i = 0; i < rows; i++) 
	{
		if(ds_main_pifmmiun.getColumn(i, "choice") == "Y")
		{
			ds_main_pifmmiun.deleteRow(i);
		}
	}
}

function group1_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = ds_main_pifmmiun.rowcount;
	var cnt = 0;
	
	for(var i = 0; i < rows; i++) 
	{
		if(ds_main_pifmmiun.getRowType(i) == "4") 
		{
			cnt++;
		}
	}
	
	if(cnt > 0) 
	{
		var oParam = {};
			oParam.id          = "TXPIF30403";
			oParam.service     = "clamuncoapp.ClamUnco";
			oParam.method      = "reqSetPifmmiun";
			oParam.inds        = "req=ds_main_pifmmiun:U";
			oParam.outds       = "";
			oParam.async       = false;
			oParam.callback    = "cf_TXPIF30403";

		tranf_submit(oParam);
	}
}

function cf_TXPIF30403()
{
	CommCode_Load();
}

function group1_button6_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = ds_main_pifmmiun.rowcount;
	var cnt = 0;
	var handicaprfund = 0;
	var handicapcvrtamt = 0;
	var instreductamt = 0;
	var totsum = 0;
	
	for(var i = 0; i < rows; i++) 
	{
		if(ds_main_pifmmiun.getRowType(i) == "4")
		{
			cnt++;
			
			totsum = eval(totsum) + eval(ds_main_pifmmiun.getColumn(i, "jrjudgdeciamt"));
			
			ds_main_pifmmiun.setColumn(i, "inddepoflag", "09");
		}
	}
	
	if(cnt > 0) 
	{
		var copyds = grdf_getGridUpdateData(group3.grd_pifmmiun,"update");
		opener.ds_main_list02_gridpifmidep.copyData(copyds);
		
		opener.ds_main_gridpifhmcdp.setColumn(ds_tmp.getColumn(0, "opn_row"), "depocnt", cnt);
		opener.ds_main_gridpifhmcdp.setColumn(ds_tmp.getColumn(0, "opn_row"), "depoamt", totsum);
		
		this.close();
	}
}

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

function group1_ipt_docuseqno_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		var docuseqno = obj.value;
		
		if(docuseqno.length == 1) 
		{
			docuseqno = "0000"+docuseqno;
		}
		if(docuseqno.length == 2) 
		{
			docuseqno = "000"+docuseqno;
		}
		if(docuseqno.length == 3) 
		{
			docuseqno = "00"+docuseqno;
		}
		if(docuseqno.length == 4) 
		{
			docuseqno = "0"+docuseqno;
		}
		
		ds_send.setColumn(0, "docuseqno", docuseqno);
		
		var oParam = {};
			oParam.id          = "TRPIF30409";
			oParam.service     = "clamuncoapp.ClamUnco";
			oParam.method      = "reqGetAddPayReteSpec";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "ds_main_pifmmiun=gridpifmmiun";
			oParam.async       = false;
			oParam.callback    = "cf_TRPIF30409";

		tranf_submit(oParam);
	}
}

function cf_TRPIF30409()
{
	if(!utlf_isNull(ds_main_pifmmiun.getColumn(0, "docuseqno")))
	{
		var row = ds_main_pifmmiun.addRow();
		
		var rows = ds_main_pifmmiun.rowcount;
		
		
		grdf_setStatus(group3.grd_pifmmiun, "U", row-1); 
	}
}

function ds_main_pifmmiun_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if( e.columnid == "check" )
	{
		obj.setColumn(e.row, "check", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
	}
}
]]></Script>
  </Form>
</FDL>