anchor.diff:  		  {#mc_sequence{name   = SeqName,
   				fields = FieldList}, Sline}|ColsEtc],
   		 Data) ->
  -    ?vlog("defloop -> "
  +    ?vlog("defloop(~w) -> "
   	  "[object_type(sequence_of),object_type(type),sequence(fieldList)]:"
   	  "~n   NameOfTable:  ~p"
   	  "~n   SeqName:      ~p"
  
positive.code: 	  "~n   Eline:        ~p"
  	  "~n   FieldList:    ~p"
  	  "~n   Sline:        ~p",
  	  [NameOfTable,SeqName,Taccess,Kind,Tstatus,
  	   Tindex,Tunits,Tline,
  	   NameOfEntry,TEline,IndexingInfo,Estatus,Eunits,Ref,Eline,
  	   FieldList,Sline]),
  
negative.code: 				fields = FieldList},
  		   Sline}|ColsEtc],
  		 Data) ->
      ?vlog("defloop(~w) -> "
  	  "[object_type(sequence_of),object_type(type,[1]),sequence]:"
  	  "~n   NameOfTable:  ~p"
  	  "~n   SeqName:      ~p"
  