This commit is contained in:
@@ -5654,6 +5654,314 @@ namespace AyaNovaQBI
|
||||
|
||||
#endregion export to quickbooks
|
||||
|
||||
|
||||
|
||||
#region Workorder mismatch scanning
|
||||
|
||||
public enum MisMatchReason
|
||||
{
|
||||
NotLinkedToQB = 0,
|
||||
PriceDifferent = 1,
|
||||
NothingToInvoice = 2
|
||||
|
||||
}
|
||||
/// <summary>
|
||||
/// Mismatch properties
|
||||
/// A structure for storing mismatches identified
|
||||
///so user can resolve them.
|
||||
/// </summary>
|
||||
public class MisMatch
|
||||
{
|
||||
//public Guid WorkorderID;
|
||||
public long ObjectId { get; set; }
|
||||
public AyaType ObjectType { get; set; }
|
||||
public string Name { get; set; }
|
||||
public MisMatchReason mReason { get; set; }
|
||||
public decimal AyaPrice { get; set; }
|
||||
public decimal QBPrice { get; set; }
|
||||
public long WorkorderItemPartId { get; set; }
|
||||
public string QBListID { get; set; }
|
||||
|
||||
}
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Given a workorder ID
|
||||
/// scans the objects in the workorder
|
||||
/// that need to be linked to QB for invoicing
|
||||
/// and on any error found adds them to the
|
||||
/// mismatched object array list
|
||||
/// </summary>
|
||||
/// <param name="WorkorderID">Id of workorder being scanned</param>
|
||||
/// <param name="MisMatches">An list of mismatch objects</param>
|
||||
/// <param name="PriceOverrides">An list of id values of workorderitemparts that have been set by
|
||||
/// user to forcibly use the price set on the workorderitem part even though
|
||||
/// it differs from the quickbooks price</param>
|
||||
/// <returns>True if all links ok, false if there are any mismatches at all</returns>
|
||||
public static bool ScanLinksOK(long WorkorderID, List<MisMatch> MisMatches, List<long> PriceOverrides)
|
||||
{
|
||||
bool bReturn = true;
|
||||
bool bSomethingToInvoice = false;
|
||||
|
||||
|
||||
Workorder w = Workorder.GetItem(WorkorderID);
|
||||
|
||||
//Client ok?
|
||||
if (!QBIntegration.Items.Any(z=>z.AType==AyaType.Customer && z.ObjectId==w.CustomerId))
|
||||
{
|
||||
bReturn = false;
|
||||
AddMisMatch(AyaClientList[w.ClientID].Name, w.ClientID, AyaType.Customer, MisMatchReason.NotLinkedToQB, MisMatches);
|
||||
}
|
||||
|
||||
//Service rates:
|
||||
foreach (WorkorderItem wi in w.WorkorderItems)
|
||||
{
|
||||
#region Labor
|
||||
foreach (WorkorderItemLabor wl in wi.Labors)
|
||||
{
|
||||
|
||||
//If there's *any* labor then there is something to invoice
|
||||
bSomethingToInvoice = true;
|
||||
|
||||
//Check that rate isn't actually guid.empty
|
||||
//it's possible that some users have not selected a rate on the workorder
|
||||
if (wl.ServiceRateID == Guid.Empty)
|
||||
throw new System.ApplicationException("ERROR: Workorder " + w.WorkorderService.ServiceNumber.ToString() + " has a labor item with no rate selected\r\n" +
|
||||
"This is a serious problem for QBI and needs to be rectified before QBI can be used.\r\n");
|
||||
|
||||
if (!QBI.Maps.Contains(wl.ServiceRateID))
|
||||
{
|
||||
bReturn = false;
|
||||
AddMisMatch(AyaRateList[wl.ServiceRateID].Name, wl.ServiceRateID, RootObjectTypes.Rate, MisMatchReason.NotLinkedToQB, MisMatches);
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
#endregion
|
||||
|
||||
#region Travel
|
||||
foreach (WorkorderItemTravel wt in wi.Travels)
|
||||
{
|
||||
//If there's *any* travel then there is something to invoice
|
||||
bSomethingToInvoice = true;
|
||||
|
||||
//Check that rate isn't actually guid.empty
|
||||
//it's possible that some users have not selected a rate on the workorder
|
||||
if (wt.TravelRateID == Guid.Empty)
|
||||
throw new System.ApplicationException("ERROR: Workorder " + w.WorkorderService.ServiceNumber.ToString() + " has a travel item with no rate selected\r\n" +
|
||||
"This is a serious problem for QBI and needs to be rectified before QBI can be used.\r\n");
|
||||
|
||||
if (!QBI.Maps.Contains(wt.TravelRateID))
|
||||
{
|
||||
bReturn = false;
|
||||
AddMisMatch(AyaRateList[wt.TravelRateID].Name, wt.TravelRateID, RootObjectTypes.Rate, MisMatchReason.NotLinkedToQB, MisMatches);
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
#endregion
|
||||
|
||||
#region Parts
|
||||
foreach (WorkorderItemPart wp in wi.Parts)
|
||||
{
|
||||
//If there's *any* parts then there is something to invoice
|
||||
bSomethingToInvoice = true;
|
||||
|
||||
//Changed: 14-Nov-2006 to check that linked item id exists in qb
|
||||
if (!QBI.Maps.Contains(wp.PartID) || QBItems.Rows.Find(QBI.Maps[wp.PartID].ForeignID) == null)
|
||||
{
|
||||
bReturn = false;
|
||||
//Changed: 21-June-2006 to use display formatted name
|
||||
AddMisMatch(AyaPartList[wp.PartID].DisplayName(Util.GlobalSettings.DefaultPartDisplayFormat), wp.PartID, RootObjectTypes.Part, MisMatchReason.NotLinkedToQB, MisMatches);
|
||||
|
||||
}
|
||||
else
|
||||
{
|
||||
//check the price
|
||||
if (!PriceOverrides.Contains(wp.ID))
|
||||
{
|
||||
|
||||
decimal qbPrice = (decimal)QBItems.Rows.Find(QBI.Maps[wp.PartID].ForeignID)["Price"];
|
||||
|
||||
//------------DISCOUNT-----------------
|
||||
string disco = "";
|
||||
//Added:20-July-2006 to incorporate discounts on parts into qb invoice
|
||||
decimal charge;
|
||||
|
||||
//Changed: 18-Nov-2006 CASE 158
|
||||
//this is all wrong, it was multiplying price by quantity to calculate charge when it shouldn't
|
||||
//removed quanty * price in next line to just price
|
||||
charge = decimal.Round(wp.Price, 2, MidpointRounding.AwayFromZero);
|
||||
charge = charge - (decimal.Round(charge * wp.Discount, 2, MidpointRounding.AwayFromZero));
|
||||
if (wp.Discount != 0)
|
||||
{
|
||||
disco = " (Price " + wp.Price.ToString("c") + " discounted on workorder " + wp.Discount.ToString("p") + ") \r\n";
|
||||
}
|
||||
|
||||
//-----------------------------
|
||||
|
||||
//It's a match, let's see if the price matches as well
|
||||
if (charge != qbPrice)
|
||||
{
|
||||
bReturn = false;
|
||||
AddMisMatch("WO: " + w.WorkorderService.ServiceNumber.ToString() + disco + " Part: " + AyaPartList[wp.PartID].DisplayName(Util.GlobalSettings.DefaultPartDisplayFormat),//Changed: 21-June-2006 to use display formatted name
|
||||
wp.PartID, RootObjectTypes.Part, MisMatchReason.PriceDifferent, MisMatches, qbPrice, charge, wp.ID,
|
||||
QBI.Maps[wp.PartID].ForeignID);
|
||||
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
#endregion
|
||||
|
||||
#region Outside service charges
|
||||
|
||||
if (wi.HasOutsideService)
|
||||
{
|
||||
if (wi.OutsideService.RepairPrice != 0 || wi.OutsideService.ShippingPrice != 0)
|
||||
{
|
||||
bSomethingToInvoice = true;
|
||||
//there is something billable, just need to make sure
|
||||
//that there is a QB charge defined for outside service
|
||||
if (QDat.OutsideServiceChargeAs == null ||
|
||||
QDat.OutsideServiceChargeAs == "" ||
|
||||
!QBItems.Rows.Contains(QDat.OutsideServiceChargeAs))
|
||||
{
|
||||
bReturn = false;
|
||||
AddMisMatch("Outside service", Guid.Empty, RootObjectTypes.WorkorderItemOutsideService, MisMatchReason.NotLinkedToQB, MisMatches);
|
||||
|
||||
}
|
||||
}
|
||||
}
|
||||
#endregion
|
||||
|
||||
#region Workorder item loan charges
|
||||
|
||||
if (wi.HasLoans)
|
||||
{
|
||||
foreach (WorkorderItemLoan wil in wi.Loans)
|
||||
{
|
||||
|
||||
if (wil.Charges != 0)
|
||||
{
|
||||
//case 772
|
||||
bSomethingToInvoice = true;
|
||||
|
||||
//there is something billable, just need to make sure
|
||||
//that there is a QB charge defined for loaned item charges
|
||||
if (QDat.WorkorderItemLoanChargeAs == null ||
|
||||
QDat.WorkorderItemLoanChargeAs == "" ||
|
||||
!QBItems.Rows.Contains(QDat.WorkorderItemLoanChargeAs))
|
||||
{
|
||||
bReturn = false;
|
||||
AddMisMatch("Workorder item loan", Guid.Empty, RootObjectTypes.WorkorderItemLoan, MisMatchReason.NotLinkedToQB, MisMatches);
|
||||
break;
|
||||
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
#endregion
|
||||
|
||||
#region Workorder item misc expenses
|
||||
|
||||
if (wi.HasExpenses)
|
||||
{
|
||||
foreach (WorkorderItemMiscExpense wie in wi.Expenses)
|
||||
{
|
||||
|
||||
|
||||
if (wie.ChargeToClient)
|
||||
{
|
||||
bSomethingToInvoice = true;
|
||||
//there is something billable, just need to make sure
|
||||
//that there is a QB charge defined for misc expense item charges
|
||||
if (QDat.MiscExpenseChargeAs == null ||
|
||||
QDat.MiscExpenseChargeAs == "" ||
|
||||
!QBItems.Rows.Contains(QDat.MiscExpenseChargeAs))
|
||||
{
|
||||
bReturn = false;
|
||||
AddMisMatch("Workorder item expense", Guid.Empty, RootObjectTypes.WorkorderItemMiscExpense, MisMatchReason.NotLinkedToQB, MisMatches);
|
||||
break;
|
||||
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
#endregion
|
||||
|
||||
|
||||
}//workorder items loop
|
||||
|
||||
//If there are no mismatches so far,
|
||||
//maybe it's because it's got nothing to invoice?
|
||||
if (bReturn && !bSomethingToInvoice)
|
||||
{
|
||||
bReturn = false;
|
||||
AddMisMatch("WO: " + w.WorkorderService.ServiceNumber.ToString() + " - Nothing chargeable on it, will not be invoiced",
|
||||
Guid.Empty, RootObjectTypes.Nothing, MisMatchReason.NothingToInvoice, MisMatches);
|
||||
|
||||
}
|
||||
|
||||
return bReturn;
|
||||
|
||||
|
||||
}
|
||||
|
||||
|
||||
|
||||
private static void AddMisMatch(string Name, Guid RootObjectID, RootObjectTypes RootObjectType, MisMatchReason Reason, ArrayList Mismatches)
|
||||
{
|
||||
AddMisMatch(Name, RootObjectID, RootObjectType, Reason, Mismatches, 0m, 0m, Guid.Empty, "");
|
||||
}
|
||||
|
||||
private static void AddMisMatch(string Name, Guid RootObjectID, RootObjectTypes RootObjectType,
|
||||
MisMatchReason Reason, ArrayList Mismatches, decimal QBPrice, decimal AyaPrice, Guid WorkorderItemPartID, string QBListID)
|
||||
{
|
||||
bool bDuplicate = false;
|
||||
//scan through list of existing mismatches,
|
||||
//only add a not linked item if it's
|
||||
//not there already
|
||||
//other types of mismatches need to be added because
|
||||
//they need to be resolved on a case by case basis or are unresolvable
|
||||
if (Reason == MisMatchReason.NotLinkedToQB)
|
||||
{
|
||||
|
||||
foreach (object o in Mismatches)
|
||||
{
|
||||
MisMatch m = (MisMatch)o;
|
||||
//Have to check ID and type here because for outside service
|
||||
//and loans and misc expenses the id is always empty so type is
|
||||
//the only way to differentiate
|
||||
if (m.RootObjectID == RootObjectID && m.ObjectType == RootObjectType)
|
||||
{
|
||||
bDuplicate = true;
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if (!bDuplicate)
|
||||
{
|
||||
MisMatch m = new MisMatch();
|
||||
m.mName = Name;
|
||||
m.mRootObjectID = RootObjectID;
|
||||
m.mObjectType = RootObjectType;
|
||||
m.mReason = Reason;
|
||||
m.mAyaPrice = AyaPrice;
|
||||
m.mQBPrice = QBPrice;
|
||||
m.mWorkorderItemPartID = WorkorderItemPartID;
|
||||
m.mQBListID = QBListID;
|
||||
Mismatches.Add(m);
|
||||
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
#endregion wo_mismatch_scan
|
||||
|
||||
|
||||
#endregion qbi stuff (anything not api)
|
||||
|
||||
#region general utils
|
||||
|
||||
Reference in New Issue
Block a user