Condividi tramite


_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

Other Resources

API Library Construction