Icetips Utilities Documentation 1/14/2012     Progress Class:  Update

Previous  Top  Next

This method is one of the 3 methods that you normally need to use along with Init and Kill.  This updates the progress bar and increments the CurrentValue by one (1)

Example:

ITP  ITProgressClass

Q1   Queue

F1     Long

     End

Q2   Queue

F2     Byte

     End

I    Long

 Code

 !! Queues are filled here.

 ITP.Init(?Progress1,Records(Q1),True)  !! Initialize with the number of records from Q1

 ITP.AddToCurrentValue(Records(Q2))     !! Add the number of records from Q2

 Loop I = 1 To Records(Q1)

   Get(Q1,I)

   !! Do something

   ITP.Update

 End

 Loop I = 1 To Records(Q2)

   Get(Q2,I)

   !! Do something

   ITP.Update

 End

 ITP.Kill

See also:

Init
Kill
CurrentValue