Tag Archives: add

SP_GENED

Posted on by vivaclipper 
GENED()

  Short:
  ------
  GENED() Generic dbf editing screen

  Returns:
  --------
  Nothing

  Syntax:
  -------
  GENED([lModify],[nTop,nBottom],[aFields,aDesc])

  Description:
  ------------
  Edit ( [lModify] =.f.) current record (DEFAULT) or

  Add  ( [lModify] =.t.) new record.

  Window top [nTop] and bottom [nBottom] default to
  centered.

  Use optional [aFields] (field names) and [aDesc]
  (field descriptions), or use all fields in dbf.

  Examples:
  ---------
   use Customer index Customer

   Gened(.f.,2,20)   // edit

  Notes:
  -------
  Allows memo editing (multiple memo fields)
  New to 3.5: memo editing is done to a memvar. Changes aren't
  saved unless the whole record is saved. A global [F3=Memo] key
  lets you pick which memo to edit.

  Source:
  -------
  S_GENED.PRG

 

SP_EDITDB

Posted on by vivaclipper 
EDITDB()
  Short:
  ------
  EDITDB() Customized database browser with edit/add/search
  capabilities

  Returns:
  --------
  Nothing

  Syntax:
  -------
  EDITDB([lModify],[aFields,aFieldDesc],[lBypassAsk],[lBypassLeave],;
         [nLock])

  Description:
  ------------
  Customized browse interface allowing searching, goto,
  vertical view and (if <lModify> is True) add edit delete.

  Also allows limiting of fields viewed.

  [lModify] allows add-edit-delete or not.

  The two arrays [aFields, aFieldDesc] are of field
  names and field descriptions. Default is all fields, field names
  as descriptions.

  [lByPassAsk] allows bypass of the "BROWSE ALL/SELECT
  FIELDS" opening menu choice, and defaults to .f.

  [lByPassLeave] allows bypass of "Quit?" dialog. Just quits

  [nLock] number of columns to lock (default is 0)

  Examples:
  ---------
   USE CUSTOMER

   aFlds := {"FNAME","LNAME","MI"}
   aDesc := {"First","Last","Middle"}
   editdb(.t.,aFlds,aDesc)

  Notes:
  -------
  Allows record deletion, but does not pack. Does not
  'SET DELETED' one way or the other.

  Source:
  -------
  S_EDIT.PRG