Page History
...
Mthroutine Name(SetIcon)
Define_Map For(*INPUT) Class(#PRIM_MD.ListEditCurrentItem) Name(#iEditCurrentItem) Pass(*BY_REFERENCE)
Begin_Loop Using(#xDemoNumber) From(0) To(100)
Add_Entry To_List(#List)
#List.CurrentItem.Visible := #xDemoNumber.mod( 2 ) = 0
End_Loop
Endroutine