tdFieldByNameAsDateTime

Structure

tdFieldByNameAsDateTime(iDataSet, sFieldName)

Type

Fonction

Description

Cette fonction récupère la valeur du champ désigné par sFieldName sous forme de date/heure pour l'ensemble de données sélectionné ; elle ne s'applique qu'aux champs de type date/heure. Remarque : la valeur renvoyée est en réalité une valeur de type float, tout comme celle qui serait renvoyée par un ensemble de données Delphi via FieldbyName('MyField').AsDateTime.

Paramètres : 2

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* ».

sFieldName=nom du champ à récupérer.

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 MAX(SERVICE_DATE) AS MAX_SERVICE_DATE FROM GAGES WHERE COMPANY = '' & sCompanyName & ''') then

fMaxDate = tdFieldbyNameAsDateTime(2, 'MAX_SERVICE_DATE')

End If

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

'Date de mise en service du dernier appareil de mesure : ' & DateToStr(fMaxDate))

tdNext(1)

End While

End If |