tdFieldByNameAsDateTime

Struttura

tdFieldByNameAsDateTime(iDataSet, sFieldName)

Tipo

Funzione

Descrizione

Questa funzione recupera il valore del campo indicato da sFieldName come data e ora per il set di dati selezionato; è applicabile solo ai campi basati su data e ora. Nota: il valore restituito è in realtà un valore di tipo float, proprio come quello che verrebbe restituito da un dataset Delphi con FieldbyName('MyField').AsDateTime.

Parametri: 2

iDataSet = numero del set di dati; deve essere compreso tra 1 e 10. IndySoft mette a disposizione 10 set di dati accessibili tramite le funzioni di script personalizzate "td*".

sFieldName=nome del campo da recuperare.

Esempio

if tdDoSQLRecords(1, 'SELECT COMPANY_NAME FROM COMPANY ORDER BY COMPANY_NAME') then

tdFirst(1)

while (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('Azienda: ' & sCompanyName & Chr(13) &

'Data di messa in servizio più recente del calibro: ' & DateToStr(fMaxDate))

tdNext(1)

End While

End If |