|
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 | | | 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 |
|
|
|
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
|
|