|
Seeks a Production Document Detail line by its stock article number. |
|
|
VARIANT_BOOL SeekByStcArtNum ( enum eSeekMode eSeekMode, BSTR bsArtNumStock, DATE dProdDate ) |
|
|
Key information | | | Key segment information | Segment Name | Type | Order | Collation | pArtNumStock | BSTR | Ascending | Hierarchy | pProdDate | 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. | dProdDate | [in] The production 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 odtProdDate;
CString strStcArtNum = "Stk_001";
odtProdDate.SetDate (2024, 4, 19);
pProductDet->SeekByStcArtNum (smEqual, (LPCSTR)strStcArtNum, odtProdDate);
while (pProductDet->GetDBStatus () == 0 && (CString)pProductDet->pArtNumStock == strStcArtNum && (DATE)pProductDet->pProdDate == odtProdDate)
{
// 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 dtProdDate = new DateTime (2024, 4, 19);
string strStcArtNum = "Stk_001";
oProductDet.SeekByStcArtNum (eSeekMode.smEqual, strStcArtNum, dtProdDate);
while (oProductDet.GetDBStatus () == 0 && oProductDet.pArtNumStock.ToString () == strStcArtNum && (DateTime)oProductDet.pProdDate == dtProdDate)
{
// Process record data
oProductDet.GetNext ();
}
|
|
|
VBS |
|
Dim dtProdDate
Dim strStcArtNum
dtProdDate = #4/19/2024#
strStcArtNum = "Stk_001"
Call oProductDet.SeekByStcArtNum(smEqual, strStcArtNum, dtProdDate)
While oProductDet.GetDBStatus() = 0 And oProductDet.pArtNumStock = strStcArtNum And oProductDet.pProdDate = dtProdDate
' Process record data
Call oProductDet.GetNext()
Wend
|
|
|
VB.NET |
|
Dim dtProdDate As Date
Dim strStcArtNum As String
dtProdDate = #4/19/2024#
strStcArtNum = "Stk_001"
oProductDet.SeekByStcArtNum(eSeekMode.smEqual, strStcArtNum, dtProdDate)
While oProductDet.GetDBStatus() = 0 And oProductDet.pArtNumStock = strStcArtNum And oProductDet.pProdDate = dtProdDate
' Process record data
oProductDet.GetNext()
End While
|
|