INIT:
   datcl=loadclass('sashelp.fsp.
                    datast_m.class');
   datid=instance(datcl);
   veccl=loadclass('sashelp.
                    fsp.dsdvec.class');
   vecid=instance(veccl);