| |
| Seeks a Purchase Offer by the system number of its supplier. |
| |
 |
VARIANT_BOOL SeekBySupSys (
enum eSeekMode eSeekMode,
LONG lSysNumSup,
BSTR bsBook,
LONG lDocNum
) |
|
| |
| Key information |  | This method uses key number 2 (See SwapKey). | | This is a unique key. |
| | | | Key segment information | | Segment Name | Type | Order | Collation | | pSysNumSup | LONG | Ascending | - | | pBook | BSTR | Ascending | Case insensitive | | pDocNum | LONG (unsigned) | Ascending | - |
| | | | Parameters | | eSeekMode | | [in] A value of the 'eSeekMode' enumeration. | | lSysNumSup | | [in] The system number of the supplier of the Purchase Offer you want to seek. | | bsBook | | [in] The book code of the Purchase Offer you want to seek. | | lDocNum | | [in] The document number of the Purchase Offer you want to seek. | | | | Return value |
| True if the record with the given properties was found, otherwise false. |
| |
| See Also |
|
|
|
| |
| Samples |
| |
|
C++ |
| |
// Process all Purchase Offers for the supplier with system number = 1428
long lSeekSysNumSup = 1428;
pPOffer->SeekBySupSys (smGreater, lSeekSysNumSup, "", 0);
while (pPOffer->GetDBStatus () == 0 && (long)pPOffer->pSysNumSup.lVal == lSeekSysNumSup)
{
// Process record data
pPOffer->GetNext ();
}
|
|
|
C# |
| |
// Process all Purchase Offers for the supplier with system number = 1428
int iSeekSysNumSup = 1428;
oPOffer.SeekBySupSys (eSeekMode.smGreater, iSeekSysNumSup, "", 0);
while (oPOffer.GetDBStatus () == 0 && (int)oPOffer.pSysNumSup == iSeekSysNumSup)
{
// Process record data
oPOffer.GetNext ();
}
|
|
|
VBS |
| |
' Process all Purchase Offers for the supplier with system number = 1428
Dim iSeekSysNumSup
iSeekSysNumSup = 1428
Call oPOffer.SeekBySupSys(smGreater, iSeekSysNumSup, "", 0)
While oPOffer.GetDBStatus() = 0 And oPOffer.pSysNumSup = iSeekSysNumSup
' Process record data
Call oPOffer.GetNext()
Wend
|
|
|
VB.NET |
| |
' Process all Purchase Offers for the supplier with system number = 1428
Dim iSeekSysNumSup As Integer
iSeekSysNumSup = 1428
oPOffer.SeekBySupSys(eSeekMode.smGreater, iSeekSysNumSup, "", 0)
While oPOffer.GetDBStatus() = 0 And oPOffer.pSysNumSup = iSeekSysNumSup
' Process record data
oPOffer.GetNext()
End While
|
|
