Problèmes d’alignement avec du COBOL généré

COBOL aligne les éléments de données au niveau 01 sur des limites à deux mots. Cette pratique provoque un problème potentiel dans les applications cics non-DPL qui utilisent des déclarations de données générées par TI ainsi que des métadonnées d’erreur. Si vous codez votre application COBOL pour recevoir les métadonnées d’erreur et les paramètres d’entrée dans une réception, les paramètres sont placés immédiatement à côté des métadonnées en mémoire. Toutefois, étant donné que les métadonnées d’erreur ne se terminent pas sur une limite à deux mots, cette action place les paramètres 4 octets d’avance sur l’endroit où le code COBOL les attend.

Vous pouvez éviter ce problème. Lorsque vous cliquez sur le nom de la méthode Include ou l’option Inclure toutes les informations sous Métadonnées sous l’onglet Avancé de la page de propriétés d’une méthode, vérifiez que le programme mainframe émet deux commandes RECEIVE pour gérer les données entrantes pour la méthode. Le premier RECEIVE extrait le bloc de métadonnées et le second RECEIVE extrait les données de la méthode. Lorsque COBOL est généré pour la méthode, un bloc 01 supplémentaire est généré pour les métadonnées. Lorsque l’option Inclure toutes les informations est sélectionnée, vous devez également créer un envoi supplémentaire pour les métadonnées avant d’envoyer les données de méthode à l’application cliente Automation.

Voir aussi

Données des hôtes et Automation