mirror of
https://github.com/yabwon/SAS_PACKAGES.git
synced 2026-01-08 07:20:06 +00:00
version 2.1
recompiled with new framework setup
This commit is contained in:
29
packages/SQLinDS/000_libname/dssql.sas
Normal file
29
packages/SQLinDS/000_libname/dssql.sas
Normal file
@@ -0,0 +1,29 @@
|
||||
/*** HELP START ***/
|
||||
|
||||
/* >>> dsSQL library: <<<
|
||||
*
|
||||
* The dsSQL library stores temporary views
|
||||
* generated during the %SQL() macro execution.
|
||||
* If possible a subdirectory of WORK is created as:
|
||||
|
||||
LIBNAME dsSQL BASE "%sysfunc(pathname(WORK))/dsSQLtmp";
|
||||
|
||||
* if not possible then redirects to WORK as:
|
||||
|
||||
LIBNAME dsSQL BASE "%sysfunc(pathname(WORK))";
|
||||
|
||||
**/
|
||||
|
||||
/*** HELP END ***/
|
||||
|
||||
data _null_;
|
||||
length rc0 $ 32767 rc1 rc2 8;
|
||||
rc0 = DCREATE("dsSQLtmp", "%sysfunc(pathname(work))/" );
|
||||
rc1 = LIBNAME("dsSQL", "%sysfunc(pathname(work))/dsSQLtmp", "BASE");
|
||||
rc2 = LIBREF ("dsSQL" );
|
||||
if rc2 NE 0 then
|
||||
rc1 = LIBNAME("dsSQL", "%sysfunc(pathname(work))", "BASE");
|
||||
run;
|
||||
|
||||
/* list details about the library in the log */
|
||||
libname dsSQL LIST;
|
||||
Reference in New Issue
Block a user