18.08.2013 Views

(SYSLIB) Programming Reference Manual - Public Support Login ...

(SYSLIB) Programming Reference Manual - Public Support Login ...

(SYSLIB) Programming Reference Manual - Public Support Login ...

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.

22.2.2. Calling Sequence<br />

SFDT$–System Standard Format Date and Time<br />

Calling programs need the following procedure declaration to call SFDT$:<br />

PROCEDURE STANDARD_DATE_TIME(%SFDT_PKT_ADDR: SFDT_PACKET)<br />

IMPORTED (‘external-name’);<br />

The external-name may be one of two entry points to SFDT$.<br />

SFDT$P This entry point uses the relocatable version of SFDT$.<br />

SFDT$PG This entry point uses the common bank version of SFDT$.<br />

The type definitions for SFDT_BUFFER and SFDT_PACKET, the initialization procedure<br />

SFDT_INITIALIZE, and the procedure definition for STANDARD_DATE_TIME are available<br />

in elements SFDT$D and SFDT$DG in the <strong>SYSLIB</strong> file SYS$LIB$*<strong>SYSLIB</strong>. Element<br />

SFDT$D contains the definitions to call the relocatable version of SFDT$, and SFDT$DG<br />

contains the definitions to call the common bank version of SFDT$.<br />

These elements are obtained with the COPY statement as follows:<br />

COPY(‘elt-name’);<br />

where elt-name may be SFDT$D or SFDT$DG.<br />

SFDT$ Calling Format<br />

STANDARD_DATE_TIME(%pkt);<br />

where pkt is the identifier of a data entity of type SFDT_PACKET.<br />

Returns<br />

If no error occurs, SFDT$ creates the ASCII date/time format string and returns it in the<br />

buffer specified by the calling program.<br />

SFDT$ returns the following variables to the calling program:<br />

SFDT_CHAR_OFFSET<br />

Position in word of the last nonspace character of the ASCII string (0, 1, 2, or 3).<br />

SFDT_NUMBER_CHAR<br />

The number of characters in the string.<br />

7833 1733–004 22–11

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

Saved successfully!

Ooh no, something went wrong!