Sales::SeekByMandateId (Interface: Sales)
 
Seeks a Sales Document by mandate identification.
 
VARIANT_BOOL SeekByMandateId (
    enum eSeekMode eSeekMode,
    BSTR bsMandateId,
    SHORT sYear,
    BSTR bsBook,
    LONG lDocNum
)
 
Key information
This method uses key number 15 (See SwapKey).
This key allows duplicates.
This is a null key, only the records where pMandateId is not blank and pIsTicked is false are in the index.
 
Key segment information
Segment NameTypeOrderCollation
pMandateIdBSTRAscendingCase insensitive
pAccYearSHORT (unsigned)Ascending-
pBookBSTRAscendingCase insensitive
pDocNumLONG (unsigned)Ascending-
pIsTickedVARIANT_BOOLAscending-
 
Parameters
eSeekMode
[in] A value of the 'eSeekMode' enumeration.
bsMandateId
[in] The mandate identification of the Sales Document you want to seek.
sYear
[in] The financial year in which the Sales Document you want to seek is created.
bsBook
[in] The book code of the Sales Document you want to seek.
lDocNum
[in] The document number of the Sales Document you want to seek.
 
Return value
True if the record with the given properties was found, otherwise false.
 
See Also
CreateSales
GetDBStatus
GetNext
 
Samples
 
C++
 
// Seek all unpaid sales documents that have to be collected by direct debit, with a reference to mandate identification 'Mandate'
pSales->SeekByMandateId (smGreaterOrEqual, "Mandate", pDossier->vLastYear, "", 0);
while (pSales->GetDBStatus () == 0 && CString (pSales->pMandateId.bstrVal) == "Mandate")
{
    // Process record data

    pSales->GetNext ();
}

C#
 
// Seek all unpaid sales documents that have to be collected by direct debit, with a reference to mandate identification 'Mandate'
oSales.SeekByMandateId (eSeekMode.smGreaterOrEqual, "Mandate", oDossier.vLastYear, "", 0);
while (oSales.GetDBStatus () == 0 && oSales.pMandateId.ToString () == "Mandate")
{
    // Process record data
    
    oSales.GetNext ();
}

VBS
 
' Seek all unpaid sales documents that have to be collected by direct debit, with a reference to mandate identification 'Mandate'
Call oSales.SeekByMandateId(smGreaterOrEqual, "Mandate", oDossier.vLastYear, "", 0)
While oSales.GetDBStatus() = 0 And oSales.pMandateId = "Mandate"
    ' Process record data

    Call oSales.GetNext()
Wend

VB.NET
 
' Seek all unpaid sales documents that have to be collected by direct debit, with a reference to mandate identification 'Mandate'
oSales.SeekByMandateId(eSeekMode.smGreaterOrEqual, "Mandate", oDossier.vLastYear, "", 0)
While oSales.GetDBStatus() = 0 And oSales.pMandateId = "Mandate"
    ' Process record data

    oSales.GetNext()
End While