Venice
Product::SeekByFupCode
 
Seeks a Production Document by its follow-up code.
 
VARIANT_BOOL SeekByFupCode (
    enum eSeekMode eSeekMode,
    BSTR bsFollowUp,
    DATE dDocDate
)
 
Key information
This method uses key number 7 (See SwapKey).
This key allows duplicates.
This is a null key, only the records where pFollowUp is not blank are in the index.
 
Key segment information
Segment NameTypeOrderCollation
pFollowUpBSTRAscendingCase insensitive
pDocDateDATE (date)Ascending-
 
Parameters
eSeekMode
[in] A value of the 'eSeekMode' enumeration.
bsFollowUp
[in] The follow-up code of the Production Document Detail line you want to seek.
dDocDate
[in] The document date of the Production Document you want to seek.
 
Return value
True if the record with the given properties was found, otherwise false.
 
See Also
CreateProduct
GetDBStatus
GetNext
 
Samples
 
C++
 
// Seek the data of all detail lines with a follow-up code of 'FUP'
CString strFupCode = "FUP";
pProduct->SeekByFupCode (smGreaterOrEqual, (LPCSTR)strFupCode, COleDateTime (0, 0, 0, 0, 0, 0).m_dt);
while (pProduct->GetDBStatus () == 0 && (CString)pProduct->pFollowUp == strFupCode)
{
    // Process record data
    
    pProduct->GetNext ();
}

C#
 
// Seek the data of all detail lines with a follow-up code of 'FUP'
string strFupCode = "FUP";
oProduct.SeekByFupCode (eSeekMode.smGreaterOrEqual, strFupCode, new DateTime ());
while (oProduct.GetDBStatus () == 0 && oProduct.pFollowUp.ToString () == strFupCode)
{
    // Process record data
    
    oProduct.GetNext ();
}

VBS
 
' Seek the data of all detail lines with a follow-up code of 'FUP'
Dim strFupCode
Dim dtDocDate
strFupCode = "FUP"
Call oProduct.SeekByFupCode(smGreaterOrEqual, strFupCode, dtDocDate)
While oProduct.GetDBStatus() = 0 And oProduct.pFollowUp = strFupCode
    ' Process record data

    Call oProduct.GetNext()
Wend

VB.NET
 
' Seek the data of all detail lines with a follow-up code of 'FUP'
Dim strFupCode As String
Dim dtDocDate As Date
strFupCode = "FUP"
oProduct.SeekByFupCode(eSeekMode.smGreaterOrEqual, strFupCode, dtDocDate)
While oProduct.GetDBStatus() = 0 And oProduct.pFollowUp = strFupCode
    ' Process record data

    oProduct.GetNext()
End While