public void CompanyBank(CreditorPaymentFormat credPaymFormat)
{
BankSpecificSettings bankSpecific = BankSpecificSettings.BankSpecTypeInstance(credPaymFormat);
this.bankSpecificSettings = bankSpecific;
this.credPaymFormat = credPaymFormat;
CompanyBankEnum = bankSpecific.CompanyBank();
}
/// <summary>
/// Validate PaymentType
/// </summary>
private void ISOPaymentType(string paymentCcy, string companyIBAN, PaymentTypes paymentType, string creditorCountryId)
{
companyIBAN = companyIBAN ?? string.Empty;
companyCountryId = companyCountryId ?? string.Empty;
creditorCountryId = creditorCountryId ?? string.Empty;
isoPaymentType = BankSpecificSettings.ISOPaymentType(paymentCcy, companyIBAN, creditorIBAN, creditorSWIFT, creditorCountryId, companyCountryId);
if (credPaymFormat._ExportFormat == (byte)ExportFormatType.ISO20022_DK && (CompanyBankEnum == CompanyBankENUM.DanskeBank || CompanyBankEnum == CompanyBankENUM.Nordea_DK || CompanyBankEnum == CompanyBankENUM.Nordea_NO))
{
if (paymentType != PaymentTypes.IBAN && isoPaymentType == ISO20022PaymentTypes.DOMESTIC && paymentCcy == BaseDocument.CCYEUR)
{
checkErrors.Add(new CheckError(String.Format("It's required to use IBAN as creditor account for Domestic EUR payments.")));
}
//Nordea
if ((CompanyBankEnum == CompanyBankENUM.Nordea_DK || CompanyBankEnum == CompanyBankENUM.Nordea_NO) && (paymentType != PaymentTypes.IBAN && isoPaymentType == ISO20022PaymentTypes.SEPA))
{
checkErrors.Add(new CheckError(String.Format("It's required to use IBAN as creditor account for SEPA payments.")));
}
}
else if (credPaymFormat._ExportFormat == (byte)ExportFormatType.ISO20022_DK)
{
if (paymentType == PaymentTypes.IBAN && isoPaymentType == ISO20022PaymentTypes.DOMESTIC) //Not sure which banks has this requirement.
{
checkErrors.Add(new CheckError(String.Format("It's not allowed to use IBAN as creditor account for domestic payments.")));
}
}
if (credPaymFormat._ExportFormat == (byte)ExportFormatType.ISO20022_LT && bankSpecificSettings.CompanyBankEnum == CompanyBankENUM.Standard)
{
if (isoPaymentType != ISO20022PaymentTypes.SEPA)
{
checkErrors.Add(new CheckError(String.Format("Only SEPA payments are allowed")));
}
}
}
public bool MergePayments(Company company, PaymentsGrid dgCreditorTranOpenGrid, CreditorPaymentFormat credPaymFormat, SQLCache bankAccountCache)
{
string creditorAcc = string.Empty;
string creditorOCRPaymentId = string.Empty;
string creditorBIC = string.Empty;
string mergePaymIdString = string.Empty;
if (credPaymFormat._PaymentGrouping == PaymentGroupingType.Invoice)
{
return(false);
}
var credCache = company.GetCache(typeof(Uniconta.DataModel.Creditor));
PaymentISO20022Validate paymentISO20022Validate = new PaymentISO20022Validate();
BankSpecificSettings bankSpecific = BankSpecificSettings.BankSpecTypeInstance(credPaymFormat);
try
{
var grid = dgCreditorTranOpenGrid.GetVisibleRows() as IEnumerable <CreditorTransPayment>;
foreach (var rec in grid)
{
if (rec._PaymentFormat != credPaymFormat._Format || rec._OnHold || rec._Paid)
{
rec.MergePaymId = Uniconta.ClientTools.Localization.lookup("Excluded");
continue;
}
//Validate payments >>
paymentISO20022Validate.CompanyBank(credPaymFormat);
var validateRes = paymentISO20022Validate.ValidateISO20022(company, rec, bankAccountCache);
if (validateRes.HasErrors)
{
foreach (CheckError error in validateRes.CheckErrors)
{
rec.ErrorInfo += rec.ErrorInfo == null?error.ToString() : Environment.NewLine + rec.ErrorInfo;
}
rec.MergePaymId = Uniconta.ClientTools.Localization.lookup("Excluded");
continue;
}
else
{
rec.ErrorInfo = BaseDocument.VALIDATE_OK;
}
//Validate payments <<
var creditor = (Uniconta.DataModel.Creditor)credCache.Get(rec.Account);
string creditorNumber = creditor._Account;
string paymGrpVal = string.Empty;
switch (credPaymFormat._PaymentGrouping)
{
case PaymentGroupingType.Date:
paymGrpVal = rec._PaymentDate.ToString("yyyyMMdd");
break;
case PaymentGroupingType.Week:
paymGrpVal = CultureInfo.CurrentCulture.Calendar.GetWeekOfYear(rec._PaymentDate, CalendarWeekRule.FirstFullWeek, DayOfWeek.Monday).ToString();
break;
case PaymentGroupingType.All:
break;
}
var mergePaymId = StringBuilderReuse.Create();
switch (rec._PaymentMethod)
{
case PaymentTypes.VendorBankAccount:
creditorAcc = bankSpecific.CreditorBBAN(rec._PaymentId, creditor._PaymentId, rec._SWIFT);
creditorOCRPaymentId = bankSpecific.CreditorRefNumber(rec._PaymentId);
creditorBIC = bankSpecific.CreditorBIC(rec._SWIFT);
if (creditorOCRPaymentId != string.Empty && creditorBIC != string.Empty)
{
mergePaymId.Append(creditorNumber).Append('-').Append(creditorAcc).Append('-').Append(creditorOCRPaymentId).Append('-').Append(creditorBIC).Append('-').Append(rec.CurrencyLocalStr).Append('-').Append(paymGrpVal);
}
else if (creditorOCRPaymentId != string.Empty)
{
mergePaymId.Append(creditorNumber).Append('-').Append(creditorAcc).Append('-').Append(creditorOCRPaymentId).Append('-').Append(rec.CurrencyLocalStr).Append('-').Append(paymGrpVal);
}
else if (creditorBIC != string.Empty)
{
mergePaymId.Append(creditorNumber).Append('-').Append(creditorAcc).Append('-').Append(creditorBIC).Append('-').Append(rec.CurrencyLocalStr).Append('-').Append(paymGrpVal);
}
else
{
mergePaymId.Append(creditorNumber).Append('-').Append(creditorAcc).Append('-').Append(rec.CurrencyLocalStr).Append('-').Append(paymGrpVal);
}
break;
case PaymentTypes.IBAN:
creditorAcc = bankSpecific.CreditorIBAN(rec._PaymentId, creditor._PaymentId, company._CountryId, creditor._Country);
creditorBIC = bankSpecific.CreditorBIC(rec._SWIFT);
creditorOCRPaymentId = bankSpecific.CreditorRefNumberIBAN(rec._PaymentId, company._CountryId, creditor._Country);
mergePaymId.Append(creditorNumber).Append('-').Append(creditorAcc).Append('-').Append(creditorBIC).Append('-').Append(rec.CurrencyLocalStr).Append('-').Append(paymGrpVal);
break;
case PaymentTypes.PaymentMethod3: //FIK71
var tuple71 = bankSpecific.CreditorFIK71(rec._PaymentId);
creditorOCRPaymentId = tuple71.Item1;
creditorOCRPaymentId = BaseDocument.FIK71 + "/" + creditorOCRPaymentId;
creditorAcc = tuple71.Item2;
mergePaymId.Append(creditorNumber).Append('-').Append(creditorOCRPaymentId).Append('-').Append(creditorAcc).Append('-').Append(rec.CurrencyLocalStr).Append('-').Append(paymGrpVal);
break;
case PaymentTypes.PaymentMethod5: //FIK75
var tuple75 = bankSpecific.CreditorFIK75(rec._PaymentId);
creditorOCRPaymentId = tuple75.Item1;
creditorOCRPaymentId = BaseDocument.FIK75 + "/" + creditorOCRPaymentId;
creditorAcc = tuple75.Item2;
mergePaymId.Append(creditorNumber).Append('-').Append(creditorOCRPaymentId).Append('-').Append(creditorAcc).Append('-').Append(rec.CurrencyLocalStr).Append('-').Append(paymGrpVal);
break;
case PaymentTypes.PaymentMethod4: //FIK73
creditorOCRPaymentId = BaseDocument.FIK73 + "/";
creditorAcc = bankSpecific.CreditorFIK73(rec._PaymentId);
mergePaymId.Append(creditorNumber).Append('-').Append(creditorOCRPaymentId).Append('-').Append(creditorAcc).Append('-').Append(rec.CurrencyLocalStr).Append('-').Append(paymGrpVal);
break;
case PaymentTypes.PaymentMethod6: //FIK04
var tuple04 = bankSpecific.CreditorFIK04(rec._PaymentId);
creditorOCRPaymentId = tuple04.Item1;
creditorOCRPaymentId = BaseDocument.FIK04 + "/" + creditorOCRPaymentId;
creditorAcc = tuple04.Item2;
mergePaymId.Append(creditorNumber).Append('-').Append(creditorOCRPaymentId).Append('-').Append(creditorAcc).Append('-').Append(rec.CurrencyLocalStr).Append('-').Append(paymGrpVal);
break;
}
if (mergePaymId.Length > 0 && mergePaymId[mergePaymId.Length - 1] == '-')
{
mergePaymId.Length--;
}
rec.MergePaymId = mergePaymId.ToStringAndRelease();
}
var noDuplicates = grid.Where(x => x.MergePaymId != Uniconta.ClientTools.Localization.lookup("Excluded")).GroupBy(s => s.MergePaymId).Where(grp => grp.Count() == 1).SelectMany(x => x);
foreach (var rec in noDuplicates)
{
if (rec.PaymentAmount <= 0)
{
rec.MergePaymId = Uniconta.ClientTools.Localization.lookup("Excluded");
rec.ErrorInfo = string.Concat(Uniconta.ClientTools.Localization.lookup("PaymentAmount"), "< 0");
}
else
{
rec.MergePaymId = MERGEID_SINGLEPAYMENT;
}
}
return(true);
}
catch (Exception ex)
{
UnicontaMessageBox.Show(ex, Uniconta.ClientTools.Localization.lookup("Exception"), System.Windows.MessageBoxButton.OK);
return(false);
}
}
/// <summary>
/// Generates a payment file in the XML format Credit Transfer ISO20022 pain003.
/// </summary>
/// <param name="Company">Uniconta company</param>
/// <param name="xxx">xxx.</param>
/// <returns>An XML payment file</returns>
public XMLDocumentGenerateResult GenerateISO20022(Company company, IEnumerable <CreditorTransPayment> queryPaymentTrans, SQLCache bankAccountCache, CreditorPaymentFormat credPaymFormat, int uniqueFileId, bool doMergePayment, bool schemaValidation = true)
{
CreditTransferDocument doc = new CreditTransferDocument();
BankSpecificSettings bankSpecific = BankSpecificSettings.BankSpecTypeInstance(credPaymFormat);
PaymentISO20022Validate paymentISO20022Validate = new PaymentISO20022Validate();
List <PreCheckError> preCheckErrors = new List <PreCheckError>();
List <CheckError> checkErrors = new List <CheckError>();
var credCache = company.GetCache(typeof(Uniconta.DataModel.Creditor));
bankSpecific.AllowedCharactersRegEx(false);
doc.ReplaceCharactersRegExDict = bankSpecific.ReplaceCharactersRegEx();
doc.CompanyBank = bankSpecific.CompanyBank();
doc.BatchBooking = bankSpecific.BatchBooking();
doc.AuthstnCodeTest = bankSpecific.TestMarked();
doc.AuthstnCodeFeedback = bankSpecific.AuthstnCodeFeedback();
var bankAccount = (BankStatement)bankAccountCache.Get(credPaymFormat._BankAccount);
doc.CreDtTm = bankSpecific.CreDtTim();
doc.NumberDecimalDigits = 2;
doc.IdentificationId = bankSpecific.IdentificationId(bankAccount._ContractId, company._Id); //Field Bank "Identifikation af aftalen"
doc.DebtorIdentificationCode = bankSpecific.DebtorIdentificationCode(bankAccount._BankCompanyId); //Field Bank "Kunde-Id"
doc.IdentificationCode = bankSpecific.IdentificationCode();
doc.CompanyName = bankSpecific.CompanyName(company.Name);
doc.CompanyBBAN = bankSpecific.CompanyBBAN(bankAccount._BankAccountPart1, bankAccount._BankAccountPart2);
doc.CompanyIBAN = bankSpecific.CompanyIBAN(bankAccount._IBAN);
doc.CompanyCcy = UnicontaCurrencyISO(company, bankAccount);
doc.CompanyBIC = bankSpecific.CompanyBIC(bankAccount._SWIFT);
doc.CompanyBankName = bankSpecific.CompanyBankName();
doc.CompanyCountryId = UnicontaCountryToISO(company._CountryId);
bankSpecific.CompanyCountryId = doc.CompanyCountryId;
doc.EncodingFormat = bankSpecific.EncodingFormat();
doc.XMLAttributeNS = bankSpecific.XMLAttributeNS();
doc.ChargeBearer = bankSpecific.ChargeBearerDebtor();
doc.CompanyID = company.CompanyId;
doc.NumberSeqPaymentFileId = uniqueFileId;
string companyAccountId = string.Empty;
string companyBIC = string.Empty;
if (doc.CompanyIBAN != string.Empty && doc.CompanyBIC != string.Empty)
{
companyAccountId = doc.CompanyIBAN;
companyBIC = doc.CompanyBIC;
doc.CompanyPaymentMethod = "IBAN";
}
else
{
companyAccountId = doc.CompanyBBAN;
doc.CompanyPaymentMethod = "BBAN";
}
doc.InitgPty = new InitgPty(doc.CompanyName, doc.IdentificationId, doc.IdentificationCode);
//Update ISO PaymentType >>
foreach (var rec in queryPaymentTrans)
{
var currency = rec.CurrencyLocalStr;
double amount = 0;
amount = rec.PaymentAmount;
var BICnumber = "";
var IBANnumber = "";
if (rec._PaymentMethod == PaymentTypes.IBAN)
{
IBANnumber = rec._PaymentId == null ? "" : rec._PaymentId;
IBANnumber = Regex.Replace(IBANnumber, "[^\\w\\d]", "");
BICnumber = rec._SWIFT == null ? "" : rec._SWIFT;
BICnumber = Regex.Replace(BICnumber, "[^\\w\\d]", "");
}
var creditor = (Creditor)credCache.Get(rec.Account);
rec.internationalPayment = bankSpecific.InternationalPayment(bankAccount._IBAN, IBANnumber, BICnumber, UnicontaCountryToISO(creditor._Country), doc.CompanyCountryId);
doc.ISOPaymentType = bankSpecific.ISOPaymentType(currency, bankAccount._IBAN, IBANnumber, BICnumber, UnicontaCountryToISO(creditor._Country), doc.CompanyCountryId);
rec.ISOPaymentType = doc.ISOPaymentType.ToString();
bankSpecific.paymentType = doc.ISOPaymentType;
}
//Update ISO PaymentType <<
IOrderedEnumerable <CreditorTransPayment> queryPaymentTransSorted;
if (doMergePayment)
{
queryPaymentTransSorted = from s in queryPaymentTrans orderby s._PaymentRefId select s;
}
else
{
queryPaymentTransSorted = from s in queryPaymentTrans orderby s._PaymentDate, s.ISOPaymentType, s._PaymentMethod, s.Currency select s;
}
paymentISO20022Validate.CompanyBank(credPaymFormat);
List <string> paymentInfoIdLst = new List <string>();
foreach (var rec in queryPaymentTransSorted)
{
bankSpecific.AllowedCharactersRegEx(rec.internationalPayment);
doc.HeaderNumberOfTrans++;
doc.PmtInfNumberOfTransActive = bankSpecific.PmtInfNumberOfTransActive();
doc.HeaderCtrlSum += bankSpecific.HeaderCtrlSum(rec.PaymentAmount);
doc.PmtInfCtrlSumActive = bankSpecific.PmtInfCtrlSumActive();
doc.RequestedExecutionDate = bankSpecific.RequestedExecutionDate(doc.CompanyIBAN, rec._PaymentDate);
string currency = rec.CurrencyLocalStr;
currency = string.IsNullOrEmpty(currency) ? doc.CompanyCcy : currency;
doc.EndToEndId = bankSpecific.EndtoendId(rec.PaymentEndToEndId);
if (doMergePayment && rec.MergePaymId != UnicontaClient.Pages.Creditor.Payments.StandardPaymentFunctions.MERGEID_SINGLEPAYMENT)
{
doc.PaymentInfoId = bankSpecific.PaymentInfoId(doc.NumberSeqPaymentFileId, doc.RequestedExecutionDate, rec._PaymentMethod, rec.Currency, true);
}
else
{
doc.PaymentInfoId = bankSpecific.PaymentInfoId(doc.NumberSeqPaymentFileId, doc.RequestedExecutionDate, rec._PaymentMethod, rec.Currency);
}
doc.PaymentMethod = BaseDocument.PAYMENTMETHOD_TRF;
PostalAddress debtorAddress = new PostalAddress();
debtorAddress = bankSpecific.DebtorAddress(company, debtorAddress);
string chargeBearer = bankSpecific.ChargeBearer(rec.ISOPaymentType);
var creditor = (Creditor)credCache.Get(rec.Account);
string credName = bankSpecific.CreditorName(creditor._Name);
var internalAdvText = UnicontaClient.Pages.Creditor.Payments.StandardPaymentFunctions.InternalMessage(credPaymFormat._OurMessage, rec, company, creditor);
string instructionId = bankSpecific.InstructionId(internalAdvText);
PostalAddress creditorAddress = new PostalAddress();
creditorAddress = bankSpecific.CreditorAddress(creditor, creditorAddress);
string credBankName = string.Empty;
string credBankCountryId = UnicontaCountryToISO(creditor._Country);
string creditorAcc = string.Empty;
string creditorBIC = string.Empty;
string creditorOCRPaymentId = string.Empty;
bool isPaymentTypeIBAN = false;
bool isOCRPayment = false;
switch (rec._PaymentMethod)
{
case PaymentTypes.VendorBankAccount:
creditorAcc = bankSpecific.CreditorBBAN(rec._PaymentId, creditor._PaymentId, rec._SWIFT);
creditorOCRPaymentId = bankSpecific.CreditorRefNumber(rec._PaymentId);
creditorBIC = bankSpecific.CreditorBIC(rec._SWIFT);
if (creditorBIC.Length > 6)
{
credBankCountryId = creditorBIC.Substring(4, 2);
}
break;
case PaymentTypes.IBAN:
isPaymentTypeIBAN = true;
creditorAcc = bankSpecific.CreditorIBAN(rec._PaymentId, creditor._PaymentId, company._CountryId, creditor._Country);
creditorBIC = bankSpecific.CreditorBIC(rec._SWIFT);
creditorOCRPaymentId = bankSpecific.CreditorRefNumberIBAN(rec._PaymentId, company._CountryId, creditor._Country);
credBankCountryId = creditorAcc.Substring(0, 2);
break;
case PaymentTypes.PaymentMethod3: //FIK71
var tuple71 = bankSpecific.CreditorFIK71(rec._PaymentId);
creditorOCRPaymentId = tuple71.Item1;
creditorOCRPaymentId = BaseDocument.FIK71 + "/" + creditorOCRPaymentId;
creditorAcc = tuple71.Item2;
break;
case PaymentTypes.PaymentMethod5: //FIK75
var tuple75 = bankSpecific.CreditorFIK75(rec._PaymentId);
creditorOCRPaymentId = tuple75.Item1;
creditorOCRPaymentId = BaseDocument.FIK75 + "/" + creditorOCRPaymentId;
creditorAcc = tuple75.Item2;
break;
case PaymentTypes.PaymentMethod4: //FIK73
creditorOCRPaymentId = BaseDocument.FIK73 + "/";
creditorAcc = bankSpecific.CreditorFIK73(rec._PaymentId);
break;
case PaymentTypes.PaymentMethod6: //FIK04
var tuple04 = bankSpecific.CreditorFIK04(rec._PaymentId);
creditorOCRPaymentId = tuple04.Item1;
creditorOCRPaymentId = BaseDocument.FIK04 + "/" + creditorOCRPaymentId;
creditorAcc = tuple04.Item2;
break;
}
double amount = 0;
amount = rec.PaymentAmount;
doc.ISOPaymentType = bankSpecific.ISOPaymentType(currency, bankAccount._IBAN, isPaymentTypeIBAN ? creditorAcc : string.Empty, creditorBIC, credBankCountryId, doc.CompanyCountryId);
doc.ExtServiceCode = bankSpecific.ExtServiceCode(doc.ISOPaymentType);
doc.ExternalLocalInstrument = bankSpecific.ExternalLocalInstrument(currency, doc.RequestedExecutionDate);
doc.InstructionPriority = bankSpecific.InstructionPriority();
doc.ExtCategoryPurpose = bankSpecific.ExtCategoryPurpose(doc.ISOPaymentType);
doc.ExtProprietaryCode = bankSpecific.ExtProprietaryCode();
doc.ExcludeSectionCdtrAgt = bankSpecific.ExcludeSectionCdtrAgt(doc.ISOPaymentType, creditorBIC);
isOCRPayment = string.IsNullOrEmpty(creditorOCRPaymentId) ? false : true;
var externalAdvText = UnicontaClient.Pages.Creditor.Payments.StandardPaymentFunctions.ExternalMessage(credPaymFormat._Message, rec, company, creditor);
string remittanceInfo = bankSpecific.RemittanceInfo(externalAdvText, doc.ISOPaymentType, rec._PaymentMethod);
List <string> unstructuredPaymInfoList = bankSpecific.Ustrd(externalAdvText, doc.ISOPaymentType, rec._PaymentMethod, credPaymFormat._ExtendedText);
if (!paymentInfoIdLst.Contains(doc.PaymentInfoId))
{
paymentInfoIdLst.Add(doc.PaymentInfoId);
doc.PmtInfList.Add(new PmtInf(doc,
new PmtTpInf(doc.ExtServiceCode, doc.ExternalLocalInstrument, doc.ExtCategoryPurpose, doc.InstructionPriority, doc.ExtProprietaryCode),
new Dbtr(doc.CompanyName, debtorAddress, doc.DebtorIdentificationCode),
new DbtrAcct(doc.CompanyCcy, companyAccountId, companyBIC),
new DbtrAgt(doc.CompanyBIC, doc.CompanyBankName), doc.ChargeBearer));
}
var cdtrAgtCountryId = bankSpecific.CdtrAgtCountryId(credBankCountryId);
doc.CdtTrfTxInfList.Add(new CdtTrfTxInf(doc.PaymentInfoId, instructionId, doc.EndToEndId, amount, currency,
new CdtrAgt(creditorBIC, credBankName, cdtrAgtCountryId, doc.ExcludeSectionCdtrAgt),
new Cdtr(credName, creditorAddress),
new CdtrAcct(creditorAcc, isPaymentTypeIBAN, isOCRPayment, doc.CompanyCountryId),
new RmtInf(unstructuredPaymInfoList, remittanceInfo, creditorOCRPaymentId, isOCRPayment), chargeBearer));
}
var generatedFileName = bankSpecific.GenerateFileName(doc.NumberSeqPaymentFileId, doc.CompanyID);
doc.Validate = schemaValidation;
XmlDocument creditTransferDoc = doc.CreateXmlDocument();
return(new XMLDocumentGenerateResult(creditTransferDoc, (preCheckErrors.Count > 0 || checkErrors.Count > 0), doc, checkErrors, generatedFileName));
}
