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

Previous  Top  Next

This method sets the TotalValue property to the value passed in as pTotalValue.  This can be set to adjust the total value of a process.

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

 If SkipQ1

   ITP.SetTotalValue(Records(Q2))

 Else

   Loop I = 1 To Records(Q1)

     Get(Q1,I)

     !! Do something

     ITP.Update

   End

 End

 Loop I = 1 To Records(Q2)

   Get(Q2,I)

   !! Do something

   ITP.Update

 End

 ITP.Kill

See also:

TotalValue
AddToCurrentValue
Init