|
Seeks an open Purchase Order by its supplier number. |
|
|
VARIANT_BOOL SeekByOpenStatSup ( enum eSeekMode eSeekMode, LONG lSupNum, 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 Name | Type | Order | Collation | pSupNum | LONG (unsigned) | Ascending | - | pBook | BSTR | Ascending | Case insensitive | pDocNum | LONG (unsigned) | Ascending | - | pIsOpen | VARIANT_BOOL | Ascending | - |
| | Parameters | eSeekMode | [in] A value of the 'eSeekMode' enumeration. | lSupNum | [in] The supplier number of the Purchase Order you want to seek. | bsBook | [in] The book code of the Purchase Order you want to seek. | lDocNum | [in] The document number of the Purchase Order you want to seek. | | Return value |
True if the record with the given properties was found, otherwise false. |
|
See Also |
|
|
|
Samples |
|
|
C++ |
|
// Process all records that are still open
pPOrder->SeekByOpenStatSup (smFirst, 0, "", 0);
while (pPOrder->GetDBStatus () == 0)
{
// Process record data
pPOrder->GetNext ();
}
// Check if the document for the supplier with number 125 and with book code = 'Book' and document number = 12 is still open
if (pPOrder->SeekByOpenStatSup (smEqual, 125, "Book", 12))
// Record is still open
|
|
|
C# |
|
// Process all records that are still open
oPOrder.SeekByOpenStatSup (eSeekMode.smFirst, 0, "", 0);
while (oPOrder.GetDBStatus () == 0)
{
// Process record data
oPOrder.GetNext ();
}
// Check if the document for the supplier with number 125 and with book code = 'Book' and document number = 12 is still open
if (oPOrder.SeekByOpenStatSup (eSeekMode.smEqual, 125, "Book", 12))
// Record is still open
|
|
|
VBS |
|
' Process all records that are still open
Call oPOrder.SeekByOpenStatSup(smFirst, 0, "", 0)
While oPOrder.GetDBStatus() = 0
' Process record data
Call oPOrder.GetNext()
Wend
' Check if the document for the supplier with number 125 and with book code = 'Book' and document number = 12 is still open
If oPOrder.SeekByOpenStatSup(smEqual, 125, "Book", 12) Then
' Record is still open
End If
|
|
|
VB.NET |
|
' Process all records that are still open
oPOrder.SeekByOpenStatSup(eSeekMode.smFirst, 0, "", 0)
While oPOrder.GetDBStatus() = 0
' Process record data
oPOrder.GetNext()
End While
' Check if the document for the supplier with number 125 and with book code = 'Book' and document number = 12 is still open
If oPOrder.SeekByOpenStatSup(eSeekMode.smEqual, 125, "Book", 12) Then
' Record is still open
End If
|
|