/**********************************************************************/


  %servlib(finance.sas.library,finserv);
  %servlib(hr.sas.library,hrserv);
  %servlib(mkt.sas.library,mktserv);


/**********************************************************************/


  %servid(finserv,sasserv1);
  %servid(hrserv,sasserv1);
  %servid(mktserv,sasserv1);


/**********************************************************************/


  %shrmacs(user);
  %libdef(libref,mkt.sas.library);


/**********************************************************************/


  libname libref 'mkt.sas.library' server=sasserv1;


/**********************************************************************/


  %servlib(finlib,finserv);


/**********************************************************************/


  libname finlib 'finance.sas.library';


/**********************************************************************/


  %libdef(finlib);


/**********************************************************************/


  %servid(finserv,sasserv2);


/**********************************************************************/


  %shrmacs(server);
  %strtsrv(finserv);


/**********************************************************************/


  %shrmacs(oper);
  %operate(finserv);


/**********************************************************************/


  proc operate server=sasserv2;


/**********************************************************************/