|
Seeks an Entry record that is not ticked yet. |
|
|
VARIANT_BOOL SeekByToTick ( enum eSeekMode eSeekMode, BSTR bsAccNum, DATE dBookDate, enum eBookType eBookType, BSTR bsBook, LONG lDocNum, SHORT sEntryNum ) |
|
|
Key information | | This method uses key number 4 (See SwapKey). | | This key allows duplicates. | | This is a null key, only the records where pAccount is not blank and pTickStatus is not 2 (=not closed) are in the index. |
| | Key segment information | Segment Name | Type | Order | Collation | pAccount | BSTR | Ascending | Case sensitive | pBookDate | DATE (date) | Ascending | - | pBookType | BYTE | Ascending | - | pBook | BSTR | Ascending | Case insensitive | pDocNum | LONG (unsigned) | Ascending | - | pEntryNum | SHORT (unsigned) | Ascending | - | pTickStatus | BYTE | Ascending | - |
| | Parameters | eSeekMode | [in] A value of the 'eSeekMode' enumeration. | bsAccNum | [in] The account number of the Entry record you want to seek. | dBookDate | [in] The book date of the Entry record you want to seek. | eBookType | [in] A value of the 'eBookType' enumeration. | bsBook | [in] The book code of the Entry record you want to seek. | lDocNum | [in] The document number of the Entry record you want to seek. | sEntryNum | [in] The entry number of the Entry record you want to seek. | | Return value |
True if the record with the given properties was found, otherwise false. |
|
See Also |
|
|
|
Samples |
|
|
C++ |
|
// Seek all unticked entry records for the customer with number = 25 (assuming that '400' is the customer prefix account)
CString strAccNum = "400000000025";
pEntry->SeekByToTick (smGreaterOrEqual, (LPCSTR)strAccNum, COleDateTime (0, 0, 0, 0, 0, 0).m_dt, btMin, "", 0, 0);
while (pEntry->GetDBStatus () == 0 && (CString)pEntry->pAccount == strAccNum)
{
// Process record data
pEntry->GetNext ();
}
|
|
|
C# |
|
// Seek all unticked entry records for the customer with number = 25 (assuming that '400' is the customer prefix account)
string strAccNum = "400000000025";
oEntry.SeekByToTick (eSeekMode.smGreaterOrEqual, strAccNum, new DateTime (), eBookType.btMin, "", 0, 0);
while (oEntry.GetDBStatus () == 0 && oEntry.pAccount.ToString () == strAccNum)
{
// Process record data
oEntry.GetNext ();
}
|
|
|
VBS |
|
' Seek all unticked entry records for the customer with number = 25 (assuming that '400' is the customer prefix account)
Dim strAccNum
Dim dtBookDate
strAccNum = "400000000025"
Call oEntry.SeekByToTick(smGreaterOrEqual, strAccNum, dtBookDate, btMin, "", 0, 0)
While oEntry.GetDBStatus() = 0 And oEntry.pAccount = strAccNum
' Process record data
Call oEntry.GetNext()
Wend
|
|
|
VB.NET |
|
' Seek all unticked entry records for the customer with number = 25 (assuming that '400' is the customer prefix account)
Dim strAccNum As String
Dim dtBookDate As Date
strAccNum = "400000000025"
oEntry.SeekByToTick(eSeekMode.smGreaterOrEqual, strAccNum, dtBookDate, eBookType.btMin, "", 0, 0)
While oEntry.GetDBStatus() = 0 And oEntry.pAccount = strAccNum
' Process record data
oEntry.GetNext()
End While
|
|