public void LoadPalletLocation(int palletId,int shlefId=0)
{
_pl = new BLL.PalletLocation();
_pl.loadByPalletID(palletId);
txtPalletLocation.Text = _pl.FullName;
lblStorageType.Text = _pl.FullName;
_rpl = new BLL.ReceivePallet();
gridMovement.DataSource = _rpl.GetPalletLocationReadyForMovement( palletId );
_itm = new BLL.Item();
_itm.LoadByPrimaryKey(Convert.ToInt32(_rpl.GetColumn("ItemID")));
txtItemName.Text = _itm.FullItemName;
lblItemName.Text = _itm.FullItemName;
lkFreePalletLocations.Properties.DataSource = BLL.PalletLocation.GetAllFreeFor(_itm.ID, shlefId);
}
private void SetPriceAndQuantity(DataRow dr, decimal dispatch, int buinsku, ReceivePallet rp, int itemId, bool isDeliveryNote)
{
dr["DeliveryNote"] = isDeliveryNote;
dr["BoxLevel"] = 0;
dr["QtyPerPack"] = buinsku;
dr["Pack"] = dispatch / buinsku;
decimal packs = dispatch / buinsku;
dr["QtyInBU"] = dispatch;
dr["approvedQuantity"] = dispatch;
if (isDeliveryNote)// (!Settings.UsesMovingAverage) //We are taking care of this at the receive page. Therefore, the selling price would have been set when entering here so for now, I'm disabling this condition
{
dr["CalculatedCost"] = 0;
dr["UnitPrice"] = 0;
}
else
{
// Apply the cost and selling price from the cost tier.
if (BLL.Settings.UseCostTier)
{
HCMIS.Specification.Finance.CostTier.ILedger ledgerService = new LedgerService();
var ledgerObject = ledgerService.GetLedger(Convert.ToInt32(dr["ItemID"]),
Convert.ToInt32(dr["UnitID"]),
Convert.ToInt32(dr["ManufacturerID"]),
MovingAverageGroup.Convert(Convert.ToInt32(dr["StoreID"]))
);
if (BLL.Settings.IsCenter)
{
dr["CalculatedCost"] =
Math.Round(Convert.ToDouble(ledgerObject.UnitCost)*Convert.ToDouble(packs),
BLL.Settings.NoOfDigitsAfterTheDecimalPoint, MidpointRounding.AwayFromZero);
dr["UnitPrice"] = Math.Round(ledgerObject.UnitCost,
BLL.Settings.NoOfDigitsAfterTheDecimalPoint,
MidpointRounding.AwayFromZero);
}
else
{
dr["CalculatedCost"] =
Math.Round(Convert.ToDouble(ledgerObject.SellingPrice) * Convert.ToDouble(packs),
BLL.Settings.NoOfDigitsAfterTheDecimalPoint, MidpointRounding.AwayFromZero);
dr["UnitPrice"] = Math.Round(ledgerObject.SellingPrice,
BLL.Settings.NoOfDigitsAfterTheDecimalPoint,
MidpointRounding.AwayFromZero);
}
}
else
{
try
{
//
if (BLL.Settings.IsCenter)
{
//TOFIXXX when selling price is null, it shouldn't be coming here
dr["CalculatedCost"] = Convert.ToDouble(packs) * Math.Round(Convert.ToDouble(rp.GetColumn("Cost")), BLL.Settings.NoOfDigitsAfterTheDecimalPoint, MidpointRounding.AwayFromZero);
double sPrice = Math.Round(Convert.ToDouble(rp.GetColumn("Cost")), BLL.Settings.NoOfDigitsAfterTheDecimalPoint, MidpointRounding.AwayFromZero);
dr["UnitPrice"] = sPrice;
}
else
{
//TOFIXXX when selling price is null, it shouldn't be coming here
dr["CalculatedCost"] = Convert.ToDouble(packs) * Math.Round(Convert.ToDouble(rp.GetColumn("SellingPrice")), BLL.Settings.NoOfDigitsAfterTheDecimalPoint, MidpointRounding.AwayFromZero);
double sPrice = Math.Round(Convert.ToDouble(rp.GetColumn("SellingPrice")), BLL.Settings.NoOfDigitsAfterTheDecimalPoint, MidpointRounding.AwayFromZero);
dr["UnitPrice"] = sPrice;
}
}
catch
{
BLL.Item itm = new Item();
itm.LoadByPrimaryKey(itemId);
//throw new Exception(string.Format("Selling price not set for {0}", itm.FullItemName));
}
}
}
dr["UnitsInSKU"] = buinsku;
}
/// <summary>
/// Loads the pick list from the pick face location
/// this is only called if a pick face location is set for the item
/// </summary>
/// <param name="itemId">The item id.</param>
/// <param name="unitID">The unit ID.</param>
/// <param name="innitallyApprovedQuantity">The innitally approved quantity.</param>
/// <param name="fromstore">The fromstore.</param>
/// <param name="isDeliveryNote">if set to <c>true</c> [is delivery note].</param>
private void LoadFromPickFace(int itemId, int? unitID, decimal innitallyApprovedQuantity, int fromstore, bool isDeliveryNote)
{
decimal approvedQuantity = innitallyApprovedQuantity;
var pf = new PickFace();
pf.LoadPickFaceFor(itemId, fromstore);
if (pf.RowCount > 0)
{
var rp = new ReceivePallet();
rp.LoadPickFaceAllItemsReadyToDispatch(itemId, unitID, fromstore);
var im = new ItemManufacturer();
var imff = new ItemManufacturer();
if (pf.IsColumnNull("Balance"))
{
pf.Balance = 0;
pf.Save();
}
if (pf.Balance >= approvedQuantity)
{
while (!rp.EOF)
{
int manufId = Convert.ToInt32(rp.GetColumn("ManufacturerID"));
im.LoadIMbyLevel(itemId, manufId, Convert.ToInt32(rp.GetColumn("BoxLevel")));
int boxLevel = im.PackageLevel;
int buinsku = Convert.ToInt32(rp.GetColumn("QtyPerPack"));//imff.LoadSKUUnit(itemId, manufId);
while (boxLevel >= 0 && approvedQuantity > 0)
{
long dispatchQuantity = Convert.ToInt32(rp.GetColumn("DispatchableStock"));
int bUsinBoxLevel = im.QuantityInBasicUnit;
decimal dispatch = (approvedQuantity / bUsinBoxLevel) * bUsinBoxLevel;
if (dispatch > dispatchQuantity)
{
dispatch = dispatchQuantity;
}
while (dispatch / bUsinBoxLevel < 1 && im.PackageLevel > 0)
{
im.LoadIMbyLevel(im.ItemID, im.ManufacturerID, im.PackageLevel - 1);
bUsinBoxLevel = im.QuantityInBasicUnit;
}
if (dispatch > 0)
{
_pickList.ImportRow(rp.CurrentDataRow);
// pick the currently inserted entry and adjust all the numbers in it.
DataRow dr = _pickList.Rows[_pickList.Rows.Count - 1];
// only Adjust the entries that matter to the pick list
SetPriceAndQuantity(dr, dispatch, buinsku, rp, itemId, isDeliveryNote);
approvedQuantity -= dispatch;
}
boxLevel--;
im.LoadIMbyLevel(itemId, manufId, boxLevel);
}
rp.MoveNext();
}
}
}
}
/// <summary>
/// Adds to pick list for an order detail.
/// </summary>
/// <param name="orderDetailID">The order detail ID.</param>
/// <param name="itemId">The item id.</param>
/// <param name="unitID">The unit ID.</param>
/// <param name="initalApprovedQuantity">The inital approved quantity.</param>
/// <param name="storeID">The store ID.</param>
/// <param name="preferedManufacturer">The prefered manufacturer.</param>
/// <param name="preferredPhysicalStore">The preferred physical store.</param>
/// <param name="isDeliveryNote">if set to <c>true</c> [is delivery note].</param>
/// <param name="preferredExpiry">The preferred expiry.</param>
/// <exception cref="System.Exception"></exception>
private void AddToPickListFor(int userID, int orderDetailID, int itemId, int? unitID, decimal initalApprovedQuantity, int storeID, int preferedManufacturer, int preferredPhysicalStore, bool isDeliveryNote, DateTime? preferredExpiry)
{
bool deliveryNoteWarning = false;
if (isDeliveryNote && !BLL.Settings.HandleDeliveryNotes)
{
//If the request is for delivery notes but the delivery notes haven't been enabled, then let's change the delivery note bit but also set a warning bit so that we can report it to the user if there are no priced items available. (i.e. In case the picklist comes out empty, we report an error)
deliveryNoteWarning = true;
isDeliveryNote = false;
}
decimal approvedQuantity = initalApprovedQuantity;
bool belowBoxPickedFromRack = false;
//if (preferedManufacturer == -1)
//{
var rp = new ReceivePallet();
var palletLoc = new PalletLocation();
var im = new ItemManufacturer();
var pf = new PickFace();
int buinsku = 0;
// no manufacturer is preferred so just do the pick list
// select items that have balance, with sales price and that do have
rp.LoadNonPickFaceAllItemsReadyToDispatch(userID, itemId, unitID, storeID, preferedManufacturer,
preferredPhysicalStore, isDeliveryNote, preferredExpiry);
//If the delivery note warning bit has been set and there are no priced items in the databasee,
//let's throw an error to the users so that they know the cause of the problem.
//The solution is to either not choose delivery notes or on the approval stage or enable delivery notes in the settings.
if (rp.RowCount == 0 && deliveryNoteWarning)
{
throw new Exception("Delivery Notes Preference has been set but delivery notes are not enabled for this database.");
}
// get how much of it is on the pick face
//TOFIX: this doesn't have to rely on the quantity on the pick face
pf.LoadPickFaceFor(itemId, storeID);
// Just to be safe
rp.Rewind();
if (rp.RowCount == 0)
{
// this means there is no item to issue other than on the pick face
// try issuing from the pick face
LoadFromPickFace(itemId, unitID, approvedQuantity, storeID, isDeliveryNote);
return;
}
while (!rp.EOF)
{
// get the current manufacturer
int manufId = Convert.ToInt32(rp.GetColumn("ManufacturerID"));
// what is the dispatch able quantity in the current record?
decimal dispatchableQuantity = Convert.ToDecimal(rp.GetColumn("DispatchableStock"));
palletLoc.loadByPalletID(rp.PalletID);
// check if the item is from the rack or the low quantity storage place.
// if it is from the rack, make sure the packs column counts in cartons
// if it is not, count in number of packs/SKU or Level 0 only
if (palletLoc.RowCount > 0 && palletLoc.StorageTypeID.ToString() == StorageType.StackedStorage)
{
im.LoadIMbyLevel(itemId, manufId, 0);
}
else if ((palletLoc.RowCount > 0 && palletLoc.StorageTypeID.ToString() != StorageType.BulkStore) ||
(pf.RowCount == 0 && palletLoc.StorageTypeID.ToString() == StorageType.BulkStore))
{
im.LoadIMbyLevel(itemId, manufId, 0);
}
else
{
im.LoadIMbyLevel(itemId, manufId, Convert.ToInt32(rp.GetColumn("BoxLevel")));
}
// just incase there are open cartons on the rack, handle them here.
if (im.RowCount > 0 && (im.QuantityInBasicUnit > dispatchableQuantity && im.PackageLevel > 0))
{
im.LoadIMbyLevel(itemId, manufId, 0);
}
// hold what level we are about to issue,
// which level of carton and the basic unit in that carton.
int bUsinBoxLevel;
buinsku = Convert.ToInt32(rp.GetColumn("QtyPerPack"));// imff.LoadSKUUnit(im.ItemID, im.ManufacturerID);
if (unitID != null)
{
ItemUnit iu = new ItemUnit();
iu.LoadByPrimaryKey(unitID.Value);
bUsinBoxLevel = iu.QtyPerUnit;
if (buinsku != bUsinBoxLevel)
{
// This defintely is an error,
//TODO: do something about it ;)
buinsku = bUsinBoxLevel;
}
}
else
{
bUsinBoxLevel = im.QuantityInBasicUnit;
}
// get the maximum amount of item that can be fulfilled under the current box level
decimal dispatch = (approvedQuantity / bUsinBoxLevel) * bUsinBoxLevel;
if (dispatch > dispatchableQuantity)
{
// if the dispatch able quantity is less than what is requested,
// only give what we have.
dispatch = dispatchableQuantity;
}
else if (dispatch == 0)
{
break;
}
if (dispatchableQuantity > approvedQuantity)
{
// check if the dispatch is possible with existing pick face items
decimal remaining = approvedQuantity - dispatch;
// TODO: Explain WTF all this condition is
// I assume at this point that it is checking if the remaining amount should be fulfilled from the pick face or not
//
if (((pf.RowCount == 0 || pf.IsColumnNull("Balance")) && remaining == 0) ||
((pf.RowCount > 0 && !pf.IsColumnNull("Balance") && pf.Balance >= remaining)))
{
// do this if we should go to the pick face for any reason.
if (dispatch > 0)
{
// do the pick list entries here
_pickList.ImportRow(rp.CurrentDataRow);
// pick the currently inserted entry and adjust all the numbers in it.
DataRow dr = _pickList.Rows[_pickList.Rows.Count - 1];
dr["OrderDetailID"] = orderDetailID;
// only Adjust the entries that matter to the pick list
SetPriceAndQuantity(dr, dispatch, buinsku, rp, itemId, isDeliveryNote);
approvedQuantity -= dispatch;
// add the items from the pick face
}
//TODO: implement the pick face logic here.
LoadFromPickFace(itemId, unitID, approvedQuantity, storeID, isDeliveryNote);
return;
}
else
{
// do the bulk pick list and entries here
if (dispatch > 0)
{
_pickList.ImportRow(rp.CurrentDataRow);
// pick the currently inserted entry and adjust all the numbers in it.
DataRow dr = _pickList.Rows[_pickList.Rows.Count - 1];
dr["OrderDetailID"] = orderDetailID;
// only Adjust the entries that matter to the pick list
SetPriceAndQuantity(dr, dispatch, buinsku, rp, itemId, isDeliveryNote);
approvedQuantity -= dispatch;
// the order couldn't be done at this time because the pickface has to be reprenished,
// Mark the ReplenishmentList and continue with the other pick list items.
// return this message to the user and continue to the next level
// do the pick list entries here
}
}
}
else
// if we are here, it means that the dispatch able quantity is equal to what we have or greater than the request
{
// dispatch the existing quantity and continue with the other entries in the receive pallet
_pickList.ImportRow(rp.CurrentDataRow);
// pick the currently inserted entry and adjust all the numbers in it.
DataRow dr = _pickList.Rows[_pickList.Rows.Count - 1];
dr["OrderDetailID"] = orderDetailID;
// only Adjust the entries that matter to the pick list
SetPriceAndQuantity(dr, dispatch, buinsku, rp, itemId, isDeliveryNote);
approvedQuantity -= dispatch;
belowBoxPickedFromRack = true;
}
rp.MoveNext();
}
if (!belowBoxPickedFromRack && approvedQuantity > 0)
{
LoadFromPickFace(itemId, unitID, approvedQuantity, storeID, isDeliveryNote);
}
if (approvedQuantity > buinsku && approvedQuantity > 0 &&
((pf.RowCount == 0 || pf.IsColumnNull("Balance")) || (approvedQuantity > pf.Balance)))
{
//TODO: if this was the last entry in the rp pallet, then it means that the pick face needs to be replenished,\
// Implement that logic here.
// this means the pick face has been setup.
DataRowView drv = _replenishmentList.DefaultView.AddNew();
drv["ItemID"] = itemId;
drv["StoreID"] = storeID;
drv.EndEdit();
}
}