Informix Data Connector

/* Établit une connexion LIBNAME à la base de données Informix */ /* Remplacez les valeurs d'hôte, de port, de base de données, d'utilisateur et de mot de passe par les vôtres */ LIBNAME myinfor INFORMIX SERVER="your_informix_server_name" /* Nom du serveur Informix */ HOST="your_informix_host" /* Adresse IP ou nom d'hôte d'Informix */ PORT=9088 /* Port par défaut d'Informix */ DATABASE="your_informix_db" /* Nom de la base de données Informix */ USER="your_username" /* Nom d'utilisateur Informix */ PASSWORD="your_password" /* Mot de passe Informix */ SCHEMA="your_schema" DBCLIENT_MAX_DATA_BYTES=104857600; /* Option pour la taille maximale des données */ /* Crée une table SAS en mémoire CAS pour l'exemple */ DATA casuser.sample_data; input ID Name $ Value; datalines; 1 John 100 2 Jane 150 3 Mike 200 ; RUN; /* Charge la table SAS 'sample_data' dans une table CAS 'informix_table' */ PROC CASUTIL; LOAD DATA=casuser.sample_data OUTCASLIB=mycaslib CASOUT="informix_table" REPLACE; QUIT; /* Pour lire depuis Informix vers CAS (si 'my_informix_data' existe dans Informix) */ /* PROC CASUTIL; */ /* LOAD DATA=myinfor.my_informix_data OUTCASLIB=mycaslib CASOUT="loaded_informix_data" REPLACE; */ /* QUIT; */ LIBNAME myinfor CLEAR;

/* Connexion au serveur CAS */ CAS; /* Établit une caslib pour Informix avec des options supplémentaires */ /* Remplacez les valeurs d'hôte, de port, de base de données, d'utilisateur et de mot de passe par les vôtres */ CASLIB myinformix_lib datasource=( driver="informix", server="your_informix_server_name", host="your_informix_host", port=9088, database="your_informix_db", username="your_username", password="your_password", schema="your_schema", dblocale="en_US.57372" ) incaslib; /* incaslib rend la caslib disponible immédiatement */ /* Crée une table SAS temporaire qui sera chargée dans Informix via CAS */ DATA _null_; set sashelp.class; file _webout; output; RUN; DATA casuser.students; set sashelp.class; RUN; /* Sauvegarde la table CAS 'students' dans Informix */ PROC CASUTIL; SAVE DATA=casuser.students CASLIB=myinformix_lib CASOUT="informix_students_table" REPLACE; QUIT; /* Vérifie que la table a été créée dans Informix et peut être chargée */ PROC CASUTIL; LOAD DATA=myinformix_lib.informix_students_table CASOUT="loaded_informix_students" REPLACE; QUIT; PROC PRINT DATA=loaded_informix_students (obs=5); RUN; CASLIB myinformix_lib_informix DROP; CAS TERMINATE;

/* Connexion au serveur CAS */ CAS; /* Établit une caslib pour Informix (assurez-vous que la connexion est valide) */ /* Pour cet exemple, nous supposons qu'une table 'my_large_dataset' existe dans Informix */ /* Remplacez les valeurs d'hôte, de port, de base de données, d'utilisateur et de mot de passe par les vôtres */ CASLIB myinformix_adv_lib datasource=( driver="informix", server="your_informix_server_name", host="your_informix_host", port=9088, database="your_informix_db", username="your_username", password="your_password", schema="your_schema" ) incaslib; /* Simulation d'une table Informix pour l'exemple */ /* Normalement, cette table existerait déjà dans votre base de données Informix */ /* Ici, nous la créons directement dans CAS pour simuler l'accès à une table Informix existante */ DATA casuser.my_large_dataset; length id 8 product $20. quantity 8 price 8; do id = 1 to 1000; product = 'Produit_' || put(ceil(ranuni(0)*10), 2.); quantity = ceil(ranuni(0)*100); price = round(ranuni(0)*1000, 0.01); output; end; RUN; /* Charger sélectivement des données d'Informix avec un filtre et une sélection de colonnes */ /* Supposons que 'my_large_dataset' est le nom de la table dans Informix */ PROC CASUTIL; LOAD DATA=myinformix_adv_lib.my_large_dataset(where=(quantity > 50) drop=(price)) CASOUT="filtered_informix_data" REPLACE; QUIT; PROC PRINT DATA=filtered_informix_data (obs=10); RUN; CASLIB myinformix_adv_lib DROP; CAS TERMINATE;

/* Connexion au serveur CAS */ CAS; /* Établit une caslib pour Informix avec des options de performance et de gestion d'erreur */ /* Remplacez les valeurs d'hôte, de port, de base de données, d'utilisateur et de mot de passe par les vôtres */ CASLIB myinformix_perf_lib datasource=( driver="informix", server="your_informix_server_name", host="your_informix_host", port=9088, database="your_informix_db", username="your_username", password="your_password", schema="your_schema", /* Options de performance */ NTHREADS=4, /* Nombre de threads à utiliser pour le transfert de données */ DBCONNECT_MAX_DATA_BYTES=104857600, /* Taille maximale des blocs de données */ PRESERVE_CURSORS=TRUE, /* Aide à la performance pour des requêtes répétées */ /* Options de gestion d'erreur (ex: ignore les lignes erronées, nécessite un fichier de log d'erreurs) */ _ERROR_FILE_="/tmp/informix_errors.log", _ERROR_ACTION_="CONTINUE" ) incaslib; /* Crée une table CAS avec des données qui pourraient potentiellement causer des erreurs (simulé) */ DATA casuser.data_with_potential_errors; input ID Name $ Age; datalines; 1 Alice 25 2 Bob 30 3 Charlie . /* Simulation d'une donnée manquante/potentiellement erronée */ 4 David 40 ; RUN; /* Sauvegarde la table CAS dans Informix, avec gestion d'erreurs */ PROC CASUTIL; SAVE DATA=casuser.data_with_potential_errors CASLIB=myinformix_perf_lib CASOUT="informix_error_test" REPLACE; QUIT; /* Tente de charger la table pour vérifier */ PROC CASUTIL; LOAD DATA=myinformix_perf_lib.informix_error_test CASOUT="loaded_error_test" REPLACE; QUIT; PROC PRINT DATA=loaded_error_test; RUN; /* Nettoyage */ CASLIB myinformix_perf_lib DROP; CAS TERMINATE;