Das Skript verwendet keine klassischen tabellarischen SAS Daten. Es fragt das Metadaten-Repository über spezialisierte DATA Step Funktionen (metadata_resolve, metadata_getnobj, metadata_setassn) ab und modifiziert es.
1 Codeblock
OPTIONS
Erklärung : Konfiguration der Verbindungsparameter zum SAS 9 Metadaten-Server (Host, Port, Benutzer, Passwort, Repository).
Erklärung : DATA _NULL_ Schritt, der die Geschäftslogik enthält: Abfrage des Metadaten-Servers, um die URI des Anwendungsservers zu finden, Suche nach den Zielbibliotheken und Zuweisungsschleife (Hinzufügen der 'DeployedComponents'-Assoziation mit 'metadata_setassn').
Kopiert!
data _null_;
length type id app_uri lib_uri $ 50;
call missing(of _character_);
/* Recherche du contexte serveur SASSTP */
appobj="omsobj:ServerContext? @Name='SASSTP'";
app_count=metadata_resolve(appobj,type,id);
if app_count <= 0 then do;
put "ERROR: No application server context found matching query " appobj;
stop;
end;
else do;
/* Récupération de l'URI du contexte */
rc=metadata_getnobj(appobj,1,app_uri);
/* Recherche des bibliothèques cibles */
libobj="omsobj:SASLibrary? ..."; /* Partie corrompue dans l'entrée originale */
lib_count=metadata_resolve(libobj,type,id);
if lib_count <= 0 then do;
put "ERROR: No libraries found matching query " libobj;
stop;
end;
else do n=1 to lib_count;
/* Boucle de mise à jour des métadonnées */
rc=metadata_getnobj(libobj,1,lib_uri);
rc=metadata_setassn(lib_uri,"DeployedComponents","Append",app_uri);
end;
end;
run;
1
DATA _null_;
2
LENGTH type id app_uri lib_uri $ 50;
3
call missing(of _character_);
4
5
/* Recherche du contexte serveur SASSTP */
6
appobj="omsobj:ServerContext? @Name='SASSTP'";
7
app_count=metadata_resolve(appobj,type,id);
8
9
IF app_count <= 0 THENDO;
10
put "ERROR: No application server context found matching query " appobj;
11
stop;
12
END;
13
ELSEDO;
14
/* Récupération de l'URI du contexte */
15
rc=metadata_getnobj(appobj,1,app_uri);
16
17
/* Recherche des bibliothèques cibles */
18
libobj="omsobj:SASLibrary? ..."; /* Partie corrompue dans l'entrée originale */
19
lib_count=metadata_resolve(libobj,type,id);
20
21
IF lib_count <= 0 THENDO;
22
put "ERROR: No libraries found matching query " libobj;
Dieses Material wird von We Are Cas "wie besehen" zur Verfügung gestellt. Es gibt keine ausdrücklichen oder stillschweigenden Garantien hinsichtlich der Marktgängigkeit oder Eignung für einen bestimmten Zweck in Bezug auf die hierin enthaltenen Materialien oder Codes. We Are Cas ist nicht verantwortlich für Fehler in diesem Material, wie es jetzt existiert oder existieren wird, noch bietet We Are Cas technischen Support dafür an.
SAS und alle anderen Produkt- oder Dienstleistungsnamen von SAS Institute Inc. sind eingetragene Marken oder Marken von SAS Institute Inc. in den USA und anderen Ländern. ® zeigt die Registrierung in den USA an. WeAreCAS ist eine unabhängige Community-Site und nicht mit SAS Institute Inc. verbunden.
Diese Website verwendet technische und analytische Cookies, um Ihre Erfahrung zu verbessern.
Mehr erfahren.