Print Payroll Checks

kind regards
Victor Perez
www.e-evolution.com
Link to SF Tracker: http://sourceforge.net/support/tracker.php?aid=3015725
This commit is contained in:
vpj-cd 2010-06-14 06:48:54 +00:00
parent 3106b8cbd2
commit 6b4650dd28
11 changed files with 1255 additions and 27 deletions

View File

@ -76,6 +76,7 @@ import org.compiere.util.Ini;
import org.compiere.util.Language; import org.compiere.util.Language;
import org.compiere.util.Util; import org.compiere.util.Util;
import org.eevolution.model.MDDOrder; import org.eevolution.model.MDDOrder;
import org.eevolution.model.X_HR_PaySelectionCheck;
import org.eevolution.model.X_PP_Order; // to be changed by MPPOrder import org.eevolution.model.X_PP_Order; // to be changed by MPPOrder
/** /**
@ -1173,7 +1174,8 @@ queued-job-count = 0 (class javax.print.attribute.standard.QueuedJobCount)
public static final int MANUFACTURING_ORDER = 8; public static final int MANUFACTURING_ORDER = 8;
/** Distribution Order = 9 */ /** Distribution Order = 9 */
public static final int DISTRIBUTION_ORDER = 9; public static final int DISTRIBUTION_ORDER = 9;
/** Payroll Check = 10 */
public static final int HR_CHECK = 10;
// private static final String[] DOC_TABLES = new String[] { // private static final String[] DOC_TABLES = new String[] {
// "C_Order_Header_v", "M_InOut_Header_v", "C_Invoice_Header_v", "C_Project_Header_v", // "C_Order_Header_v", "M_InOut_Header_v", "C_Invoice_Header_v", "C_Project_Header_v",
@ -1184,17 +1186,17 @@ queued-job-count = 0 (class javax.print.attribute.standard.QueuedJobCount)
"C_Order", "M_InOut", "C_Invoice", "C_Project", "C_Order", "M_InOut", "C_Invoice", "C_Project",
"C_RfQResponse", "C_RfQResponse",
"C_PaySelectionCheck", "C_PaySelectionCheck", "C_PaySelectionCheck", "C_PaySelectionCheck",
"C_DunningRunEntry","PP_Order", "DD_Order"}; "C_DunningRunEntry","PP_Order", "DD_Order","HR_PaySelectionCheck"};
private static final String[] DOC_IDS = new String[] { private static final String[] DOC_IDS = new String[] {
"C_Order_ID", "M_InOut_ID", "C_Invoice_ID", "C_Project_ID", "C_Order_ID", "M_InOut_ID", "C_Invoice_ID", "C_Project_ID",
"C_RfQResponse_ID", "C_RfQResponse_ID",
"C_PaySelectionCheck_ID", "C_PaySelectionCheck_ID", "C_PaySelectionCheck_ID", "C_PaySelectionCheck_ID",
"C_DunningRunEntry_ID" , "PP_Order_ID" , "DD_Order_ID" }; "C_DunningRunEntry_ID" , "PP_Order_ID" , "DD_Order_ID","HR_PaySelectionCheck_ID" };
private static final int[] DOC_TABLE_ID = new int[] { private static final int[] DOC_TABLE_ID = new int[] {
MOrder.Table_ID, MInOut.Table_ID, MInvoice.Table_ID, MProject.Table_ID, MOrder.Table_ID, MInOut.Table_ID, MInvoice.Table_ID, MProject.Table_ID,
MRfQResponse.Table_ID, MRfQResponse.Table_ID,
MPaySelectionCheck.Table_ID, MPaySelectionCheck.Table_ID, MPaySelectionCheck.Table_ID, MPaySelectionCheck.Table_ID,
MDunningRunEntry.Table_ID, X_PP_Order.Table_ID, MDDOrder.Table_ID }; MDunningRunEntry.Table_ID, X_PP_Order.Table_ID, MDDOrder.Table_ID, X_HR_PaySelectionCheck.Table_ID };
/************************************************************************** /**************************************************************************
* Get Document Print Engine for Document Type. * Get Document Print Engine for Document Type.
@ -1330,6 +1332,17 @@ queued-job-count = 0 (class javax.print.attribute.standard.QueuedJobCount)
+ "WHERE d." + DOC_IDS[type] + "=?" // info from PrintForm + "WHERE d." + DOC_IDS[type] + "=?" // info from PrintForm
+ " AND pf.AD_Org_ID IN (0,d.AD_Org_ID) " + " AND pf.AD_Org_ID IN (0,d.AD_Org_ID) "
+ "ORDER BY pf.AD_Org_ID DESC"; + "ORDER BY pf.AD_Org_ID DESC";
else if (type == HR_CHECK)
{
sql = " SELECT bad.Check_PrintFormat_ID," // 1
+ " c.IsMultiLingualDocument,bp.AD_Language,bp.C_BPartner_ID,d.DocumentNo " // 2..5
+ "FROM HR_PaySelectionCheck d"
+ " INNER JOIN HR_PaySelection ps ON (d.HR_PaySelection_ID=ps.HR_PaySelection_ID)"
+ " INNER JOIN C_BankAccountDoc bad ON (ps.C_BankAccount_ID=bad.C_BankAccount_ID AND d.PaymentRule=bad.PaymentRule)"
+ " INNER JOIN AD_Client c ON (d.AD_Client_ID=c.AD_Client_ID)"
+ " INNER JOIN C_BPartner bp ON (d.C_BPartner_ID=bp.C_BPartner_ID) "
+ "WHERE d.HR_PaySelectionCheck_ID=?"; // info from BankAccount
}
else // Get PrintFormat from Org or 0 of document client else // Get PrintFormat from Org or 0 of document client
sql = "SELECT pf.Order_PrintFormat_ID,pf.Shipment_PrintFormat_ID," // 1..2 sql = "SELECT pf.Order_PrintFormat_ID,pf.Shipment_PrintFormat_ID," // 1..2
// Prio: 1. BPartner 2. DocType, 3. PrintFormat (Org) // see InvoicePrint // Prio: 1. BPartner 2. DocType, 3. PrintFormat (Org) // see InvoicePrint
@ -1358,7 +1371,7 @@ queued-job-count = 0 (class javax.print.attribute.standard.QueuedJobCount)
if (rs.next()) // first record only if (rs.next()) // first record only
{ {
if (type == CHECK || type == DUNNING || type == REMITTANCE if (type == CHECK || type == DUNNING || type == REMITTANCE
|| type == PROJECT || type == RFQ || type == MANUFACTURING_ORDER || type == DISTRIBUTION_ORDER) || type == PROJECT || type == RFQ || type == MANUFACTURING_ORDER || type == DISTRIBUTION_ORDER || type == HR_CHECK)
{ {
AD_PrintFormat_ID = rs.getInt(1); AD_PrintFormat_ID = rs.getInt(1);
copies = 1; copies = 1;

View File

@ -0,0 +1,149 @@
/******************************************************************************
* Product: Adempiere ERP & CRM Smart Business Solution *
* This program is free software; you can redistribute it and/or modify it *
* under the terms version 2 of the GNU General Public License as published *
* by the Free Software Foundation. This program is distributed in the hope *
* that it will be useful, but WITHOUT ANY WARRANTY; without even the implied *
* warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
* See the GNU General Public License for more details. *
* You should have received a copy of the GNU General Public License along *
* with this program; if not, write to the Free Software Foundation, Inc., *
* 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. *
* For the text or an alternative of this public license, you may reach us *
* Copyright (C) 2003-2007 e-Evolution,SC. All Rights Reserved. *
* Contributor(s): Victor Perez www.e-evolution.com *
*****************************************************************************/
package org.eevolution.model;
import java.sql.PreparedStatement;
import java.sql.ResultSet;
import java.util.ArrayList;
import java.util.Properties;
import java.util.logging.Level;
import org.compiere.util.DB;
import org.compiere.util.Env;
/**
* Payroll for HRayroll Module
*
* @author victor.perez@e-evolution.com, www.e-evolution.com
*
*/
public class MHRPaySelection extends X_HR_PaySelection
{
/**
*
*/
private static final long serialVersionUID = -6521282913549455131L;
/**
* Default Constructor
* @param ctx context
* @param C_PaySelection_ID id
* @param trxName transaction
*/
public MHRPaySelection (Properties ctx, int HR_PaySelection_ID, String trxName)
{
super(ctx, HR_PaySelection_ID, trxName);
if (HR_PaySelection_ID == 0)
{
setTotalAmt (Env.ZERO);
setIsApproved (false);
setProcessed (false);
setProcessing (false);
}
} // MHRPaySelection
/**
* Load Constructor
* @param ctx context
* @param rs result set
* @param trxName transaction
*/
public MHRPaySelection(Properties ctx, ResultSet rs, String trxName)
{
super(ctx, rs, trxName);
} // MHRPaySelection
/** Lines */
private MHRPaySelectionLine[] m_lines = null;
/** Currency of Bank Account */
private int m_C_Currency_ID = 0;
/**
* Get Lines
* @param requery requery
* @return lines
*/
public MHRPaySelectionLine[] getLines(boolean requery)
{
if (m_lines != null && !requery) {
set_TrxName(m_lines, get_TrxName());
return m_lines;
}
ArrayList<MHRPaySelectionLine> list = new ArrayList<MHRPaySelectionLine>();
String sql = "SELECT * FROM HR_PaySelectionLine WHERE HR_PaySelection_ID=? ORDER BY Line";
PreparedStatement pstmt = null;
try
{
pstmt = DB.prepareStatement (sql, get_TrxName());
pstmt.setInt (1, getHR_PaySelection_ID());
ResultSet rs = pstmt.executeQuery ();
while (rs.next ())
list.add (new MHRPaySelectionLine(getCtx(), rs, get_TrxName()));
rs.close ();
pstmt.close ();
pstmt = null;
}
catch (Exception e)
{
log.log(Level.SEVERE, "getLines", e);
}
try
{
if (pstmt != null)
pstmt.close ();
pstmt = null;
}
catch (Exception e)
{
pstmt = null;
}
//
m_lines = new MHRPaySelectionLine[list.size ()];
list.toArray (m_lines);
return m_lines;
} // getLines
/**
* Get Currency of Bank Account
* @return C_Currency_ID
*/
public int getC_Currency_ID()
{
if (m_C_Currency_ID == 0)
{
String sql = "SELECT C_Currency_ID FROM C_BankAccount "
+ "WHERE C_BankAccount_ID=?";
m_C_Currency_ID = DB.getSQLValue(null, sql, getC_BankAccount_ID());
}
return m_C_Currency_ID;
} // getC_Currency_ID
/**
* String Representation
* @return info
*/
public String toString()
{
StringBuffer sb = new StringBuffer("MHRPaySelection[");
sb.append(get_ID()).append(",").append(getName())
.append("]");
return sb.toString();
} // toString
} // MHRPaySelection

View File

@ -0,0 +1,663 @@
/******************************************************************************
* Product: Adempiere ERP & CRM Smart Business Solution *
* This program is free software; you can redistribute it and/or modify it *
* under the terms version 2 of the GNU General Public License as published *
* by the Free Software Foundation. This program is distributed in the hope *
* that it will be useful, but WITHOUT ANY WARRANTY; without even the implied *
* warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
* See the GNU General Public License for more details. *
* You should have received a copy of the GNU General Public License along *
* with this program; if not, write to the Free Software Foundation, Inc., *
* 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. *
* For the text or an alternative of this public license, you may reach us *
* Copyright (C) 2003-2007 e-Evolution,SC. All Rights Reserved. *
* Contributor(s): Victor Perez www.e-evolution.com *
*****************************************************************************/
package org.eevolution.model;
import java.io.File;
import java.io.FileWriter;
import java.sql.PreparedStatement;
import java.sql.ResultSet;
import java.sql.SQLException;
import java.util.Collection;
import java.util.Properties;
import java.util.logging.Level;
import org.compiere.model.I_C_Payment;
import org.compiere.model.MBPBankAccount;
import org.compiere.model.MCurrency;
import org.compiere.model.MPayment;
import org.compiere.model.MPaymentBatch;
import org.compiere.model.Query;
import org.compiere.model.X_C_Order;
import org.compiere.model.X_C_Payment;
import org.compiere.process.DocAction;
import org.compiere.util.CLogger;
import org.compiere.util.DB;
import org.compiere.util.Env;
/**
* Payroll Payment Print/Export model.
*
* @author victor.perez@e-evolution.com, www.e-evolution.com
* @author oscar.gomez@e-evolution.com, www.e-evolution.com
*/
public final class MHRPaySelectionCheck extends X_HR_PaySelectionCheck
{
/**
*
*/
private static final long serialVersionUID = -280580616570711570L;
/**
* Get Check for Payment
* @param ctx context
* @param C_Payment_ID id
* @param trxName transaction
* @return pay selection check for payment or null
*/
public static MHRPaySelectionCheck getOfPayment (Properties ctx, int C_Payment_ID, String trxName)
{
final String where = I_C_Payment.COLUMNNAME_C_Payment_ID + "=?";
Collection<MHRPaySelectionCheck> pscs = new Query(ctx, I_HR_PaySelectionCheck.Table_Name, where , trxName)
.setParameters(new Object[]{C_Payment_ID})
.list();
MHRPaySelectionCheck retValue = null;
int count = 0;
for(MHRPaySelectionCheck psc : pscs)
{
if (retValue == null)
retValue = psc;
else if (!retValue.isProcessed() && psc.isProcessed())
retValue = psc;
count++;
}
if (count > 1)
s_log.warning ("More then one for C_Payment_ID=" + C_Payment_ID);
return retValue;
} // getOfPayment
/**************************************************************************
* Payroll Get Checks of Payment Selection
*
* @param ctx Context
* @param HR_PaySelection_ID Payment Selection
* @param PaymentRule Payment Rule
* @param startDocumentNo start document no
* @param trxName transaction
* @return array of checks
*/
static public Collection<MHRPaySelectionCheck> get (Properties ctx, int HR_PaySelection_ID,
String PaymentRule, int startDocumentNo, String trxName)
{
s_log.fine("HR_PaySelection_ID=" + HR_PaySelection_ID
+ ", PaymentRule=" + PaymentRule + ", startDocumentNo=" + startDocumentNo);
final String where = I_HR_PaySelectionCheck.COLUMNNAME_HR_PaySelection_ID + "=? AND "
+ I_HR_PaySelectionCheck.COLUMNNAME_PaymentRule + "=?";
Collection<MHRPaySelectionCheck> pscs = new Query(ctx, I_HR_PaySelectionCheck.Table_Name, where , trxName)
.setClient_ID()
.setParameters(new Object[]{HR_PaySelection_ID, PaymentRule})
.list();
int docNo = startDocumentNo;
for (MHRPaySelectionCheck psc : pscs)
{
psc.setDocumentNo(String.valueOf(docNo++));
}
return pscs;
} // get
/**************************************************************************
* Export to File
* @param checks array of checks
* @param file file to export checks
* @return number of lines
*/
public static int exportToFile (Collection<MHRPaySelectionCheck> checks, File file)
{
if (checks == null || checks.size() == 0)
return 0;
// Must be a file
if (file.isDirectory())
{
s_log.log(Level.WARNING, "File is directory - " + file.getAbsolutePath());
return 0;
}
// delete if exists
try
{
if (file.exists())
file.delete();
}
catch (Exception e)
{
s_log.log(Level.WARNING, "Could not delete - " + file.getAbsolutePath(), e);
}
char x = '"'; // ease
int noLines = 0;
StringBuffer line = null;
try
{
FileWriter fw = new FileWriter(file);
// write header
line = new StringBuffer();
line.append(x).append("Value").append(x).append(",")
.append(x).append("Name").append(x).append(",")
.append(x).append("Contact").append(x).append(",")
.append(x).append("Addr1").append(x).append(",")
.append(x).append("Addr2").append(x).append(",")
.append(x).append("City").append(x).append(",")
.append(x).append("State").append(x).append(",")
.append(x).append("ZIP").append(x).append(",")
.append(x).append("Country").append(x).append(",")
.append(x).append("ReferenceNo").append(x).append(",")
.append(x).append("DocumentNo").append(x).append(",")
.append(x).append("PayDate").append(x).append(",")
.append(x).append("Currency").append(x).append(",")
.append(x).append("PayAmount").append(x).append(",")
.append(x).append("Comment").append(x)
.append(Env.NL);
fw.write(line.toString());
noLines++;
// write lines
for (MHRPaySelectionCheck mpp : checks)
{
if (mpp == null)
continue;
// BPartner Info
String bp[] = getBPartnerInfo(mpp.getC_BPartner_ID());
line = new StringBuffer();
line.append(x).append(bp[BP_VALUE]).append(x).append(",") // Value
.append(x).append(bp[BP_NAME]).append(x).append(",") // Name
.append(x).append(bp[BP_CONTACT]).append(x).append(",") // Contact
.append(x).append(bp[BP_ADDR1]).append(x).append(",") // Addr1
.append(x).append(bp[BP_ADDR2]).append(x).append(",") // Addr2
.append(x).append(bp[BP_CITY]).append(x).append(",") // City
.append(x).append(bp[BP_REGION]).append(x).append(",") // State
.append(x).append(bp[BP_POSTAL]).append(x).append(",") // ZIP
.append(x).append(bp[BP_COUNTRY]).append(x).append(",") // Country
.append(x).append(bp[BP_REFNO]).append(x).append(",") // ReferenceNo
// Payment Info
.append(x).append(mpp.getDocumentNo()).append(x).append(",") // DocumentNo
.append(mpp.getParent().getPayDate()).append(",") // PayDate
.append(x).append(MCurrency.getISO_Code(Env.getCtx(), mpp.getParent().getC_Currency_ID())).append(x).append(",") // Currency
.append(mpp.getPayAmt()).append(",") // PayAmount
//.append(x).append(comment.toString()).append(x) // Comment
.append(Env.NL);
fw.write(line.toString());
noLines++;
} // write line
fw.flush();
fw.close();
}
catch (Exception e)
{
s_log.log(Level.SEVERE, "", e);
}
return noLines;
} // exportToFile
/**
* Get Customer/Vendor Info.
* Based on BP_ static variables
* @param C_BPartner_ID BPartner
* @return info array
*/
private static String[] getBPartnerInfo (int C_BPartner_ID)
{
String[] bp = new String[10];
String sql = "SELECT bp.Value, bp.Name, c.Name AS Contact, "
+ "a.Address1, a.Address2, a.City, r.Name AS Region, a.Postal, "
+ "cc.Name AS Country, bp.ReferenceNo "
+ "FROM C_BPartner bp, AD_User c, C_BPartner_Location l, C_Location a, C_Region r, C_Country cc "
+ "WHERE bp.C_BPartner_ID=?" // #1
+ " AND bp.C_BPartner_ID=c.C_BPartner_ID(+)"
+ " AND bp.C_BPartner_ID=l.C_BPartner_ID"
+ " AND l.C_Location_ID=a.C_Location_ID"
+ " AND a.C_Region_ID=r.C_Region_ID(+)"
+ " AND a.C_Country_ID=cc.C_Country_ID "
+ "ORDER BY l.IsBillTo DESC";
try
{
PreparedStatement pstmt = DB.prepareStatement(sql, null);
pstmt.setInt(1, C_BPartner_ID);
ResultSet rs = pstmt.executeQuery();
//
if (rs.next())
{
bp[BP_VALUE] = rs.getString(1);
if (bp[BP_VALUE] == null)
bp[BP_VALUE] = "";
bp[BP_NAME] = rs.getString(2);
if (bp[BP_NAME] == null)
bp[BP_NAME] = "";
bp[BP_CONTACT] = rs.getString(3);
if (bp[BP_CONTACT] == null)
bp[BP_CONTACT] = "";
bp[BP_ADDR1] = rs.getString(4);
if (bp[BP_ADDR1] == null)
bp[BP_ADDR1] = "";
bp[BP_ADDR2] = rs.getString(5);
if (bp[BP_ADDR2] == null)
bp[BP_ADDR2] = "";
bp[BP_CITY] = rs.getString(6);
if (bp[BP_CITY] == null)
bp[BP_CITY] = "";
bp[BP_REGION] = rs.getString(7);
if (bp[BP_REGION] == null)
bp[BP_REGION] = "";
bp[BP_POSTAL] = rs.getString(8);
if (bp[BP_POSTAL] == null)
bp[BP_POSTAL] = "";
bp[BP_COUNTRY] = rs.getString(9);
if (bp[BP_COUNTRY] == null)
bp[BP_COUNTRY] = "";
bp[BP_REFNO] = rs.getString(10);
if (bp[BP_REFNO] == null)
bp[BP_REFNO] = "";
}
rs.close();
pstmt.close();
}
catch (SQLException e)
{
s_log.log(Level.SEVERE, sql, e);
}
return bp;
} // getBPartnerInfo
/**************************************************************************
* Confirm Print.
* Create Payments the first time
* @param checks checks
* @param batch batch
* @return last Document number or 0 if nothing printed
*/
public static int confirmPrint (Collection<MHRPaySelectionCheck> checks , MPaymentBatch batch)
{
int lastDocumentNo = 0;
for (MHRPaySelectionCheck check : checks)
{
String sqlConcept = "SELECT HR_Concept_ID FROM HR_Movement " +
" WHERE HR_Movement_ID IN(SELECT HR_Movement_ID FROM HR_PaySelectionLine " +
" WHERE C_BPartner_ID="+check.getC_BPartner_ID()+
" AND HR_PaySelection_ID="+check.getHR_PaySelection_ID()+")";
System.err.println("Concept: " + sqlConcept);
int HR_Concept_ID = DB.getSQLValue(check.get_TrxName(), sqlConcept);
String sqlPayroll = "SELECT HR_Payroll_ID FROM HR_Process " +
" WHERE HR_Process_ID IN(SELECT HR_Process_ID FROM HR_Movement "+
" WHERE HR_Movement_ID IN(SELECT HR_Movement_ID FROM HR_PaySelectionLine " +
" WHERE C_BPartner_ID="+check.getC_BPartner_ID()+
" AND HR_PaySelection_ID="+check.getHR_PaySelection_ID()+") )";
System.err.println("Payroll: " + sqlPayroll);
int HR_Payroll_ID = DB.getSQLValue(check.get_TrxName(), sqlPayroll);
MHRConcept concept = new MHRConcept(check.getCtx(),HR_Concept_ID,check.get_TrxName());
MHRPayroll payroll = new MHRPayroll(check.getCtx(),HR_Payroll_ID,check.get_TrxName());
MPayment payment = new MPayment(check.getCtx(), check.getC_Payment_ID(), check.get_TrxName());
// Existing Payment
if (check.getC_Payment_ID() != 0)
{
// Update check number
if (check.getPaymentRule().equals(PAYMENTRULE_Check))
{
payment.setCheckNo(check.getDocumentNo());
if (!payment.save())
s_log.log(Level.SEVERE, "Payment not saved: " + payment);
}
}
else // New Payment
{
payment = new MPayment(check.getCtx(), 0, null);
// BEGIN e-Evolution ECISA
//payment.setAD_Org_ID(check.getAD_Org_ID());
// END e-Evolution ECISA
//
if (check.getPaymentRule().equals(PAYMENTRULE_Check))
payment.setBankCheck (check.getParent().getC_BankAccount_ID(), false, check.getDocumentNo());
else if (check.getPaymentRule().equals(PAYMENTRULE_CreditCard))
payment.setTenderType(X_C_Payment.TENDERTYPE_CreditCard);
else if (check.getPaymentRule().equals(PAYMENTRULE_DirectDeposit)
|| check.getPaymentRule().equals(PAYMENTRULE_DirectDebit))
payment.setTenderType(X_C_Payment.TENDERTYPE_DirectDebit);
else
{
s_log.log(Level.SEVERE, "Unsupported Payment Rule=" + check.getPaymentRule());
continue;
}
payment.setTrxType(X_C_Payment.TRXTYPE_CreditPayment);
payment.setAmount(check.getParent().getC_Currency_ID(), check.getPayAmt());
payment.setDiscountAmt(check.getDiscountAmt());
payment.setDateTrx(check.getParent().getPayDate());
payment.setDateAcct(payment.getDateTrx()); // globalqss [ 2030685 ]
payment.setC_BPartner_ID(check.getC_BPartner_ID());
/*
// Link to Batch
if (batch != null)
{
if (batch.getC_PaymentBatch_ID() == 0)
batch.save(); // new
payment.setC_PaymentBatch_ID(batch.getC_PaymentBatch_ID());
}
*/
int C_Charge_ID = DB.getSQLValue(check.get_TrxName(),
"SELECT MAX(C_Charge_ID) FROM HR_Attribute WHERE IsActive='Y' AND HR_Concept_ID="+HR_Concept_ID);
if(C_Charge_ID <= 0) // modify e-Evolution 25May2010 if(C_Charge_ID < 0)
payment.setC_Charge_ID(payroll.getC_Charge_ID());
else
payment.setC_Charge_ID(C_Charge_ID);
payment.setC_BankAccount_ID(check.getParent().getC_BankAccount_ID());
payment.setWriteOffAmt(Env.ZERO);
if (!payment.save())
s_log.log(Level.SEVERE, "Payment not saved: " + payment);
//
int C_Payment_ID = payment.get_ID();
if (C_Payment_ID < 1)
s_log.log(Level.SEVERE, "Payment not created=" + check);
else
{
check.setC_Payment_ID (C_Payment_ID);
check.save(); // Payment process needs it
// Should start WF
payment.processIt(DocAction.ACTION_Complete);
if (!payment.save())
s_log.log(Level.SEVERE, "Payment not saved: " + payment);
// BEGIN e-Evolution ECISA 25May2010
payment.setAD_Org_ID(check.getAD_Org_ID());
payment.setAD_OrgTrx_ID(check.getAD_Org_ID());
payment.saveEx();
// END e-Evolution 25May2010
}
} // new Payment
// Get Check Document No
try
{
int no = Integer.parseInt(check.getDocumentNo());
if (lastDocumentNo < no)
lastDocumentNo = no;
}
catch (NumberFormatException ex)
{
s_log.log(Level.SEVERE, "DocumentNo=" + check.getDocumentNo(), ex);
}
check.setIsPrinted(true);
check.setProcessed(true);
if (!check.save ())
s_log.log(Level.SEVERE, "Check not saved: " + check);
} // all checks
s_log.fine("Last Document No = " + lastDocumentNo);
return lastDocumentNo;
} // confirmPrint
/** Logger */
static private CLogger s_log = CLogger.getCLogger (MHRPaySelectionCheck.class);
/** BPartner Info Index for Value */
private static final int BP_VALUE = 0;
/** BPartner Info Index for Name */
private static final int BP_NAME = 1;
/** BPartner Info Index for Contact Name */
private static final int BP_CONTACT = 2;
/** BPartner Info Index for Address 1 */
private static final int BP_ADDR1 = 3;
/** BPartner Info Index for Address 2 */
private static final int BP_ADDR2 = 4;
/** BPartner Info Index for City */
private static final int BP_CITY = 5;
/** BPartner Info Index for Region */
private static final int BP_REGION = 6;
/** BPartner Info Index for Postal Code */
private static final int BP_POSTAL = 7;
/** BPartner Info Index for Country */
private static final int BP_COUNTRY = 8;
/** BPartner Info Index for Reference No */
private static final int BP_REFNO = 9;
/**************************************************************************
* Constructor
* @param ctx context
* @param C_PaySelectionCheck_ID C_PaySelectionCheck_ID
* @param trxName transaction
*/
public MHRPaySelectionCheck (Properties ctx, int HR_PaySelectionCheck_ID, String trxName)
{
super(ctx, HR_PaySelectionCheck_ID, trxName);
if (HR_PaySelectionCheck_ID == 0)
{
setPayAmt (Env.ZERO);
setDiscountAmt(Env.ZERO);
setIsPrinted (false);
setIsReceipt (false);
setQty (0);
}
} // MHRPaySelectionCheck
/**
* Load Constructor
* @param ctx context
* @param rs result set
* @param trxName transaction
*/
public MHRPaySelectionCheck(Properties ctx, ResultSet rs, String trxName)
{
super(ctx, rs, trxName);
} // MHRPaySelectionCheck
/**
* Create from Line
* @param line payment selection
* @param PaymentRule payment rule
*/
public MHRPaySelectionCheck (MHRPaySelectionLine line, String PaymentRule)
{
this (line.getCtx(), 0, line.get_TrxName());
setClientOrg(line);
setHR_PaySelection_ID (line.getHR_PaySelection_ID());
setAD_Org_ID(line.getHR_Movement().getAD_Org_ID()); // add e-Evolution ECISA 24May2010
int C_BPartner_ID = line.getHR_Movement().getC_BPartner_ID();
setC_BPartner_ID (C_BPartner_ID);
//
if (X_C_Order.PAYMENTRULE_DirectDebit.equals(PaymentRule))
{
MBPBankAccount[] bas = MBPBankAccount.getOfBPartner (line.getCtx(), C_BPartner_ID);
for (int i = 0; i < bas.length; i++)
{
MBPBankAccount account = bas[i];
if (account.isDirectDebit())
{
setC_BP_BankAccount_ID(account.getC_BP_BankAccount_ID());
break;
}
}
}
else if (X_C_Order.PAYMENTRULE_DirectDeposit.equals(PaymentRule))
{
MBPBankAccount[] bas = MBPBankAccount.getOfBPartner (line.getCtx(), C_BPartner_ID);
for (int i = 0; i < bas.length; i++)
{
MBPBankAccount account = bas[i];
if (account.isDirectDeposit())
{
setC_BP_BankAccount_ID(account.getC_BP_BankAccount_ID());
break;
}
}
}
setPaymentRule (PaymentRule);
//
setIsReceipt(line.isSOTrx());
setPayAmt (line.getPayAmt());
setDiscountAmt(line.getDiscountAmt());
setQty (1);
} // MPaySelectionCheck
/**
* Create from Pay Selection
* @param ps payment selection
* @param PaymentRule payment rule
*/
public MHRPaySelectionCheck (MHRPaySelection ps, String PaymentRule)
{
this (ps.getCtx(), 0, ps.get_TrxName());
setClientOrg(ps);
setHR_PaySelection_ID (ps.getHR_PaySelection_ID());
setPaymentRule (PaymentRule);
} // MHRPaySelectionCheck
/** Parent */
private MHRPaySelection m_parent = null;
/** Payment Selection lines of this check */
private Collection<MHRPaySelectionLine> m_lines = null;
/**
* Add Payment Selection Line
* @param line line
*/
public void addLine (MHRPaySelectionLine line)
{
if (getC_BPartner_ID() != line.getHR_Movement().getC_BPartner_ID())
throw new IllegalArgumentException("Line for fifferent BPartner");
//
if (isReceipt() == line.isSOTrx())
{
setPayAmt (getPayAmt().add(line.getPayAmt()));
setDiscountAmt(getDiscountAmt().add(line.getDiscountAmt()));
}
else
{
setPayAmt (getPayAmt().subtract(line.getPayAmt()));
setDiscountAmt(getDiscountAmt().subtract(line.getDiscountAmt()));
}
setQty (getQty()+1);
} // addLine
/**
* Get Parent
* @return parent
*/
public MHRPaySelection getParent()
{
if (m_parent == null)
m_parent = new MHRPaySelection (getCtx(), getHR_PaySelection_ID(), get_TrxName());
return m_parent;
} // getParent
/**
* Is this a valid Prepared Payment
* @return true if valid
*/
public boolean isValid()
{
if (getC_BP_BankAccount_ID() != 0)
return true;
return !isDirect();
} // isValid
/**
* Is this a direct Debit or Deposit
* @return true if direct
*/
public boolean isDirect()
{
return (X_C_Order.PAYMENTRULE_DirectDeposit.equals(getPaymentRule())
|| X_C_Order.PAYMENTRULE_DirectDebit.equals(getPaymentRule()));
} // isDirect
/**
* String Representation
* @return info
*/
public String toString()
{
StringBuffer sb = new StringBuffer("MHRPaymentCheck[");
sb.append(get_ID()).append("-").append(getDocumentNo())
.append("-").append(getPayAmt())
.append(",PaymetRule=").append(getPaymentRule())
.append(",Qty=").append(getQty())
.append("]");
return sb.toString();
} // toString
/**
* Get Payment Selection Lines of this check
* @param requery requery
* @return array of peyment selection lines
*/
public Collection<MHRPaySelectionLine> getPaySelectionLines (boolean requery)
{
if (m_lines != null && !requery) {
return m_lines;
}
final String where = COLUMNNAME_HR_PaySelectionCheck_ID + "=?";
Collection<MHRPaySelectionLine> list = new Query(getCtx(), I_HR_PaySelectionLine.Table_Name, where , get_TrxName())
.setClient_ID()
.setParameters(new Object[]{getHR_PaySelectionCheck_ID()})
.setOrderBy(I_HR_PaySelectionLine.COLUMNNAME_Line)
.list();
m_lines = list;
return m_lines;
} // getPaySelectionLines
/**
* Delete Payment Selection when generated as Draft (Print Preview)
* @param ctx context
* @param C_Payment_ID id
* @param trxName transaction
* @return
*/
public static boolean deleteGeneratedDraft(Properties ctx, int C_Payment_ID, String trxName)
{
MHRPaySelectionCheck mpsc = MHRPaySelectionCheck.getOfPayment (ctx, C_Payment_ID, trxName);
if (mpsc != null && mpsc.isGeneratedDraft())
{
MHRPaySelection mps = new MHRPaySelection(ctx, mpsc.getHR_PaySelection_ID(),trxName);
MHRPaySelectionLine[] mpsl = mps.getLines(true);
// Delete Pay Selection lines
for (int i = 0; i < mpsl.length; i++)
{
if (!mpsl[i].delete(true, trxName))
return false;
}
// Delete Pay Selection Check
if (!mpsc.delete(true, trxName))
return false;
// Delete Pay Selection
if (!mps.delete(true, trxName))
return false;
}
return true;
}
} // MPaySelectionCheck

View File

@ -0,0 +1,131 @@
/******************************************************************************
* Product: Adempiere ERP & CRM Smart Business Solution *
* This program is free software; you can redistribute it and/or modify it *
* under the terms version 2 of the GNU General Public License as published *
* by the Free Software Foundation. This program is distributed in the hope *
* that it will be useful, but WITHOUT ANY WARRANTY; without even the implied *
* warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
* See the GNU General Public License for more details. *
* You should have received a copy of the GNU General Public License along *
* with this program; if not, write to the Free Software Foundation, Inc., *
* 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. *
* For the text or an alternative of this public license, you may reach us *
* Copyright (C) 2003-2007 e-Evolution,SC. All Rights Reserved. *
* Contributor(s): Victor Perez www.e-evolution.com *
*****************************************************************************/
package org.eevolution.model;
import java.sql.ResultSet;
import java.util.Properties;
import org.compiere.util.DB;
import org.compiere.util.Env;
/**
* Payroll for HRayroll Module
*
* @author victor.perez@e-evolution.com, www.e-evolution.com
*
*/
public class MHRPaySelectionLine extends X_HR_PaySelectionLine
{
/**
*
*/
private static final long serialVersionUID = -3486055138810301789L;
/**
* Standard Constructor
* @param ctx context
* @param C_PaySelectionLine_ID id
* @param trxName transaction
*/
public MHRPaySelectionLine (Properties ctx, int HR_PaySelectionLine_ID, String trxName)
{
super(ctx, HR_PaySelectionLine_ID, trxName);
if (HR_PaySelectionLine_ID == 0)
{
setIsSOTrx (false);
setOpenAmt(Env.ZERO);
setPayAmt (Env.ZERO);
setDiscountAmt(Env.ZERO);
setDifferenceAmt (Env.ZERO);
setIsManual (false);
}
} // MHRPaySelectionLine
/**
* Load Constructor
* @param ctx context
* @param rs result set
* @param trxName transaction
*/
public MHRPaySelectionLine(Properties ctx, ResultSet rs, String trxName)
{
super(ctx, rs, trxName);
} // MHRPaySelectionLine
/**
* Parent Constructor
* @param ps parent
* @param Line line
* @param PaymentRule payment rule
*/
public MHRPaySelectionLine (MHRPaySelection ps, int Line, String PaymentRule)
{
this (ps.getCtx(), 0, ps.get_TrxName());
setClientOrg(ps);
setHR_PaySelection_ID(ps.getHR_PaySelection_ID());
setLine(Line);
setPaymentRule(PaymentRule);
} // MHRPaySelectionLine
/**
* Before Save
* @param newRecord new
* @return true
*/
protected boolean beforeSave (boolean newRecord)
{
setDifferenceAmt(getOpenAmt().subtract(getPayAmt()).subtract(getDiscountAmt()));
return true;
} // beforeSave
/**
* After Save
* @param newRecord new
* @param success success
* @return success
*/
protected boolean afterSave (boolean newRecord, boolean success)
{
setHeader();
return success;
} // afterSave
/**
* After Delete
* @param success success
* @return sucess
*/
protected boolean afterDelete (boolean success)
{
setHeader();
return success;
} // afterDelete
/**
* Recalculate Header Sum
*/
private void setHeader()
{
// Update Header
String sql = "UPDATE HR_PaySelection ps "
+ "SET TotalAmt = (SELECT COALESCE(SUM(psl.PayAmt),0) "
+ "FROM HR_PaySelectionLine psl "
+ "WHERE ps.HR_PaySelection_ID=psl.HR_PaySelection_ID AND psl.IsActive='Y') "
+ "WHERE HR_PaySelection_ID=" + getHR_PaySelection_ID();
DB.executeUpdate(sql, get_TrxName());
} // setHeader
} // MPaySelectionLine

View File

@ -36,6 +36,7 @@ import org.compiere.util.CLogger;
import org.compiere.util.Env; import org.compiere.util.Env;
import org.compiere.util.Ini; import org.compiere.util.Ini;
import org.compiere.util.Trx; import org.compiere.util.Trx;
import org.eevolution.model.MHRPaySelectionCheck;
/** /**
* Report Controller. * Report Controller.
@ -396,6 +397,11 @@ public class ReportCtl
*/ */
public static boolean startCheckPrint (int C_Payment_ID, boolean IsDirectPrint) public static boolean startCheckPrint (int C_Payment_ID, boolean IsDirectPrint)
{ {
MHRPaySelectionCheck hpsc = MHRPaySelectionCheck.getOfPayment(Env.getCtx(), C_Payment_ID, null);
if (hpsc != null)
{
return startDocumentPrint (ReportEngine.HR_CHECK, hpsc.getHR_PaySelectionCheck_ID(), null, -1, IsDirectPrint);
}
// afalcone - [ 1871567 ] Wrong value in Payment document // afalcone - [ 1871567 ] Wrong value in Payment document
boolean ok = MPaySelectionCheck.deleteGeneratedDraft(Env.getCtx(), C_Payment_ID, null); boolean ok = MPaySelectionCheck.deleteGeneratedDraft(Env.getCtx(), C_Payment_ID, null);

View File

@ -1,9 +1,11 @@
DROP VIEW C_PAYSELECTION_CHECK_V;
CREATE OR REPLACE VIEW C_PAYSELECTION_CHECK_V CREATE OR REPLACE VIEW C_PAYSELECTION_CHECK_V
(AD_CLIENT_ID, AD_ORG_ID, AD_LANGUAGE, C_PAYSELECTION_ID, C_PAYSELECTIONCHECK_ID, (AD_CLIENT_ID, AD_ORG_ID, AD_LANGUAGE, C_PAYSELECTION_ID, C_PAYSELECTIONCHECK_ID,
ORG_LOCATION_ID, TAXID, C_DOCTYPE_ID, C_BPARTNER_ID, BPVALUE, ORG_LOCATION_ID, TAXID, C_DOCTYPE_ID, C_BPARTNER_ID, BPVALUE,
BPTAXID, NAICS, DUNS, BPGREETING, NAME, BPTAXID, NAICS, DUNS, BPGREETING, NAME,
NAME2, C_LOCATION_ID, REFERENCENO, POREFERENCE, PAYDATE, NAME2, C_LOCATION_ID, REFERENCENO, POREFERENCE, PAYDATE,
PAYAMT, AMTINWORDS, QTY, PAYMENTRULE, DOCUMENTNO) PAYAMT, AMTINWORDS, QTY, PAYMENTRULE, DOCUMENTNO,
HR_PAYSELECTION_ID , HR_PAYSELECTIONCHECK_ID)
AS AS
SELECT psc.AD_Client_ID, psc.AD_Org_ID, SELECT psc.AD_Client_ID, psc.AD_Org_ID,
cast('en_US' as varchar2(6)) AS AD_Language, cast('en_US' as varchar2(6)) AS AD_Language,
@ -16,12 +18,29 @@ SELECT psc.AD_Client_ID, psc.AD_Org_ID,
bp.ReferenceNo, bp.POReference, bp.ReferenceNo, bp.POReference,
ps.PayDate, ps.PayDate,
psc.PayAmt, psc.PayAmt AS AmtInWords, psc.PayAmt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo psc.Qty, psc.PaymentRule, psc.DocumentNo,
0 AS HR_PaySelection_ID , 0 AS HR_PaySelectionCheck_ID
FROM C_PaySelectionCheck psc FROM C_PaySelectionCheck psc
INNER JOIN C_PaySelection ps ON (psc.C_PaySelection_ID=ps.C_PaySelection_ID) INNER JOIN C_PaySelection ps ON (psc.C_PaySelection_ID=ps.C_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID=bp.C_BPartner_ID) INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID=bp.C_BPartner_ID)
LEFT OUTER JOIN C_Greeting bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID) LEFT OUTER JOIN C_Greeting bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID=oi.AD_Org_ID)
UNION
SELECT psc.AD_Client_ID, psc.AD_Org_ID,
cast('en_US' as varchar2(6)) AS AD_Language,
0 AS C_PaySelection_ID, 0 AS C_PaySelectionCheck_ID,
oi.C_Location_ID AS Org_Location_ID, oi.TaxID, 0 AS C_DocType_ID,
bp.C_BPartner_ID, bp.Value AS BPValue, bp.TaxID AS BPTaxID, bp.NAICS, bp.DUNS,
bpg.Greeting AS BPGreeting,
bp.Name, bp.Name2,
BPartnerRemitLocation(bp.C_BPartner_ID) AS C_Location_ID,
bp.ReferenceNo, bp.poreference,
ps.PayDate, psc.Payamt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo,
psc.HR_PaySelection_ID , HR_PaySelectionCheck_ID
FROM hr_payselectioncheck psc
INNER JOIN HR_PaySelection ps ON (psc.HR_PaySelection_ID = ps.HR_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID = bp.C_BPartner_ID)
LEFT OUTER JOIN C_Greeting bpg ON (bp.C_Greeting_ID = bpg.C_Greeting_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID = oi.AD_Org_ID); INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID = oi.AD_Org_ID);

View File

@ -1,9 +1,11 @@
DROP VIEW C_PAYSELECTION_CHECK_VT;
CREATE OR REPLACE VIEW C_PAYSELECTION_CHECK_VT CREATE OR REPLACE VIEW C_PAYSELECTION_CHECK_VT
(AD_CLIENT_ID, AD_ORG_ID, AD_LANGUAGE, C_PAYSELECTION_ID, C_PAYSELECTIONCHECK_ID, (AD_CLIENT_ID, AD_ORG_ID, AD_LANGUAGE, C_PAYSELECTION_ID, C_PAYSELECTIONCHECK_ID,
ORG_LOCATION_ID, TAXID, C_DOCTYPE_ID, C_BPARTNER_ID, BPVALUE, ORG_LOCATION_ID, TAXID, C_DOCTYPE_ID, C_BPARTNER_ID, BPVALUE,
BPTAXID, NAICS, DUNS, BPGREETING, NAME, BPTAXID, NAICS, DUNS, BPGREETING, NAME,
NAME2, C_LOCATION_ID, REFERENCENO, POREFERENCE, PAYDATE, NAME2, C_LOCATION_ID, REFERENCENO, POREFERENCE, PAYDATE,
PAYAMT, AMTINWORDS, QTY, PAYMENTRULE, DOCUMENTNO) PAYAMT, AMTINWORDS, QTY, PAYMENTRULE, DOCUMENTNO,
HR_PAYSELECTION_ID , HR_PAYSELECTIONCHECK_ID)
AS AS
SELECT psc.AD_Client_ID, psc.AD_Org_ID, SELECT psc.AD_Client_ID, psc.AD_Org_ID,
l.AD_Language, l.AD_Language,
@ -16,13 +18,30 @@ SELECT psc.AD_Client_ID, psc.AD_Org_ID,
bp.ReferenceNo, bp.POReference, bp.ReferenceNo, bp.POReference,
ps.PayDate, ps.PayDate,
psc.PayAmt, psc.PayAmt AS AmtInWords, psc.PayAmt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo psc.Qty, psc.PaymentRule, psc.DocumentNo,
0 AS HR_PaySelection_ID , 0 AS HR_PaySelectionCheck_ID
FROM C_PaySelectionCheck psc FROM C_PaySelectionCheck psc
INNER JOIN C_PaySelection ps ON (psc.C_PaySelection_ID=ps.C_PaySelection_ID) INNER JOIN C_PaySelection ps ON (psc.C_PaySelection_ID=ps.C_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID=bp.C_BPartner_ID) INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID=bp.C_BPartner_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID=oi.AD_Org_ID) INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID=oi.AD_Org_ID)
LEFT OUTER JOIN AD_Language l ON (l.IsSystemLanguage='Y') LEFT OUTER JOIN AD_Language l ON (l.IsSystemLanguage='Y')
LEFT OUTER JOIN C_Greeting_Trl bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID AND bpg.AD_Language=l.AD_Language); LEFT OUTER JOIN C_Greeting_Trl bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID AND bpg.AD_Language=l.AD_Language)
UNION
SELECT psc.AD_Client_ID, psc.AD_Org_ID,
l.AD_Language,
0 AS C_PaySelection_ID, 0 AS C_PaySelectionCheck_ID,
oi.C_Location_ID AS Org_Location_ID, oi.TaxID, 0 AS C_DocType_ID,
bp.C_BPartner_ID, bp.Value AS BPValue, bp.TaxID AS BPTaxID, bp.NAICS, bp.DUNS,
bpg.Greeting AS BPGreeting,
bp.Name, bp.Name2,
BPartnerRemitLocation(bp.C_BPartner_ID) AS C_Location_ID,
bp.ReferenceNo, bp.poreference,
ps.PayDate, psc.Payamt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo,
psc.HR_PaySelection_ID , HR_PaySelectionCheck_ID
FROM hr_payselectioncheck psc
INNER JOIN HR_PaySelection ps ON (psc.HR_PaySelection_ID = ps.HR_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID = bp.C_BPartner_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID = oi.AD_Org_ID)
LEFT OUTER JOIN AD_Language l ON (l.IsSystemLanguage='Y')
LEFT OUTER JOIN C_Greeting_Trl bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID AND bpg.AD_Language=l.AD_Language)

View File

@ -1,9 +1,11 @@
DROP VIEW C_PAYSELECTION_CHECK_V;
CREATE OR REPLACE VIEW C_PAYSELECTION_CHECK_V CREATE OR REPLACE VIEW C_PAYSELECTION_CHECK_V
(AD_CLIENT_ID, AD_ORG_ID, AD_LANGUAGE, C_PAYSELECTION_ID, C_PAYSELECTIONCHECK_ID, (AD_CLIENT_ID, AD_ORG_ID, AD_LANGUAGE, C_PAYSELECTION_ID, C_PAYSELECTIONCHECK_ID,
ORG_LOCATION_ID, TAXID, C_DOCTYPE_ID, C_BPARTNER_ID, BPVALUE, ORG_LOCATION_ID, TAXID, C_DOCTYPE_ID, C_BPARTNER_ID, BPVALUE,
BPTAXID, NAICS, DUNS, BPGREETING, NAME, BPTAXID, NAICS, DUNS, BPGREETING, NAME,
NAME2, C_LOCATION_ID, REFERENCENO, POREFERENCE, PAYDATE, NAME2, C_LOCATION_ID, REFERENCENO, POREFERENCE, PAYDATE,
PAYAMT, AMTINWORDS, QTY, PAYMENTRULE, DOCUMENTNO) PAYAMT, AMTINWORDS, QTY, PAYMENTRULE, DOCUMENTNO,
HR_PAYSELECTION_ID , HR_PAYSELECTIONCHECK_ID)
AS AS
SELECT psc.AD_Client_ID, psc.AD_Org_ID, SELECT psc.AD_Client_ID, psc.AD_Org_ID,
cast('en_US' as varchar) AS AD_Language, cast('en_US' as varchar) AS AD_Language,
@ -16,11 +18,30 @@ SELECT psc.AD_Client_ID, psc.AD_Org_ID,
bp.ReferenceNo, bp.POReference, bp.ReferenceNo, bp.POReference,
ps.PayDate, ps.PayDate,
psc.PayAmt, psc.PayAmt AS AmtInWords, psc.PayAmt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo psc.Qty, psc.PaymentRule, psc.DocumentNo,
0 AS HR_PaySelection_ID , 0 AS HR_PaySelectionCheck_ID
FROM C_PaySelectionCheck psc FROM C_PaySelectionCheck psc
INNER JOIN C_PaySelection ps ON (psc.C_PaySelection_ID=ps.C_PaySelection_ID) INNER JOIN C_PaySelection ps ON (psc.C_PaySelection_ID=ps.C_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID=bp.C_BPartner_ID) INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID=bp.C_BPartner_ID)
LEFT OUTER JOIN C_Greeting bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID) LEFT OUTER JOIN C_Greeting bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID=oi.AD_Org_ID)
UNION
SELECT psc.AD_Client_ID, psc.AD_Org_ID,
cast('en_US' as varchar) AS AD_Language,
0 AS C_PaySelection_ID, 0 AS C_PaySelectionCheck_ID,
oi.C_Location_ID AS Org_Location_ID, oi.TaxID, 0 AS C_DocType_ID,
bp.C_BPartner_ID, bp.Value AS BPValue, bp.TaxID AS BPTaxID, bp.NAICS, bp.DUNS,
bpg.Greeting AS BPGreeting,
bp.Name, bp.Name2,
BPartnerRemitLocation(bp.C_BPartner_ID) AS C_Location_ID,
bp.ReferenceNo, bp.poreference,
ps.PayDate, psc.Payamt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo,
psc.HR_PaySelection_ID , HR_PaySelectionCheck_ID
FROM hr_payselectioncheck psc
INNER JOIN HR_PaySelection ps ON (psc.HR_PaySelection_ID = ps.HR_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID = bp.C_BPartner_ID)
LEFT OUTER JOIN C_Greeting bpg ON (bp.C_Greeting_ID = bpg.C_Greeting_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID = oi.AD_Org_ID); INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID = oi.AD_Org_ID);

View File

@ -1,9 +1,11 @@
DROP VIEW C_PAYSELECTION_CHECK_VT;
CREATE OR REPLACE VIEW C_PAYSELECTION_CHECK_VT CREATE OR REPLACE VIEW C_PAYSELECTION_CHECK_VT
(AD_CLIENT_ID, AD_ORG_ID, AD_LANGUAGE, C_PAYSELECTION_ID, C_PAYSELECTIONCHECK_ID, (AD_CLIENT_ID, AD_ORG_ID, AD_LANGUAGE, C_PAYSELECTION_ID, C_PAYSELECTIONCHECK_ID,
ORG_LOCATION_ID, TAXID, C_DOCTYPE_ID, C_BPARTNER_ID, BPVALUE, ORG_LOCATION_ID, TAXID, C_DOCTYPE_ID, C_BPARTNER_ID, BPVALUE,
BPTAXID, NAICS, DUNS, BPGREETING, NAME, BPTAXID, NAICS, DUNS, BPGREETING, NAME,
NAME2, C_LOCATION_ID, REFERENCENO, POREFERENCE, PAYDATE, NAME2, C_LOCATION_ID, REFERENCENO, POREFERENCE, PAYDATE,
PAYAMT, AMTINWORDS, QTY, PAYMENTRULE, DOCUMENTNO) PAYAMT, AMTINWORDS, QTY, PAYMENTRULE, DOCUMENTNO,
HR_PAYSELECTION_ID , HR_PAYSELECTIONCHECK_ID)
AS AS
SELECT psc.AD_Client_ID, psc.AD_Org_ID, SELECT psc.AD_Client_ID, psc.AD_Org_ID,
l.AD_Language, l.AD_Language,
@ -16,13 +18,30 @@ SELECT psc.AD_Client_ID, psc.AD_Org_ID,
bp.ReferenceNo, bp.POReference, bp.ReferenceNo, bp.POReference,
ps.PayDate, ps.PayDate,
psc.PayAmt, psc.PayAmt AS AmtInWords, psc.PayAmt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo psc.Qty, psc.PaymentRule, psc.DocumentNo,
0 AS HR_PaySelection_ID , 0 AS HR_PaySelectionCheck_ID
FROM C_PaySelectionCheck psc FROM C_PaySelectionCheck psc
INNER JOIN C_PaySelection ps ON (psc.C_PaySelection_ID=ps.C_PaySelection_ID) INNER JOIN C_PaySelection ps ON (psc.C_PaySelection_ID=ps.C_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID=bp.C_BPartner_ID) INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID=bp.C_BPartner_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID=oi.AD_Org_ID) INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID=oi.AD_Org_ID)
LEFT OUTER JOIN AD_Language l ON (l.IsSystemLanguage='Y')
LEFT OUTER JOIN C_Greeting_Trl bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID AND bpg.AD_Language=l.AD_Language)
UNION
SELECT psc.AD_Client_ID, psc.AD_Org_ID,
l.AD_Language,
0 AS C_PaySelection_ID, 0 AS C_PaySelectionCheck_ID,
oi.C_Location_ID AS Org_Location_ID, oi.TaxID, 0 AS C_DocType_ID,
bp.C_BPartner_ID, bp.Value AS BPValue, bp.TaxID AS BPTaxID, bp.NAICS, bp.DUNS,
bpg.Greeting AS BPGreeting,
bp.Name, bp.Name2,
BPartnerRemitLocation(bp.C_BPartner_ID) AS C_Location_ID,
bp.ReferenceNo, bp.poreference,
ps.PayDate, psc.Payamt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo,
psc.HR_PaySelection_ID , HR_PaySelectionCheck_ID
FROM hr_payselectioncheck psc
INNER JOIN HR_PaySelection ps ON (psc.HR_PaySelection_ID = ps.HR_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID = bp.C_BPartner_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID = oi.AD_Org_ID)
LEFT OUTER JOIN AD_Language l ON (l.IsSystemLanguage='Y') LEFT OUTER JOIN AD_Language l ON (l.IsSystemLanguage='Y')
LEFT OUTER JOIN C_Greeting_Trl bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID AND bpg.AD_Language=l.AD_Language); LEFT OUTER JOIN C_Greeting_Trl bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID AND bpg.AD_Language=l.AD_Language);

View File

@ -0,0 +1,94 @@
DROP VIEW C_PAYSELECTION_CHECK_V;
CREATE OR REPLACE VIEW C_PAYSELECTION_CHECK_V
(AD_CLIENT_ID, AD_ORG_ID, AD_LANGUAGE, C_PAYSELECTION_ID, C_PAYSELECTIONCHECK_ID,
ORG_LOCATION_ID, TAXID, C_DOCTYPE_ID, C_BPARTNER_ID, BPVALUE,
BPTAXID, NAICS, DUNS, BPGREETING, NAME,
NAME2, C_LOCATION_ID, REFERENCENO, POREFERENCE, PAYDATE,
PAYAMT, AMTINWORDS, QTY, PAYMENTRULE, DOCUMENTNO,
HR_PAYSELECTION_ID , HR_PAYSELECTIONCHECK_ID)
AS
SELECT psc.AD_Client_ID, psc.AD_Org_ID,
cast('en_US' as varchar2(6)) AS AD_Language,
psc.C_PaySelection_ID, psc.C_PaySelectionCheck_ID,
oi.C_Location_ID AS Org_Location_ID, oi.TaxID, 0 AS C_DocType_ID,
bp.C_BPartner_ID, bp.Value AS BPValue, bp.TaxID AS BPTaxID, bp.NAICS, bp.DUNS,
bpg.Greeting AS BPGreeting,
bp.Name, bp.Name2,
bpartnerRemitLocation(bp.C_BPartner_ID) AS C_Location_ID,
bp.ReferenceNo, bp.POReference,
ps.PayDate,
psc.PayAmt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo,
0 AS HR_PaySelection_ID , 0 AS HR_PaySelectionCheck_ID
FROM C_PaySelectionCheck psc
INNER JOIN C_PaySelection ps ON (psc.C_PaySelection_ID=ps.C_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID=bp.C_BPartner_ID)
LEFT OUTER JOIN C_Greeting bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID=oi.AD_Org_ID)
UNION
SELECT psc.AD_Client_ID, psc.AD_Org_ID,
cast('en_US' as varchar2(6)) AS AD_Language,
0 AS C_PaySelection_ID, 0 AS C_PaySelectionCheck_ID,
oi.C_Location_ID AS Org_Location_ID, oi.TaxID, 0 AS C_DocType_ID,
bp.C_BPartner_ID, bp.Value AS BPValue, bp.TaxID AS BPTaxID, bp.NAICS, bp.DUNS,
bpg.Greeting AS BPGreeting,
bp.Name, bp.Name2,
BPartnerRemitLocation(bp.C_BPartner_ID) AS C_Location_ID,
bp.ReferenceNo, bp.poreference,
ps.PayDate, psc.Payamt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo,
psc.HR_PaySelection_ID , HR_PaySelectionCheck_ID
FROM hr_payselectioncheck psc
INNER JOIN HR_PaySelection ps ON (psc.HR_PaySelection_ID = ps.HR_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID = bp.C_BPartner_ID)
LEFT OUTER JOIN C_Greeting bpg ON (bp.C_Greeting_ID = bpg.C_Greeting_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID = oi.AD_Org_ID);
DROP VIEW C_PAYSELECTION_CHECK_VT;
CREATE OR REPLACE VIEW C_PAYSELECTION_CHECK_VT
(AD_CLIENT_ID, AD_ORG_ID, AD_LANGUAGE, C_PAYSELECTION_ID, C_PAYSELECTIONCHECK_ID,
ORG_LOCATION_ID, TAXID, C_DOCTYPE_ID, C_BPARTNER_ID, BPVALUE,
BPTAXID, NAICS, DUNS, BPGREETING, NAME,
NAME2, C_LOCATION_ID, REFERENCENO, POREFERENCE, PAYDATE,
PAYAMT, AMTINWORDS, QTY, PAYMENTRULE, DOCUMENTNO,
HR_PAYSELECTION_ID , HR_PAYSELECTIONCHECK_ID)
AS
SELECT psc.AD_Client_ID, psc.AD_Org_ID,
l.AD_Language,
psc.C_PaySelection_ID, psc.C_PaySelectionCheck_ID,
oi.C_Location_ID AS Org_Location_ID, oi.TaxID, 0 AS C_DocType_ID,
bp.C_BPartner_ID, bp.Value AS BPValue, bp.TaxID AS BPTaxID, bp.NAICS, bp.DUNS,
bpg.Greeting AS BPGreeting,
bp.Name, bp.Name2,
bpartnerRemitLocation(bp.C_BPartner_ID) AS C_Location_ID,
bp.ReferenceNo, bp.POReference,
ps.PayDate,
psc.PayAmt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo,
0 AS HR_PaySelection_ID , 0 AS HR_PaySelectionCheck_ID
FROM C_PaySelectionCheck psc
INNER JOIN C_PaySelection ps ON (psc.C_PaySelection_ID=ps.C_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID=bp.C_BPartner_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID=oi.AD_Org_ID)
LEFT OUTER JOIN AD_Language l ON (l.IsSystemLanguage='Y')
LEFT OUTER JOIN C_Greeting_Trl bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID AND bpg.AD_Language=l.AD_Language)
UNION
SELECT psc.AD_Client_ID, psc.AD_Org_ID,
l.AD_Language,
0 AS C_PaySelection_ID, 0 AS C_PaySelectionCheck_ID,
oi.C_Location_ID AS Org_Location_ID, oi.TaxID, 0 AS C_DocType_ID,
bp.C_BPartner_ID, bp.Value AS BPValue, bp.TaxID AS BPTaxID, bp.NAICS, bp.DUNS,
bpg.Greeting AS BPGreeting,
bp.Name, bp.Name2,
BPartnerRemitLocation(bp.C_BPartner_ID) AS C_Location_ID,
bp.ReferenceNo, bp.poreference,
ps.PayDate, psc.Payamt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo,
psc.HR_PaySelection_ID , HR_PaySelectionCheck_ID
FROM hr_payselectioncheck psc
INNER JOIN HR_PaySelection ps ON (psc.HR_PaySelection_ID = ps.HR_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID = bp.C_BPartner_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID = oi.AD_Org_ID)
LEFT OUTER JOIN AD_Language l ON (l.IsSystemLanguage='Y')
LEFT OUTER JOIN C_Greeting_Trl bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID AND bpg.AD_Language=l.AD_Language);

View File

@ -0,0 +1,94 @@
DROP VIEW C_PAYSELECTION_CHECK_V;
CREATE OR REPLACE VIEW C_PAYSELECTION_CHECK_V
(AD_CLIENT_ID, AD_ORG_ID, AD_LANGUAGE, C_PAYSELECTION_ID, C_PAYSELECTIONCHECK_ID,
ORG_LOCATION_ID, TAXID, C_DOCTYPE_ID, C_BPARTNER_ID, BPVALUE,
BPTAXID, NAICS, DUNS, BPGREETING, NAME,
NAME2, C_LOCATION_ID, REFERENCENO, POREFERENCE, PAYDATE,
PAYAMT, AMTINWORDS, QTY, PAYMENTRULE, DOCUMENTNO,
HR_PAYSELECTION_ID , HR_PAYSELECTIONCHECK_ID)
AS
SELECT psc.AD_Client_ID, psc.AD_Org_ID,
cast('en_US' as varchar) AS AD_Language,
psc.C_PaySelection_ID, psc.C_PaySelectionCheck_ID,
oi.C_Location_ID AS Org_Location_ID, oi.TaxID, 0 AS C_DocType_ID,
bp.C_BPartner_ID, bp.Value AS BPValue, bp.TaxID AS BPTaxID, bp.NAICS, bp.DUNS,
bpg.Greeting AS BPGreeting,
bp.Name, bp.Name2,
bpartnerRemitLocation(bp.C_BPartner_ID) AS C_Location_ID,
bp.ReferenceNo, bp.POReference,
ps.PayDate,
psc.PayAmt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo,
0 AS HR_PaySelection_ID , 0 AS HR_PaySelectionCheck_ID
FROM C_PaySelectionCheck psc
INNER JOIN C_PaySelection ps ON (psc.C_PaySelection_ID=ps.C_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID=bp.C_BPartner_ID)
LEFT OUTER JOIN C_Greeting bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID=oi.AD_Org_ID)
UNION
SELECT psc.AD_Client_ID, psc.AD_Org_ID,
cast('en_US' as varchar) AS AD_Language,
0 AS C_PaySelection_ID, 0 AS C_PaySelectionCheck_ID,
oi.C_Location_ID AS Org_Location_ID, oi.TaxID, 0 AS C_DocType_ID,
bp.C_BPartner_ID, bp.Value AS BPValue, bp.TaxID AS BPTaxID, bp.NAICS, bp.DUNS,
bpg.Greeting AS BPGreeting,
bp.Name, bp.Name2,
BPartnerRemitLocation(bp.C_BPartner_ID) AS C_Location_ID,
bp.ReferenceNo, bp.poreference,
ps.PayDate, psc.Payamt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo,
psc.HR_PaySelection_ID , HR_PaySelectionCheck_ID
FROM hr_payselectioncheck psc
INNER JOIN HR_PaySelection ps ON (psc.HR_PaySelection_ID = ps.HR_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID = bp.C_BPartner_ID)
LEFT OUTER JOIN C_Greeting bpg ON (bp.C_Greeting_ID = bpg.C_Greeting_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID = oi.AD_Org_ID);
DROP VIEW C_PAYSELECTION_CHECK_VT;
CREATE OR REPLACE VIEW C_PAYSELECTION_CHECK_VT
(AD_CLIENT_ID, AD_ORG_ID, AD_LANGUAGE, C_PAYSELECTION_ID, C_PAYSELECTIONCHECK_ID,
ORG_LOCATION_ID, TAXID, C_DOCTYPE_ID, C_BPARTNER_ID, BPVALUE,
BPTAXID, NAICS, DUNS, BPGREETING, NAME,
NAME2, C_LOCATION_ID, REFERENCENO, POREFERENCE, PAYDATE,
PAYAMT, AMTINWORDS, QTY, PAYMENTRULE, DOCUMENTNO,
HR_PAYSELECTION_ID , HR_PAYSELECTIONCHECK_ID)
AS
SELECT psc.AD_Client_ID, psc.AD_Org_ID,
l.AD_Language,
psc.C_PaySelection_ID, psc.C_PaySelectionCheck_ID,
oi.C_Location_ID AS Org_Location_ID, oi.TaxID, 0 AS C_DocType_ID,
bp.C_BPartner_ID, bp.Value AS BPValue, bp.TaxID AS BPTaxID, bp.NAICS, bp.DUNS,
bpg.Greeting AS BPGreeting,
bp.Name, bp.Name2,
bpartnerRemitLocation(bp.C_BPartner_ID) AS C_Location_ID,
bp.ReferenceNo, bp.POReference,
ps.PayDate,
psc.PayAmt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo,
0 AS HR_PaySelection_ID , 0 AS HR_PaySelectionCheck_ID
FROM C_PaySelectionCheck psc
INNER JOIN C_PaySelection ps ON (psc.C_PaySelection_ID=ps.C_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID=bp.C_BPartner_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID=oi.AD_Org_ID)
LEFT OUTER JOIN AD_Language l ON (l.IsSystemLanguage='Y')
LEFT OUTER JOIN C_Greeting_Trl bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID AND bpg.AD_Language=l.AD_Language)
UNION
SELECT psc.AD_Client_ID, psc.AD_Org_ID,
l.AD_Language,
0 AS C_PaySelection_ID, 0 AS C_PaySelectionCheck_ID,
oi.C_Location_ID AS Org_Location_ID, oi.TaxID, 0 AS C_DocType_ID,
bp.C_BPartner_ID, bp.Value AS BPValue, bp.TaxID AS BPTaxID, bp.NAICS, bp.DUNS,
bpg.Greeting AS BPGreeting,
bp.Name, bp.Name2,
BPartnerRemitLocation(bp.C_BPartner_ID) AS C_Location_ID,
bp.ReferenceNo, bp.poreference,
ps.PayDate, psc.Payamt, psc.PayAmt AS AmtInWords,
psc.Qty, psc.PaymentRule, psc.DocumentNo,
psc.HR_PaySelection_ID , HR_PaySelectionCheck_ID
FROM hr_payselectioncheck psc
INNER JOIN HR_PaySelection ps ON (psc.HR_PaySelection_ID = ps.HR_PaySelection_ID)
INNER JOIN C_BPartner bp ON (psc.C_BPartner_ID = bp.C_BPartner_ID)
INNER JOIN AD_OrgInfo oi ON (psc.AD_Org_ID = oi.AD_Org_ID)
LEFT OUTER JOIN AD_Language l ON (l.IsSystemLanguage='Y')
LEFT OUTER JOIN C_Greeting_Trl bpg on (bp.C_Greeting_ID=bpg.C_Greeting_ID AND bpg.AD_Language=l.AD_Language);