current_alarm(?At, 
?:Callable, ?Id, ?Status)done if the alarm has been called, next if it 
is the next to be fired and scheduled otherwise.
current_alarm(?At, 
?:Callable, ?Id, ?Status)done if the alarm has been called, next if it 
is the next to be fired and scheduled otherwise.