ProjectDet::SeekByProject (Interface: ProjectDet)
 
Seeks a Project Detail by its project number.
 
VARIANT_BOOL SeekByProject (
    enum eSeekMode eSeekMode,
    LONG lProject,
    SHORT sSeqNum
)
 
Key information
This method uses key number 1 (See SwapKey).
This is a unique key.
 
Key segment information
Segment NameTypeOrderCollation
pProjectLONG (unsigned)Ascending-
pSeqNumSHORT (unsigned)Ascending-
 
Parameters
eSeekMode
[in] A value of the 'eSeekMode' enumeration.
lProject
[in] The number of the project of which you want to seek a detail.
sSeqNum
[in] The sequence number of the project detail you want to seek.
 
See Also
CreateProjectDet
 
Samples
 
C++
 
// Seek all project details of the project with number = 12
long lProject = 12;
pProjectDet->SeekByProject (smGreaterOrEqual, lProject, 0);
while (pProjectDet->GetDBStatus () == 0 && (long)pProjectDet->pProject == lProject)
{
    // Process record data
    
    pProjectDet->GetNext ();
}

C#
 
// Seek all project details of the project with number = 12
int iProject = 12;
oProjectDet.SeekByProject (eSeekMode.smGreaterOrEqual, iProject, 0);
while (oProjectDet.GetDBStatus () == 0 && (int)oProjectDet.pProject == iProject)
{
    // Process record data
    
    oProjectDet.GetNext ();
}

VBS
 
' Seek all project details of the project with number = 12
Dim lProject
lProject = 12
Call oProjectDet.SeekByProject(smGreaterOrEqual, lProject, 0)
While oProjectDet.GetDBStatus() = 0 And oProjectDet.pProject = lProject
    ' Process record data

    Call oProjectDet.GetNext()
Wend

VB.NET
 
' Seek all project details of the project with number = 12
Dim lProject As Long
lProject = 12
oProjectDet.SeekByProject(eSeekMode.smGreaterOrEqual, lProject, 0)
While oProjectDet.GetDBStatus() = 0 And oProjectDet.pProject = lProject
    ' Process record data

    oProjectDet.GetNext()
End While