StockInfo::GetNextChange (Interface: StockInfo)
 
Positions on the next record of the stock changes file (initialized with GetFirst).
 
VARIANT_BOOL GetNextChange ()
 
Return value
True if a following record is available, otherwise False.
 
See Also
CreateStockInfo
GetFirstChange
 
Samples
 
C++
 
// Get all the stock changes for the item 'In stock' for article 'Art_001' in all warehouses, on all locations and for all serial numbers, without partitions and in chronological order.
VARIANT vTotalQnt;
if (pStockInfo->GetFirstChange (sitStock, "Art_001", NULL, NULL, NULL, VARIANT_FALSE, VARIANT_TRUE, &vTotalQnt))
{
    // Process data of the first record
    
    while (pStockInfo->GetNextChange ())
    {
        // Process data of this record
    }
}

C#
 
// Get all the stock changes for the item 'In stock' for article 'Art_001' in all warehouses, on all locations and for all serial numbers, without partitions and in chronological order.
object oWarehouse = null, oLocation = null, oSerialNumber = null, oTotalQnt;
if (oStockInfo.GetFirstChange (eStockInfoType.sitStock, "Art_001", oWarehouse, oLocation, oSerialNumber, false, true, out oTotalQnt))
{
    // Process data of the first record
    
    while (oStockInfo.GetNextChange ())
    {
        // Process data of this record
    }
}

VBS
 
' Get all the stock changes for the item 'In stock' for article 'Art_001' in all warehouses, on all locations and for all serial numbers, without partitions and in chronological order.
Dim oWarehouse, oLocation, oSerialNumber, oTotalQnt
If oStockInfo.GetFirstChange(sitStock, "Art_001", oWarehouse, oLocation, oSerialNumber, False, True, oTotalQnt) Then
    ' Process data of the first record
    
    While oStockInfo.GetNextChange()
        ' Process data of this record
    Wend
End If

VB.NET
 
' Get all the stock changes for the item 'In stock' for article 'Art_001' in all warehouses, on all locations and for all serial numbers, without partitions and in chronological order.
Dim oWarehouse, oLocation, oSerialNumber, oTotalQnt As Object
If oStockInfo.GetFirstChange(eStockInfoType.sitStock, "Art_001", oWarehouse, oLocation, oSerialNumber, False, True, oTotalQnt) Then
    ' Process data of the first record
    
    While oStockInfo.GetNextChange()
        ' Process data of this record
    End While
End If