Intermec Janus 2010 Reference Manual page 236

KEYCLICK.ADA
else
Put_Line ("Enable Keyclick error:");
im_message(status_code);
New_Line;
end if;
end keyclick;
B-6