rRecno em wsubtdnTView.prg