Venice
DdMan::SeekByScheme
 
Seeks a Direct Debit Mandate card by its scheme and type.
 
VARIANT_BOOL SeekByScheme (
    enum eSeekMode eSeekMode,
    enum eDdManScheme eDdManScheme,
    enum eDdManType eDdManType,
    BSTR bsMandId
)
 
Key information
This method uses key number 3 (See SwapKey).
This is a unique key.
 
Key segment information
Segment NameTypeOrderCollation
pSchemeBYTEAscending-
pMandateTypeBYTEAscending-
pMandateIdBSTRAscendingCase insensitive
 
Parameters
eSeekMode
[in] A value of the 'eSeekMode' enumeration.
eDdManScheme
[in] A value of the 'eDdManScheme' enumeration.
eDdManType
[in] A value of the 'eDdManType' enumeration.
bsMandId
[in] The mandate identification of the mandate you want to seek.
 
See Also
CreateDdMan
 
Samples
 
C++
 
// Seek all mandates for scheme 'B2B' and type 'Recurrent'
eDdManScheme eDDMS = ddmsB2B;
eDdManType eDDMT = ddmtRecurrent;
pDdMan->SeekByScheme (smGreater, eDDMS, eDDMT, "");
while (pDdMan->GetDBStatus () == 0 && pDdMan->pScheme.bVal == eDDMS && pDdMan->pMandateType.bVal == eDDMT)
{
    // Process record data
    
    pDdMan->GetNext ();
}

C#
 
// Seek all mandates for scheme 'B2B' and type 'Recurrent'
eDdManScheme eDDMS = eDdManScheme.ddmsB2B;
eDdManType eDDMT = eDdManType.ddmtRecurrent;
oDdMan.SeekByScheme (eSeekMode.smGreater, eDDMS, eDDMT, "");
while (oDdMan.GetDBStatus () == 0 && (eDdManScheme)Enum.ToObject(typeof(eDdManScheme), oDdMan.pScheme) == eDDMS && (eDdManType)Enum.ToObject(typeof(eDdManType), oDdMan.pMandateType) == eDDMT)
{
    // Process record data
    
    oDdMan.GetNext ();
}

VBS
 
' Seek all mandates for scheme 'B2B' and type 'Recurrent'
Dim eDDMS
Dim eDDMT
eDDMS = ddmsB2B
eDDMT = ddmtRecurrent
Call oDdMan.SeekByScheme(smGreater, eDDMS, eDDMT, "")
While oDdMan.GetDBStatus() = 0 And oDdMan.pScheme = eDDMS And oDdMan.pMandateType = eDDMT
    ' Process record data

    Call oDdMan.GetNext()
Wend

VB.NET
 
' Seek all mandates for scheme 'B2B' and type 'Recurrent'
Dim eDDMS As eDdManScheme
Dim eDDMT As eDdManType
eDDMS = eDdManScheme.ddmsB2B
eDDMT = eDdManType.ddmtRecurrent
oDdMan.SeekByScheme(eSeekMode.smGreater, eDDMS, eDDMT, "")
While oDdMan.GetDBStatus() = 0 And oDdMan.pScheme = eDDMS And oDdMan.pMandateType = eDDMT
    ' Process record data

    oDdMan.GetNext()
End While