| |
| Seeks a Purchase Delivery Detail line by its supplier number. |
| |
 |
VARIANT_BOOL SeekBySupNum (
enum eSeekMode eSeekMode,
LONG lSupNum,
LONG lSupSubNum,
BSTR bsBook,
LONG lDocNum,
SHORT sLineNum
) |
|
| |
| Key information |  | This method uses key number 4 (See SwapKey). | | This is a unique key. |
| | | | Key segment information | | | | | Parameters | | eSeekMode | | [in] A value of the 'eSeekMode' enumeration. | | lSupNum | | [in] The supplier number of the Purchase Delivery of which you want to seek a detail line. | | lSupSubNum | | [in] The supplier subnumber of the Purchase Delivery of which you want to seek a detail line. | | bsBook | | [in] The book code of the Purchase Delivery of which you want to seek a detail line. | | lDocNum | | [in] The document number of the Purchase Delivery of which you want to seek a detail line. | | sLineNum | | [in] The line number of the Purchase Delivery Detail line you want to seek. |
| |
Remarks
|
|
This number is a 0-based index, i.e. it starts from 0. Therefore the value of this parameter is 1 less than the numbers shown in the Venice grids and 1 less than the value returned by the property vLine (see properties)! |
|
| | | Return value |
| True if the record with the given properties was found, otherwise false. |
| |
| See Also |
|
|
|
| |
| Samples |
| |
|
C++ |
| |
// Seek the data of all detail lines of all purchase deliveries for the supplier with number 125/0
long lSupNum = 125, lSubNum = 0;
pPDelivDet->SeekBySupNum (smGreaterOrEqual, lSupNum, lSubNum, "", 0, 0);
while (pPDelivDet->GetDBStatus () == 0 && (long)pPDelivDet->pSupNum == lSupNum && (long)pPDelivDet->pSupSubNum == lSubNum)
{
// Process record data
pPDelivDet->GetNext ();
}
|
|
|
C# |
| |
// Seek the data of all detail lines of all purchase deliveries for the supplier with number 125/0
int iSupNum = 125, iSubNum = 0;
oPDelivDet.SeekBySupNum (eSeekMode.smGreaterOrEqual, iSupNum, iSubNum, "", 0, 0);
while (oPDelivDet.GetDBStatus () == 0 && (int)oPDelivDet.pSupNum == iSupNum && (int)oPDelivDet.pSupSubNum == iSubNum)
{
// Process record data
oPDelivDet.GetNext ();
}
|
|
|
VBS |
| |
' Seek the data of all detail lines of all purchase deliveries for the supplier with number 125/0
Dim iSupNum, iSubNum
iSupNum = 125
iSubNum = 0
Call oPDelivDet.SeekBySupNum(smGreaterOrEqual, iSupNum, iSubNum, "", 0, 0)
While oPDelivDet.GetDBStatus() = 0 And oPDelivDet.pSupNum = iSupNum And oPDelivDet.pSupSubNum = iSubNum
' Process record data
Call oPDelivDet.GetNext()
Wend
|
|
|
VB.NET |
| |
' Seek the data of all detail lines of all purchase deliveries for the supplier with number 125/0
Dim iSupNum, iSubNum As Integer
iSupNum = 125
iSubNum = 0
oPDelivDet.SeekBySupNum(eSeekMode.smGreaterOrEqual, iSupNum, iSubNum, "", 0, 0)
While oPDelivDet.GetDBStatus() = 0 And oPDelivDet.pSupNum = iSupNum And oPDelivDet.pSupSubNum = iSubNum
' Process record data
oPDelivDet.GetNext()
End While
|
|
