Mise à jour de contextes de serveur pour des bibliothèques SAS

Attention : Ce code nécessite des droits administrateur.

Ce script se connecte à un serveur de métadonnées SAS^© 9. Il identifie d'abord l'URI d'un contexte de serveur d'applications spécifique (ici, 'SASSTP'). Ensuite, il recherche toutes les bibliothèques SAS^© correspondant à une requête de métadonnées. Pour chaque bibliothèque trouvée, il ajoute le contexte de serveur à sa liste de 'DeployedComponents'. Le script inclut des vérifications pour s'assurer que le contexte et les bibliothèques existent avant de procéder à la mise à jour. Important : ce script utilise les fonctions de métadonnées de SAS^© 9 et n'est pas compatible avec SAS^© Viya^™ 4. La requête pour trouver les bibliothèques (`libobj`) semble contenir une erreur de syntaxe (`@code_sas^©_json/RFValid.json contains '.'`) et devrait probablement cibler un attribut comme `@Name`.

Analyse des données

Type : MIXTE

Le script n'utilise pas de données au sens traditionnel (tables SAS). Il lit et modifie des objets (métadonnées) directement sur le serveur de métadonnées SAS. Les 'données' sources sont les définitions des contextes de serveur et des bibliothèques SAS stockées dans les métadonnées.

1 Bloc de code

OPTIONS

Explication :
Ce bloc configure les paramètres de connexion au serveur de métadonnées SAS 9 (hôte, port, identifiants, repository). Ces options sont nécessaires pour que les fonctions de métadonnées puissent interagir avec le serveur. Ce type de connexion est obsolète dans SAS Viya 4.

Copié !

1	options
2	metaserver="meta.demo.sas.com"
3	metaport=8561
4	metauser="sasadm @saspw"
5	metapass="password"
6	metarepository=Foundation
7	metaprotocol=Bridge;

2 Bloc de code

DATA STEP

Explication :
Ce DATA STEP _NULL_ (ne crée pas de table) est le cœur du programme. Il utilise des fonctions de métadonnées SAS 9. D'abord, il utilise `metadata_resolve` pour trouver l'URI d'un contexte de serveur applicatif ('SASSTP'). Si le contexte est trouvé, il exécute une seconde requête pour trouver des bibliothèques SAS. Pour chaque bibliothèque trouvée, il utilise `metadata_setassn` pour lui associer le contexte de serveur. Des messages d'erreur sont émis et le programme s'arrête si le contexte ou les bibliothèques ne sont pas trouvés.

Copié !

1	DATA _null_;
2
3	/* Initialize variables. */
4
5	LENGTH type id app_uri lib_uri $ 50;
6	call missing(of _character_);
7
8	/* Define query for the Application Server Context */
9	/* to add to the libraries and search for it. */
10
11	appobj="omsobj:ServerContext? @Name='SASSTP'";
12	app_count=metadata_resolve(appobj,type,id);
13
14	/* If no context matches this query, stop the program with an error. */
15
16	IF app_count <= 0 THEN DO;
17	put "ERROR: No application server context found matching query " appobj;
18	stop;
19	END;
20	ELSE DO;
21
22	/* Extract the URI of the context if it exists. */
23
24	rc=metadata_getnobj(appobj,1,app_uri);
25
26	/* Define the query for the libraries to be updated and search for them. */
27
28	libobj="omsobj:SASLibrary? @code_sas_json/RFValid.json contains '.'";
29	lib_count=metadata_resolve(libobj,type,id);
30
31	/* If no libraries match the query, stop the program with an error. */
32	IF lib_count <= 0 THEN DO;
33	put "ERROR: No libraries found matching query " libobj;
34	stop;
35	END;
36
37	/* If libraries are found, for each one append */
38	/* the context to its list of associated contexts. */
39
40	ELSE DO n=1 to lib_count;
41	rc=metadata_getnobj(libobj,1,lib_uri);
42	rc=metadata_setassn(lib_uri,"DeployedComponents","Append",app_uri);
43	END;
44	END;
45	RUN;

Ce matériel est fourni "tel quel" par We Are Cas. Il n'y a aucune garantie, expresse ou implicite, quant à la qualité marchande ou à l'adéquation à un usage particulier concernant le matériel ou le code contenu dans les présentes. We Are Cas n'est pas responsable des erreurs dans ce matériel tel qu'il existe maintenant ou existera, et We Are Cas ne fournit pas de support technique pour celui-ci.

Retour à la liste