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

Example 1 with X_I_Payment

use of org.compiere.model.X_I_Payment 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 "";
}