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

// Check if the document with book code = 'Book' and document number = 12 still needs to be printed
if (pPDeliv->SeekByPrnStatus (smEqual, "Book", 12))
    // Record needs to be printed

C#
 
// Process all records that still need to be printed
oPDeliv.SeekByPrnStatus (eSeekMode.smFirst, "", 0);
while (oPDeliv.GetDBStatus () == 0)
{
    // Process record data

    oPDeliv.GetNext ();
}

// Check if the document with book code = 'Book' and document number = 12 still needs to be printed
if (oPDeliv.SeekByPrnStatus (eSeekMode.smEqual, "Book", 12))
    // Record needs to be printed

VBS
 
' Process all records that still need to be printed
Call oPDeliv.SeekByPrnStatus(smFirst, "", 0)
While oPDeliv.GetDBStatus() = 0
    ' Process record data

    Call oPDeliv.GetNext()
Wend

' Check if the document with book code = 'Book' and document number = 12 still needs to be printed
If oPDeliv.SeekByPrnStatus(smEqual, "Book", 12) Then
    ' Record needs to be printed
End If

VB.NET
 
' Process all records that still need to be printed
oPDeliv.SeekByPrnStatus(eSeekMode.smFirst, "", 0)
While oPDeliv.GetDBStatus() = 0
    ' Process record data

    oPDeliv.GetNext()
End While

' Check if the document with book code = 'Book' and document number = 12 still needs to be printed
If oPDeliv.SeekByPrnStatus(eSeekMode.smEqual, "Book", 12) Then
    ' Record needs to be printed
End If