tdEOF

Structure

tdEOF(iDataSet)

Type

Fonction

Description

Cette fonction renvoie « 1 » ou « 0 », selon que l'ensemble de données sélectionné se trouve ou non à la fin du fichier (dernier enregistrement).

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 |