12.07.2015 Views

Intel® Fortran Libraries Reference

Intel® Fortran Libraries Reference

Intel® Fortran Libraries Reference

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

2 Intel <strong>Fortran</strong> <strong>Libraries</strong> <strong>Reference</strong>Syntaxresult = NLSFormatTime (outstr [, intime ] [, flags ])outstr(Output) Character*(*). String containing the correctly formatted time for the current locale. Ifoutstr is longer than the formatted time, it is blank-padded.intime(Optional; input) INTEGER(4). If specified, time to be formatted for the current locale. Must bean integer time such as the packed time created with PACKTIMEQQ. If you omit intime, thecurrent system time is formatted and returned in outstr.flags(Optional; input) INTEGER(4). If specified, modifies the time conversion. If you omit flags, theflag NLS$Normal is used. Available values (defined in IFNLS.F90) are:• NLS$Normal – No special formatting• NLS$NoUserOverride – Do not use user overrides• NLS$NoMinutesOrSeconds – Do not return minutes or seconds• NLS$NoSeconds – Do not return seconds• NLS$NoTimeMarker – Do not add a time marker string• NLS$Force24HourFormat – Return string in 24 hour formatResults:The result type is INTEGER(4). The result is the number of characters written to outstr (bytes arecounted, not multibyte characters). If an error occurs, the result is one of the following negativevalues:• NLS$ErrorInsufficentBuffer – outstr buffer is too small• NLS$ErrorInvalidFlags – flags has an illegal value• NLS$ErrorInvalidInput – intime has an illegal valueCompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIBSee Also: “NLSFormatCurrency”, “NLSFormatDate”, “NLSFormatNumber”ExampleUSE IFNLSINTEGER(4) iCHARACTER(20) stri = NLSFORMATTIME(str, NLS$NORMAL)! 11:38:28 PMi = NLSFORMATTIME(str, NLS$NOMINUTESORSECONDS) ! 11 PM2-226

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!