Intermec Janus 2010 Reference Manual page 168

im_standby_wait
Example
With System, Text_IO, Intrmecd_IO, Intrmecp_IO;
Use System, Text_IO, Intrmecd_IO, Intrmecp_IO;
procedure standby Is
status : System.Word;
begin
-- RWTSR must be installed for this to work correctly
Put_Line ("Start waiting for 5 seconds");
status := im_standby_wait (5000);
Put_Line ("Done waiting for 5 seconds");
end standby;
3-128