@ tefigel

#
#   Return string of columns for function Add<METATABLE>Row.
#   Checks for autoincrementing columns (see column_auto) and for
#   relations (see column_rel below).
#
interface(METATABLE)

globset ret_string=

for MCOL=~list_contents(METATABLE)

   set column_auto=MetaColInfo(MCOL,autoincr)

   if column_auto=true
      set  column_id=Nothing
   else
      set  column_id=MetaColInfo(MCOL,id)
      set column_rel=MetaColInfo(MCOL,relation)

      if column_rel#void
	 ungroup(column_rel,.,rel_id,rel_key,rel_table)
         set column_id=parent&rel_table&RowBy&rel_id(0)
      endif

   endif

   set ret_string=ret_string&column_id

   if MCOL_COUNTER<MCOL_LOOPS
      set ret_string=ret_string, 
   endif

endfor

retvalue=ret_string