3833 +/*%STOPLASRSERVER(HOST=&AL_LASRHOST., PORT=&AL_LASRPORT., SIGNER=&AL_SIGNER.);*/ NOTE: %INCLUDE (level 1) ending. 3834 %AutoLoadMain; MLOGIC(AUTOLOADMAIN): Beginning execution. MPRINT(AUTOLOADMAIN): options validvarname=ANY validmemname=EXTEND; MLOGIC(SETOSSLASH): Beginning execution. MLOGIC(SETOSSLASH): %GLOBAL OSSLASH MLOGIC(SETOSSLASH): %IF condition (( &SYSSCP. eq WIN ) or ( &SYSSCP. eq DNTHOST )) is FALSE MLOGIC(SETOSSLASH): %LET (variable name is OSSLASH) MLOGIC(SETOSSLASH): Ending execution. MPRINT(AUTOLOADMAIN): ; MLOGIC(METADATAEXTENSIONVALUE): Beginning execution. MLOGIC(METADATAEXTENSIONVALUE): Parameter TYPE has value SASLibrary MLOGIC(METADATAEXTENSIONVALUE): Parameter NAME has value Environment Manager Data Mart LASR MLOGIC(METADATAEXTENSIONVALUE): Parameter KEY has value VA.AutoLoad.Location MLOGIC(METADATAEXTENSIONVALUE): Parameter RETVAR has value AL_AUTOLOAD_DIR MLOGIC(METADATAEXTENSIONVALUE): Parameter VALUE has value MLOGIC(METADATAEXTENSIONVALUE): %IF condition ("&TYPE." eq "") is FALSE MLOGIC(METADATAEXTENSIONVALUE): %IF condition ("&NAME." eq "") is FALSE MLOGIC(METADATAEXTENSIONVALUE): %IF condition ("&KEY." eq "") is FALSE MLOGIC(METADATAEXTENSIONVALUE): %GLOBAL &RETVAR. MLOGIC(METADATAEXTENSIONVALUE): %LET (variable name is AL_AUTOLOAD_DIR) MLOGIC(METADATAEXTENSIONVALUE): %LET (variable name is QUERY) MLOGIC(SETOPTION): Beginning execution. MLOGIC(SETOPTION): Parameter STATE has value off MLOGIC(SETOPTION): Parameter OPTION has value notes MLOGIC(SETOPTION): %IF condition ("&STATE." eq "") is FALSE MLOGIC(SETOPTION): %IF condition ("&OPTION." eq "") is FALSE MLOGIC(SETOPTION): %LET (variable name is RESTOREVAR) MLOGIC(SETOPTION): %GLOBAL &RESTOREVAR. MLOGIC(SETOPTION): %LET (variable name is STATE) MLOGIC(SETOPTION): %IF condition ( "&STATE." eq "RESTORE" ) is FALSE MLOGIC(SETOPTION): %LET (variable name is RESTORE_notes) MLOGIC(SETOPTION): %IF condition ( "&STATE." eq "ON" ) is FALSE MLOGIC(SETOPTION): %IF condition ( "&STATE." eq "OFF" ) is TRUE MPRINT(SETOPTION): options nonotes MLOGIC(SETOPTION): Ending execution. MPRINT(METADATAEXTENSIONVALUE): ; 71 The SAS System 14:00 Monday, February 6, 2017 MPRINT(METADATAEXTENSIONVALUE): data _null_; MPRINT(METADATAEXTENSIONVALUE): length objuri assocuri value tmp key $256 associd $17 type $32 ; MPRINT(METADATAEXTENSIONVALUE): call missing(objuri,assocuri,tmp,type); MPRINT(METADATAEXTENSIONVALUE): key="VA.AutoLoad.Location"; MPRINT(METADATAEXTENSIONVALUE): nobj=1; MPRINT(METADATAEXTENSIONVALUE): objrc=metadata_getnobj("omsobj:SASLibrary?@Name='Environment Manager Data Mart LASR'",nobj,objuri); MPRINT(METADATAEXTENSIONVALUE): if (objrc <1) then do; MPRINT(METADATAEXTENSIONVALUE): put "No matching SASLibrary objects found. (RC=" objrc ")"; MPRINT(METADATAEXTENSIONVALUE): stop; MPRINT(METADATAEXTENSIONVALUE): end; MPRINT(METADATAEXTENSIONVALUE): n=1; MPRINT(METADATAEXTENSIONVALUE): assocrc=metadata_getnasn(objuri,'Extensions',n, assocuri); MPRINT(METADATAEXTENSIONVALUE): do while (assocrc>0); MPRINT(METADATAEXTENSIONVALUE): call missing(value,associd); MPRINT(METADATAEXTENSIONVALUE): rc=metadata_resolve(assocuri,type,associd); MPRINT(METADATAEXTENSIONVALUE): if (type='Extension') then do; MPRINT(METADATAEXTENSIONVALUE): rc=metadata_getattr(assocuri,'Name',tmp); MPRINT(METADATAEXTENSIONVALUE): if (tmp = key) then do; MPRINT(METADATAEXTENSIONVALUE): rc=metadata_getattr(assocuri,'Value',value); MPRINT(METADATAEXTENSIONVALUE): call symput("AL_AUTOLOAD_DIR",ktrim(value)); MPRINT(METADATAEXTENSIONVALUE): put KEY "=" VALUE; MPRINT(METADATAEXTENSIONVALUE): end; MPRINT(METADATAEXTENSIONVALUE): end; MPRINT(METADATAEXTENSIONVALUE): n=n+1; MPRINT(METADATAEXTENSIONVALUE): assocrc=metadata_getnasn(objuri,'Extensions',n,assocuri); MPRINT(METADATAEXTENSIONVALUE): end; MPRINT(METADATAEXTENSIONVALUE): run; No matching SASLibrary objects found. (RC=-4 ) MLOGIC(SETOPTION): Beginning execution. MLOGIC(SETOPTION): Parameter STATE has value restore MLOGIC(SETOPTION): Parameter OPTION has value notes MLOGIC(SETOPTION): %IF condition ("&STATE." eq "") is FALSE MLOGIC(SETOPTION): %IF condition ("&OPTION." eq "") is FALSE MLOGIC(SETOPTION): %LET (variable name is RESTOREVAR) MLOGIC(SETOPTION): %GLOBAL &RESTOREVAR. MLOGIC(SETOPTION): %LET (variable name is STATE) MLOGIC(SETOPTION): %IF condition ( "&STATE." eq "RESTORE" ) is TRUE MPRINT(SETOPTION): options NOTES; MLOGIC(SETOPTION): Ending execution. MPRINT(METADATAEXTENSIONVALUE): ; MLOGIC(METADATAEXTENSIONVALUE): Ending execution. MPRINT(AUTOLOADMAIN): ; MLOGIC(VALIDATEAUTOLOADFOLDERSTRUCTURE): Beginning execution. MLOGIC(VALIDATEAUTOLOADFOLDERSTRUCTURE): Parameter ROOTDIR has value MISSING MLOGIC(VALIDATEAUTOLOADFOLDERSTRUCTURE): %GLOBAL LASTSTEPRC MLOGIC(VALIDATEAUTOLOADFOLDERSTRUCTURE): %LET (variable name is LASTSTEPRC) MLOGIC(VALIDATEAUTOLOADFOLDERSTRUCTURE): %LET (variable name is LOGSDIR) MLOGIC(VALIDATEAUTOLOADFOLDERSTRUCTURE): %LET (variable name is APNDDIR) MLOGIC(VALIDATEAUTOLOADFOLDERSTRUCTURE): %LET (variable name is UNLDDIR) MLOGIC(VALIDATEAUTOLOADFOLDERSTRUCTURE): %LET (variable name is FMTSDIR) MLOGIC(CHECKFOLDEREXISTENCE): Beginning execution. MLOGIC(CHECKFOLDEREXISTENCE): Parameter DIR has value MISSING MLOGIC(CHECKFOLDEREXISTENCE): %GLOBAL LASTSTEPRC MLOGIC(CHECKFOLDEREXISTENCE): %IF condition ( %SYSFUNC(FILEEXIST("&DIR.")) eq 0 ) is TRUE MLOGIC(MSG): Beginning execution. MLOGIC(MSG): Parameter TYPE has value ERROR MLOGIC(MSG): Parameter MSG has value LASR Auto Load directory MISSING does not exist.