|
Seeks a Purchase Delivery Detail line by its stock article number. |
|
|
VARIANT_BOOL SeekByStcArtNum ( enum eSeekMode eSeekMode, BSTR bsArtNumStock, DATE dDocDate ) |
|
|
Key information | | | Key segment information | Segment Name | Type | Order | Collation | pArtNumStock | BSTR | Ascending | Hierarchy | pDocDate | DATE (date) | Ascending | - |
| | Parameters | eSeekMode | [in] A value of the 'eSeekMode' enumeration. | bsArtNumStock | [in] The number of the stock article of the Purchase Delivery Detail line you want to seek. | dDocDate | [in] The document date of the Purchase Delivery of which you want to seek a detail line. | | 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 for the article with stock number = 'Stock' of all purchase deliveries
CString strArtNumStock = "Stock";
pPDelivDet->SeekByStcArtNum (smGreaterOrEqual, (LPCSTR)strArtNumStock, COleDateTime (0, 0, 0, 0, 0, 0).m_dt);
while (pPDelivDet->GetDBStatus () == 0 && (CString)pPDelivDet->pArtNumStock == strArtNumStock)
{
// Process record data
pPDelivDet->GetNext ();
}
|
|
|
C# |
|
// Seek the data of all detail lines for the article with stock number = 'Stock' of all purchase deliveries
string strArtNumStock = "Stock";
oPDelivDet.SeekByStcArtNum (eSeekMode.smGreaterOrEqual, strArtNumStock, new DateTime ());
while (oPDelivDet.GetDBStatus () == 0 && oPDelivDet.pArtNumStock.ToString () == strArtNumStock)
{
// Process record data
oPDelivDet.GetNext ();
}
|
|
|
VBS |
|
' Seek the data of all detail lines for the article with stock number = 'Stock' of all purchase deliveries
Dim strArtNumStock
Dim dtDocDate
strArtNumStock = "Stock"
Call oPDelivDet.SeekByStcArtNum(smGreaterOrEqual, strArtNumStock, dtDocDate)
While oPDelivDet.GetDBStatus() = 0 And oPDelivDet.pArtNumStock = strArtNumStock
' Process record data
Call oPDelivDet.GetNext()
Wend
|
|
|
VB.NET |
|
' Seek the data of all detail lines for the article with stock number = 'Stock' of all purchase deliveries
Dim strArtNumStock As String
Dim dtDocDate As Date
strArtNumStock = "Stock"
oPDelivDet.SeekByStcArtNum(eSeekMode.smGreaterOrEqual, strArtNumStock, dtDocDate)
While oPDelivDet.GetDBStatus() = 0 And oPDelivDet.pArtNumStock = strArtNumStock
' Process record data
oPDelivDet.GetNext()
End While
|
|