28 lines
655 B
SAS
28 lines
655 B
SAS
/**
|
|
@file
|
|
@brief Fetches directories to facilitate configuration
|
|
@details The service can also be invoked using the following URL param:
|
|
|
|
@li &parent= (parent path)
|
|
|
|
<h4> SAS Macros </h4>
|
|
@li mp_dirlist.sas
|
|
|
|
@version 9.2
|
|
@author 4GL Apps Ltd
|
|
@copyright 4GL Apps Ltd. This code may only be used within Data Controller
|
|
and may not be re-distributed or re-sold without the express permission of
|
|
4GL Apps Ltd.
|
|
|
|
**/
|
|
|
|
%global parent;
|
|
/* if no flavour is specified, default to root */
|
|
%let parent=%sysfunc(coalescec(&parent,/));
|
|
|
|
%mp_dirlist(path=&parent,outds=dirlist, maxdepth=2)
|
|
|
|
%webout(OPEN)
|
|
%webout(OBJ,dirlist)
|
|
%webout(CLOSE)
|