_RetDateStr( ) API Library Routine
Sets the library return value to a date.
void _RetDateStr(char FAR *string)
char FAR *string; /* Date string. */
Remarks
Specify the date string in mm/dd/year format, in which the year may be either two or four digits.
For more information on how to create an API library and integrate it with Visual FoxPro, see Accessing the Visual FoxPro API.
Example
The following example converts a character string into a date data type and returns it to Visual FoxPro.
Visual FoxPro Code
SET LIBRARY TO RETDATES
? DATES("02/16/95") && returns date {02/16/95}
C Code
#include <pro_ext.h>
void FAR dates(ParamBlk FAR *parm)
{
MHANDLE mh;
char FAR *instring;
if ((mh = _AllocHand(parm->p[0].val.ev_length + 1)) == 0)
{
_Error(182); // "Insufficient memory"
}
_HLock(parm->p[0].val.ev_handle);
instring = _HandToPtr(parm->p[0].val.ev_handle);
instring[parm->p[0].val.ev_length] = '\0';
_RetDateStr(instring);
_HUnLock(parm->p[0].val.ev_handle);
}
FoxInfo myFoxInfo[] = {
{"DATES", (FPFI) dates, 1, "C"}
};
FoxTable _FoxTable = {
(FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo
};
See Also
Reference
_RetChar( ) API Library Routine
_RetCurrency( ) API Library Routine
_RetDateTimeStr( ) API Library Routine
_RetFloat( ) API Library Routine
_RetInt( ) API Library Routine
_RetLogical( ) API Library Routine
_RetVal( ) API Library Routine