|
Seeks an Analytical Centre entry by its centre, kind and account. |
|
|
VARIANT_BOOL SeekByCentreKindAcc ( enum eSeekMode eSeekMode, BSTR bsCentre, BSTR bsKind, BSTR bsAccNum, DATE dBookDate ) |
|
|
Key information | | | Key segment information | Segment Name | Type | Order | Collation | pAnaAccount | BSTR | Ascending | Hierarchy | pAnaKind | BSTR | Ascending | Hierarchy | pAccount | BSTR | Ascending | Case sensitive | pBookDate | DATE (date) | Ascending | - |
| | Parameters | eSeekMode | [in] A value of the 'eSeekMode' enumeration. | bsCentre | [in] The analytical centre of the analytical entry you want to seek. | bsKind | [in] The analytical kind of the analytical entry you want to seek. | bsAccNum | [in] The general account 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 centre entries for the analytical centre with code = 'CENT', the analytical kind with code = 'KIND' and the general account with number = '601'
CString strCentre = "CENT", strKind = "KIND", strAccNum = "601";
pAnCnt->SeekByCentreKindAcc (smGreaterOrEqual, (LPCSTR)strCentre, (LPCSTR)strKind, (LPCSTR)strAccNum, COleDateTime (0, 0, 0, 0, 0, 0).m_dt);
while (pAnCnt->GetDBStatus () == 0 && (CString)pAnCnt->pAnaAccount == strCentre && (CString)pAnCnt->pAnaKind == strKind && (CString)pAnCnt->pAccount == strAccNum)
{
// Process record data
pAnCnt->GetNext ();
}
|
|
|
C# |
|
// Seek all analytical centre entries for the analytical centre with code = 'CENT', the analytical kind with code = 'KIND' and the general account with number = '601'
string strCentre = "CENT", strKind = "KIND", strAccNum = "601";
oAnCnt.SeekByCentreKindAcc (eSeekMode.smGreaterOrEqual, strCentre, strKind, strAccNum, new DateTime ());
while (oAnCnt.GetDBStatus () == 0 && oAnCnt.pAnaAccount.ToString () == strCentre && oAnCnt.pAnaKind.ToString () == strKind && oAnCnt.pAccount.ToString () == strAccNum)
{
// Process record data
oAnCnt.GetNext ();
}
|
|
|
VBS |
|
' Seek all analytical centre entries for the analytical centre with code = 'CENT', the analytical kind with code = 'KIND' and the general account with number = '601'
Dim strCentre, strKind, strAccNum
Dim dtBookDate
strCentre = "CENT"
strKind = "KIND"
strAccNum = "601"
Call oAnCnt.SeekByCentreKindAcc(smGreaterOrEqual, strCentre, strKind, strAccNum, dtBookDate)
While oAnCnt.GetDBStatus() = 0 And oAnCnt.pAnaAccount = strCentre And oAnCnt.pAnaKind = strKind And oAnCnt.pAccount = strAccNum
' Process record data
Call oAnCnt.GetNext()
Wend
|
|
|
VB.NET |
|
' Seek all analytical centre entries for the analytical centre with code = 'CENT', the analytical kind with code = 'KIND' and the general account with number = '601'
Dim strCentre, strKind, strAccNum As String
Dim dtBookDate As Date
strCentre = "CENT"
strKind = "KIND"
strAccNum = "601"
oAnCnt.SeekByCentreKindAcc(eSeekMode.smGreaterOrEqual, strCentre, strKind, strAccNum, dtBookDate)
While oAnCnt.GetDBStatus() = 0 And oAnCnt.pAnaAccount = strCentre And oAnCnt.pAnaKind = strKind And oAnCnt.pAccount = strAccNum
' Process record data
oAnCnt.GetNext()
End While
|
|