| Date: | Tue, 22 Jan 2002 18:22:30 +0100 |
| Reply-To: | Marcin S³omka <marcin.slomka@POLKOMTEL.COM.PL> |
| Sender: | "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU> |
| From: | Marcin S³omka <marcin.slomka@POLKOMTEL.COM.PL> |
| Subject: | SCL question |
| Content-Type: | text/plain; charset="iso-8859-2" |
|---|
Hi all,
here is a piece of code from sas help which I can not run just by
copy/paste method :o))
The problem is the lack of matabase on my local environmental list. How can
I initalize the
object of type sashelp.mb.metabase to have an access to repositories and all
registered objects ???
Thanks in advance for any help,
regards,
Marcin
"
import sashelp.mb;
dcl compcols ccid;
dcl resenv resid;
dcl metabase mbid;
length rc mbrc 8 mbmsg $80;
init:
/*Create the metabase and compcols class. */
ccid = _new_ compcols();
resid = _new_ resenv ();
mbid = getnitemn(envlist('L'),'METABASE');
/* Dump this list to see the format of what */
/* the computed column list should look like. */
exprlst = makelist();
rc = fillist('CATALOG','sashelp.slist.c9.slist',exprlst);
/* Open repository to update for computed column. */
call send(mbid,'_OPEN_',mbrc,mbmsg,'SASUSER');
dsname = 'SASHELP.PRDSALE';
name = 'COMPCC';
label = 'This is a computed column label';
format = 'DOLLAR12.2';
informat = ' ';
length = 8;
type = 'N';
mbname = 'SASUSER';
value = ' ';
editflag = 0;
call send(ccid,'_register_Computed_',mbid,dsname,
name,exprlst,label,format,informat,length,type,mbname,
value,editflag);
ccid._term();
mbid._term();
resid._term();
return;
|