Venice
ArtWrh::SeekByArtNum
 
Seeks an Article Warehouse card by its article number.
 
VARIANT_BOOL SeekByArtNum (
    enum eSeekMode eSeekMode,
    BSTR bsArtNum,
    BSTR bsWarehouse
)
 
Key information
This method uses key number 1 (See SwapKey).
This is a unique key.
 
Key segment information
Segment NameTypeOrderCollation
pArtNumBSTRAscendingHierarchy
pWarehouseBSTRAscendingCase insensitive
 
Parameters
eSeekMode
[in] A value of the 'eSeekMode' enumeration.
bsArtNum
[in] The article number of the article warehouse card you want to seek.
bsWarehouse
[in] The warehouse of the article warehouse card you want to seek.
 
Return value
True if the record with the given properties was found, otherwise false.
 
See Also
CreateArtWrh
GetDBStatus
GetNext
 
Samples
 
C++
 
// Seek all the article warehouses for the article with number 'Art_001'
CString    strArtNum = "Art_001";
pArtWrh->SeekByArtNum (smGreaterOrEqual, (LPCSTR)strArtNum, "");
while (pArtWrh->GetDBStatus () == 0 && (CString)pArtWrh->pArtNum == strArtNum)
{
    // Process data
    
    pArtWrh->GetNext ();
}

C#
 
// Seek all the article warehouses for the article with number 'Art_001'
string strArtNum = "Art_001";
oArtWrh.SeekByArtNum (eSeekMode.smGreaterOrEqual, strArtNum, "");
while (oArtWrh.GetDBStatus () == 0 && oArtWrh.pArtNum.ToString () == strArtNum)
{
    // Process data
    
    oArtWrh.GetNext ();
}

VBS
 
' Seek all the article warehouses for the article with number 'Art_001'
Dim strArtNum
strArtNum = "Art_001"
Call oArtWrh.SeekByArtNum(smGreaterOrEqual, strArtNum, "")
While oArtWrh.GetDBStatus() = 0 And oArtWrh.pArtNum = strArtNum
    ' Process record data
    
    Call oArtWrh.GetNext()
Wend

VB.NET
 
' Seek all the article warehouses for the article with number 'Art_001'
Dim strArtNum As String
strArtNum = "Art_001"
oArtWrh.SeekByArtNum(eSeekMode.smGreaterOrEqual, strArtNum, "")
While oArtWrh.GetDBStatus() = 0 And oArtWrh.pArtNum = strArtNum
    ' Process record data

    oArtWrh.GetNext()
End While