Process Status

$image\ebx_521005211.png$

rem ' Update process status

if tcb(13) then enter

id$ = Option!.getOptionData("process_id")
task$ = Option!.getOptionData("description")
n = num(Option!.getOptionData("iterations"))

ms = num(Option!.getOptionData("milliseconds"))

Progress! = bbjapi().getGroupNamespace()
Progress!.setValue("+process_task",id$+"^C^"+task$+"^CNC^"+str(n)+"^")

for i=1 to n
wait ms/1000
Progress!.setValue("+process_task",id$+"^U^"+str(i)+"^")
next i

Progress!.setValue("+process_task",id$+"^D^")

release

______________________________________________________________________________________

Copyright BASIS International Ltd. BARISTA®, AddonSoftware®, BBj®, Visual PRO/5®, PRO/5®, and BBx® are registered trademarks.