anchor.diff:      {SumHours2,  SumMinutes2};
   totInt([#logWork{hours = Hours, minutes = Min}|Rest], {SumHours, SumMin}) ->
       totInt(Rest, {SumHours + Hours, SumMin + Min}).
  -
  
positive.code:     {reply, Result#workDesc.shortDesc, State};
  handle_call({getTime, Uid}, _From, State) ->
      Result = default(matchOne(#logTime{uid = Uid, _ = '_'}), #logTime{}),
      {reply, {Result#logTime.timeEstimate, Result#logTime.timeRemaining}, State};
  handle_call({saveWorkDesc, Uid, WorkDesc}, _From, State) ->
      TS = fun() ->
              mnesia:write(#workDesc{uid = Uid, shortDesc = WorkDesc})
  
negative.code:     LoggedWork = match(#logWork{userName = User, date = Date, _ = '_'}),
  
      Result = [{LW#logWork.uid, LW#logWork.hours, LW#logWork.minutes} ||
                   LW <- LoggedWork,
                   LW#logWork.hours =/= 0,   LW#logWork.hours =/= undefined,
                   LW#logWork.minutes =/= 0, LW#logWork.minutes =/= undefined],
      {reply, Result, State};
  handle_call({logWork, User, Uid, Date, Hours, Minutes}, _From, State) ->
      LoggedWork = #logWork{userName = User,
  