proc cas;
/* Tentative de création avec un chemin volontairement faux */
table.addCaslib result=r /
name="MauvaiseCible",
dataSource={srcType="PATH"},
path="/tmp/chemin_inexistant_123",
session=true;
/* ÉTAPE CRITIQUE : Vérification immédiate de la connexion */
/* On tente de lister 0 fichier. Si le dossier n'existe pas, cela génère une erreur. */
table.fileInfo status=rc / caslib="MauvaiseCible" limit=0;
/* Gestion de l'erreur */
if (rc.severity > 0) then do;
print "ALERTE : La Caslib a été définie mais le chemin est inaccessible !";
print "Code erreur : " rc.statusCode;
/* Suppression préventive de la caslib invalide */
table.dropCaslib / caslib="MauvaiseCible";
end;
else do;
print "SUCCÈS : La Caslib est valide et accessible.";
end;
quit;
table