|
Seeks a Purchase Invoice Detail line by its document. |
|
|
VARIANT_BOOL SeekByDocument ( enum eSeekMode eSeekMode, BSTR bsBook, LONG lDocNum, SHORT sLineNum ) |
|
|
Key information | | This method uses key number 1 (See SwapKey). | | This is a unique key. |
| | Key segment information | | | Parameters | eSeekMode | [in] A value of the 'eSeekMode' enumeration. | bsBook | [in] The book code of the Purchase Invoice of which you want to seek a detail line. | lDocNum | [in] The document number of the Purchase Invoice of which you want to seek a detail line. | sLineNum | [in] The line number of the Purchase Invoice 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 the purchase invoice with book code = 'FAC' and document number = 12
CString strBook = "FAC";
long lDocNum = 12;
pPInvceDet->SeekByDocument (smGreaterOrEqual, (LPCSTR)strBook, lDocNum, 0);
while (pPInvceDet->GetDBStatus () == 0 && (CString)pPInvceDet->pBook == strBook && (long)pPInvceDet->pDocNum == lDocNum)
{
// Process record data
pPInvceDet->GetNext ();
}
|
|
|
C# |
|
// Seek the data of all detail lines of the purchase invoice with book code = 'FAC' and document number = 12
string strBook = "FAC";
int iDocNum = 12;
oPInvceDet.SeekByDocument (eSeekMode.smGreaterOrEqual, strBook, iDocNum, 0);
while (oPInvceDet.GetDBStatus () == 0 && oPInvceDet.pBook.ToString () == strBook && (int)oPInvceDet.pDocNum == iDocNum)
{
// Process record data
oPInvceDet.GetNext ();
}
|
|
|
VBS |
|
' Seek the data of all detail lines of the purchase invoice with book code = 'FAC' and document number = 12
Dim strBook
Dim lDocNum
strBook = "FAC"
lDocNum = 12
Call oPInvceDet.SeekByDocument(smGreaterOrEqual, strBook, lDocNum, 0)
While oPInvceDet.GetDBStatus() = 0 And oPInvceDet.pBook = strBook And oPInvceDet.pDocNum = lDocNum
' Process record data
Call oPInvceDet.GetNext()
Wend
|
|
|
VB.NET |
|
' Seek the data of all detail lines of the purchase invoice with book code = 'FAC' and document number = 12
Dim strBook As String
Dim lDocNum As Long
strBook = "FAC"
lDocNum = 12
oPInvceDet.SeekByDocument(eSeekMode.smGreaterOrEqual, strBook, lDocNum, 0)
While oPInvceDet.GetDBStatus() = 0 And oPInvceDet.pBook = strBook And oPInvceDet.pDocNum = lDocNum
' Process record data
oPInvceDet.GetNext()
End While
|
|