SETPGMINF

La commande Définir les informations de programme (SETPGMINF) est utilisée avec les langages du modèle de programme étendu (EPM) pour associer tous les objets programme d'une application. La commande SETPGMINF définit l'environnement d'application, d'après les informations fournies dans les paramètres ROOTPGM, SUBPGM et LIBFILE. Les langages C/400*, FORTRAN/400* et Pascal fonctionnent dans le modèle de programme étendu. The Set Program Information (SETPGMINF) command is used with the extended program model (EPM) languages to associate all the program objects in an application. The SETPGMINF command defines the application environment, based on the information you supply on the ROOTPGM, SUBPGM, and LIBFILE parameters. The C/400*, FORTRAN/400*, and Pascal languages work within the extended program model.

Les programmes EPM qui font référence à des symboles externes d'autres programmes EPM doivent être indiqués dans la commande SETPGMINF. Les symboles externes sont des appels à d'autres unités de compilation ou à de la mémoire externe. Vous n'avez pas besoin d'utiliser cette commande si votre programme se compose d'une seule unité de compilation, ou s'il n'appelle que des programmes non EPM. Si les programmes indiqués dans les paramètres ROOTPGM et SUBPGM n'ont pas été compilés avec succès, SETPGMINF échoue. EPM programs that refer to external symbols in other EPM programs must be specified on the SETPGMINF command. External symbols are calls to other compilation units or external storage. You do not need to use this command if your program consists of only one compilation unit, or if the program calls only non-EPM programs. If the programs you specify on the ROOTPGM and SUBPGM parameters have not been successfully compiled, SETPGMINF fails.

Messages d'erreur SETPGMINF

Messages *ESCAPE *ESCAPE Messages

PSE4017

Des erreurs se sont produites dans la commande SETPGMINF. Errors occurred in SETPGMINF command.

Paramètres

Programme racine (ROOTPGM)Root program (ROOTPGM)

Indique le nom du programme qui contiendra la définition d'environnement nécessaire à la création de l'environnement d'exécution EPM. Ce programme, appelé point d'entrée par défaut ou programme racine, contient les références aux symboles externes. En C, le point d'entrée par défaut est généralement le programme qui contient une fonction main(). Pascal définit le bloc begin principal de l'unité de programme comme point d'entrée par défaut. FORTRAN définit le programme principal (celui défini par l'instruction PROGRAM) comme point d'entrée par défaut. Le droit *CHANGE est requis. Specifies the name of the program which will contain the environment definition necessary to create the EPM run-time environment. This program, called a default entry point or root program, contains the references to external symbols. In C, the default entry point is usually the program that contains a main() function. Pascal defines the main begin block of the program unit as the default entry point. FORTRAN defines the main program (the program defined on the PROGRAM statement) as the default entry point. *Change authority is required.

ROOTPGM est un paramètre obligatoire. ROOTPGM is a required parameter.

program-name

Nom de l'objet programme EPM qui contient le point d'entrée par défaut. The name of the EPM program object that contains the default entry point.

Les valeurs de bibliothèque possibles sont : Possible library values are:

*LIBL

Le système recherche l'objet programme racine dans la liste de bibliothèques. The system searches the library list for the root program object.

*CURLIB

La bibliothèque en cours est recherchée. Si vous n'avez pas indiqué de bibliothèque en cours, QGPL est utilisée. The current library is searched. If you have not specified the current library, QGPL is used.

nom-bibliothèque

Entrez le nom de la bibliothèque dans laquelle se trouve l'objet programme racine. Enter the name of the library where the root program object is located.

Sous-programmes (SUBPGM)Sub-programs (SUBPGM)

Indique une liste de tous les objets programme que vous souhaitez inclure dans l'environnement d'exécution de votre application. Ces programmes peuvent être des objets programme EPM ou non EPM. Specifies a list of all the program objects that you want to include in the run-time environment for your application. These programs can be either EPM or non-EPM program objects.

Jusqu'à 200 objets programme peuvent être indiqués dans le paramètre SUBPGM. Vous pouvez indiquer plus de 200 objets programme associés pour 1 application si vous imbriquez des commandes SETPGMINF. Up to 200 program objects can be specified on the SUBPGM parameter. You can specify more than 200 related program objects for 1 application if you nest SETPGMINF commands.

program-name

Entrez le nom de l'objet programme. Vous pouvez indiquer jusqu'à 200 objets programme dans une même commande SETPGMINF. Enter the name of the program object. You can specify up to 200 program objects on one SETPGMINF command.

Les valeurs de bibliothèque possibles sont : Possible library values are:

*LIBL

Le système recherche dans la liste de bibliothèques la bibliothèque contenant les objets programme. The system searches the library list for the library containing the program objects.

*CURLIB

Le nom de la bibliothèque en cours est utilisé. Si vous n'avez pas indiqué de bibliothèque en cours, QGPL est utilisée. The name of the current library is used. If you have not specified the current library, QGPL is used.

nom-bibliothèque

Entrez le nom de la bibliothèque dans laquelle se trouve l'objet programme. Enter the name of the library where the program object is located.

Ces SUBPGM sont recherchés à l'exécution, selon les spécifications de bibliothèque utilisées lorsque vous indiquez la commande SETPGMINF. Si vous indiquez une bibliothèque précise ou utilisez *CURLIB, seule cette bibliothèque précise est recherchée pour l'objet programme. Si la bibliothèque désignée comme bibliothèque en cours change entre le moment où vous émettez la commande SETPGMINF et celui où vous exécutez votre programme, les objets programme ne seront pas tous trouvés et vous recevrez un message d'erreur. These SUBPGMs are sought at run-time, according to the library specifications used when you specify the SETPGMINF command. If you specify a specific library, or use *CURLIB, only that specific library is searched for the program object. If the library designated as the current library changes between the time you issue the SETPGMINF command and the time you run your program, not all of the program objects will be found and you will receive an error message.

Fichiers d'informations de bibliothèque (LIBFILE)Library information files (LIBFILE)

Indique le fichier d'informations de bibliothèque qui contient les informations servant à résoudre les références externes restantes une fois que tous les objets programme identifiés dans les paramètres ROOTPGM et SUBPGM ont été traités. Les fichiers d'informations de bibliothèque sont recherchés dans l'ordre où ils sont indiqués. Specifies the library information file that contains information used to resolve any outstanding external references after all of the program objects identified on the ROOTPGM and SUBPGM parameters have been processed. Library information files are searched in the order that they are specified.

Plusieurs fichiers d'informations de bibliothèque sont fournis par IBM. Ces fichiers contiennent les fonctions de bibliothèque des langages EPM. Several library information files are IBM-supplied. These files contain the EPM language library functions.

Vous pouvez créer et mettre à jour votre propre fichier d'informations de bibliothèque avec la commande Extraire les informations de programme (EXTPGMINF). You can create and update your own library information file with the Extract Program Information (EXTPGMINF) command.

*SAME

Utiliser le même fichier d'informations de bibliothèque que lors de la dernière définition d'environnement. S'il s'agit de la première définition d'un environnement, le fichier de bibliothèque d'exécution de l'objet langage indiqué dans le paramètre ROOTPGM est utilisé. Par exemple, si votre ROOTPGM a été compilé avec le compilateur C/400, le fichier d'informations de bibliothèque par défaut est *CLIB. Use the same library information file as was used in the last environment definition. If this is the first time an environment is defined, the run-time library file for the language object specified on the ROOTPGM parameter is used. For example, if your ROOTPGM was compiled using the C/400 compiler, the default library information file is *CLIB.

*NONE

Aucun fichier d'informations de bibliothèque n'est utilisé. No library information file is used.

*PASLIB

Le fichier d'informations de bibliothèque d'exécution Pascal est utilisé. The Pascal run-time library information file is used.

*CLIB

Le fichier d'informations de bibliothèque d'exécution C/400 est utilisé. The C/400 run-time library information file is used.

*FTNLIB

Le fichier d'informations de bibliothèque d'exécution FORTRAN/400 est utilisé. The FORTRAN/400 run-time library information file is used.

file-name

Entrez le nom du fichier d'informations de bibliothèque. Ce fichier d'informations de bibliothèque doit exister. Pour créer un fichier d'informations de bibliothèque, utilisez la commande EXTPGMINF. Enter the name of the library information file. This library information file must exist. To create a library information file, use the EXTPGMINF command.

Les valeurs de bibliothèque possibles sont les suivantes : The possible library values are:

*LIBL

Le système recherche le fichier d'informations de bibliothèque indiqué dans la liste de bibliothèques. The system searches the library list for the specified library information file.

*CURLIB

La bibliothèque en cours est utilisée pour localiser le fichier d'informations de bibliothèque. Si vous n'avez pas indiqué de bibliothèque en cours, QGPL est utilisée. The current library is used to locate the library information file. If you have not specified the current library, QGPL is used.

nom-bibliothèque

Entrez le nom de la bibliothèque qui contient le fichier d'informations de bibliothèque. Enter the name of the library that contains the library information file.

Détail du listing (LISTDETAIL)Listing detail (LISTDETAIL)

Indique si un listing SETPGMINF est créé. Le listing porte le même nom que le programme indiqué dans le paramètre ROOTPGM et est dirigé vers la bibliothèque et le fichier indiqués dans le paramètre PRTFILE. Specifies whether a SETPGMINF listing is created. The listing will have the same name as the program specified on the ROOTPGM parameter and is directed to the library and file specified on the PRTFILE parameter.

Le paramètre PRTFILE n'est affiché que si vous demandez un listing (*BASIC ou *FULL) dans le paramètre LISTDETAIL. The PRTFILE parameter is not displayed unless you request a listing (*BASIC or *FULL) on the LISTDETAIL parameter.

*NONE

Aucun listing n'est créé. A listing is not created.

*BASIC

Un listing est créé, qui inclut toutes les références et définitions de symboles résultant des programmes indiqués dans les paramètres ROOTPGM et SUBPGM. A listing is created that includes all of the symbol references and definitions that result from the programs specified on the ROOTPGM and SUBPGM parameters.

*FULL

Un listing est créé, qui inclut toutes les références et définitions de symboles de l'ensemble de l'application. Cela comprend les références et définitions de symboles de tous les programmes indiqués dans le paramètre LIBFILE qui ne sont pas explicitement référencés dans votre application. A listing is created that includes all of the symbol references and definitions for the entire application. This includes the symbol references and definitions for all the programs specified on the LIBFILE parameter that are not explicitly referenced in your application.

Fichier d'impression (PRTFILE)Print file (PRTFILE)

Indique le nom et la bibliothèque du fichier d'imprimante vers lequel le listing SETPGMINF est dirigé. Le fichier doit avoir une longueur minimale de 132. Si vous indiquez un fichier dont la longueur d'enregistrement est inférieure à 132, des informations peuvent être perdues. Specifies the name and library of the printer file where the SETPGMINF listing is directed. The file should have a minimum length of 132. If you specify a file with a record length of less than 132, information may be lost.

Ce paramètre n'apparaît pas sur l'écran d'invite, sauf si vous remplacez la valeur par défaut du paramètre LISTDETAIL par *BASIC ou *FULL. This parameter does not appear on the prompting display unless you change the default value on the LISTDETAIL parameter to *BASIC or *FULL.

QSYSPRT

Le listing SETPGMINF est placé dans le fichier QSYSPRT. The SETPGMINF listing is placed in the file QSYSPRT.

file-name

Entrez le nom du fichier dans lequel le listing SETPGMINF doit être placé. Enter the name of the file where the SETPGMINF listing is to be placed.

Les valeurs de bibliothèque possibles sont les suivantes : The possible library values are:

*LIBL

Le système recherche dans la liste de bibliothèques. The system searches the library list.

*CURLIB

Le nom de la bibliothèque en cours est utilisé. Si vous n'avez pas indiqué de bibliothèque en cours, QGPL est utilisée. The name of the current library is used. If you have not specified the current library, QGPL is used.

nom-bibliothèque

Entrez le nom de la bibliothèque dans laquelle le fichier est stocké. Enter the name of the library where the file is stored.

Attributs d'exécution (RUNATTR)Run attributes (RUNATTR)

Indique le nombre de fois que le compteur d'erreurs non fatales est incrémenté avant la fin du traitement, ainsi que le niveau de gravité de message interprété comme une erreur fatale à l'exécution. Une erreur fatale est une erreur qui empêche votre application de s'exécuter. Vous pouvez également indiquer si vous souhaitez que la vérification des types externes ait lieu à l'exécution du programme. La zone des attributs de calcul permet de définir les attributs qui contrôlent les opérations en virgule flottante dans l'environnement d'exécution. Specifies the number of times the non-fatal error counter is incremented before processing ends, and the message severity-level that is interpreted as a fatal error at run-time. A fatal error is an error that stops your application from running. You can also specify whether you want external type checking to take place at program run-time. The computational attributes field allows you to set the attributes for controlling floating point operations in the run-time environment.

20

Le compteur d'erreurs non fatales est incrémenté jusqu'à 20 fois avant la fin du traitement de votre application. The non-fatal error counter is incremented up to 20 times before the processing of your application ends.

*NOMAX

Le compteur d'erreurs non fatales n'a pas de limite et n'arrêtera pas le traitement de votre application. The non-fatal error counter has no limit and will not stop the processing of your application.

counter-number

Nombre d'erreurs non fatales autorisées avant la fin du traitement. The number of non-fatal errors that are allowed before processing ends.

40

Un message dont le niveau de gravité est 40 ou plus est interprété comme une erreur fatale. A message with a severity-level of 40 or higher is interpreted as a fatal error.

severity-level

Niveau de gravité de message interprété comme une erreur fatale. Si un niveau de gravité 0 est indiqué, votre application s'arrête dès qu'une erreur se produit. The message severity-level that is interpreted as a fatal error. If a severity-level of 0 is specified, your application stops running if any errors occur.

*YES

La vérification des types externes est effectuée à l'exécution du programme. External type checking is performed at program run-time.

*NO

La vérification des types externes n'est pas effectuée à l'exécution du programme. Les messages d'avertissement résultant d'erreurs de vérification ne sont pas émis lors de l'exécution de votre programme. External type checking is not performed at program run-time. Any warning messages that occur as a result of checking errors are not issued when you run your program.

*LANG

Les attributs de calcul sont définis selon la sémantique du langage EPM. Computational attributes are set according to the semantics of the EPM language.

*ALL

Les exceptions de virgule flottante sont désactivées ou masquées. Floating point exceptions are disabled or masked.

*NONE

Les exceptions de virgule flottante sont activées ou non masquées. Floating point exceptions are enabled or unmasked.

Options de performance (PFROPT)Performance options (PFROPT)

Indique si l'espace alloué aux variables de programme statiques, automatiques et dynamiques fait partie du groupe d'accès du processus. Specifies whether the space allocated for static, automatic, and dynamic program variables is part of the process access group.

*NONE

Les espaces de mémoire créés ne font pas partie du groupe d'accès du processus (PAG). The storage spaces created are not part of the process access group (PAG).

*ALL

Les espaces de mémoire créés font partie du groupe d'accès du processus (PAG). Cette option peut améliorer les performances des programmes qui utilisent une mémoire de variables de programme limitée et qui s'exécutent sur un système non dédié. Des informations sur les outils de performances et les commandes CL que vous pouvez utiliser pour afficher et analyser le PAG figurent dans le manuel Performance Tools Guide. The storage spaces created are part of the process access group (PAG). This option can improve the performance of programs that use limited program variable storage, and are run on a non-dedicated system. Information on performance tools and CL commands you can use to display and analyze the PAG can be found in the Performance Tools Guide.

Taille initiale des espaces de tas (HEAPSIZE)Initial size of heap spaces (HEAPSIZE)

Indique la taille initiale des espaces de tas pour le tas de mémoire dynamique et statique. La taille de tas indiquée augmentera au fil de l'exécution de votre application. Specifies the initial size of the heap spaces for the dynamic and static storage heap. The heap size specified will expand as your application progresses.

Le tas de mémoire dynamique est constitué de la mémoire que vous avez allouée dans votre application avec les routines de mémoire C/400 (malloc, calloc, realloc) ou la procédure NEW en Pascal. The dynamic storage heap consists of the storage that you have allocated in your application with the C/400 memory routines (malloc, calloc, realloc) or the NEW procedure in Pascal.

Le tas de mémoire statique est constitué de la mémoire que vous avez allouée dans votre application avec des variables statiques et statiques externes. The static storage heap consists of the storage that you have allocated in your application with static and external static variables.

16000

La taille initiale du tas de mémoire dynamique est de 16000 octets. The initial size of the dynamic storage heap is 16000 bytes.

*NONE

Aucune mémoire dynamique initiale n'est allouée. N'utilisez *NONE que si vous n'utilisez aucune fonction de gestion de mémoire EPM dans votre application. Si vous indiquez *NONE et utilisez l'une des fonctions de mémoire, vous obtiendrez des exceptions de pointeur et le traitement de votre application s'arrêtera. No initial dynamic storage is allocated. Use *NONE only if you do not use any EPM memory management functions in your application. If you specify *NONE and use any of the memory functions, you will get pointer exceptions and your application will stop processing.

dynamic-storage-size

Entrez la taille initiale du tas de mémoire dynamique. La taille initiale peut être comprise entre 1024 et 16777216 octets. Enter the initial size of the dynamic storage heap. The initial size can be between 1024 and 16777216 bytes.

32000

La taille initiale du tas de mémoire statique est de 32000 octets. The initial size of the static storage heap is 32000 bytes.

static-storage-size

Entrez la taille initiale du tas de mémoire statique. La taille initiale peut être comprise entre 1024 et 16777216 octets. Si vous utilisez beaucoup de variables statiques dans votre application, vos performances peuvent s'améliorer si vous indiquez un tas de mémoire plus grand que la valeur par défaut. Enter the initial size of the static storage heap. The initial size can be between 1024 and 16777216 bytes. If you use static variables extensively in your application your performance can improve if you specify a larger storage heap than the default.

Taille initiale de la mémoire automatique (STACKSIZE)Initial size of auto storage (STACKSIZE)

Indique la taille initiale de la pile de mémoire automatique. La taille de pile indiquée augmentera au fil de l'exécution de votre application. Specifies the initial size of the automatic storage stack. The stack size specified will expand as your application progresses.

La pile de mémoire automatique est constituée de la mémoire que vous avez allouée dans votre application avec des variables automatiques. The automatic storage stack consists of the storage that you have allocated in your application with automatic variables.

16000

La taille initiale de la pile de mémoire automatique est de 16000 octets. The initial size of the automatic storage stack is 16000 bytes.

automatic-storage-size

Entrez la taille initiale de la pile de mémoire automatique. La taille initiale peut être comprise entre 1024 et 16777216 octets. Si votre application contient un grand nombre d'appels récursifs, vous devez augmenter la taille initiale de la pile. Enter the initial size of the automatic storage stack. The initial size can be between 1024 and 16777216 bytes. If your application contains a large number of recursive calls, you should increase the initial size of the stack.

Attributs du fichier de session (SSNATTR)Session file attributes (SSNATTR)

Indique les attributs de session de fichier pour la taille du fichier et du tampon. Specifies the file session attributes for the file and buffer size.

32000

La taille par défaut du fichier est de 32000 octets. The default size for the file is 32000 bytes.

file-size

Indiquez une valeur de taille de fichier comprise entre 8192 et 16000000 octets. Si votre fichier dépasse la taille indiquée, les informations en haut de l'écran défilent hors de l'affichage. Ces informations sont perdues. Specify a value for the file size between 8192 and 16000000 bytes. If your file exceeds the size you specify, the information at the top rolls off the display. This information is lost.

160

La taille par défaut du tampon est de 160 octets. The default size for the buffer is 160 bytes.

buffer-size

Indiquez une valeur de taille de tampon comprise entre 80 et 1024 octets. Specify a value for the buffer size between 80 and 1024 bytes.

Options de débogage (DBGOPT)Debug options (DBGOPT)

Indique l'utilisation de l'outil de débogage du modèle de programme étendu (EPM) à l'exécution, si le mode débogage du système est actif. Pour activer le mode débogage du système, entrez la commande STRDBG. Specifies the use of the extended program model (EPM) debug tool at run-time, if system debug mode is active. To activate system debug mode, enter the STRDBG command.

*ON

Le débogage EPM démarre à l'exécution si le mode débogage du système est actif. EPM debug starts at run-time if system debug mode is active.

*OFF

Le débogage EPM ne démarrera pas à l'exécution. Vous pouvez utiliser le débogage du système pour déboguer vos programmes, mais les noms de variable, les numéros d'instruction et les commandes de débogage du langage EPM ne sont pas disponibles. EPM debug will not start at run-time. You can use system debug to debug your programs, but EPM language variable names, statement numbers, and debugging commands are not available.

Exemples

Messages d'erreur

Messages *ESCAPE *ESCAPE Messages

PSE4017

Des erreurs se sont produites dans la commande SETPGMINF. Errors occurred in SETPGMINF command.