gistfile1.txt

Imports BirdDogSoftware.Interfaces

Namespace Events
    Public Class MagentoEvents

        Public Shared Function GetItemQtyOnHand(
            Connection As MagentoConnector.Connection,
            Connector As IConnectorAccount,
            Item As IItem
        ) as Maybe(Of Double)
            dim qty As Double = 0

            For Each loc As IItemLocation in Item.Locations
                If {"368", "888"}.Contains(loc.Loc) Then
                    qty += loc.Qty_On_Hand
                End If
            Next

            Return Maybe.Some(qty)
        End Sub

    End Class
End Namespace