Spalten in einer CAS-Tabelle indizieren

/* Préparation des données dans une session CAS */ proc cas; session casauto; /* Création d'une table Iris simulée */ data casuser.iris_data; infile datalines dsd; input SepalLength SepalWidth PetalLength PetalWidth Species $; datalines; 5.1,3.5,1.4,0.2,setosa 4.9,3.0,1.4,0.2,setosa 4.7,3.2,1.3,0.2,setosa 4.6,3.1,1.5,0.2,setosa 5.0,3.6,1.4,0.2,setosa 5.4,3.9,1.7,0.4,setosa 4.6,3.4,1.4,0.3,setosa 5.0,3.4,1.5,0.2,setosa 4.4,2.9,1.4,0.2,setosa 4.9,3.1,1.5,0.1,setosa 7.0,3.2,4.7,1.4,versicolor 6.4,3.2,4.5,1.5,versicolor 6.9,3.1,4.9,1.5,versicolor 5.5,2.3,4.0,1.3,versicolor 6.5,2.8,4.6,1.5,versicolor 5.7,2.8,4.5,1.3,versicolor 6.3,3.3,6.0,2.5,virginica 5.8,2.7,5.1,1.9,virginica 7.1,3.0,5.9,2.1,virginica 6.3,2.9,5.6,1.8,virginica 7.6,3.0,6.6,2.1,virginica 6.1,2.8,5.0,2.4,virginica ; run; /* Indexer la colonne 'SepalLength' */ table.index / table='iris_data', casOut={ name='iris_indexed_basic', indexVars={'SepalLength'}, replace=TRUE }; /* Afficher les informations de la table pour confirmer l'index */ table.columnInfo / table='iris_indexed_basic'; /* Récupérer des données en filtrant sur la colonne indexée */ table.fetch / table={ name='iris_indexed_basic', where='SepalLength = 5.0' }; quit;

proc cas; session casauto; /* La table 'iris_data' est supposée exister de l'exemple précédent */ /* Indexer plusieurs colonnes et spécifier un type d'index Btree */ table.index / table='iris_data', casOut={ name='iris_indexed_multi', indexVars={'SepalLength', 'Species'}, indexType='Btree', replace=TRUE }; /* Afficher les informations de la table pour confirmer les index */ table.columnInfo / table='iris_indexed_multi'; /* Récupérer des données en filtrant sur les colonnes indexées */ table.fetch / table={ name='iris_indexed_multi', where='SepalLength > 5.0 and Species = "virginica"' }; quit;

proc cas; session casauto; /* La table 'iris_data' est supposée exister de l'exemple précédent */ /* Créer un index sur la colonne 'PetalLength' */ table.index / table='iris_data', casOut={ name='iris_petal_indexed', indexVars={'PetalLength'}, replace=TRUE }; /* Analyser les détails de la table pour voir la taille de l'index */ table.tableDetails result=r_details / table='iris_petal_indexed'; print r_details.TableDetails[,{'Active', 'Rows', 'IndexSize', 'DataSize'}]; /* Reconstruire l'index avec une colonne supplémentaire */ table.index / table='iris_data', casOut={ name='iris_petal_species_indexed', indexVars={'PetalLength', 'Species'}, rebuild=TRUE, replace=TRUE }; /* Analyser la nouvelle table indexée */ table.tableDetails result=r_rebuild_details / table='iris_petal_species_indexed'; print r_rebuild_details.TableDetails[,{'Active', 'Rows', 'IndexSize', 'DataSize'}]; /* Afficher les informations de colonne */ table.columnInfo / table='iris_petal_species_indexed'; quit;

proc cas; session casauto; /* La table 'iris_data' est supposée exister de l'exemple précédent */ /* Tentative de créer un index sur une colonne inexistante (gestion d'erreur) */ /* Note: CASL générera un avertissement ou une erreur, le script continuera si possible. */ /* La ligne suivante est commentée car elle provoquerait une erreur dans un environnement réel */ /* table.index / table='iris_data', casOut={ name='iris_error_index', indexVars={'NonExistentColumn'}, replace=TRUE }; */ /* Créer un index temporaire pour la démonstration de suppression */ table.index / table='iris_data', casOut={ name='iris_temp_indexed', indexVars={'PetalWidth'}, replace=TRUE }; /* Vérifier que l'index temporaire a été créé */ table.columnInfo / table='iris_temp_indexed'; /* Supprimer la table indexée (ce qui supprime l'index implicitement) */ table.dropTable / caslib='casuser', tableName='iris_temp_indexed', quiet=TRUE; /* Tenter de récupérer des informations sur la table supprimée (devrait échouer) */ /* La ligne suivante est commentée car elle provoquerait une erreur dans un environnement réel */ /* table.columnInfo / table='iris_temp_indexed'; */ quit;