/***************************************************/
      /*** Sample program to pull any TextStore object ***/
      /*** from metadata that contains setinit info.   ***/
      /***                                             ***/
      /*** IMPORTANT:  Before running this code, be    ***/
      /***        sure you modify the initial OPTIONS  ***/
      /***        statement to provide values that are ***/
      /***        appropriate for your metadata server ***/
      /*** IMPORTANT: edit the FILENAME statement to   ***/
      /***        reference a valid path where your    ***/
      /***        USERID has rights to create a file.  ***/
      /*** Example Unix path: "/home/sasinstall/METASETINIT.XML"; ***/
      /***                                             ***/
      /*** RESULT: This code creates a METASETINIT.XML ***/
      /***      file with *all* the SID files/setinits ***/
      /***      currently in Metadata.                 ***/
      /***************************************************/

options metaserver="your.metadata.server.host"  /*change to your metadata server name*/
        metaport=8561              /* if needed, change port  */
	metauser="sasadm@saspw"    /* if needed, change user  */
	metapass="sasadmpw"        /* change password */
	metarepository="Foundation"
	metaprotocol=BRIDGE;

filename setinit "c:\metasetinit.xml";  /* if needed, change drive and add folder(s) */
               /* Your USERID must have rights to create files in folder specified */
proc metadata in=
"<GetMetadataObjects>
   <Reposid>$METAREPOSITORY</Reposid>
   <Type>TextStore</Type>
   <NS>SAS</NS>
   <Flags>2441</Flags>
   <Options>
      <XMLSelect search=""*[@Name ? 'setinit']""/>
   </Options>
 </GetMetadataObjects>"  out=setinit;
run;