|
Browses the file for a Purchase Order Detail line. |
|
|
LONG Browse ( VARIANT_BOOL bFromCurrPos ) |
|
|
Parameters | bFromCurrPos | [in] When this parameter is set to true the browse will use the current position of the file and the key that was set by the previous SeekBy-method. If the parameter is false the browse will be positioned at the beginning of the file and the key will be the last one that was manually selected in the browse. | | Return value |
A LONG containing the system number of the selected record, 0 if no record was selected. | | Remarks |
| This method can only be used if user interface is allowed (parameter bWithUserInterface is set to true in the Logon method), because a record can only be selected using the browse dialog. |
|
|
See Also |
|
|
|
Samples |
|
|
C++ |
|
CString strBook = "FAC";
long lDocNum = 12, lSysNum;
if (pPOrderDet->SeekByDocument (smGreaterOrEqual, (LPCSTR)strBook, lDocNum, 0) &&
(CString)pPOrderDet->pBook == strBook && (long)pPOrderDet->pDocNum == lDocNum)
// Browse using the key 'PRD_LNE' (document) and positioned on the record found by SeekByDocument
lSysNum = pPOrderDet->Browse (VARIANT_TRUE);
else
// Browse using the last key that was manually selected and positioned at the beginning of the file
lSysNum = pPOrderDet->Browse (VARIANT_FALSE);
|
|
|
C# |
|
string strBook = "FAC";
int iDocNum = 12, iSysNum;
if (oPOrderDet.SeekByDocument (eSeekMode.smGreaterOrEqual, strBook, iDocNum, 0) &&
oPOrderDet.pBook.ToString () == strBook && (int)oPOrderDet.pDocNum == iDocNum)
// Browse using the key 'PRD_LNE' (document) and positioned on the record found by SeekByDocument
iSysNum = oPOrderDet.Browse (true);
else
// Browse using the last key that was manually selected and positioned at the beginning of the file
iSysNum = oPOrderDet.Browse (false);
|
|
|
VBS |
|
Dim strBook
Dim lDocNum, lSysNum
strBook = "FAC"
lDocNum = 12
If oPOrderDet.SeekByDocument(smGreaterOrEqual, strBook, lDocNum, 0) And oPOrderDet.pBook = strBook And oPOrderDet.pDocNum = lDocNum Then
' Browse using the key 'PRD_LNE' (document) and positioned on the record found by SeekByDocument
lSysNum = oPOrderDet.Browse(True)
Else
' Browse using the last key that was manually selected and positioned at the beginning of the file
lSysNum = oPOrderDet.Browse(False)
End If
|
|
|
VB.NET |
|
Dim strBook As String
Dim lDocNum, lSysNum As Long
strBook = "FAC"
lDocNum = 12
If oPOrderDet.SeekByDocument(eSeekMode.smGreaterOrEqual, strBook, lDocNum, 0) And oPOrderDet.pBook = strBook And oPOrderDet.pDocNum = lDocNum Then
' Browse using the key 'PRD_LNE' (document) and positioned on the record found by SeekByDocument
lSysNum = oPOrderDet.Browse(True)
Else
' Browse using the last key that was manually selected and positioned at the beginning of the file
lSysNum = oPOrderDet.Browse(False)
End If
|
|