$FUNCNAME$
   __FLEDIT()
$CATEGORY$
   Array, Database
$SUMMARY$
   Select the appointed elements from the array of a DbStruct() type.
   $LANG_RU$
       DBStruct() ,  
.
   $LANG_UA$
       DBStruct()) ,  γ 
.
$SYNTAX$
  __Fledit( <aSrc>, <aList>) --> <aSelected>
$ARGUMENTS$
   <aSrc> The initial array keeping all possible field's descriptions.
   <aList> The Array keeping all fields to check.

   $LANG_RU$
   <aSrc> ,     .
   <aList> ,    .

   $LANG_UA$
   <aSrc> ,   ͳ ӳ ׳  ̳.
   <aList> ,   ͳ   ׳.

$RETURNS$
   The Array keeping all selectde field's descriptions.
   $LANG_RU$
   ,   .
   $LANG_UA$
   ,   ͳ ׳ĳγ .
$DESCRIPTION$
   __FlEdit() searches each element of <aList>[1] (DBS_NAME) in <aSrc>.
   If the element is found, this element of <aSrs> is added to
destination
   array <aSelected>. According of other subelements (DBS_TYPE, DBS_LEN,
   DBS_DEC) isn't checked.
   $LANG_RU$
   __FlEdit       <aList>
     <aSrc>   (<aList>[1] - DBS_NAME).  
,
      <aSrc>    
   <aSelected>.    (DBS_TYPE, DBS_LEN,
   DBS_DEC)  .
   $LANG_UA$
   __FlEdit  ׳׳γ    <aList>  ׳
   <aSrc>  ' (<aList>[1] - DBS_NAME).   , 
   ׳׳  <aSrc>    <aSelected>.
   ׳γ  г-Գ (DBS_TYPE, DBS_LEN, DBS_DEC)
    ׳Ѻ.
$EXAMPLES$
   aList:=GetUserList()  //Get user's defined field's list
   aRealFlds:=__FlEdit(DbStruct(), aList) //and select only correct
$PECULIARITIES$
   __Fledit is undocumented in xClipper.
   $LANG_RU$
    __Fledit   (  )  xClipper.
   $LANG_UA$
   ó __Fledit   (  պ)  xClipper.
$PLATFORMS$
   No dependies of platform.
   $LANG_RU$
      
   $LANG_UA$
     ׳ .
$CONFORMS$
$SEEALSO$
DBSTRUCT(),
$AUTHOR$
   Yevgen Bondar
   $LANG_RU$
    
   $LANG_UA$
    
$END$
