Venice
SDeliv::SeekByOpenStatCst
 
Seeks an unpaid Sales Delivery by its customer number.
 
VARIANT_BOOL SeekByOpenStatCst (
    enum eSeekMode eSeekMode,
    LONG lCstNum,
    BSTR bsBook,
    LONG lDocNum
)
 
Key information
This method uses key number 6 (See SwapKey).
This is a unique key.
This is a null key, only the records where pIsOpen is true are in the index.
 
Key segment information
Segment NameTypeOrderCollation
pCstNumLONG (unsigned)Ascending-
pBookBSTRAscendingCase insensitive
pDocNumLONG (unsigned)Ascending-
pIsOpenVARIANT_BOOLAscending-
 
Parameters
eSeekMode
[in] A value of the 'eSeekMode' enumeration.
lCstNum
[in] The customer number of the Sales Delivery you want to seek.
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 records that are still open
pSDeliv->SeekByOpenStatCst (smFirst, 0, "", 0);
while (pSDeliv->GetDBStatus () == 0)
{
    // Process record data

    pSDeliv->GetNext ();
}

// Check if the document for the Customer with number 25 and with book code = 'Book' and document number = 12 is still open
if (pSDeliv->SeekByOpenStatCst (smEqual, 25, "Book", 12))
    // Record is still open

C#
 
// Process all records that are still open
oSDeliv.SeekByOpenStatCst (eSeekMode.smFirst, 0, "", 0);
while (oSDeliv.GetDBStatus () == 0)
{
    // Process record data

    oSDeliv.GetNext ();
}

// Check if the document for the Customer with number 25 and with book code = 'Book' and document number = 12 is still open
if (oSDeliv.SeekByOpenStatCst (eSeekMode.smEqual, 25, "Book", 12))
    // Record is still open

VBS
 
' Process all records that are still open
Call oSDeliv.SeekByOpenStatCst(smFirst, 0, "", 0)
While oSDeliv.GetDBStatus() = 0
    ' Process record data

    Call oSDeliv.GetNext()
Wend

' Check if the document for the Customer with number 25 and with book code = 'Book' and document number = 12 is still open
If oSDeliv.SeekByOpenStatCst(smEqual, 25, "Book", 12) Then
    ' Record is still open
End If

VB.NET
 
' Process all records that are still open
oSDeliv.SeekByOpenStatCst(eSeekMode.smFirst, 0, "", 0)
While oSDeliv.GetDBStatus() = 0
    ' Process record data

    oSDeliv.GetNext()
End While

' Check if the document for the Customer with number 25 and with book code = 'Book' and document number = 12 is still open
If oSDeliv.SeekByOpenStatCst(eSeekMode.smEqual, 25, "Book", 12) Then
    ' Record is still open
End If