/**
* Complete Document
* @return new status (Complete, In Progress, Invalid, Waiting ..)
*/
public String CompleteIt()
{
// Re-Check
if (!_justPrepared)
{
String status = PrepareIt();
if (!DocActionVariables.STATUS_INPROGRESS.Equals(status))
{
return(status);
}
}
// Implicit Approval
if (!IsApproved())
{
ApproveIt();
}
//
log.Info(ToString());
// Allocation Header
MAllocationHdr alloc = new MAllocationHdr(GetCtx(), false,
GetDateAcct(), GetC_Currency_ID(),
Msg.Translate(GetCtx(), "C_Cash_ID") + ": " + GetName(), Get_TrxName());
alloc.SetAD_Org_ID(GetAD_Org_ID());
if (!alloc.Save())
{
_processMsg = "Could not create Allocation Hdr";
return(DocActionVariables.STATUS_INVALID);
}
//
MCashLine[] lines = GetLines(false);
for (int i = 0; i < lines.Length; i++)
{
MCashLine line = lines[i];
if (Util.GetValueOfInt(line.GetC_InvoicePaySchedule_ID()) != 0)
{
MInvoicePaySchedule paySch = new MInvoicePaySchedule(GetCtx(), Util.GetValueOfInt(line.GetC_InvoicePaySchedule_ID()), Get_TrxName());
paySch.SetC_CashLine_ID(line.GetC_CashLine_ID());
paySch.Save();
}
else
{
int[] InvoicePaySchedule_ID = MInvoicePaySchedule.GetAllIDs("C_InvoicePaySchedule", "C_Invoice_ID = " + line.GetC_Invoice_ID() + @" AND C_InvoicePaySchedule_ID NOT IN
(SELECT NVL(C_InvoicePaySchedule_ID,0) FROM C_InvoicePaySchedule WHERE C_Payment_ID IN (SELECT NVL(C_Payment_ID,0) FROM C_InvoicePaySchedule) UNION
SELECT NVL(C_InvoicePaySchedule_ID,0) FROM C_InvoicePaySchedule WHERE C_Cashline_ID IN (SELECT NVL(C_Cashline_ID,0) FROM C_InvoicePaySchedule))", Get_TrxName());
foreach (int invocePay in InvoicePaySchedule_ID)
{
MInvoicePaySchedule paySch = new MInvoicePaySchedule(GetCtx(), invocePay, Get_TrxName());
paySch.SetC_CashLine_ID(line.GetC_CashLine_ID());
paySch.Save();
}
}
if (MCashLine.CASHTYPE_Invoice.Equals(line.GetCashType()))
{
bool differentCurrency = GetC_Currency_ID() != line.GetC_Currency_ID();
MAllocationHdr hdr = alloc;
if (differentCurrency)
{
hdr = new MAllocationHdr(GetCtx(), false,
GetDateAcct(), line.GetC_Currency_ID(),
Msg.Translate(GetCtx(), "C_Cash_ID") + ": " + GetName(), Get_TrxName());
hdr.SetAD_Org_ID(GetAD_Org_ID());
if (!hdr.Save())
{
_processMsg = "Could not create Allocation Hdr";
return(DocActionVariables.STATUS_INVALID);
}
}
// Allocation Line
MAllocationLine aLine = new MAllocationLine(hdr, line.GetAmount(),
line.GetDiscountAmt(), line.GetWriteOffAmt(), line.GetOverUnderAmt());
aLine.SetC_Invoice_ID(line.GetC_Invoice_ID());
aLine.SetC_CashLine_ID(line.GetC_CashLine_ID());
if (!aLine.Save())
{
_processMsg = "Could not create Allocation Line";
return(DocActionVariables.STATUS_INVALID);
}
if (differentCurrency)
{
// Should start WF
hdr.ProcessIt(DocActionVariables.ACTION_COMPLETE);
hdr.Save();
}
}
else if (MCashLine.CASHTYPE_BankAccountTransfer.Equals(line.GetCashType()))
{
// Payment just as intermediate info
MPayment pay = new MPayment(GetCtx(), 0, Get_TrxName());
pay.SetAD_Org_ID(GetAD_Org_ID());
String documentNo = GetName();
pay.SetDocumentNo(documentNo);
pay.SetR_PnRef(documentNo);
pay.Set_Value("TrxType", "X"); // Transfer
pay.Set_Value("TenderType", "X");
//
pay.SetC_BankAccount_ID(line.GetC_BankAccount_ID());
pay.SetC_DocType_ID(true); // Receipt
pay.SetDateTrx(GetStatementDate());
pay.SetDateAcct(GetDateAcct());
pay.SetAmount(line.GetC_Currency_ID(), Decimal.Negate(line.GetAmount())); // Transfer
pay.SetDescription(line.GetDescription());
pay.SetDocStatus(MPayment.DOCSTATUS_Closed);
pay.SetDocAction(MPayment.DOCACTION_None);
pay.SetPosted(true);
pay.SetIsAllocated(true); // Has No Allocation!
pay.SetProcessed(true);
if (!pay.Save())
{
_processMsg = "Could not create Payment";
return(DocActionVariables.STATUS_INVALID);
}
}
// Added to Update Open Balance of Business Partner
else if (MCashLine.CASHTYPE_BusinessPartner.Equals(line.GetCashType()))
{
if (line.GetC_BPartner_ID() != 0)
{
Decimal? UpdatedBal = 0;
MBPartner bp = new MBPartner(GetCtx(), line.GetC_BPartner_ID(), Get_TrxName());
Decimal?cashAmt = VAdvantage.Model.MConversionRate.ConvertBase(GetCtx(), Decimal.Add(Decimal.Add(line.GetAmount(), line.GetDiscountAmt()), line.GetWriteOffAmt()),
GetC_Currency_ID(), GetDateAcct(), 0, GetAD_Client_ID(), GetAD_Org_ID());
if (cashAmt > 0)
{
UpdatedBal = Decimal.Subtract((Decimal)bp.GetTotalOpenBalance(), (Decimal)cashAmt);
Decimal?newCreditAmt = bp.GetSO_CreditUsed();
if (newCreditAmt == null)
{
newCreditAmt = Decimal.Negate((Decimal)cashAmt);
}
else
{
newCreditAmt = Decimal.Subtract((Decimal)newCreditAmt, (Decimal)cashAmt);
}
//
log.Fine("TotalOpenBalance=" + bp.GetTotalOpenBalance(false) + "(" + cashAmt
+ ", Credit=" + bp.GetSO_CreditUsed() + "->" + newCreditAmt
+ ", Balance=" + bp.GetTotalOpenBalance(false) + " -> " + UpdatedBal);
bp.SetSO_CreditUsed((Decimal)newCreditAmt);
}
else
{
UpdatedBal = Decimal.Subtract((Decimal)bp.GetTotalOpenBalance(), (Decimal)cashAmt);
log.Fine("Payment Amount =" + line.GetAmount() + "(" + cashAmt
+ ") Balance=" + bp.GetTotalOpenBalance(false) + " -> " + UpdatedBal);
}
bp.SetTotalOpenBalance(Convert.ToDecimal(UpdatedBal));
bp.SetSOCreditStatus();
if (!bp.Save(Get_TrxName()))
{
_processMsg = "Could not update Business Partner";
return(DocActionVariables.STATUS_INVALID);
}
}
}
}
// Should start WF
alloc.ProcessIt(DocActionVariables.ACTION_COMPLETE);
alloc.Save();
// User Validation
String valid = ModelValidationEngine.Get().FireDocValidate(this, ModalValidatorVariables.DOCTIMING_AFTER_COMPLETE);
if (valid != null)
{
_processMsg = valid;
return(DocActionVariables.STATUS_INVALID);
}
//
SetProcessed(true);
SetDocAction(DOCACTION_Close);
if (!UpdateCompletedBalance())
{
_processMsg = "Could not update Header";
return(VAdvantage.Process.DocActionVariables.STATUS_INVALID);
}
return(VAdvantage.Process.DocActionVariables.STATUS_COMPLETED);
}