ibec_Progress

Displays a progress message.

function ibec_Progress(Mes : string): string;

Call ibec_Progress function to display a message. The Msg parameter is the message string that appears in the upper status panel of the SQL Editor or Script Editor. If you're executing an IBEBlock using the ibescript.exe tool the message will appear on the screen and will be included into log file .

 execute IBEBlock
 returns (table_name varchar(31), irecords integer)
 as
 begin
   for select rdb$relation_name
       from rdb$relations
       order by rdb$relation_name
       into :table_name
   do
   begin
     ibec_Progress('Counting records of ' || ibec_Trim(table_name));
     execute statement 'select count(*) from ' || ibec_Trim(table_name) into :irecords;
     suspend;
   end
 end