FUNCTION 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