SP_SATTPUT

SATTPUT()

  Short:
  ------
  SATTPUT() Stores current SuperLib color vars to COLORS.DBF

  Returns:
  --------
  <lSuccess> => Success, True of False

  Syntax:
  -------
  SATTPUT([cSetName])

  Description:
  ------------
  This stores the system color and interface variables
  described in SLS_*() in the colors dbf defined by SLSF_COLOR().

  [cSetName] is an optional name of a previously saved
  color set.

  If none is passed, the color set named "DEFAULT" is
  used.

  Examples:
  ---------
   SATTGET("THE BLUE SET")        // restore a previous definition
   SLS_POPCOL("+GR/N,+W/R,,,W/R")
                              // changes the sls_popcol() setting
   SATTPUT("THE BLUE SET # 2")    // stores the revised set in the dbf

  Notes:
  -------
  SETCOLORS() also allows storage of color sets.

  SATTPUT() attempts to re-used deleted records.

  Source:
  -------
  S_CLRFUN.PRG

 

SP_SATTPUSH

SATTPUSH()

  Short:
  ------
  SATTPUSH() Pushes the current SuperLib color vars

  Returns:
  --------
  Nil

  Syntax:
  -------
  SATTPUSH()

  Description:
  ------------
  This pushes the current system color and interface
  variables described in SLS_*() onto a stack, for later retrieval
  with SATTPOP().

  Examples:
  ---------
   SATTPUSH()
   SATTGET("THE BLUE SET")
   //...some code
   SATTPOP()  // restore the prior color set

  Source:
  -------
  S_CLRFUN.PRG

 

SP_SATTPOP

SATTPOP()

  Short:
  ------
  SATTPOP() Pops previously pushed SuperLib color vars

  Returns:
  --------
  Nil

  Syntax:
  -------
  SATTPOP()

  Description:
  ------------
  This pops a previously pushed set of SuperLib system
  interface

  variables described in SLS_*().

  Examples:
  ---------
   SATTPUSH()
   SATTGET("THE BLUE SET")
   //...some code
   SATTPOP()  // restore the prior color set

  Source:
  -------
  S_CLRFUN.PRG

 

SP_SATTPICKPUT

SATTPICKPUT()

  Short:
  ------
  SATTPICKPUT() Stores SuperLib color vars to selected record

  Returns:
  --------
  Nil

  Syntax:
  -------
  SATTPICKPUT()

  Description:
  ------------
  This writes the current system color and interface
  variables described in SLS_*() by selecting either an existing
  set name (contained in the colors dbf file described in
  SLSF_COLOR() ) to overwrite, or allowing a new set to be stored.

  Examples:
  ---------
   SATTPICKPUT()

  Notes:
  -------
  SATTPUT() and SETCOLORS() allow storage of color sets
  to disk.

  SATTPICKPUT() attempts to re-use deleted records.

  Source:
  -------
  S_CLRFUN.PRG

 

SP_SATTPICKDEL

SATTPICKDEL()

  Short:
  ------
  SATTPICKDEL() Picklist deletion of stored color var sets

  Returns:
  --------
  Nil

  Syntax:
  -------
  SATTPICKDEL()

  Description:
  ------------
  A Picklist of color sets, stored in the colors dbf
  file described in SLSF_COLOR(), is presented. Selected color set is
  deleted.

  Examples:
  ---------
   If MESSYN("Want to delete a stored color set?")
     SATTPICKDEL()
   Endif

  Source:
  -------
  S_CLRFUN.PRG

 

SP_QUIKREPORT

QUIKREPORT()

  Short:
  ------
  QUIKREPORT() Runtime pre-defined report printing module

  Returns:
  --------
  Nothing

  Syntax:
  -------
  QUIKREPORT([cReportName])

  Description:
  ------------
  Presents a picklist of pre-defined reports and prints
  the selected one.

  [cReportName] name of the report to run - picklist is
  bypassed. For batches.

  Examples:
  ---------
   QUIKREPORT('Quarterly Hog Count')

  Warnings:
  ----------
  Requires DBF and indexes to be open

  Source:
  -------
  R_QUIKR.PRG

 

 

SP_POPVYEAR

POPVYEAR()

  Short:
  ------
  POPVYEAR() Pops up a picklist of virtual years

  Returns:
  --------
  <nSelected> => selected year

  Syntax:
  -------
  POPVYEAR([cTitle])

  Description:
  ------------
  Pops up a virtual picklist of years, beginning with
  the current year. As user scrolls down, year increases. As user
  scrolls up, year decreases. Home key returns to the starting
  year.

  [cTitle]  is a popup box title, none by default

  Examples:
  ---------
   nYear := POPVYEAR("Pick a Year")

  Source:
  -------
  S_DPOPS.PRG

 

SP_POPVDATE

POPVDATE()

  Short:
  ------
  POPVDATE() Pops up a picklist of virtual dates

  Returns:
  --------
  <dSelected> => selected date

  Syntax:
  -------
  POPVDATE([dStart],[lWords],[cTitle])

  Description:
  ------------
  Pops up a virtual picklist of dates, beginning with
  the current date. As user scrolls down, date increases. As user
  scrolls up, date decreases. Page up/Page down move by 30 day
  increments. Ctrl-Pgup/Ctrl-Pgdn move by 365 day increments. Home
  key returns to the starting date.

  [dStart] the starting date, today's date by default

  [lWords] show dates as words, False by default

  [cTitle] popup box title, none by default

  Examples:
  ---------
   dDate := POPVDATE(date(),.t.,"Pick a Date")

  Source:
  -------
  S_DPOPS.PRG

SP_POPEX

POPEX()

  Short:
  ------
  POPEX() Pops up an achoice for a certain filespec

  Returns:
  --------
  <cFileName> => file name or "" for none

  Syntax:
  -------
  POPEX(cSkel,[cTitle])

  Description:
  ------------
  Pops up a picklist for all files matching the
  skeleton given as <cSkel>. i.e. "*.dbf"

  If a path is passed, the path is returned as part of
  the filename.

  Optional title string [cTitle] - displays at top of
  box

  Examples:
  ---------
   cOpendbf := POPEX("*.DBF")
       // => will return DBF name

   opendbf = POPEX("C:\FILES\*.DBF")
       // => will return "C:\FILES\" plus DBF name

  Source:
  -------
  S_POPEX.PRG

 

 

SP_FILEREAD

FILEREAD()

  Short:
  ------
  FILEREAD() Lists a text file of unlimited size

  Returns:
  --------
  nothing

  Syntax:
  -------
  FILEREAD([nTop,nLeft,nBottom,nRight],[cFileName],[cTitle],;
            [lSearch],[lMark])

  Description:
  ------------
  Lists text file [cFileName] of unlimited size in a
  programmer definable window of dimensions [nTop..nRight]

  Allows up down right left scrolling. Use this for
  reports or output sent to a disk file.

  If [cFileName]  is not passed, a box asks for the
  filespec and then allows a picklist of files of that spec. If
  [cFileName] is passed as a wildcard (i.e. "*.DOC"). a picklist
  of files of that spec is presented.

  If [nTop..nRight] are not passed, a default window of
  dimensions 2,2,22,78 is used.

  [cTitle] is an optional title. This overrides the
  default which is the file name.

  [lSearch] is a switch to allow text searches. Default
  is True

  [lMark] is a switch to allow block marking (with Copy
  to File or Print) Default is True.

  Examples:
  ---------
   REPORT FORM summary TO summary.txt
   FILEREAD(2,2,22,78,"SUMMARY.TXT","Summary File")

  Notes:
  -------
  Fileread() will use SET DEFAULT if no path is
  specified.

  Source:
  -------
  S_FILER.PRG