Construire des programmes de services utiles au quotidien

Introduction

Je rassemblerai dans cet article, au fur et à  mesure de leur écriture, les programmes de services que je met sur le site. Ils étaient pour l’instant un peu éparts sur le site. Il me paraît plus judicieux de les mettre en un seul endroit. Ils sont tous inclus dans le script d’installation joint. Les autres articles déjà  écrits comprenant des programmes de services existent toujours sur le site.

La documentation de chaque programme de service est très succincte, il s’agit le plus souvent de la liste des procédures qu’ils contiennent avec une brève description de ce qu’elles font.

Instructions

  • Le script d’installation est proposé en document joint au format ZIP. Extraire le fichier suffixé par XML et le sauvegarder dans un répertoire de votre IFS.
  • Utilisez l’outil d’installation XML2SRC (voir 421, pour installer l’outil ou consulter le mode opératoire d’une installation).

Limitations

  • Votre AS400 doit être en V5R4 pour certains programmes.

Notez bien

  • Le site XDOCS400.COM fournit des programmes à  titre d’exemples et n’assure pas de hotline ou de garantie dessus.
  • Toutefois, si vous avez des soucis pour les installer, ou les utiliser, contactez l’auteur de l’article via le formulaire ad’hoc du site xdocs400 pour une aide ponctuelle.

Programmes de services

Programmes Descriptif
SRVPSTRING Procédures de gestion des chaînes de caractères
SRVPSQLFCT Procédures de gestion SQL
SRVPFILFLD Procédures de gestion d’une structure de fichier
SRVPERRSQL Procédures de gestion d’erreur SQL
SRVPCONVER Procédures de gestion de conversion
SRVPAPIIFS Procédures de gestion de l’IFS
SRVPERRAPI Procédures de gestion des erreurs survenant dans un programme
SRVPTEXIST Procédures de tests d’existences d’objets

Versionnage

Programme Signature alpha Date Procédures Descriptif
SRVPSTRING SRVPSTRING_V01 28/04/08 09:54:01 ADDQUOTE Entoure une chaîne par des quotes et double les quotes existentes
SRVPSTRING SRVPSTRING_V01 28/04/08 09:54:01 ADDESCAPEC Remplace une liste de caracères par leur équivalence HTML
SRVPSQLFCT SRVPSQLFCT_V01 28/04/08 09:54:01 SQLBUFFERLEN Retourne la place occupée dans un buffer pour variable SQL, selon son type
SRVPFILFLD SRVPFILFLD_V01 28/04/08 09:54:01 FILESCANCRT Création d’un userspace pour liste des zones d’un fichier via l’API QUSLFLD
SRVPFILFLD SRVPFILFLD_V01 28/04/08 09:54:01 FILESCANDLT Supression du userspace de la liste des zones
SRVPFILFLD SRVPFILFLD_V01 28/04/08 09:54:01 FILESCANFLD Scan de la liste des zones d’un fichier via l’API QUSLFLD
SRVPERRSQL SRVPERRSQL_V01 28/04/08 09:54:01 SQLERREUR Monitorage des erreurs SQL
SRVPCONVER SRVPCONVER_V01 28/04/08 09:54:01 SPACKTOSNUM Conversion d’une zone packée stockée dans une chaîne en zone numérique stockée dans une chaîne
SRVPCONVER SRVPCONVER_V01 28/04/08 09:54:01 SDECTOSNUM Conversion d’une zone décimale stockée dans une chaîne en zone numérique stockée dans une châine
SRVPCONVER SRVPCONVER_V01 28/04/08 09:54:01 ODDZONE Test si une valeure est paire ou impaire
SRVPAPIIFS SRVPAPIIFS_V01 28/04/08 09:54:01 CREATEIFSDOC Création d’un document dans l’IFS
SRVPERRAPI SRVPERRAPI_V01 05/05/08 10:55:52 DSPAPIERRAUTO Affichage du dernier message d’erreur survenu dans un programme.
SRVPERRAPI SRVPERRAPI_V01 05/05/08 10:55:52 DSPAPIERRSTD Affichage d’un message d’erreur via l’API QMHSNDPM avec choix du message, du texte …
SRVPTEXIST SRVPTEXIST_V01 05/05/08 10:56:08 EXISTFILEMBR Test existence d’un Fichier/Bibliothèque/Membre

Exemples d’utilisation des programmes de services

Programmes de services Exemple d’utilisation
ADDQUOTE 410
ADDESCAPEC 410
SQLBUFFERLEN 410
SQLERREUR 410
SPACKTOSNUM 410
SDECTOSNUM 410
ODDZONE 410
CREATEIFSDOC 410
EXISTFILEMBR 413
FILESCANCRT 414
FILESCANDLT 414
FILESCANFLDT 414
Print Friendly, PDF & Email