|
Seeks an Analytical Unit entry by its unit, kind and book date. |
|
|
VARIANT_BOOL SeekByUnitKindDate ( enum eSeekMode eSeekMode, BSTR bsUnit, BSTR bsKind, DATE dBookDate ) |
|
|
Key information | | | Key segment information | Segment Name | Type | Order | Collation | pAnaAccount | BSTR | Ascending | Hierarchy | pAnaKind | BSTR | Ascending | Hierarchy | pBookDate | DATE (date) | Ascending | - |
| | Parameters | eSeekMode | [in] A value of the 'eSeekMode' enumeration. | bsUnit | [in] The analytical unit of the analytical entry you want to seek. | bsKind | [in] The analytical kind of the analytical entry you want to seek. | dBookDate | [in] The book date of the document of which you want to seek an analytical entry. | | Return value |
True if the record with the given properties was found, otherwise false. |
|
See Also |
|
|
|
Samples |
|
|
C++ |
|
// Seek all analytical unit entries for the analytical unit with code = 'UNIT' and the analytical kind with code = 'KIND'
CString strUnit = "UNIT", strKind = "KIND";
pAnUnt->SeekByUnitKindDate (smGreaterOrEqual, (LPCSTR)strUnit, (LPCSTR)strKind, COleDateTime (0, 0, 0, 0, 0, 0).m_dt);
while (pAnUnt->GetDBStatus () == 0 && (CString)pAnUnt->pAnaAccount == strUnit && (CString)pAnUnt->pAnaKind == strKind)
{
// Process record data
pAnUnt->GetNext ();
}
|
|
|
C# |
|
// Seek all analytical unit entries for the analytical unit with code = 'UNIT' and the analytical kind with code = 'KIND'
string strUnit = "UNIT", strKind = "KIND";
oAnUnt.SeekByUnitKindDate (eSeekMode.smGreaterOrEqual, strUnit, strKind, new DateTime ());
while (oAnUnt.GetDBStatus () == 0 && oAnUnt.pAnaAccount.ToString () == strUnit && oAnUnt.pAnaKind.ToString () == strKind)
{
// Process record data
oAnUnt.GetNext ();
}
|
|
|
VBS |
|
' Seek all analytical unit entries for the analytical unit with code = 'UNIT' and the analytical kind with code = 'KIND'
Dim strUnit, strKind
Dim dtBookDate
strUnit = "UNIT"
strKind = "KIND"
Call oAnUnt.SeekByUnitKindDate(smGreaterOrEqual, strUnit, strKind, dtBookDate)
While oAnUnt.GetDBStatus() = 0 And oAnUnt.pAnaAccount = strUnit And oAnUnt.pAnaKind = strKind
' Process record data
Call oAnUnt.GetNext()
Wend
|
|
|
VB.NET |
|
' Seek all analytical unit entries for the analytical unit with code = 'UNIT' and the analytical kind with code = 'KIND'
Dim strUnit, strKind As String
Dim dtBookDate As Date
strUnit = "UNIT"
strKind = "KIND"
oAnUnt.SeekByUnitKindDate(eSeekMode.smGreaterOrEqual, strUnit, strKind, dtBookDate)
While oAnUnt.GetDBStatus() = 0 And oAnUnt.pAnaAccount = strUnit And oAnUnt.pAnaKind = strKind
' Process record data
oAnUnt.GetNext()
End While
|
|