SP_ED_G_PIC

ED_G_PIC()

  Short:
  ------
  ED_G_PIC() Returns appropriate picture for getting a field

  Returns:
  --------
  <cPicture> picture clause

  Syntax:
  -------
  ED_G_PIC(cFieldName)

  Description:
  ------------
  Returns a picture clause appropriate for editing
  field where <cFieldName> is the name of the field. Applicable to
  Character and numeric fields

  Examples:
  ---------
   @10,10 GET AMOUNT PICT ED_G_PIC("AMOUNT")
   * would return a picture of "9999.99" depending
   * on length and decimals

  Source:
  -------
  S_EDPICT.PRG

 

SP_AFIELDSX

AFIELDSX()

  Short:
  ------
  AFIELDSX() Returns an array of field names for current dbf

  Returns:
  --------
  <aFields> => an array of fields for the current dbf

  Syntax:
  -------
  AFIELDSX()

  Description:
  ------------
  AFIELDSX() creates and returns an array of field names
  from the current dbf. Unlike AFIELDS(), it does not
  require an initialized array beforehand.

  Examples:
  ---------

   aArray := AFIELDSX()
   nSelect :=   mchoice( aArray ,10,10,20,20,"Pick Field")
   if  nSelect > 0
     ?"Field "+aArray[nSelect]+" was selected"
   endif

  Source:
  -------
  S_AFTYPE.PRG

 

SP_AFIELDSTYPE

AFIELDSTYPE()

  Short:
  ------
  AFIELDSTYPE() Returns an array of field names of particular type

  Returns:
  --------
  <aFields> => an array of field names of the selected type(s)

  Syntax:
  -------
  AFIELDSTYPE(cTypes)

  Description:
  ------------
  <cTypes> is a string containing one or more field
  type symbols

  Valid symbols are:

       C   character    N   numeric
       L   logical      D    date          M   memo

  If no fields of the specified type(s) exist, an empty
  array will be returned.

  Examples:
  ---------
   aMemos := AFIELDSTYPE("M")  // an array of memo fields
   aNums  := AFIELDSTYPE("N")  // an array of numeric fields
   aNums  := AFIELDSTYPE("LD")  // an array of date &logical fields

  Source:
  -------
  S_AFTYPE.PRG

Online resources provided by: http://www.ousob.com — NG 2 HTML conversion by Dave Pearson