| |
| Seeks a produced Production Document Detail line by its valuation date. |
| |
 |
VARIANT_BOOL SeekByEvalDate (
enum eSeekMode eSeekMode,
BSTR bsArtNumStock,
DATE dEvalDate
) |
|
| |
| Key information |  | This method uses key number 4 (See SwapKey). | | This key allows duplicates. | | This is a null key, only the records where pEvalDate is valid are in the index. |
| | | | Key segment information | | Segment Name | Type | Order | Collation | | pArtNumStock | BSTR | Ascending | Hierarchy | | pEvalDate | DATE (date) | Ascending | - |
| | | | Parameters | | eSeekMode | | [in] A value of the 'eSeekMode' enumeration. | | bsArtNumStock | | [in] The number of the stock article of the Production Document Detail line you want to seek. | | dEvalDate | | [in] The valuation date of the Production Document 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 all the detail lines for article with stock number 'Stk_001' that were produced on 19/04/2024
COleDateTime odtEvalDate;
CString strStcArtNum = "Stk_001";
odtEvalDate.SetDate (2024, 4, 19);
pProductDet->SeekByEvalDate (smEqual, (LPCSTR)strStcArtNum, odtEvalDate);
while (pProductDet->GetDBStatus () == 0 && (CString)pProductDet->pArtNumStock == strStcArtNum && (DATE)pProductDet->pEvalDate == odtEvalDate)
{
// Process record data
pProductDet->GetNext ();
}
|
|
|
C# |
| |
// Seek all the detail lines for article with stock number 'Stk_001' that were produced on 19/04/2024
DateTime dtEvalDate = new DateTime (2024, 4, 19);
string strStcArtNum = "Stk_001";
oProductDet.SeekByEvalDate (eSeekMode.smEqual, strStcArtNum, dtEvalDate);
while (oProductDet.GetDBStatus () == 0 && oProductDet.pArtNumStock.ToString () == strStcArtNum && (DateTime)oProductDet.pEvalDate == dtEvalDate)
{
// Process record data
oProductDet.GetNext ();
}
|
|
|
VBS |
| |
Dim dtEvalDate
Dim strStcArtNum
dtEvalDate = #4/19/2024#
strStcArtNum = "Stk_001"
Call oProductDet.SeekByEvalDate(smEqual, strStcArtNum, dtEvalDate)
While oProductDet.GetDBStatus() = 0 And oProductDet.pArtNumStock = strStcArtNum And oProductDet.pEvalDate = dtEvalDate
' Process record data
Call oProductDet.GetNext()
Wend
|
|
|
VB.NET |
| |
Dim dtEvalDate As Date
Dim strStcArtNum As String
dtEvalDate = #4/19/2024#
strStcArtNum = "Stk_001"
oProductDet.SeekByEvalDate(eSeekMode.smEqual, strStcArtNum, dtEvalDate)
While oProductDet.GetDBStatus() = 0 And oProductDet.pArtNumStock = strStcArtNum And oProductDet.pEvalDate = dtEvalDate
' Process record data
oProductDet.GetNext()
End While
|
|
