tdPremier

Structure

tdFirst(iDataSet)

Type

Procédure

Description

Cette fonction permet de se positionner sur le premier enregistrement de l'un des trois ensembles de données temporaires.

Paramètres : 1

iDataSet = numéro de l'ensemble de données, doit être compris entre 1 et 10. IndySoft fournit 10 ensembles de données accessibles via les fonctions de script personnalisées « td* ».

Exemple

si tdDoSQLRecords(1, 'SELECT COMPANY_NAME FROM COMPANY ORDER BY COMPANY_NAME') alors

tdFirst(1)

tant que (tdEOF(1) = '0')

sCompanyName = tdFieldbyNameAsString(1, 'COMPANY_NAME')

iCount = 0

if tdDoSQLRecords(2, 'SELECT COUNT(*) AS COUNTER FROM GAGES WHERE COMPANY = '' & sCompanyName & ''') then

iCount = tdFieldbyNameAsInteger(2, 'COUNTER')

End If

ShowMessage('Entreprise : ' & sCompanyName & Chr(13) &

'Nombre de jauges : ' & IntToStr(iCount))

tdNext(1)

End While

End If |