Mthroutine Name(uGetVisualList) Options(*REDEFINE)
#uList <= #MyList
Endroutine