FUNCTION DAYSIN()

  Short:
  ------
  DAYSIN() Calculates number of days in a month

  Returns:
  --------
  <nDays> => days in month of target date

  Syntax:
  -------
  DAYSIN(dTarget)

  Description:
  ------------
  Returns # of days in month in which <dTarget> falls

  Examples:
  ---------
   dDate    := ctod("10/15/89")

   nDimonth := DAYSIN(dDate)  // (returns 31)

  Source:
  -------
  S_DAYSIN.PRG