Date:         Fri, 7 Mar 2003 12:34:35 -0500
Reply-To:     Randy Herbison <RandyHerbison@WESTAT.COM>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         Randy Herbison <RandyHerbison@WESTAT.COM>
Subject:      Re: Suppressing table viewer pop-ups
Comments: To: Howard Lethbridge <howard.lethbridge@DEFRA.GSI.GOV.UK>
Content-Type: text/plain; charset="iso-8859-1"

Howard,

Since you are using SAS 6.12, I'm assuming you are using the data table
object.  If I remember correctly, the table viewer control was introduced in
version 8.1.

One way to override the default popup menu for the data table object is to
use an instance method.

*FRAME SCL;
init:
call
notify('dt','_setInstanceMethod','_POPUP','work.new.dtMethods.scl','POPUP');
return;

*POPUP Method SCL (work.new.dtMethods.scl);
dcl num rc;

POPUP: method plist 8 sel 8;
rc=insertc(plist,'Item1',-1);
rc=insertc(plist,'Item2',-1);
sel=popmenu(plist);
if sel=1 then  put 'Item 1 selected';
else if sel=2 then  put 'Item 2 selected';
else put 'No item selected';
rc=dellist(plist,'Y');
endmethod;
return;

RandyHerbison@westat.com

-----Original Message-----
From: Howard Lethbridge [mailto:howard.lethbridge@DEFRA.GSI.GOV.UK]
Sent: Friday, March 07, 2003 6:30 AM
To: SAS-L@LISTSERV.UGA.EDU
Subject: Suppressing table viewer pop-ups


Using SAS6.12 under Windows98/2000. Can anyone please tell me how to
suppress the standard pop-ups that are provided by the table editor (not
model), i.e. Clear Active Cell, ..., Print Preview. I expect to subclass
something and modify a method, but I just can't get it to work. All these
years and I'm still struggling with the data table (sigh).