Venice
SDeliv::SeekByExpStatus
 
Seeks a Sales Delivery by its export status.
 
VARIANT_BOOL SeekByExpStatus (
    enum eSeekMode eSeekMode,
    BSTR bsBook,
    LONG lDocNum
)
 
Key information
This method uses key number 8 (See SwapKey).
This is a unique key.
This is a null key, only the records where pToExport is true are in the index.
 
Key segment information
Segment NameTypeOrderCollation
pBookBSTRAscendingCase insensitive
pDocNumLONG (unsigned)Ascending-
pToExportVARIANT_BOOLAscending-
 
Parameters
eSeekMode
[in] A value of the 'eSeekMode' enumeration.
bsBook
[in] The book code of the Sales Delivery you want to seek.
lDocNum
[in] The document number of the Sales Delivery you want to seek.
 
Return value
True if the record with the given properties was found, otherwise false.
 
See Also
CreateSDeliv
GetDBStatus
GetNext
 
Samples
 
C++
 
// Process all Sales Deliveries that still need to be exported
pSDeliv->SeekByExpStatus (smFirst, "", 0);
while (pSDeliv->GetDBStatus () == 0)
{
    // Process record data
    
    pSDeliv->GetNext ();
}

// Check if the Sales Delivery with book code = 'Book' and document number = 12 still needs to be exported
if (pSDeliv->SeekByExpStatus (smEqual, "Book", 12))
    // Sales Delivery needs to be exported

C#
 
// Process all Sales Deliveries that still need to be exported
oSDeliv.SeekByExpStatus (eSeekMode.smFirst, "", 0);
while (oSDeliv.GetDBStatus () == 0)
{
    // Process record data

    oSDeliv.GetNext ();
}

// Check if the Sales Delivery with book code = 'Book' and document number = 12 still needs to be exported
if (oSDeliv.SeekByExpStatus (eSeekMode.smEqual, "Book", 12))
    // Sales Delivery needs to be exported

VBS
 
' Process all Sales Deliveries that still need to be exported
Call oSDeliv.SeekByExpStatus(smFirst, "", 0)
While oSDeliv.GetDBStatus() = 0
    ' Process record data

    Call oSDeliv.GetNext()
Wend

' Check if the Sales Delivery with book code = 'Book' and document number = 12 still needs to be exported
If oSDeliv.SeekByExpStatus(smEqual, "Book", 12) Then
    ' Sales Delivery needs to be exported
End If

VB.NET
 
' Process all Sales Deliveries that still need to be exported
oSDeliv.SeekByExpStatus(eSeekMode.smFirst, "", 0)
While oSDeliv.GetDBStatus() = 0
    ' Process record data

    oSDeliv.GetNext()
End While

' Check if the Sales Delivery with book code = 'Book' and document number = 12 still needs to be exported
If oSDeliv.SeekByExpStatus(eSeekMode.smEqual, "Book", 12) Then
    ' Sales Delivery needs to be exported
End If