Examples with MPayment org.compiere.model.MPayment used on opensource projects

Example 1 with MPayment

use of org.compiere.model.MPayment in project adempiere by adempiere.

the class ImportPayment method doIt.

//	prepare
/**
	 * 	Process
	 *	@return info
	 *	@throws Exception
	 */
protected String doIt() throws Exception {
    log.info("C_BankAccount_ID" + p_C_BankAccount_ID);
    MBankAccount ba = MBankAccount.get(getCtx(), p_C_BankAccount_ID);
    if (p_C_BankAccount_ID == 0 || ba.get_ID() != p_C_BankAccount_ID)
        throw new AdempiereUserError("@NotFound@ @C_BankAccount_ID@ - " + p_C_BankAccount_ID);
    if (p_AD_Org_ID != ba.getAD_Org_ID() && ba.getAD_Org_ID() != 0)
        p_AD_Org_ID = ba.getAD_Org_ID();
    log.info("AD_Org_ID=" + p_AD_Org_ID);
    StringBuffer sql = null;
    int no = 0;
    String clientCheck = " AND AD_Client_ID=" + ba.getAD_Client_ID();
    //	Delete Old Imported
    if (p_deleteOldImported) {
        sql = new StringBuffer("DELETE I_Payment " + "WHERE I_IsImported='Y'").append(clientCheck);
        no = DB.executeUpdate(sql.toString(), get_TrxName());
        log.fine("Delete Old Impored =" + no);
    }
    //	Set Client, Org, IsActive, Created/Updated
    sql = new StringBuffer("UPDATE I_Payment " + "SET AD_Client_ID = COALESCE (AD_Client_ID,").append(ba.getAD_Client_ID()).append(")," + " AD_Org_ID = COALESCE (AD_Org_ID,").append(p_AD_Org_ID).append("),");
    sql.append(" IsActive = COALESCE (IsActive, 'Y')," + " Created = COALESCE (Created, SysDate)," + " CreatedBy = COALESCE (CreatedBy, 0)," + " Updated = COALESCE (Updated, SysDate)," + " UpdatedBy = COALESCE (UpdatedBy, 0)," + " I_ErrorMsg = ' '," + " I_IsImported = 'N' " + "WHERE I_IsImported<>'Y' OR I_IsImported IS NULL OR AD_Client_ID IS NULL OR AD_Org_ID IS NULL OR AD_Client_ID=0 OR AD_Org_ID=0");
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    log.info("Reset=" + no);
    sql = new StringBuffer("UPDATE I_Payment o " + "SET I_IsImported='E', I_ErrorMsg=I_ErrorMsg||'ERR=Invalid Org, '" + "WHERE (AD_Org_ID IS NULL OR AD_Org_ID=0" + " OR EXISTS (SELECT * FROM AD_Org oo WHERE o.AD_Org_ID=oo.AD_Org_ID AND (oo.IsSummary='Y' OR oo.IsActive='N')))" + " AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.warning("Invalid Org=" + no);
    //	Set Bank Account
    sql = new StringBuffer("UPDATE I_Payment i " + "SET C_BankAccount_ID=" + "( " + " SELECT C_BankAccount_ID " + " FROM C_BankAccount a, C_Bank b " + " WHERE b.IsOwnBank='Y' " + " AND a.AD_Client_ID=i.AD_Client_ID " + " AND a.C_Bank_ID=b.C_Bank_ID " + " AND a.AccountNo=i.BankAccountNo " + " AND b.RoutingNo=i.RoutingNo " + " OR b.SwiftCode=i.RoutingNo " + ") " + "WHERE i.C_BankAccount_ID IS NULL " + "AND i.I_IsImported<>'Y' " + "OR i.I_IsImported IS NULL").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Bank Account (With Routing No)=" + no);
    //
    sql = new StringBuffer("UPDATE I_Payment i " + "SET C_BankAccount_ID=" + "( " + " SELECT C_BankAccount_ID " + " FROM C_BankAccount a, C_Bank b " + " WHERE b.IsOwnBank='Y' " + " AND a.C_Bank_ID=b.C_Bank_ID " + " AND a.AccountNo=i.BankAccountNo " + " AND a.AD_Client_ID=i.AD_Client_ID " + ") " + "WHERE i.C_BankAccount_ID IS NULL " + "AND i.I_isImported<>'Y' " + "OR i.I_isImported IS NULL").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Bank Account (Without Routing No)=" + no);
    //
    sql = new StringBuffer("UPDATE I_Payment i " + "SET C_BankAccount_ID=(SELECT C_BankAccount_ID FROM C_BankAccount a WHERE a.C_BankAccount_ID=").append(p_C_BankAccount_ID);
    sql.append(" and a.AD_Client_ID=i.AD_Client_ID) " + "WHERE i.C_BankAccount_ID IS NULL " + "AND i.BankAccountNo IS NULL " + "AND i.I_isImported<>'Y' " + "OR i.I_isImported IS NULL").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Bank Account=" + no);
    //	
    sql = new StringBuffer("UPDATE I_Payment " + "SET I_isImported='E', I_ErrorMsg=I_ErrorMsg||'ERR=Invalid Bank Account, ' " + "WHERE C_BankAccount_ID IS NULL " + "AND I_isImported<>'Y' " + "OR I_isImported IS NULL").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.warning("Invalid Bank Account=" + no);
    //	Set Currency
    sql = new StringBuffer("UPDATE I_Payment i " + "SET C_Currency_ID=(SELECT C_Currency_ID FROM C_Currency c" + " WHERE i.ISO_Code=c.ISO_Code AND c.AD_Client_ID IN (0,i.AD_Client_ID)) " + "WHERE C_Currency_ID IS NULL" + " AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Set Currency=" + no);
    //
    sql = new StringBuffer("UPDATE I_Payment i " + "SET C_Currency_ID=(SELECT C_Currency_ID FROM C_BankAccount WHERE C_BankAccount_ID=i.C_BankAccount_ID) " + "WHERE i.C_Currency_ID IS NULL " + "AND i.ISO_Code IS NULL").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Set Currency=" + no);
    //
    sql = new StringBuffer("UPDATE I_Payment " + "SET I_IsImported='E', I_ErrorMsg=I_ErrorMsg||'ERR=No Currency,' " + "WHERE C_Currency_ID IS NULL " + "AND I_IsImported<>'E' " + " AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.warning("No Currency=" + no);
    //	Set Amount
    sql = new StringBuffer("UPDATE I_Payment " + "SET ChargeAmt=0 " + "WHERE ChargeAmt IS NULL " + "AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Charge Amount=" + no);
    //
    sql = new StringBuffer("UPDATE I_Payment " + "SET TaxAmt=0 " + "WHERE TaxAmt IS NULL " + "AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Tax Amount=" + no);
    //
    sql = new StringBuffer("UPDATE I_Payment " + "SET WriteOffAmt=0 " + "WHERE WriteOffAmt IS NULL " + "AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("WriteOff Amount=" + no);
    //
    sql = new StringBuffer("UPDATE I_Payment " + "SET DiscountAmt=0 " + "WHERE DiscountAmt IS NULL " + "AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Discount Amount=" + no);
    //
    //	Set Date
    sql = new StringBuffer("UPDATE I_Payment " + "SET DateTrx=Created " + "WHERE DateTrx IS NULL " + "AND I_isImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Trx Date=" + no);
    sql = new StringBuffer("UPDATE I_Payment " + "SET DateAcct=DateTrx " + "WHERE DateAcct IS NULL " + "AND I_isImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Acct Date=" + no);
    //	Invoice
    sql = new StringBuffer("UPDATE I_Payment i " + "SET C_Invoice_ID=(SELECT MAX(C_Invoice_ID) FROM C_Invoice ii" + " WHERE i.InvoiceDocumentNo=ii.DocumentNo AND i.AD_Client_ID=ii.AD_Client_ID) " + "WHERE C_Invoice_ID IS NULL AND InvoiceDocumentNo IS NOT NULL" + " AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.fine("Set Invoice from DocumentNo=" + no);
    //	BPartner
    sql = new StringBuffer("UPDATE I_Payment i " + "SET C_BPartner_ID=(SELECT MAX(C_BPartner_ID) FROM C_BPartner bp" + " WHERE i.BPartnerValue=bp.Value AND i.AD_Client_ID=bp.AD_Client_ID) " + "WHERE C_BPartner_ID IS NULL AND BPartnerValue IS NOT NULL" + " AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.fine("Set BP from Value=" + no);
    sql = new StringBuffer("UPDATE I_Payment i " + "SET C_BPartner_ID=(SELECT MAX(C_BPartner_ID) FROM C_Invoice ii" + " WHERE i.C_Invoice_ID=ii.C_Invoice_ID AND i.AD_Client_ID=ii.AD_Client_ID) " + "WHERE C_BPartner_ID IS NULL AND C_Invoice_ID IS NOT NULL" + " AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.fine("Set BP from Invoice=" + no);
    sql = new StringBuffer("UPDATE I_Payment " + "SET I_IsImported='E', I_ErrorMsg=I_ErrorMsg||'ERR=No BPartner,' " + "WHERE C_BPartner_ID IS NULL " + "AND I_IsImported<>'E' " + " AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.warning("No BPartner=" + no);
    // Charge - begin - https://adempiere.atlassian.net/browse/ADEMPIERE-170
    sql = new StringBuffer("UPDATE I_Payment i " + "SET C_Charge_ID=(SELECT MAX(C_Charge_ID) FROM C_Charge charge" + " WHERE i.ChargeName=charge.Name AND i.AD_Client_ID=charge.AD_Client_ID) " + "WHERE C_Charge_ID IS NULL AND ChargeName IS NOT NULL" + " AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.fine("Set Charge from Name=" + no);
    sql = new StringBuffer("UPDATE I_Payment " + "SET I_IsImported='E', I_ErrorMsg=I_ErrorMsg||'ERR=No Charge,' " + "WHERE C_Charge_ID IS NULL " + " AND I_IsImported<>'E' " + " AND ChargeName IS NOT NULL " + " AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.warning("No ChargeName=" + no);
    // Charge - end
    //	Check Payment<->Invoice combination
    sql = new StringBuffer("UPDATE I_Payment " + "SET I_IsImported='E', I_ErrorMsg=I_ErrorMsg||'Err=Invalid Payment<->Invoice, ' " + "WHERE I_Payment_ID IN " + "(SELECT I_Payment_ID " + "FROM I_Payment i" + " INNER JOIN C_Payment p ON (i.C_Payment_ID=p.C_Payment_ID) " + "WHERE i.C_Invoice_ID IS NOT NULL " + " AND p.C_Invoice_ID IS NOT NULL " + " AND p.C_Invoice_ID<>i.C_Invoice_ID) ").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Payment<->Invoice Mismatch=" + no);
    //	Check Payment<->BPartner combination
    sql = new StringBuffer("UPDATE I_Payment " + "SET I_IsImported='E', I_ErrorMsg=I_ErrorMsg||'Err=Invalid Payment<->BPartner, ' " + "WHERE I_Payment_ID IN " + "(SELECT I_Payment_ID " + "FROM I_Payment i" + " INNER JOIN C_Payment p ON (i.C_Payment_ID=p.C_Payment_ID) " + "WHERE i.C_BPartner_ID IS NOT NULL " + " AND p.C_BPartner_ID IS NOT NULL " + " AND p.C_BPartner_ID<>i.C_BPartner_ID) ").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Payment<->BPartner Mismatch=" + no);
    //	Check Invoice<->BPartner combination
    sql = new StringBuffer("UPDATE I_Payment " + "SET I_IsImported='E', I_ErrorMsg=I_ErrorMsg||'Err=Invalid Invoice<->BPartner, ' " + "WHERE I_Payment_ID IN " + "(SELECT I_Payment_ID " + "FROM I_Payment i" + " INNER JOIN C_Invoice v ON (i.C_Invoice_ID=v.C_Invoice_ID) " + "WHERE i.C_BPartner_ID IS NOT NULL " + " AND v.C_BPartner_ID IS NOT NULL " + " AND v.C_BPartner_ID<>i.C_BPartner_ID) ").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Invoice<->BPartner Mismatch=" + no);
    //	Check Invoice.BPartner<->Payment.BPartner combination
    sql = new StringBuffer("UPDATE I_Payment " + "SET I_IsImported='E', I_ErrorMsg=I_ErrorMsg||'Err=Invalid Invoice.BPartner<->Payment.BPartner, ' " + "WHERE I_Payment_ID IN " + "(SELECT I_Payment_ID " + "FROM I_Payment i" + " INNER JOIN C_Invoice v ON (i.C_Invoice_ID=v.C_Invoice_ID)" + " INNER JOIN C_Payment p ON (i.C_Payment_ID=p.C_Payment_ID) " + "WHERE p.C_Invoice_ID<>v.C_Invoice_ID" + " AND v.C_BPartner_ID<>p.C_BPartner_ID) ").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("Invoice.BPartner<->Payment.BPartner Mismatch=" + no);
    //	TrxType
    sql = new StringBuffer("UPDATE I_Payment " + //	MPayment.TRXTYPE_Sales
    "SET TrxType='S' " + "WHERE TrxType IS NULL " + "AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("TrxType Default=" + no);
    //	TenderType
    sql = new StringBuffer("UPDATE I_Payment " + //	MPayment.TENDERTYPE_Check
    "SET TenderType='K' " + "WHERE TenderType IS NULL " + "AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.info("TenderType Default=" + no);
    //	Document Type
    sql = new StringBuffer("UPDATE I_Payment i " + "SET C_DocType_ID=(SELECT C_DocType_ID FROM C_DocType d WHERE d.Name=i.DocTypeName" + " AND d.DocBaseType IN ('ARR','APP') AND i.AD_Client_ID=d.AD_Client_ID) " + "WHERE C_DocType_ID IS NULL AND DocTypeName IS NOT NULL AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.fine("Set DocType=" + no);
    sql = new StringBuffer("UPDATE I_Payment " + "SET I_IsImported='E', I_ErrorMsg=I_ErrorMsg||'ERR=Invalid DocTypeName, ' " + "WHERE C_DocType_ID IS NULL AND DocTypeName IS NOT NULL" + " AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.warning("Invalid DocTypeName=" + no);
    sql = new StringBuffer("UPDATE I_Payment " + "SET I_IsImported='E', I_ErrorMsg=I_ErrorMsg||'ERR=No DocType, ' " + "WHERE C_DocType_ID IS NULL" + " AND I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    if (no != 0)
        log.warning("No DocType=" + no);
    commitEx();
    //Import Bank Statement
    sql = new StringBuffer("SELECT * FROM I_Payment" + " WHERE I_IsImported='N'" + " ORDER BY C_BankAccount_ID, CheckNo, DateTrx, R_AuthCode");
    MBankAccount account = null;
    PreparedStatement pstmt = null;
    int noInsert = 0;
    try {
        pstmt = DB.prepareStatement(sql.toString(), get_TrxName());
        ResultSet rs = pstmt.executeQuery();
        while (rs.next()) {
            X_I_Payment imp = new X_I_Payment(m_ctx, rs, get_TrxName());
            //	Get the bank account
            if (account == null || account.getC_BankAccount_ID() != imp.getC_BankAccount_ID()) {
                account = MBankAccount.get(m_ctx, imp.getC_BankAccount_ID());
                log.info("New Account=" + account.getAccountNo());
            }
            //	New Payment
            MPayment payment = new MPayment(m_ctx, 0, get_TrxName());
            payment.setAD_Org_ID(imp.getAD_Org_ID());
            payment.setDocumentNo(imp.getDocumentNo());
            payment.setPONum(imp.getPONum());
            payment.setTrxType(imp.getTrxType());
            payment.setTenderType(imp.getTenderType());
            payment.setC_BankAccount_ID(imp.getC_BankAccount_ID());
            payment.setRoutingNo(imp.getRoutingNo());
            payment.setAccountNo(imp.getAccountNo());
            payment.setCheckNo(imp.getCheckNo());
            payment.setMicr(imp.getMicr());
            if (imp.getCreditCardType() != null)
                payment.setCreditCardType(imp.getCreditCardType());
            payment.setCreditCardNumber(imp.getCreditCardNumber());
            if (imp.getCreditCardExpMM() != 0)
                payment.setCreditCardExpMM(imp.getCreditCardExpMM());
            if (imp.getCreditCardExpYY() != 0)
                payment.setCreditCardExpYY(imp.getCreditCardExpYY());
            payment.setCreditCardVV(imp.getCreditCardVV());
            payment.setSwipe(imp.getSwipe());
            payment.setDateAcct(imp.getDateTrx());
            payment.setDateTrx(imp.getDateTrx());
            //	payment.setDescription(imp.getDescription());
            //
            payment.setC_BPartner_ID(imp.getC_BPartner_ID());
            payment.setC_Invoice_ID(imp.getC_Invoice_ID());
            payment.setC_DocType_ID(imp.getC_DocType_ID());
            payment.setC_Currency_ID(imp.getC_Currency_ID());
            //	payment.setC_ConversionType_ID(imp.getC_ConversionType_ID());
            payment.setC_Charge_ID(imp.getC_Charge_ID());
            payment.setChargeAmt(imp.getChargeAmt());
            payment.setTaxAmt(imp.getTaxAmt());
            payment.setPayAmt(imp.getPayAmt());
            payment.setWriteOffAmt(imp.getWriteOffAmt());
            payment.setDiscountAmt(imp.getDiscountAmt());
            payment.setWriteOffAmt(imp.getWriteOffAmt());
            //	Copy statement line reference data
            payment.setA_City(imp.getA_City());
            payment.setA_Country(imp.getA_Country());
            payment.setA_EMail(imp.getA_EMail());
            payment.setA_Ident_DL(imp.getA_Ident_DL());
            payment.setA_Ident_SSN(imp.getA_Ident_SSN());
            payment.setA_Name(imp.getA_Name());
            payment.setA_State(imp.getA_State());
            payment.setA_Street(imp.getA_Street());
            payment.setA_Zip(imp.getA_Zip());
            payment.setR_AuthCode(imp.getR_AuthCode());
            payment.setR_Info(imp.getR_Info());
            payment.setR_PnRef(imp.getR_PnRef());
            payment.setR_RespMsg(imp.getR_RespMsg());
            payment.setR_Result(imp.getR_Result());
            payment.setOrig_TrxID(imp.getOrig_TrxID());
            payment.setVoiceAuthCode(imp.getVoiceAuthCode());
            //	Save payment
            if (payment.save()) {
                imp.setC_Payment_ID(payment.getC_Payment_ID());
                imp.setI_IsImported(true);
                imp.setProcessed(true);
                imp.saveEx();
                noInsert++;
                if (payment != null && m_docAction != null && m_docAction.length() > 0) {
                    payment.setDocAction(m_docAction);
                    payment.processIt(m_docAction);
                    payment.saveEx();
                }
            }
        }
        //	Close database connection
        rs.close();
        pstmt.close();
        rs = null;
        pstmt = null;
    } catch (Exception e) {
        log.log(Level.SEVERE, sql.toString(), e);
    }
    //	Set Error to indicator to not imported
    sql = new StringBuffer("UPDATE I_Payment " + "SET I_IsImported='N', Updated=SysDate " + "WHERE I_IsImported<>'Y'").append(clientCheck);
    no = DB.executeUpdate(sql.toString(), get_TrxName());
    addLog(0, null, new BigDecimal(no), "@Errors@");
    //
    addLog(0, null, new BigDecimal(noInsert), "@C_Payment_ID@: @Inserted@");
    return "";
}

Example 2 with MPayment

use of org.compiere.model.MPayment in project adempiere by adempiere.

the class DunningRunCreate method createPaymentLine.

//	addPayments
/**
	 * 	Create Payment Line
	 *	@param C_Payment_ID
	 *	@param C_Currency_ID
	 *	@param PayAmt
	 *	@param OpenAmt
	 *	@param C_BPartner_ID
	 *  @param c_DunningLevel_ID 
	 */
private boolean createPaymentLine(int C_Payment_ID, int C_Currency_ID, BigDecimal PayAmt, BigDecimal OpenAmt, int C_BPartner_ID, int c_DunningLevel_ID) {
    MDunningRunEntry entry = null;
    try {
        entry = m_run.getEntry(C_BPartner_ID, p_C_Currency_ID, p_SalesRep_ID, c_DunningLevel_ID);
    } catch (BPartnerNoAddressException e) {
        MPayment payment = new MPayment(getCtx(), C_Payment_ID, null);
        String msg = "@Skip@ @C_Payment_ID@ " + payment.getDocumentInfo() + ", @C_BPartner_ID@ " + MBPartner.get(getCtx(), C_BPartner_ID).getName() + " @No@ @IsActive@ @C_BPartner_Location_ID@";
        getProcessInfo().addLog(getProcessInfo().getAD_PInstance_ID(), null, null, msg);
        return false;
    }
    if (entry.get_ID() == 0)
        if (!entry.save())
            throw new IllegalStateException("Cannot save MDunningRunEntry");
    //
    MDunningRunLine line = new MDunningRunLine(entry);
    line.setPayment(C_Payment_ID, C_Currency_ID, PayAmt, OpenAmt);
    if (!line.save())
        throw new IllegalStateException("Cannot save MDunningRunLine");
    return true;
}

Example 3 with MPayment

use of org.compiere.model.MPayment in project adempiere by adempiere.

the class AllocationAuto method allocateBPOldestFirst.

//	allocateBPartnerAll
/**
	 * 	Allocate Oldest First using Accounting currency
	 *	@return allocations
	 */
private int allocateBPOldestFirst() throws Exception {
    int C_Currency_ID = MClient.get(getCtx()).getC_Currency_ID();
    Timestamp dateAcct = null;
    //	Payments
    BigDecimal totalPayments = Env.ZERO;
    for (int p = 0; p < m_payments.length; p++) {
        MPayment payment = m_payments[p];
        if (payment.isAllocated())
            continue;
        if (payment.getC_Currency_ID() != C_Currency_ID)
            continue;
        BigDecimal allocatedAmt = payment.getAllocatedAmt();
        log.info(payment + ", Allocated=" + allocatedAmt);
        BigDecimal availableAmt = payment.getPayAmt().add(payment.getDiscountAmt()).add(payment.getWriteOffAmt()).add(payment.getOverUnderAmt());
        availableAmt = availableAmt.subtract(allocatedAmt);
        if (!payment.isReceipt())
            availableAmt = availableAmt.negate();
        log.fine("Available=" + availableAmt);
        if (dateAcct == null || payment.getDateAcct().after(dateAcct))
            dateAcct = payment.getDateAcct();
        totalPayments = totalPayments.add(availableAmt);
    }
    //	Invoices
    BigDecimal totalInvoices = Env.ZERO;
    for (int i = 0; i < m_invoices.length; i++) {
        MInvoice invoice = m_invoices[i];
        if (invoice.isPaid())
            continue;
        if (invoice.getC_Currency_ID() != C_Currency_ID)
            continue;
        BigDecimal openAmt = invoice.getOpenAmt(true, null);
        log.fine("" + invoice);
        if (!invoice.isSOTrx())
            openAmt = openAmt.negate();
        //	Foreign currency
        log.fine("Open=" + openAmt);
        if (dateAcct == null || invoice.getDateAcct().after(dateAcct))
            dateAcct = invoice.getDateAcct();
        totalInvoices = totalInvoices.add(openAmt);
    }
    //	must be either AP or AR balance
    if (totalInvoices.signum() != totalPayments.signum()) {
        log.fine("Signum - Invoices=" + totalInvoices.signum() + " <> Payments=" + totalPayments.signum());
        return 0;
    }
    BigDecimal difference = totalInvoices.subtract(totalPayments);
    BigDecimal maxAmt = totalInvoices.abs().min(totalPayments.abs());
    if (totalInvoices.signum() < 0)
        maxAmt = maxAmt.negate();
    log.info("= Invoices=" + totalInvoices + " - Payments=" + totalPayments + " = Difference=" + difference + " - Max=" + maxAmt);
    //	Allocate Payments up to max
    BigDecimal allocatedPayments = Env.ZERO;
    for (int p = 0; p < m_payments.length; p++) {
        MPayment payment = m_payments[p];
        if (payment.isAllocated())
            continue;
        if (payment.getC_Currency_ID() != C_Currency_ID)
            continue;
        BigDecimal allocatedAmt = payment.getAllocatedAmt();
        // comment following lines to allow partial allocation
        // if (allocatedAmt != null && allocatedAmt.signum() != 0)
        // 	continue;
        BigDecimal availableAmt = payment.getPayAmt().add(payment.getDiscountAmt()).add(payment.getWriteOffAmt()).add(payment.getOverUnderAmt());
        availableAmt = availableAmt.subtract(allocatedAmt);
        if (!payment.isReceipt())
            availableAmt = availableAmt.negate();
        allocatedPayments = allocatedPayments.add(availableAmt);
        if ((totalInvoices.signum() > 0 && allocatedPayments.compareTo(maxAmt) > 0) || (totalInvoices.signum() < 0 && allocatedPayments.compareTo(maxAmt) < 0)) {
            BigDecimal diff = allocatedPayments.subtract(maxAmt);
            availableAmt = availableAmt.subtract(diff);
            allocatedPayments = allocatedPayments.subtract(diff);
        }
        log.fine("Payment Allocated=" + availableAmt);
        if (!createAllocation(C_Currency_ID, "BP Oldest (" + difference.abs() + ")", dateAcct, availableAmt, null, null, null, payment.getC_BPartner_ID(), payment.getC_Payment_ID(), 0, payment.getAD_Org_ID())) {
            throw new AdempiereSystemError("Cannot create Allocation");
        }
        if (allocatedPayments.compareTo(maxAmt) == 0)
            break;
    }
    //	for all payments
    //	Allocated Invoices up to max
    BigDecimal allocatedInvoices = Env.ZERO;
    for (int i = 0; i < m_invoices.length; i++) {
        MInvoice invoice = m_invoices[i];
        if (invoice.isPaid())
            continue;
        if (invoice.getC_Currency_ID() != C_Currency_ID)
            continue;
        BigDecimal openAmt = invoice.getOpenAmt(true, null);
        if (!invoice.isSOTrx())
            openAmt = openAmt.negate();
        allocatedInvoices = allocatedInvoices.add(openAmt);
        if ((totalInvoices.signum() > 0 && allocatedInvoices.compareTo(maxAmt) > 0) || (totalInvoices.signum() < 0 && allocatedInvoices.compareTo(maxAmt) < 0)) {
            BigDecimal diff = allocatedInvoices.subtract(maxAmt);
            openAmt = openAmt.subtract(diff);
            allocatedInvoices = allocatedInvoices.subtract(diff);
        }
        if (openAmt.signum() == 0)
            break;
        log.fine("Invoice Allocated=" + openAmt);
        if (!createAllocation(C_Currency_ID, "BP Oldest (" + difference.abs() + ")", dateAcct, openAmt, null, null, null, invoice.getC_BPartner_ID(), 0, invoice.getC_Invoice_ID(), invoice.getAD_Org_ID())) {
            throw new AdempiereSystemError("Cannot create Allocation");
        }
        if (allocatedInvoices.compareTo(maxAmt) == 0)
            break;
    }
    if (allocatedPayments.compareTo(allocatedInvoices) != 0) {
        throw new AdempiereSystemError("Allocated Payments=" + allocatedPayments + " <> Invoices=" + allocatedInvoices);
    }
    processAllocation();
    return 1;
}

Example 4 with MPayment

use of org.compiere.model.MPayment in project adempiere by adempiere.

the class AllocationAuto method getPayments.

//	alloc
/**
	 * 	Get Payments of BP
	 *	@param C_BPartner_ID id
	 *	@return unallocated payments
	 */
private MPayment[] getPayments(int C_BPartner_ID) {
    ArrayList<MPayment> list = new ArrayList<MPayment>();
    String sql = "SELECT * FROM C_Payment " + "WHERE IsAllocated='N' AND Processed='Y' AND C_BPartner_ID=?" + " AND IsPrepayment='N' AND C_Charge_ID IS NULL ";
    if (ONLY_AP.equals(p_APAR))
        sql += "AND IsReceipt='N' ";
    else if (ONLY_AR.equals(p_APAR))
        sql += "AND IsReceipt='Y' ";
    sql += "ORDER BY DateTrx";
    PreparedStatement pstmt = null;
    ResultSet rs = null;
    try {
        pstmt = DB.prepareStatement(sql, get_TrxName());
        pstmt.setInt(1, C_BPartner_ID);
        rs = pstmt.executeQuery();
        while (rs.next()) {
            MPayment payment = new MPayment(getCtx(), rs, get_TrxName());
            BigDecimal allocated = payment.getAllocatedAmt();
            if (allocated != null && allocated.compareTo(payment.getPayAmt()) == 0) {
                payment.setIsAllocated(true);
                payment.saveEx();
            } else
                list.add(payment);
        }
    } catch (Exception e) {
        log.log(Level.SEVERE, sql, e);
    } finally {
        DB.close(rs, pstmt);
        rs = null;
        pstmt = null;
    }
    m_payments = new MPayment[list.size()];
    list.toArray(m_payments);
    return m_payments;
}

Example 5 with MPayment

use of org.compiere.model.MPayment in project adempiere by adempiere.

the class AllocationAuto method allocateBPOneToOne.

//	allocateIndividualPayments
/**
	 * 	Allocate Payment:Invoice 1:1
	 *	@return allocations
	 */
private int allocateBPOneToOne() throws Exception {
    int count = 0;
    for (int p = 0; p < m_payments.length; p++) {
        MPayment payment = m_payments[p];
        if (payment.isAllocated())
            continue;
        BigDecimal allocatedAmt = payment.getAllocatedAmt();
        log.info(payment + ", Allocated=" + allocatedAmt);
        if (allocatedAmt != null && allocatedAmt.signum() != 0)
            continue;
        BigDecimal availableAmt = payment.getPayAmt().add(payment.getDiscountAmt()).add(payment.getWriteOffAmt()).add(payment.getOverUnderAmt());
        if (!payment.isReceipt())
            availableAmt = availableAmt.negate();
        log.fine("Available=" + availableAmt);
        for (int i = 0; i < m_invoices.length; i++) {
            MInvoice invoice = m_invoices[i];
            if (invoice == null || invoice.isPaid())
                continue;
            if (payment.getC_Currency_ID() == invoice.getC_Currency_ID()) {
                //	log.fine("allocateBPartnerAll - " + invoice);
                BigDecimal openAmt = invoice.getOpenAmt(true, null);
                if (!invoice.isSOTrx())
                    openAmt = openAmt.negate();
                BigDecimal difference = availableAmt.subtract(openAmt).abs();
                log.fine(invoice + ", Open=" + openAmt + " - Difference=" + difference);
                if (difference.signum() == 0) {
                    Timestamp dateAcct = payment.getDateAcct();
                    if (invoice.getDateAcct().after(dateAcct))
                        dateAcct = invoice.getDateAcct();
                    if (!createAllocation(payment.getC_Currency_ID(), "1:1 (" + availableAmt + ")", dateAcct, availableAmt, null, null, null, invoice.getC_BPartner_ID(), payment.getC_Payment_ID(), invoice.getC_Invoice_ID(), invoice.getAD_Org_ID())) {
                        throw new AdempiereSystemError("Cannot create Allocation");
                    }
                    processAllocation();
                    count++;
                    //	remove invoice
                    m_invoices[i] = null;
                    m_payments[p] = null;
                    payment = null;
                    break;
                }
            } else //	Multi-Currency
            {
            }
        }
    //	for all invoices
    }
    //	for all payments
    return count;
}